-
Notifications
You must be signed in to change notification settings - Fork 4
/
Copy patherrlog.c
1170 lines (1069 loc) · 35.1 KB
/
errlog.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
/*********************************************************************
*
* File : $Source: /cvsroot/ijbswa/current/errlog.c,v $
*
* Purpose : Log errors to a designated destination in an elegant,
* printf-like fashion.
*
* Copyright : Written by and Copyright (C) 2001-2014 the
* Privoxy team. http://www.privoxy.org/
*
* Based on the Internet Junkbuster originally written
* by and Copyright (C) 1997 Anonymous Coders and
* Junkbusters Corporation. http://www.junkbusters.com
*
* This program is free software; you can redistribute it
* and/or modify it under the terms of the GNU General
* Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at
* your option) any later version.
*
* This program is distributed in the hope that it will
* be useful, but WITHOUT ANY WARRANTY; without even the
* implied warranty of MERCHANTABILITY or FITNESS FOR A
* PARTICULAR PURPOSE. See the GNU General Public
* License for more details.
*
* The GNU General Public License should be included with
* this file. If not, you can view it at
* http://www.gnu.org/copyleft/gpl.html
* or write to the Free Software Foundation, Inc., 59
* Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
*********************************************************************/
#include <stdlib.h>
#include <stdio.h>
#include <stdarg.h>
#include <string.h>
#include <ctype.h>
#include "config.h"
#include "miscutil.h"
/* For gettimeofday() */
#if defined (_WIN32) || defined(WIN32)
#include <time.h>
#else
#include <sys/time.h>
#endif
#if !defined(_WIN32) && !defined(__OS2__)
#include <unistd.h>
#endif /* !defined(_WIN32) && !defined(__OS2__) */
#include <errno.h>
#include <assert.h>
#ifdef _WIN32
#ifndef STRICT
#define STRICT
#endif
#include <windows.h>
#ifndef _WIN_CONSOLE
#include "w32log.h"
#endif /* ndef _WIN_CONSOLE */
#endif /* def _WIN32 */
#ifdef _MSC_VER
#define inline __inline
#endif /* def _MSC_VER */
#ifdef __OS2__
#include <sys/socket.h> /* For sock_errno */
#define INCL_DOS
#include <os2.h>
#endif
#include "errlog.h"
#include "project.h"
#include "jcc.h"
#ifdef FEATURE_EXTERNAL_FILTERS
#include "jbsockets.h"
#endif
/*
* LOG_LEVEL_FATAL cannot be turned off. (There are
* some exceptional situations where we need to get a
* message to the user).
*/
#define LOG_LEVEL_MINIMUM LOG_LEVEL_FATAL
/* where to log (default: stderr) */
static FILE *logfp = NULL;
/* logging detail level. XXX: stupid name. */
static int debug = (LOG_LEVEL_FATAL | LOG_LEVEL_ERROR | LOG_LEVEL_INFO);
/* static functions */
static void fatal_error(const char * error_message);
#ifdef _WIN32
static char *w32_socket_strerr(int errcode, char *tmp_buf);
#endif
#ifdef __OS2__
static char *os2_socket_strerr(int errcode, char *tmp_buf);
#endif
#ifdef MUTEX_LOCKS_AVAILABLE
static inline void lock_logfile(void)
{
privoxy_mutex_lock(&log_mutex);
}
static inline void unlock_logfile(void)
{
privoxy_mutex_unlock(&log_mutex);
}
static inline void lock_loginit(void)
{
privoxy_mutex_lock(&log_init_mutex);
}
static inline void unlock_loginit(void)
{
privoxy_mutex_unlock(&log_init_mutex);
}
#else /* ! MUTEX_LOCKS_AVAILABLE */
/*
* FIXME we need a cross-platform locking mechanism.
* The locking/unlocking functions below should be
* fleshed out for non-pthread implementations.
*/
static inline void lock_logfile() {}
static inline void unlock_logfile() {}
static inline void lock_loginit() {}
static inline void unlock_loginit() {}
#endif
/*********************************************************************
*
* Function : fatal_error
*
* Description : Displays a fatal error to standard error (or, on
* a WIN32 GUI, to a dialog box), and exits Privoxy
* with status code 1.
*
* Parameters :
* 1 : error_message = The error message to display.
*
* Returns : Does not return.
*
*********************************************************************/
static void fatal_error(const char *error_message)
{
if (logfp != NULL)
{
fputs(error_message, logfp);
}
#if defined(_WIN32) && !defined(_WIN_CONSOLE)
{
/* Skip timestamp and thread id for the message box. */
const char *box_message = strstr(error_message, "Fatal error");
if (NULL == box_message)
{
/* Shouldn't happen but ... */
box_message = error_message;
}
MessageBox(g_hwndLogFrame, box_message, "Privoxy Error",
MB_OK | MB_ICONERROR | MB_TASKMODAL | MB_SETFOREGROUND | MB_TOPMOST);
/* Cleanup - remove taskbar icon etc. */
TermLogWindow();
}
#endif /* defined(_WIN32) && !defined(_WIN_CONSOLE) */
#if defined(unix)
if (pidfile)
{
unlink(pidfile);
}
#endif /* unix */
exit(1);
}
/*********************************************************************
*
* Function : show_version
*
* Description : Logs the Privoxy version and the program name.
*
* Parameters :
* 1 : prog_name = The program name.
*
* Returns : Nothing.
*
*********************************************************************/
void show_version(const char *prog_name)
{
log_error(LOG_LEVEL_INFO, "Privoxy version " VERSION);
if (prog_name != NULL)
{
log_error(LOG_LEVEL_INFO, "Program name: %s", prog_name);
}
}
/*********************************************************************
*
* Function : init_log_module
*
* Description : Initializes the logging module to log to stderr.
* Can only be called while stderr hasn't been closed
* yet and is only supposed to be called once.
*
* Parameters :
* 1 : prog_name = The program name.
*
* Returns : Nothing.
*
*********************************************************************/
void init_log_module(void)
{
lock_logfile();
logfp = stderr;
unlock_logfile();
set_debug_level(debug);
}
/*********************************************************************
*
* Function : set_debug_level
*
* Description : Sets the debug level to the provided value
* plus LOG_LEVEL_MINIMUM.
*
* XXX: we should only use the LOG_LEVEL_MINIMUM
* until the first time the configuration file has
* been parsed.
*
* Parameters : 1: debug_level = The debug level to set.
*
* Returns : Nothing.
*
*********************************************************************/
void set_debug_level(int debug_level)
{
#ifdef FUZZ
if (LOG_LEVEL_STFU == debug_level)
{
debug = LOG_LEVEL_STFU;
}
if (LOG_LEVEL_STFU == debug)
{
return;
}
#endif
debug = debug_level | LOG_LEVEL_MINIMUM;
}
/*********************************************************************
*
* Function : debug_level_is_enabled
*
* Description : Checks if a certain debug level is enabled.
*
* Parameters : 1: debug_level = The debug level to check.
*
* Returns : Nothing.
*
*********************************************************************/
int debug_level_is_enabled(int debug_level)
{
return (0 != (debug & debug_level));
}
/*********************************************************************
*
* Function : disable_logging
*
* Description : Disables logging.
*
* Parameters : None.
*
* Returns : Nothing.
*
*********************************************************************/
void disable_logging(void)
{
if (logfp != NULL)
{
log_error(LOG_LEVEL_INFO,
"No logfile configured. Please enable it before reporting any problems.");
lock_logfile();
fclose(logfp);
logfp = NULL;
unlock_logfile();
}
}
/*********************************************************************
*
* Function : init_error_log
*
* Description : Initializes the logging module to log to a file.
*
* XXX: should be renamed.
*
* Parameters :
* 1 : prog_name = The program name.
* 2 : logfname = The logfile to (re)open.
*
* Returns : N/A
*
*********************************************************************/
void init_error_log(const char *prog_name, const char *logfname)
{
FILE *fp;
assert(NULL != logfname);
lock_loginit();
if ((logfp != NULL) && (logfp != stderr))
{
log_error(LOG_LEVEL_INFO, "(Re-)Opening logfile \'%s\'", logfname);
}
/* set the designated log file */
fp = fopen(logfname, "a");
if ((NULL == fp) && (logfp != NULL))
{
/*
* Some platforms (like OS/2) don't allow us to open
* the same file twice, therefore we give it another
* shot after closing the old file descriptor first.
*
* We don't do it right away because it prevents us
* from logging the "can't open logfile" message to
* the old logfile.
*
* XXX: this is a lame workaround and once the next
* release is out we should stop bothering reopening
* the logfile unless we have to.
*
* Currently we reopen it every time the config file
* has been reloaded, but actually we only have to
* reopen it if the file name changed or if the
* configuration reload was caused by a SIGHUP.
*/
log_error(LOG_LEVEL_INFO, "Failed to reopen logfile: \'%s\'. "
"Retrying after closing the old file descriptor first. If that "
"doesn't work, Privoxy will exit without being able to log a message.",
logfname);
lock_logfile();
fclose(logfp);
logfp = NULL;
unlock_logfile();
fp = fopen(logfname, "a");
}
if (NULL == fp)
{
log_error(LOG_LEVEL_FATAL, "init_error_log(): can't open logfile: \'%s\'", logfname);
}
#ifdef FEATURE_EXTERNAL_FILTERS
mark_socket_for_close_on_execute(3);
#endif
/* set logging to be completely unbuffered */
setbuf(fp, NULL);
lock_logfile();
if (logfp != NULL)
{
fclose(logfp);
}
#ifdef unix
if (daemon_mode && (logfp == stderr))
{
if (dup2(1, 2) == -1)
{
/*
* We only use fatal_error() to clear the pid
* file and to exit. Given that stderr has just
* been closed, the user will not see the error
* message.
*/
fatal_error("Failed to reserve fd 2.");
}
}
#endif
logfp = fp;
unlock_logfile();
show_version(prog_name);
unlock_loginit();
} /* init_error_log */
/*********************************************************************
*
* Function : get_thread_id
*
* Description : Returns a number that is different for each thread.
*
* XXX: Should be moved elsewhere (miscutil.c?)
*
* Parameters : None
*
* Returns : thread_id
*
*********************************************************************/
static long get_thread_id(void)
{
long this_thread;
#ifdef __OS2__
PTIB ptib;
APIRET ulrc; /* XXX: I have no clue what this does */
#endif /* __OS2__ */
/* FIXME get current thread id */
#ifdef FEATURE_PTHREAD
this_thread = (long)pthread_self();
#ifdef __MACH__
/*
* Mac OSX (and perhaps other Mach instances) doesn't have a unique
* value at the lowest order 4 bytes of pthread_self()'s return value, a pthread_t,
* so trim the three lowest-order bytes from the value (16^3).
*/
this_thread = this_thread / 4096;
#endif /* def __MACH__ */
#elif defined(_WIN32)
this_thread = GetCurrentThreadId();
#elif defined(__OS2__)
ulrc = DosGetInfoBlocks(&ptib, NULL);
if (ulrc == 0)
this_thread = ptib -> tib_ptib2 -> tib2_ultid;
#else
/* Forking instead of threading. */
this_thread = 1;
#endif /* def FEATURE_PTHREAD */
return this_thread;
}
/*********************************************************************
*
* Function : get_log_timestamp
*
* Description : Generates the time stamp for the log message prefix.
*
* Parameters :
* 1 : buffer = Storage buffer
* 2 : buffer_size = Size of storage buffer
*
* Returns : Number of written characters or 0 for error.
*
*********************************************************************/
static inline size_t get_log_timestamp(char *buffer, size_t buffer_size)
{
size_t length;
time_t now;
struct tm tm_now;
struct timeval tv_now; /* XXX: stupid name */
long msecs;
int msecs_length = 0;
gettimeofday(&tv_now, NULL);
msecs = tv_now.tv_usec / 1000;
now = tv_now.tv_sec;
#ifdef HAVE_LOCALTIME_R
tm_now = *localtime_r(&now, &tm_now);
#elif defined(MUTEX_LOCKS_AVAILABLE)
privoxy_mutex_lock(&localtime_mutex);
tm_now = *localtime(&now);
privoxy_mutex_unlock(&localtime_mutex);
#else
tm_now = *localtime(&now);
#endif
length = strftime(buffer, buffer_size, "%Y-%m-%d %H:%M:%S", &tm_now);
if (length > (size_t)0)
{
msecs_length = snprintf(buffer+length, buffer_size - length, ".%.3ld", msecs);
}
if (msecs_length > 0)
{
length += (size_t)msecs_length;
}
else
{
length = 0;
}
return length;
}
/*********************************************************************
*
* Function : get_clf_timestamp
*
* Description : Generates a Common Log Format time string.
*
* Parameters :
* 1 : buffer = Storage buffer
* 2 : buffer_size = Size of storage buffer
*
* Returns : Number of written characters or 0 for error.
*
*********************************************************************/
static inline size_t get_clf_timestamp(char *buffer, size_t buffer_size)
{
/*
* Complex because not all OSs have tm_gmtoff or
* the %z field in strftime()
*/
time_t now;
struct tm *tm_now;
struct tm gmt;
#ifdef HAVE_LOCALTIME_R
struct tm dummy;
#endif
int days, hrs, mins;
size_t length;
int tz_length = 0;
time (&now);
#ifdef HAVE_GMTIME_R
gmt = *gmtime_r(&now, &gmt);
#elif defined(MUTEX_LOCKS_AVAILABLE)
privoxy_mutex_lock(&gmtime_mutex);
gmt = *gmtime(&now);
privoxy_mutex_unlock(&gmtime_mutex);
#else
gmt = *gmtime(&now);
#endif
#ifdef HAVE_LOCALTIME_R
tm_now = localtime_r(&now, &dummy);
#elif defined(MUTEX_LOCKS_AVAILABLE)
privoxy_mutex_lock(&localtime_mutex);
tm_now = localtime(&now);
privoxy_mutex_unlock(&localtime_mutex);
#else
tm_now = localtime(&now);
#endif
days = tm_now->tm_yday - gmt.tm_yday;
hrs = ((days < -1 ? 24 : 1 < days ? -24 : days * 24) + tm_now->tm_hour - gmt.tm_hour);
mins = hrs * 60 + tm_now->tm_min - gmt.tm_min;
length = strftime(buffer, buffer_size, "%d/%b/%Y:%H:%M:%S ", tm_now);
if (length > (size_t)0)
{
tz_length = snprintf(buffer+length, buffer_size-length,
"%+03d%02d", mins / 60, abs(mins) % 60);
}
if (tz_length > 0)
{
length += (size_t)tz_length;
}
else
{
length = 0;
}
return length;
}
/*********************************************************************
*
* Function : get_log_level_string
*
* Description : Translates a numerical loglevel into a string.
*
* Parameters :
* 1 : loglevel = LOG_LEVEL_FOO
*
* Returns : Log level string.
*
*********************************************************************/
static inline const char *get_log_level_string(int loglevel)
{
char *log_level_string = NULL;
assert(0 < loglevel);
switch (loglevel)
{
case LOG_LEVEL_ERROR:
log_level_string = "Error";
break;
case LOG_LEVEL_FATAL:
log_level_string = "Fatal error";
break;
case LOG_LEVEL_GPC:
log_level_string = "Request";
break;
case LOG_LEVEL_CONNECT:
log_level_string = "Connect";
break;
case LOG_LEVEL_WRITING:
log_level_string = "Writing";
break;
case LOG_LEVEL_RECEIVED:
log_level_string = "Received";
break;
case LOG_LEVEL_HEADER:
log_level_string = "Header";
break;
case LOG_LEVEL_INFO:
log_level_string = "Info";
break;
case LOG_LEVEL_RE_FILTER:
log_level_string = "Re-Filter";
break;
#ifdef FEATURE_FORCE_LOAD
case LOG_LEVEL_FORCE:
log_level_string = "Force";
break;
#endif /* def FEATURE_FORCE_LOAD */
case LOG_LEVEL_REDIRECTS:
log_level_string = "Redirect";
break;
case LOG_LEVEL_DEANIMATE:
log_level_string = "Gif-Deanimate";
break;
case LOG_LEVEL_CRUNCH:
log_level_string = "Crunch";
break;
case LOG_LEVEL_CGI:
log_level_string = "CGI";
break;
case LOG_LEVEL_ACTIONS:
log_level_string = "Actions";
break;
default:
log_level_string = "Unknown log level";
break;
}
assert(NULL != log_level_string);
return log_level_string;
}
#define LOG_BUFFER_SIZE BUFFER_SIZE
/*********************************************************************
*
* Function : log_error
*
* Description : This is the error-reporting and logging function.
*
* Parameters :
* 1 : loglevel = the type of message to be logged
* 2 : fmt = the main string we want logged, printf-like
* 3 : ... = arguments to be inserted in fmt (printf-like).
*
* Returns : N/A
*
*********************************************************************/
void log_error(int loglevel, const char *fmt, ...)
{
va_list ap;
char outbuf[LOG_BUFFER_SIZE+1];
char tempbuf[LOG_BUFFER_SIZE];
size_t length = 0;
const char * src = fmt;
long thread_id;
char timestamp[30];
const size_t log_buffer_size = LOG_BUFFER_SIZE;
#if defined(_WIN32) && !defined(_WIN_CONSOLE)
/*
* Irrespective of debug setting, a GET/POST/CONNECT makes
* the taskbar icon animate. (There is an option to disable
* this but checking that is handled inside LogShowActivity()).
*/
if ((loglevel == LOG_LEVEL_GPC) || (loglevel == LOG_LEVEL_CRUNCH))
{
LogShowActivity();
}
#endif /* defined(_WIN32) && !defined(_WIN_CONSOLE) */
/*
* verify that the loglevel applies to current
* settings and that logging is enabled.
* Bail out otherwise.
*/
if ((0 == (loglevel & debug))
#ifndef _WIN32
|| (logfp == NULL)
#endif
)
{
#ifdef FUZZ
if (debug == LOG_LEVEL_STFU)
{
return;
}
#endif
if (loglevel == LOG_LEVEL_FATAL)
{
fatal_error("Fatal error. You're not supposed to"
"see this message. Please file a bug report.");
}
return;
}
thread_id = get_thread_id();
get_log_timestamp(timestamp, sizeof(timestamp));
/*
* Memsetting the whole buffer to zero (in theory)
* makes things easier later on.
*/
memset(outbuf, 0, sizeof(outbuf));
/* Add prefix for everything but Common Log Format messages */
if (loglevel != LOG_LEVEL_CLF)
{
length = (size_t)snprintf(outbuf, log_buffer_size, "%s %08lx %s: ",
timestamp, thread_id, get_log_level_string(loglevel));
}
/* get ready to scan var. args. */
va_start(ap, fmt);
/* build formatted message from fmt and var-args */
while ((*src) && (length < log_buffer_size-2))
{
const char *sval = NULL; /* %N string */
int ival; /* %N string length or an error code */
unsigned uval; /* %u value */
long lval; /* %l value */
unsigned long ulval; /* %ul value */
char ch;
const char *format_string = tempbuf;
ch = *src++;
if (ch != '%')
{
outbuf[length++] = ch;
/*
* XXX: Only necessary on platforms where multiple threads
* can write to the buffer at the same time because we
* don't support mutexes (OS/2 for example).
*/
outbuf[length] = '\0';
continue;
}
outbuf[length] = '\0';
ch = *src++;
switch (ch) {
case '%':
tempbuf[0] = '%';
tempbuf[1] = '\0';
break;
case 'd':
ival = va_arg(ap, int);
snprintf(tempbuf, sizeof(tempbuf), "%d", ival);
break;
case 'u':
uval = va_arg(ap, unsigned);
snprintf(tempbuf, sizeof(tempbuf), "%u", uval);
break;
case 'l':
/* this is a modifier that must be followed by u, lu, or d */
ch = *src++;
if (ch == 'd')
{
lval = va_arg(ap, long);
snprintf(tempbuf, sizeof(tempbuf), "%ld", lval);
}
else if (ch == 'u')
{
ulval = va_arg(ap, unsigned long);
snprintf(tempbuf, sizeof(tempbuf), "%lu", ulval);
}
else if ((ch == 'l') && (*src == 'u'))
{
unsigned long long lluval = va_arg(ap, unsigned long long);
snprintf(tempbuf, sizeof(tempbuf), "%llu", lluval);
src++;
}
else
{
snprintf(tempbuf, sizeof(tempbuf), "Bad format string: \"%s\"", fmt);
loglevel = LOG_LEVEL_FATAL;
}
break;
case 'c':
/*
* Note that char paramaters are converted to int, so we need to
* pass "int" to va_arg. (See K&R, 2nd ed, section A7.3.2, page 202)
*/
tempbuf[0] = (char) va_arg(ap, int);
tempbuf[1] = '\0';
break;
case 's':
format_string = va_arg(ap, char *);
if (format_string == NULL)
{
format_string = "[null]";
}
break;
case 'N':
/*
* Non-standard: Print a counted unterminated string,
* replacing unprintable bytes with their hex value.
* Takes 2 parameters: int length, const char * string.
*/
ival = va_arg(ap, int);
assert(ival >= 0);
sval = va_arg(ap, char *);
assert(sval != NULL);
while ((ival-- > 0) && (length < log_buffer_size - 6))
{
if (isprint((int)*sval) && (*sval != '\\'))
{
outbuf[length++] = *sval;
outbuf[length] = '\0';
}
else
{
int ret = snprintf(outbuf + length,
log_buffer_size - length - 2, "\\x%.2x", (unsigned char)*sval);
assert(ret == 4);
length += 4;
}
sval++;
}
/*
* XXX: In case of printable characters at the end of
* the %N string, we're not using the whole buffer.
*/
format_string = (length < log_buffer_size - 6) ? "" : "[too long]";
break;
case 'E':
/* Non-standard: Print error code from errno */
#ifdef _WIN32
ival = WSAGetLastError();
format_string = w32_socket_strerr(ival, tempbuf);
#elif __OS2__
ival = sock_errno();
if (ival != 0)
{
format_string = os2_socket_strerr(ival, tempbuf);
}
else
{
ival = errno;
format_string = strerror(ival);
}
#else /* ifndef _WIN32 */
ival = errno;
#ifdef HAVE_STRERROR
format_string = strerror(ival);
#else /* ifndef HAVE_STRERROR */
format_string = NULL;
#endif /* ndef HAVE_STRERROR */
if (sval == NULL)
{
snprintf(tempbuf, sizeof(tempbuf), "(errno = %d)", ival);
}
#endif /* ndef _WIN32 */
break;
case 'T':
/* Non-standard: Print a Common Log File timestamp */
get_clf_timestamp(tempbuf, sizeof(tempbuf));
break;
default:
snprintf(tempbuf, sizeof(tempbuf), "Bad format string: \"%s\"", fmt);
loglevel = LOG_LEVEL_FATAL;
break;
}
assert(length < log_buffer_size);
length += strlcpy(outbuf + length, format_string, log_buffer_size - length);
if (length >= log_buffer_size-2)
{
static const char warning[] = "... [too long, truncated]";
length = log_buffer_size - sizeof(warning) - 1;
length += strlcpy(outbuf + length, warning, log_buffer_size - length);
assert(length < log_buffer_size);
break;
}
}
/* done with var. args */
va_end(ap);
assert(length < log_buffer_size);
length += strlcpy(outbuf + length, "\n", log_buffer_size - length);
/* Some sanity checks */
if ((length >= log_buffer_size)
|| (outbuf[log_buffer_size-1] != '\0')
|| (outbuf[log_buffer_size] != '\0')
)
{
/* Repeat as assertions */
assert(length < log_buffer_size);
assert(outbuf[log_buffer_size-1] == '\0');
/*
* outbuf's real size is log_buffer_size+1,
* so while this looks like an off-by-one,
* we're only checking our paranoia byte.
*/
assert(outbuf[log_buffer_size] == '\0');
snprintf(outbuf, log_buffer_size,
"%s %08lx Fatal error: log_error()'s sanity checks failed."
"length: %d. Exiting.",
timestamp, thread_id, (int)length);
loglevel = LOG_LEVEL_FATAL;
}
#ifndef _WIN32
/*
* On Windows this is acceptable in case
* we are logging to the GUI window only.
*/
assert(NULL != logfp);
#endif
lock_logfile();
if (loglevel == LOG_LEVEL_FATAL)
{
fatal_error(outbuf);
/* Never get here */
}
if (logfp != NULL)
{
fputs(outbuf, logfp);
}
#if defined(_WIN32) && !defined(_WIN_CONSOLE)
/* Write to display */
LogPutString(outbuf);
#endif /* defined(_WIN32) && !defined(_WIN_CONSOLE) */
unlock_logfile();
}
/*********************************************************************
*
* Function : jb_err_to_string
*
* Description : Translates JB_ERR_FOO codes into strings.
*
* Parameters :
* 1 : jb_error = a valid jb_err code
*
* Returns : A string with the jb_err translation
*
*********************************************************************/
const char *jb_err_to_string(jb_err jb_error)
{
switch (jb_error)
{
case JB_ERR_OK:
return "Success, no error";
case JB_ERR_MEMORY:
return "Out of memory";
case JB_ERR_CGI_PARAMS:
return "Missing or corrupt CGI parameters";
case JB_ERR_FILE:
return "Error opening, reading or writing a file";
case JB_ERR_PARSE:
return "Parse error";
case JB_ERR_MODIFIED:
return "File has been modified outside of the CGI actions editor.";
case JB_ERR_COMPRESS:
return "(De)compression failure";
}
assert(0);
return "Internal error";
}
#ifdef _WIN32