202bb2869a
Fix month in logfile name and put date in all log file names. sct_protek_common.tcl Catch non-numeric readings from main multimeter display Added support for a callbank function which is called after reportVal sct_julabo_lh45.tcl Clear the geterror property when getting a new reading. Don't set the overtemp and subtemp warning limits because this can cause the julabo to alarm. Do nothing if the setpoint hasn't been updated. Set default settletime to 60s and the default error handler to "lazy". Added start_temperature and end_temperature which are updated by callbacks on the histogram memory control. sct_lakeshore_340.tcl Set the type for the setpoint nodes to drivable r3032 | ffr | 2010-12-02 14:03:44 +1100 (Thu, 02 Dec 2010) | 15 lines
397 lines
11 KiB
C
397 lines
11 KiB
C
/*---------------------------------------------------------------------------
|
|
|
|
Implementation for the server log.
|
|
|
|
Is a bit tricky. Writes 1000 lines to a file, than increments
|
|
and opens a new one. Wraps arounf after 3. This is a compromise
|
|
between error tracking and use of diskspace.
|
|
|
|
|
|
|
|
Mark Koennecke, October 1996
|
|
|
|
Copyright:
|
|
|
|
Labor fuer Neutronenstreuung
|
|
Paul Scherrer Institut
|
|
CH-5423 Villigen-PSI
|
|
|
|
|
|
The authors hereby grant permission to use, copy, modify, distribute,
|
|
and license this software and its documentation for any purpose, provided
|
|
that existing copyright notices are retained in all copies and that this
|
|
notice is included verbatim in any distributions. No written agreement,
|
|
license, or royalty fee is required for any of the authorized uses.
|
|
Modifications to this software may be copyrighted by their authors
|
|
and need not follow the licensing terms described here, provided that
|
|
the new terms are clearly indicated on the first page of each file where
|
|
they apply.
|
|
|
|
IN NO EVENT SHALL THE AUTHORS OR DISTRIBUTORS BE LIABLE TO ANY PARTY
|
|
FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
|
|
ARISING OUT OF THE USE OF THIS SOFTWARE, ITS DOCUMENTATION, OR ANY
|
|
DERIVATIVES THEREOF, EVEN IF THE AUTHORS HAVE BEEN ADVISED OF THE
|
|
POSSIBILITY OF SUCH DAMAGE.
|
|
|
|
THE AUTHORS AND DISTRIBUTORS SPECIFICALLY DISCLAIM ANY WARRANTIES,
|
|
INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY,
|
|
FITNESS FOR A PARTICULAR PURPOSE, AND NON-INFRINGEMENT. THIS SOFTWARE
|
|
IS PROVIDED ON AN "AS IS" BASIS, AND THE AUTHORS AND DISTRIBUTORS HAVE
|
|
NO OBLIGATION TO PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR
|
|
MODIFICATIONS.
|
|
|
|
Modified: Paul Hathaway, June 2004
|
|
SICSLogWrite
|
|
- no longer asserts existence of the log file, writing
|
|
to stderr and skipping further file writes.
|
|
- NETWrites log message (if enabled) before attempt to write to file
|
|
- uses OpenVerifyLogFile helper function (removed duplicate code)
|
|
-----------------------------------------------------------------------------*/
|
|
#include "fortify.h"
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <assert.h>
|
|
#include <string.h>
|
|
#include <ctype.h>
|
|
#include <time.h>
|
|
#include <sys/time.h>
|
|
#include "ifile.h"
|
|
#include "conman.h"
|
|
#include "servlog.h"
|
|
#include "network.h"
|
|
|
|
/* define this, if you do not want a server log
|
|
|
|
#define NOLOG 1
|
|
*/
|
|
/* -------------------------------------------------------------------------
|
|
The server log output can be captured by a client. In order to implement
|
|
this the following code is necessary.
|
|
*/
|
|
typedef struct __LogLog{
|
|
SConnection *pCon;
|
|
OutCode iOut;
|
|
int iAllFlag;
|
|
struct __LogLog *pNext;
|
|
struct __LogLog *pPrevious;
|
|
} CaptureEntry, *pCaptureEntry;
|
|
|
|
static pCaptureEntry pCapture = NULL;
|
|
/*------------------------------------------------------------------------*/
|
|
|
|
int KillCapture(SConnection *pCon)
|
|
{
|
|
pCaptureEntry pCurrent, pTemp;
|
|
|
|
/* find first */
|
|
pCurrent = pCapture;
|
|
while(pCurrent != NULL)
|
|
{
|
|
if(pCon == pCurrent->pCon)
|
|
{
|
|
/* relink */
|
|
if(pCurrent->pPrevious)
|
|
{
|
|
pCurrent->pPrevious->pNext = pCurrent->pNext;
|
|
}
|
|
else
|
|
{
|
|
pCapture = pCurrent->pNext;
|
|
}
|
|
if(pCurrent->pNext)
|
|
{
|
|
pCurrent->pNext->pPrevious = pCurrent->pPrevious;
|
|
}
|
|
pTemp = pCurrent->pNext;
|
|
/* get rid of pCurrent */
|
|
free(pCurrent);
|
|
pCurrent = pTemp;
|
|
}
|
|
else
|
|
{
|
|
pCurrent = pCurrent->pNext;
|
|
}
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
|
|
/* ------------------------------------------------------------------------
|
|
the command function:
|
|
Syntax:
|
|
Kill kills all logging
|
|
Log OutCode starts loggin OutCode events
|
|
All starts logging all events
|
|
-------------------------------------------------------------------------- */
|
|
#include "outcode.c" /* for pCode */
|
|
|
|
int LogCapture(SConnection *pCon, SicsInterp *pSics, void *pData,
|
|
int argc, char *argv[])
|
|
{
|
|
pCaptureEntry pNew = NULL;
|
|
char pBueffel[512];
|
|
int i;
|
|
|
|
/* check no af args */
|
|
if(argc < 2)
|
|
{
|
|
sprintf(pBueffel,"Insufficient number of argumenst to %s",argv[0]);
|
|
SCWrite(pCon,pBueffel,eError);
|
|
return 0;
|
|
}
|
|
argtolower(argc,argv);
|
|
|
|
/* Branch according to argv[1] */
|
|
if(strcmp(argv[1],"kill") == 0 )
|
|
{
|
|
KillCapture(pCon);
|
|
return 1;
|
|
}
|
|
else if(strcmp(argv[1],"all") == 0)
|
|
{
|
|
pNew = (pCaptureEntry)malloc(sizeof(CaptureEntry));
|
|
if(!pNew)
|
|
{
|
|
SICSLogWrite("Out of memory in LogCapture",eInternal);
|
|
return 0;
|
|
}
|
|
if(pCapture)
|
|
{
|
|
pCapture->pPrevious = pNew;
|
|
}
|
|
pNew->pPrevious = NULL;
|
|
pNew->pNext = pCapture;
|
|
pCapture = pNew;
|
|
pNew->iAllFlag = 1;
|
|
pNew->pCon = pCon;
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
/* must be outcode, try find it */
|
|
i = 0;
|
|
while(pCode[i] != NULL)
|
|
{
|
|
if(strcmp(argv[1],pCode[i]) == 0)
|
|
{
|
|
break;
|
|
}
|
|
i++;
|
|
}
|
|
if(i > iNoCodes)
|
|
{
|
|
sprintf(pBueffel,"OutPutCode %s not recognized in %s",argv[1],
|
|
argv[0]);
|
|
SCWrite(pCon,pBueffel,eError);
|
|
return 0;
|
|
}
|
|
/* create a new one */
|
|
pNew = (pCaptureEntry)malloc(sizeof(CaptureEntry));
|
|
if(!pNew)
|
|
{
|
|
SICSLogWrite("Out of memory in LogCapture",eInternal);
|
|
return 0;
|
|
}
|
|
if(pCapture)
|
|
{
|
|
pCapture->pPrevious = pNew;
|
|
}
|
|
pNew->pPrevious = NULL;
|
|
pNew->pNext = pCapture;
|
|
pCapture = pNew;
|
|
pNew->iAllFlag = 0;
|
|
pNew->pCon = pCon;
|
|
pNew->iOut = i;
|
|
return 1;
|
|
}
|
|
return 0;
|
|
}
|
|
/*--------------------------------------------------------------------------*/
|
|
static int HasLineFeed(char *pText)
|
|
{
|
|
int i;
|
|
|
|
for(i = strlen(pText); i > 0; i--)
|
|
{
|
|
if(pText[i] == '\n')
|
|
{
|
|
return 1;
|
|
}
|
|
if(isalpha(pText[i]))
|
|
{
|
|
return 0;
|
|
}
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
static const char* timestamp(struct timeval *tp) {
|
|
static char ts[80];
|
|
int hh, mm, ss;
|
|
struct timeval tv;
|
|
struct tm *time;
|
|
if (tp)
|
|
tv = *tp;
|
|
else
|
|
gettimeofday(&tv, NULL);
|
|
time = localtime(&tv.tv_sec);
|
|
hh = time->tm_hour;
|
|
mm = time->tm_min;
|
|
ss = time->tm_sec;
|
|
snprintf(ts, 80, "%02d:%02d:%02d.%06d", hh, mm, ss, (int) tv.tv_usec);
|
|
return ts;
|
|
}
|
|
|
|
|
|
/*---------------------------------------------------------------------------*/
|
|
#define MAXLOG 100000
|
|
#define MAXFILES 100
|
|
|
|
static FILE *fLogFile = NULL;
|
|
static int iFile = -1;
|
|
static int iLineCount = 0;
|
|
static int iLogUsable = 1;
|
|
|
|
/*---------------------------------------------------------------------------*/
|
|
int OpenVerifyLogFile()
|
|
{
|
|
char pFile[256];
|
|
char filnam[512];
|
|
char *pChar = NULL;
|
|
char fPath[1024];
|
|
|
|
/* snprintf(fPath, 1023, "%s/", getenv("SICS_INIT_LOGPATH")); */
|
|
snprintf(fPath, 1023, "%s/", "../log");
|
|
|
|
pChar = IFindOption(pSICSOptions,"LogFileBaseName");
|
|
if(!pChar)
|
|
{ /* Try to write to file "server" in*/
|
|
strcpy(pFile,"server");
|
|
}
|
|
else
|
|
{
|
|
strncpy(pFile,pChar,255);
|
|
}
|
|
|
|
// Jing added here to add timestamp info for the server00.log file name as server00_hh:mm:sec-daymonyear.log
|
|
int hh, mm, ss, day, mon, year;
|
|
struct timeval tv;
|
|
struct tm *time;
|
|
|
|
gettimeofday(&tv, NULL);
|
|
time = localtime(&tv.tv_sec);
|
|
hh = time->tm_hour;
|
|
mm = time->tm_min;
|
|
ss = time->tm_sec;
|
|
day = time->tm_mday;
|
|
mon = time->tm_mon+1;
|
|
year = time->tm_year + 1900;
|
|
|
|
if(iFile==-1){
|
|
snprintf(filnam,511,"%s%s_%04d-%02d-%02dT%02d:%02d:%02d.000.log", fPath, pFile, year, mon, day, hh, mm, ss);
|
|
iFile = 0;
|
|
}else
|
|
snprintf(filnam,511,"%s%s_%04d-%02d-%02dT%02d:%02d:%02d.%2.2d.log", fPath, pFile, year, mon, day, hh, mm, ss, iFile);
|
|
|
|
fLogFile = fopen(filnam,"w");
|
|
if(!fLogFile)
|
|
{
|
|
fprintf(stderr,"ERROR: Cannot open logfile %s for writing\n",pFile);
|
|
fLogFile = NULL;
|
|
return 0;
|
|
}
|
|
else
|
|
{
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*/
|
|
void SICSLogEnable(int flag) {
|
|
iLogUsable=flag;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
void SICSLogWriteTime(char *pText, OutCode eOut, struct timeval *tp)
|
|
{
|
|
pCaptureEntry pCurrent;
|
|
int text_len;
|
|
|
|
#ifdef NOLOG
|
|
return ;
|
|
#endif
|
|
|
|
text_len = strlen(pText);
|
|
/* do all captured */
|
|
pCurrent = pCapture;
|
|
while(pCurrent)
|
|
{
|
|
if( (pCurrent->iOut == eOut) || (pCurrent->iAllFlag == 1) )
|
|
{
|
|
NETWrite(pCurrent->pCon->pSock,pText,strlen(pText));
|
|
if (pText[text_len - 1] != '\n')
|
|
NETWrite(pCurrent->pCon->pSock, "\n", 1);
|
|
}
|
|
pCurrent = pCurrent->pNext;
|
|
}
|
|
|
|
if(0 == iLogUsable) return;
|
|
|
|
if(fLogFile == NULL) /* first time of use*/
|
|
{
|
|
/* no options: startup or serious trouble, print to stdout*/
|
|
if(!pSICSOptions)
|
|
{
|
|
printf("WARNING: Cannot log(%s)\n",pText);
|
|
return;
|
|
}
|
|
iLogUsable = OpenVerifyLogFile();
|
|
}
|
|
|
|
/* switch file if too many lines */
|
|
if(iLineCount >= MAXLOG)
|
|
{
|
|
fprintf(fLogFile,"%s: <<<close logfile>>>\n", timestamp(NULL));
|
|
fclose(fLogFile);
|
|
fLogFile = NULL;
|
|
iFile++;
|
|
iLineCount = 0;
|
|
if(iFile >= MAXFILES)
|
|
{
|
|
iFile = 0;
|
|
}
|
|
iLogUsable = OpenVerifyLogFile();
|
|
}
|
|
|
|
if(1 == iLogUsable)
|
|
{
|
|
|
|
if (iLineCount == 0)
|
|
fprintf(fLogFile,"%s: <<<open logfile>>>\n", timestamp(NULL));
|
|
fprintf(fLogFile,"%s: ", timestamp(tp));
|
|
fprintf(fLogFile,"%s", pText);
|
|
if (text_len < 1 || pText[text_len - 1] != '\n')
|
|
fprintf(fLogFile,"\n");
|
|
fflush(fLogFile);
|
|
iLineCount++;
|
|
|
|
#if 0 /* Already done above */
|
|
/* do all captured as well */
|
|
pCurrent = pCapture;
|
|
while(pCurrent)
|
|
{
|
|
if( (pCurrent->iOut == eOut) || (pCurrent->iAllFlag == 1) )
|
|
{
|
|
NETWrite(pCurrent->pCon->pSock,pText,strlen(pText));
|
|
if (pText[text_len - 1] != '\n')
|
|
NETWrite(pCurrent->pCon->pSock, "\n", 1);
|
|
}
|
|
pCurrent = pCurrent->pNext;
|
|
}
|
|
#endif
|
|
}
|
|
}
|
|
|
|
void SICSLogWrite(char *pText, OutCode eOut) {
|
|
SICSLogWriteTime(pText, eOut, NULL);
|
|
}
|