Subversion Repositories f9daq

#include  "TString.h"

#include  "TObjString.h"

#include  "TObjArray.h"

#include  "TDirectory.h"

#include  "TFile.h"

#include  "TSystem.h"

int ifebsn[8]={21,23,22,25, 27,28,29,30};

int getsn(const char *fname="test.xml"){

const char *f= gDirectory->GetFile()->GetName();

const char *t= gDirectory->Get("hxy0_sum_0")->GetTitle();

const char *d= gDirectory->Get("h2d_0")->GetTitle();

char h0[0xFF];

sscanf(t,"HAPD=%s",h0);

TDatime c = gDirectory->GetFile()->GetCreationDate();

const char *date= c.AsString();

FILE *fp=fopen(fname,"a");

TString sdna(d);

TObjArray *tdna = sdna.Tokenize(" ");

TString x(h0);

TObjArray *tx = x.Tokenize(",");

char run[0xf];

strncpy(run,gSystem->BaseName(f),4);

run[4]=0;

fprintf(fp,"<run id='%s' date='%s'>\n",run, date);

for (Int_t i = 0; i < tx->GetEntries(); i++) {

  const char *sn  = ((TObjString *)(tx->At(i)))->GetString();

  const char *dna =(tdna->GetEntries()>=4)? ((TObjString *)(tdna->At(i)))->GetString() : "               ";

   char *mdna = (char *)&dna[5];

  char sfeb[20];

  if (strstr(sn,"/")!=NULL){

    TString ssn(sn);

    TObjArray *tsn = ssn.Tokenize("/");

    const char *hapdsn = ((TObjString *)(tsn->At(0)))->GetString();

    const char *febsnc = "000";

    const char *febsn  = ((TObjString *)(tsn->At(1)))->GetString();

    sprintf(sfeb,"%s",febsn);

    fprintf(fp, "<pos id='%d'><hapd>%s</hapd><feb>%s</feb><dna>%s</dna></pos>\n", i, hapdsn, sfeb,mdna );

  } else {

    sprintf(sfeb,"%03d", ifebsn[(4*(atoi(run)-1)+i)%8]);

    fprintf(fp, "<pos id='%d'><hapd>%s</hapd><feb>%s</feb><dna>%s</dna></pos>\n", i, sn, sfeb,mdna );

  }

}

//fprintf(fp,"</run>\n");

fprintf(stdout,"%s %s\n",gSystem->BaseName(f),t);

fclose(fp);

return 0;

}