calendar.C

Go to the documentation of this file.

/// \file
/// \ingroup tutorial_gui
/// This macro gives an example of how to use html widget to display tabular data.
/// To run it do either:
/// ~~~
/// .x calendar.C
/// .x calendar.C++
/// ~~~
///
/// \macro_code
///
/// \author Valeriy Onuchin   24/08/2007
 
#include "TDatime.h"
#include "TTimeStamp.h"
#include "TGComboBox.h"
#include "TGNumberEntry.h"
#include "TGLabel.h"
#include "TGColorSelect.h"
#include "TGHtml.h"
#include "TApplication.h"
#include "TROOT.h"
#include "TColor.h"
 
/////////////////////////// HTML calendar //////////////////////////////////////
 
TString monthNames[12] = {"January", "February", "March",     "April",   "May",      "June",
                          "July",    "August",   "September", "October", "November", "December"};
 
////////////////////////////////////////////////////////////////////////////////
class HtmlDayName {
public:                // make them public for shorter code
   TString fDay;       // day name, e.g. "Sunday"
   TString fAlign;     // name align inside table cell
   TString fBgColor;   // cell background color
   TString fFontSize;  // text font size
   TString fFontColor; // text color
   TString fHtml;      // HTML output code
 
public:
   HtmlDayName(const char *day);
   virtual ~HtmlDayName() {}
 
   TString Html() const { return fHtml; }
 
   ClassDef(HtmlDayName, 0);
};
 
//______________________________________________________________________________
HtmlDayName::HtmlDayName(const char *day)
   : fDay(day), fAlign("middle"), fBgColor("#000000"), fFontSize("4"), fFontColor("#FFFFFF")
{
   // ctor.
 
   fHtml += "<TH  width=14%";
   fHtml += " align=" + fAlign;
   fHtml += " bgcolor=" + fBgColor + ">";
   fHtml += "<font size=" + fFontSize;
   fHtml += " color=" + fFontColor + ">";
   fHtml += fDay;
   fHtml += "</font></TH>\n";
}
 
////////////////////////////////////////////////////////////////////////////////
class HtmlMonthTable {
public:          // make them public for shorter code
   Int_t fYear;  // year
   Int_t fMonth; // month
 
   TString fBorder;       // border width
   TString fBgColor;      // background color
   TString fCellpadding;  // cell padding
   TString fCellFontSize; // cell font size
   TString fCellBgcolor;  // cell background color
   TString fTodayColor;   // background color of cell correspondent today date
 
   TDatime fToday; // today's date
   TString fHtml;  // HTML output code
 
   void Build();
   void BuildDayNames();
   void BuildDays();
 
public:
   HtmlMonthTable(Int_t year, Int_t month);
   virtual ~HtmlMonthTable() {}
 
   void SetDate(Int_t year, Int_t month);
   TString Html() const { return fHtml; }
 
   ClassDef(HtmlMonthTable, 0);
};
 
//______________________________________________________________________________
HtmlMonthTable::HtmlMonthTable(Int_t year, Int_t month)
   : fYear(year),
     fMonth(month),
     fBorder("2"),
     fBgColor("#aaaaaa"),
     fCellpadding("5"),
     fCellFontSize("3"),
     fCellBgcolor("#eeeeee"),
     fTodayColor("#ffff00")
{
   // Constructor.
 
   Build();
}
 
//______________________________________________________________________________
void HtmlMonthTable::SetDate(Int_t year, Int_t month)
{
   // Set date.
 
   fYear = year;
   fMonth = month;
   Build();
}
 
//______________________________________________________________________________
void HtmlMonthTable::Build()
{
   // Build HTML code.
 
   fHtml = "<TABLE width=100%";
   fHtml += " border=" + fBorder;
   fHtml += " bgcolor=" + fBgColor;
   fHtml += " cellpadding=" + fCellpadding;
   fHtml += "><TBODY>";
 
   BuildDayNames();
   BuildDays();
 
   fHtml += "</TBODY></TABLE>\n";
}
 
//______________________________________________________________________________
void HtmlMonthTable::BuildDayNames()
{
   // Build table header with day names.
 
   fHtml += "<TR>";
   fHtml += HtmlDayName("Sunday").Html();
   fHtml += HtmlDayName("Monday").Html();
   fHtml += HtmlDayName("Tuesday").Html();
   fHtml += HtmlDayName("Wednesday").Html();
   fHtml += HtmlDayName("Thursday").Html();
   fHtml += HtmlDayName("Friday").Html();
   fHtml += HtmlDayName("Saturday").Html();
   fHtml += "</TR>\n";
}
 
//______________________________________________________________________________
void HtmlMonthTable::BuildDays()
{
   // Build part of table with day numbers.
 
   static Int_t maxdays[12] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
 
   Int_t maxday = maxdays[fMonth - 1];
   if ((fMonth == 2) && TTimeStamp::IsLeapYear(fYear))
      maxday = 29;
 
   Int_t first = TTimeStamp::GetDayOfWeek(1, fMonth, fYear);
 
   // fill html table
   for (int week = 0; week < 6; week++) {
      fHtml += "<TR>";
 
      for (int weekday = 0; weekday < 7; weekday++) { //
         Int_t day = week * 7 + weekday - first + 1;
 
         if ((day > maxday) && !weekday)
            break; //
 
         fHtml += "<TD align=left width=14% ";
 
         // hightlight today's cell
         if ((fToday.GetYear() == fYear) && (fToday.GetMonth() == fMonth) && (fToday.GetDay() == day)) {
            fHtml += " bgcolor=" + fTodayColor;
         } else {
            fHtml += " bgcolor=" + fCellBgcolor;
         }
         fHtml += ">";
 
         // skip week days which are not of this month
         if ((day <= 0) || (day > maxday)) {
            fHtml += "&nbsp;</TD>";
            continue;
         }
 
         fHtml += "<font size=" + fCellFontSize + ">";
         fHtml += Form("%d", day);
         fHtml += "</font></TD>\n";
      }
      fHtml += "</TR>\n";
   }
}
 
////////////////////////////////////////////////////////////////////////////////
class HtmlCalendar {
public:                        // make them public for shorter code
   Int_t fYear;                // year
   Int_t fMonth;               // month
   HtmlMonthTable fMonthTable; // HTML table presenting month days
   TString fHeader;            // HTML header
   TString fFooter;            // HTML footer
   TString fHtml;              // output HTML string
   TString fTitle;             // page title
 
   void MakeHeader();
   void MakeFooter();
 
public:
   HtmlCalendar(Int_t year, Int_t month);
   virtual ~HtmlCalendar() {}
 
   void SetDate(Int_t year, Int_t month);
   TString Html() const { return fHtml; }
 
   ClassDef(HtmlCalendar, 0);
};
 
//______________________________________________________________________________
HtmlCalendar::HtmlCalendar(Int_t year, Int_t month) : fMonthTable(year, month)
{
   // Constructor.
 
   fYear = year;
   fMonth = month;
 
   MakeHeader();
   MakeFooter();
 
   fHtml = fHeader;
   fHtml += fMonthTable.Html();
   fHtml += fFooter;
}
 
//______________________________________________________________________________
void HtmlCalendar::SetDate(Int_t year, Int_t month)
{
   // Create calendar for month/year.
 
   fYear = year;
   fMonth = month;
 
   fMonthTable.SetDate(year, month);
   MakeHeader();
   MakeFooter();
   fHtml = fHeader;
   fHtml += fMonthTable.Html();
   fHtml += fFooter;
}
 
//______________________________________________________________________________
void HtmlCalendar::MakeHeader()
{
   // Make HTML header.
 
   fTitle = monthNames[fMonth - 1] + Form(" %d", fYear);
   fHeader = "<html><head><title>";
   fHeader += fTitle;
   fHeader += "</title></head><body>\n";
   fHeader += "<center><H2>" + fTitle + "</H2></center>";
}
 
//______________________________________________________________________________
void HtmlCalendar::MakeFooter()
{
   // Make HTML footer.
 
   fFooter = "<br><p><br><center><strong><font size=2 color=#2222ee>";
   fFooter += "Example of using Html widget to display tabular data.";
   fFooter += "</font></strong></center></body></html>";
}
 
//////////////////////// end of HTML calendar //////////////////////////////////
 
class CalendarWindow {
private:
   TGMainFrame *fMain;         // main frame
   HtmlCalendar *fHtmlText;    // calendar HTML table
   TGHtml *fHtml;              // html widget to display HTML calendar
   TGComboBox *fMonthBox;      // month selector
   TGNumberEntry *fYearEntry;  // year selector
   TGNumberEntry *fFontEntry;  // font size selector
   TGColorSelect *fTableColor; // selector of background color of table
   TGColorSelect *fCellColor;  // selector of background color of table's cells
 
public:
   CalendarWindow();
   virtual ~CalendarWindow();
 
   void UpdateHTML();
 
   ClassDef(CalendarWindow, 0);
};
 
//______________________________________________________________________________
CalendarWindow::~CalendarWindow()
{
   // Destructor.
 
   delete fHtmlText;
   delete fMain;
}
 
//______________________________________________________________________________
CalendarWindow::CalendarWindow()
{
   // Main  window.
 
   fMain = new TGMainFrame(gClient->GetRoot(), 10, 10, kVerticalFrame);
   fMain->SetCleanup(kDeepCleanup); // delete all subframes on exit
 
   // Controls
   TGHorizontalFrame *controls = new TGHorizontalFrame(fMain);
   fMain->AddFrame(controls, new TGLayoutHints(kLHintsCenterX, 1, 1, 1, 1));
 
   // generate HTML calendar table
   TDatime today;
   fHtmlText = new HtmlCalendar(today.GetYear(), today.GetMonth());
 
   // create HTML widget
   fHtml = new TGHtml(fMain, 1, 1);
   fMain->AddFrame(fHtml, new TGLayoutHints(kLHintsExpandX | kLHintsExpandY, 5, 5, 2, 2));
 
   // parse HTML context of HTML calendar table
   fHtml->ParseText((char *)fHtmlText->Html().Data());
 
   TGLabel *dateLabel = new TGLabel(controls, "Date:");
   controls->AddFrame(dateLabel, new TGLayoutHints(kLHintsLeft | kLHintsCenterY, 5, 2, 2, 2));
 
   //
   fMonthBox = new TGComboBox(controls);
   for (int i = 0; i < 12; i++) {
      fMonthBox->AddEntry(monthNames[i].Data(), i + 1);
   }
   fMonthBox->Select(today.GetMonth());
   controls->AddFrame(fMonthBox, new TGLayoutHints(kLHintsLeft, 5, 5, 2, 2));
 
   fYearEntry = new TGNumberEntry(controls, today.GetYear(), 5, -1, TGNumberFormat::kNESInteger,
                                  TGNumberFormat::kNEAPositive, TGNumberFormat::kNELLimitMin, 1995);
   controls->AddFrame(fYearEntry, new TGLayoutHints(kLHintsLeft, 5, 5, 2, 2));
 
   fMonthBox->Resize(100, fYearEntry->GetHeight());
 
   TGLabel *fontLabel = new TGLabel(controls, "Font Size:");
   controls->AddFrame(fontLabel, new TGLayoutHints(kLHintsLeft | kLHintsCenterY, 30, 2, 2, 2));
 
   Int_t fontsize = atoi(fHtmlText->fMonthTable.fCellFontSize.Data());
   fFontEntry = new TGNumberEntry(controls, fontsize, 2, -1, TGNumberFormat::kNESInteger, TGNumberFormat::kNEAPositive,
                                  TGNumberFormat::kNELLimitMax, 0, 7);
   controls->AddFrame(fFontEntry, new TGLayoutHints(kLHintsLeft, 5, 5, 2, 2));
 
   TGLabel *tableLabel = new TGLabel(controls, "Table:");
   controls->AddFrame(tableLabel, new TGLayoutHints(kLHintsLeft | kLHintsCenterY, 5, 2, 2, 2));
 
   Pixel_t color;
 
   gClient->GetColorByName(fHtmlText->fMonthTable.fBgColor.Data(), color);
   fTableColor = new TGColorSelect(controls, color);
   controls->AddFrame(fTableColor, new TGLayoutHints(kLHintsLeft | kLHintsCenterY, 5, 2, 2, 2));
 
   TGLabel *cellLabel = new TGLabel(controls, "Cell:");
   controls->AddFrame(cellLabel, new TGLayoutHints(kLHintsLeft | kLHintsCenterY, 5, 2, 2, 2));
 
   gClient->GetColorByName(fHtmlText->fMonthTable.fCellBgcolor.Data(), color);
   fCellColor = new TGColorSelect(controls, color);
   controls->AddFrame(fCellColor, new TGLayoutHints(kLHintsLeft | kLHintsCenterY, 5, 2, 2, 2));
 
   // connect signals
   fMonthBox->Connect("Selected(Int_t)", "CalendarWindow", this, "UpdateHTML()");
   fYearEntry->GetNumberEntry()->Connect("TextChanged(char*)", "CalendarWindow", this, "UpdateHTML()");
   fFontEntry->GetNumberEntry()->Connect("TextChanged(char*)", "CalendarWindow", this, "UpdateHTML()");
   fTableColor->Connect("ColorSelected(Pixel_t)", "CalendarWindow", this, "UpdateHTML()");
   fCellColor->Connect("ColorSelected(Pixel_t)", "CalendarWindow", this, "UpdateHTML()");
 
   // terminate ROOT session when window is closed
   fMain->Connect("CloseWindow()", "TApplication", gApplication, "Terminate()");
   fMain->DontCallClose();
 
   fMain->MapSubwindows();
   fMain->Resize(600, 333);
 
   // set  minimum size of main window
   fMain->SetWMSizeHints(controls->GetDefaultWidth(), fMain->GetDefaultHeight(), 1000, 1000, 0, 0);
 
   TString title = "Calendar for ";
   title += fHtmlText->fTitle;
   fMain->SetWindowName(title.Data());
   fMain->MapRaised();
}
 
//______________________________________________________________________________
void CalendarWindow::UpdateHTML()
{
   // Update HTML table on user's input.
 
   Int_t month = fMonthBox->GetSelected();
   Int_t year = atoi(fYearEntry->GetNumberEntry()->GetText());
   fHtmlText->fMonthTable.fCellFontSize = fFontEntry->GetNumberEntry()->GetText();
 
   Pixel_t pixel = 0;
   TColor *color = nullptr;
 
   // table background
   pixel = fTableColor->GetColor();
   color = gROOT->GetColor(TColor::GetColor(pixel));
 
   if (color) {
      fHtmlText->fMonthTable.fBgColor = color->AsHexString();
   }
 
   // cell background
   pixel = fCellColor->GetColor();
   color = gROOT->GetColor(TColor::GetColor(pixel));
 
   if (color) {
      fHtmlText->fMonthTable.fCellBgcolor = color->AsHexString();
   }
 
   // update HTML context
   fHtmlText->SetDate(year, month);
 
   // parse new HTML context of HTML calendar table
   fHtml->Clear();
   fHtml->ParseText((char *)fHtmlText->Html().Data());
   fHtml->Layout();
 
   // update window title
   TString title = "Calendar for ";
   title += fHtmlText->fTitle;
   fMain->SetWindowName(title.Data());
}
 
////////////////////////////////////////////////////////////////////////////////
void calendar()
{
   // Main program.
 
   new CalendarWindow();
}