Changeset 13 for trunk/txlib/txcon.c

Timestamp:

May 13, 2006, 8:33:09 PM (19 years ago)

Author:

Jan van Wijk

Message:

Logfile size-limit and automatic logfile rotation, very useful for crash tracing

File:

• trunk/txlib/txcon.c (modified) (3 diffs)

trunk/txlib/txcon.c ¶

@@ -75 +75 @@
 static  char  txc_ansi   = A_ON;
 
+//- logfile cycling and size control
+static  ULONG      log_written = 0;             // bytes written on this file
+static  ULONG      log_maxsize = 0;             // maximum size per logfile
+static  ULONG      log_seq_num = 0;             // sequence number 0..n
+static  ULONG      log_retain  = 0;             // log recycle retain count
 
 //- Note: 256 color strings sorted in default PC order
@@ -460 +465 @@
 
 /*****************************************************************************/
+// Set logfile maximum size per file
+/*****************************************************************************/
+void TxSetLogMaxSize
+(
+   ULONG               size                     // IN    maximum size, bytes
+)
+{
+   log_maxsize = size;
+}                                               // end 'TxSetLogMaxSize'
+/*---------------------------------------------------------------------------*/
+
+
+/*****************************************************************************/
+// Set logfile number of files to retain on cycle, #files besides .log itself
+/*****************************************************************************/
+void TxSetLogRetain
+(
+   ULONG               retain                   // IN    retain count
+)
+{
+   log_retain = retain;
+}                                               // end 'TxSetLogRetain'
+/*---------------------------------------------------------------------------*/
+
+
+/*****************************************************************************/
 // printf-like print on stdout, LOG filehandle and raw/clean copy hooks
 /*****************************************************************************/
@@ -528 +559 @@
                TxAscii827( txm_buff, TXASCII827_TRANS);
             }
+
+            if ((log_maxsize > size) && (log_written > (log_maxsize - size)))
+            {
+               TXLN    fname;
+
+               log_written = 0;                 // avoid recursive cycling
+               fprintf( log_handle, "\nClosing logfile at size limit\n");
+
+               TxAppendToLogFile( NULL, FALSE); // close current log, quiet
+               if (log_seq_num >= log_retain)   // need to delete one
+               {
+                  TxBuildLogName( log_seq_num - log_retain, fname);
+                  remove( fname);               // delete a logfile (cycle)
+               }
+               TxBuildLogName( (log_retain) ? ++log_seq_num : 0, fname);
+               TxAppendToLogFile( fname, FALSE); // open next logfile, quiet
+               log_handle  = TxQueryLogFile( &log7bit, &logreopen);
+               fprintf( log_handle, "Start next logfile: '%s'\n", fname);
+            }
+            else
+            {
+               log_written += size;             // maintain total size in log
+            }
+
             fprintf( log_handle, "%s", txm_buff);
             if (logreopen)