00001
00002
00003
00004
00005
00006
00007
00008
00010
00011 #ifdef __ROOT__
00012 #include "TROOT.h"
00013 #endif
00014 #include <assert.h>
00015 #include <ctype.h>
00016 #include <string.h>
00017 #include "StMessage.h"
00018 #include "StMessageCounter.h"
00019 #include "Stsstream.h"
00020 #include "StMessageStream.h"
00021
00022 static StMessageCounter* messCounter = StMessageCounter::Instance();
00023
00024 static ostrstream messBuffer;
00025 static char space = ' ';
00026 static char tab = '\t';
00027
00028 int StMessage::repeats=1;
00029 static ostrstream lastMessBuffer;
00030
00031 #ifdef __ROOT__
00032 ClassImp(StMessage)
00033 #endif
00034
00035
00036 StMessage::StMessage(const char *mess, const char *ty, const char* opt) {
00037 time(&messTime);
00038 *type = *ty;
00039 type[1] = 0;
00040 SetOptions(opt);
00041
00042
00043 int len = strlen(mess);
00044 while (mess[--len] == space) {}
00045 message = new char[(++len + 1)];
00046 for (int i=0;i<len;i++) {
00047 message[i]=mess[i];
00048 if (mess[i]=='\n') continue;
00049 if (mess[i]=='\t') continue;
00050 if (!iscntrl(mess[i])) continue;
00051 assert(0);
00052 }
00053 message[len]=0;
00054 Print(0);
00055 }
00056
00057 StMessage::~StMessage() {
00058 delete [] message;
00059 }
00060
00061 int StMessage::Print(int nChars) {
00062
00063
00064
00065
00066 static const char* leader = "St";
00067 static const char* insert0 = "";
00068 static const char* insert1 = ": ";
00069 static const char* insert2 = " <";
00070 static const char* insert3 = ">";
00071 static const char* endofline = "\n";
00072 int printIt=1;
00073 if (!nChars) {
00074 printIt = messCounter->CheckLimit(message,type);
00075 }
00076 messBuffer.seekp(0);
00077 if (printIt) {
00078 const char* insert;
00079 if (!(option & kMessOptP)) {
00080 if (!(option & kMessOptS)) messBuffer << leader;
00081 const char* temp(StMessTypeList::Instance()->Text(type));
00082 if (temp) messBuffer << temp;
00083 insert = insert1;
00084 } else insert = insert0;
00085 if ((nChars != 0) && (strchr(message,tab))) {
00086 char* message2 = new char[strlen(message)+1];
00087 char* m0 = message;
00088 char* m1 = message2;
00089 while (*m0) {
00090 if (*m0==tab) *m1 = space;
00091 else *m1 = *m0;
00092 m0++; m1++;
00093 }
00094 *m1 = 0;
00095 messBuffer << insert << message2;
00096 delete [] message2;
00097 } else {
00098 messBuffer << insert << message;
00099 }
00100 if (nChars<=0) {
00101 if (option & kMessOptT) {
00102 char* temp2 = (ctime(&messTime) + 4);
00103 *(temp2 + 20) = 0;
00104 messBuffer << insert2 << temp2 << insert3 ;
00105 }
00106 messBuffer << endofline;
00107 }
00108 }
00109 const char* addedMessage=0;
00110 if (nChars == 0) {
00111 addedMessage = messCounter->str();
00112 } else {
00113 if (nChars>0) {
00114 if (messBuffer.tellp() >= nChars)
00115 messBuffer.seekp(nChars-1);
00116 int noReturns = strcspn(messBuffer.str(),endofline);
00117 if (noReturns < messBuffer.tellp()) messBuffer.seekp(noReturns);
00118 } else
00119 nChars = 0;
00120 }
00121 messBuffer << ends;
00122 if (!repeats) {
00123 if (!strcmp(messBuffer.str(),lastMessBuffer.str())) {
00124 return messBuffer.tellp();
00125 } else {
00126 lastMessBuffer.seekp(0);
00127 lastMessBuffer << messBuffer.str() << ends;
00128 }
00129 }
00130 if ((option & kMessOptO) || (nChars != 0)) {
00131 myout << messBuffer.str();
00132 if (addedMessage) myout << addedMessage;
00133 myout.flush();
00134 }
00135 if ((option & kMessOptE) && (nChars == 0)) {
00136 myerr << messBuffer.str();
00137 if (addedMessage) myout << addedMessage;
00138 myerr.flush();
00139 }
00140 return messBuffer.tellp();
00141 }
00142
00143 char* StMessage::GetOptions() const {
00144 static char optStr[32];
00145 char* sPtr = optStr;
00146 if (option & kMessOptO) sprintf(sPtr++,"%c",'O');
00147 if (option & kMessOptE) sprintf(sPtr++,"%c",'E');
00148 if (option & kMessOptS) sprintf(sPtr++,"%c",'S');
00149 if (option & kMessOptT) sprintf(sPtr++,"%c",'T');
00150 if (option & kMessOptP) sprintf(sPtr++,"%c",'P');
00151 if (option & kMessOptDash) sprintf(sPtr++,"%c",'-');
00152 (*sPtr) = 0;
00153 return optStr;
00154 }
00155
00156 void StMessage::SetOptions(const char* opt) {
00157 option = kMessOptNone;
00158 if (!opt) return;
00159 int len = strlen(opt);
00160 while (len--) {
00161 switch (toupper(opt[len])) {
00162 case ('O') : { option |= kMessOptO; break; }
00163 case ('E') : { option |= kMessOptE; break; }
00164 case ('S') : { option |= kMessOptS; break; }
00165 case ('T') : { option |= kMessOptT; break; }
00166 case ('P') : { option |= kMessOptP; break; }
00167 case ('-') : { option |= kMessOptDash; break; }
00168 default : {}
00169 }
00170 }
00171 }
00172
00173 size_t StMessage::GetMemoryUsage() {
00174 size_t msize = strlen(message) + 1;
00175 msize += sizeof(*this);
00176 return msize;
00177 }
00178
00179 void StMessage::PrintInfo() {
00180 printf("**************************************************************\n");
00181 printf("* $Id: StMessage.cxx,v 1.27 2004/04/02 22:17:14 genevb Exp $\n");
00182
00183 printf("**************************************************************\n");
00184 }
00185
00186 int StMessage::InitBuffer() {
00187
00188 messBuffer << ch64 << ch64 << ch64 << ch64 << ch64 << ch64 << ch64 << ch64
00189 << ch64 << ch64 << ch64 << ch64 << ch64 << ch64 << ch64 << ch64 << ch64;
00190 return messBuffer.tellp();
00191 }
00192
00193 int tmpp = StMessage::InitBuffer();
00194
00195
00196
00197
00198
00199
00200
00201
00202
00203
00204
00205
00206
00207
00208
00209
00210
00211
00212
00213
00214
00215
00216
00217
00218
00219
00220
00221
00222
00223
00224
00225
00226
00227
00228
00229
00230
00231
00232
00233
00234
00235
00236
00237
00238
00239
00240
00241
00242
00243
00244
00245
00246
00247
00248
00249
00250
00251
00252
00253
00254
00255
00256
00257
00258
00259
00260
00261
00262
00263
00264
00265
00266
00267
00268
00269
00270
00271
00272
00273
00274
00275
00276