StRoot: macros/html/MakeHtmlTables.cxx Source File

00001 // $Id: MakeHtmlTables.cxx,v 1.12 2006/08/15 21:43:16 jeromel Exp $
00002 // $Log: MakeHtmlTables.cxx,v $
00003 // Revision 1.12  2006/08/15 21:43:16  jeromel
00004 // Fix rhic -> rhic.bnl.gov
00005 //
00006 // Revision 1.11  2001/09/02 00:03:22  fine
00007 // type fixed
00008 //
00009 // Revision 1.10  1999/11/19 21:20:23  fine
00010 // Extra path to /afs/rhic.bnl.gov/star/packages/SL99i include dirictory was added
00011 //
00012 // Revision 1.9  1999/09/14 15:30:39  fine
00013 // makedocs adjusted to the new source tree
00014 //
00015 // Revision 1.8  1999/09/12 01:09:57  fine
00016 // Adjusted to the new source tree
00017 //
00018 // Revision 1.7  1999/05/21 15:33:51  kathy
00019 // made sure Log & Id are in each file and also put in standard comment line with name of owner
00020 //
00021 //=======================================================================
00022 // owner: Valery Fine
00023 // what it does: Create the HTML page for STAF tables
00024 //=======================================================================
00025 {
00026   // Create the HTML page for STAF tables
00027 
00028 // Load the share libraries
00029 
00030   Char_t *libs[] = {"St_base","St_Tables"};
00031   Char_t *suffix=0;
00032   Int_t nlist = 2;
00033   Bool_t NT=kFALSE;
00034 
00035   if (strcmp(gSystem->GetName(),"WinNT") == 0 ) {
00036      NT = kTRUE;
00037      gSystem.Load("Root_html.dll");
00038   }
00039   
00040   gSystem->Load("St_base");
00041   gSystem->Load("St_Tables");
00042   
00043   cout << "Dynamic libraries have been loaded" << endl;
00044 
00045   void *dirhandle = 0;
00046   const Char_t *affix="_st";
00047   TString sourcedir;
00048   if (NT) 
00049     sourcedir = "//sol/afs_rhic/star/packages/dev/.share/tables";
00050   else
00051     sourcedir = "$STAR/include/tables";
00052 
00053   gSystem->ExpandPathName(sourcedir);
00054   if (!(dirhandle = gSystem->OpenDirectory(sourcedir.Data()))) return;
00055 
00056   // Create THtml object
00057   THtml *html = new THtml;
00058 
00059   TString lookup = 0;
00060   if (NT) 
00061     lookup = "//sol/afs_rhic/star/packages/dev/.share/tables;../base;//sol/afs_rhic/star/packages/dev/.share/base";
00062   else {
00063     lookup  = "$STAF/inc:";
00064     lookup += "$STAR:";
00065     lookup += sourcedir;
00066     lookup += ":";
00067     lookup += "$STAR/include:";
00068     lookup += "$STAR/include/tables:";
00069     lookup += "$STAR/StRoot/St_base";
00070     lookup += "$STAR/.share/tables:";
00071   }
00072 
00073   html->SetSourceDir(lookup.Data());
00074   if (NT) 
00075      html->SetOutputDir("J:/Public/STAF/draft/base/html");
00076   else
00077      html->SetOutputDir("$STAR/StRoot/html");
00078 
00079   html.MakeClass("St_Table",kTRUE);
00080 
00081   char *n = 0;
00082   
00083   while (n = gSystem->GetDirEntry(dirhandle)) {
00084     Char_t *name = StrDup(n);
00085     // test the prefix
00086      if (strstr(name,"St_") == name) {      
00087        // test the tail
00088         Char_t *tail = 0;
00089         if (tail = strstr(name,"_Table.h")) {
00090           *tail = '\0';
00091 
00092           // Make class description
00093           html.MakeClass(name,kTRUE);
00094 
00095           // Make C structure name
00096           Int_t i;
00097           for (i=0; i < strlen(name)-3; i++) name[i] = name[i+3];
00098           name[i] = '\0';
00099           strcat(name,affix);
00100           html.MakeClass(name,kTRUE);
00101          } 
00102      }
00103      delete [] name ;
00104    }
00105    gSystem->FreeDirectory(dirhandle);
00106    // Make html for itself
00107    html->Convert("$STAR/StRoot/html/MakeHtmlTables.cxx","How to create the HTML doc for the STAF table wrappers");
00108 }