266 lines
5.9 KiB
C
266 lines
5.9 KiB
C
/*
|
|
* log.c: Miscellaneous logging functions
|
|
*
|
|
* Copyright (C) 2001, 2002 Juha Yrjölä <juha.yrjola@iki.fi>
|
|
* Copyright (C) 2003 Antti Tapaninen <aet@cc.hut.fi>
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library 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
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#if HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <stdarg.h>
|
|
#include <stdlib.h>
|
|
#include <assert.h>
|
|
#include <ctype.h>
|
|
#include <string.h>
|
|
#include <time.h>
|
|
#ifdef HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
#ifdef HAVE_SYS_TIME_H
|
|
#include <sys/time.h>
|
|
#endif
|
|
#ifdef HAVE_IO_H
|
|
#include <io.h>
|
|
#endif
|
|
#ifdef HAVE_PTHREAD
|
|
#include <pthread.h>
|
|
#endif
|
|
|
|
#include "internal.h"
|
|
|
|
static void sc_do_log_va(sc_context_t *ctx, int level, const char *file, int line, const char *func, const char *format, va_list args);
|
|
|
|
void sc_do_log(sc_context_t *ctx, int level, const char *file, int line, const char *func, const char *format, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, format);
|
|
sc_do_log_va(ctx, level, file, line, func, format, ap);
|
|
va_end(ap);
|
|
}
|
|
|
|
void sc_do_log_noframe(sc_context_t *ctx, int level, const char *format, va_list args)
|
|
{
|
|
sc_do_log_va(ctx, level, NULL, 0, NULL, format, args);
|
|
}
|
|
|
|
static void sc_do_log_va(sc_context_t *ctx, int level, const char *file, int line, const char *func, const char *format, va_list args)
|
|
{
|
|
char buf[4096], *p;
|
|
int r;
|
|
size_t left;
|
|
#ifdef _WIN32
|
|
SYSTEMTIME st;
|
|
#else
|
|
struct tm *tm;
|
|
struct timeval tv;
|
|
char time_string[40];
|
|
#endif
|
|
FILE *outf = NULL;
|
|
int n;
|
|
|
|
if (!ctx || ctx->debug < level)
|
|
return;
|
|
|
|
p = buf;
|
|
left = sizeof(buf);
|
|
|
|
#ifdef _WIN32
|
|
GetLocalTime(&st);
|
|
r = snprintf(p, left,
|
|
"P:%lu; T:%lu %i-%02i-%02i %02i:%02i:%02i.%03i ",
|
|
(unsigned long)GetCurrentProcessId(),
|
|
(unsigned long)GetCurrentThreadId(),
|
|
st.wYear, st.wMonth, st.wDay,
|
|
st.wHour, st.wMinute, st.wSecond, st.wMilliseconds);
|
|
#else
|
|
gettimeofday (&tv, NULL);
|
|
tm = localtime (&tv.tv_sec);
|
|
strftime (time_string, sizeof(time_string), "%H:%M:%S", tm);
|
|
r = snprintf(p, left, "0x%lx %s.%03ld ", (unsigned long)pthread_self(), time_string, (long)tv.tv_usec / 1000);
|
|
#endif
|
|
p += r;
|
|
left -= r;
|
|
|
|
if (file != NULL) {
|
|
r = snprintf(p, left, "[%s] %s:%d:%s: ",
|
|
ctx->app_name, file, line, func ? func : "");
|
|
if (r < 0 || (unsigned int)r > sizeof(buf))
|
|
return;
|
|
}
|
|
else {
|
|
r = 0;
|
|
}
|
|
p += r;
|
|
left -= r;
|
|
|
|
r = vsnprintf(p, left, format, args);
|
|
if (r < 0)
|
|
return;
|
|
|
|
if (ctx->reopen_log_file) {
|
|
r = sc_ctx_log_to_file(ctx, ctx->debug_filename);
|
|
if (r < 0)
|
|
return;
|
|
}
|
|
|
|
outf = ctx->debug_file;
|
|
if (outf == NULL)
|
|
return;
|
|
|
|
fprintf(outf, "%s", buf);
|
|
n = strlen(buf);
|
|
if (n == 0 || buf[n-1] != '\n')
|
|
fprintf(outf, "\n");
|
|
fflush(outf);
|
|
|
|
if (ctx->reopen_log_file) {
|
|
if (ctx->debug_file && (ctx->debug_file != stderr && ctx->debug_file != stdout))
|
|
fclose(ctx->debug_file);
|
|
ctx->debug_file = NULL;
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
void _sc_debug(struct sc_context *ctx, int level, const char *format, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, format);
|
|
sc_do_log_va(ctx, level, NULL, 0, NULL, format, ap);
|
|
va_end(ap);
|
|
}
|
|
|
|
void _sc_log(struct sc_context *ctx, const char *format, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, format);
|
|
sc_do_log_va(ctx, SC_LOG_DEBUG_NORMAL, NULL, 0, NULL, format, ap);
|
|
va_end(ap);
|
|
}
|
|
|
|
void _sc_debug_hex(sc_context_t *ctx, int type, const char *file, int line,
|
|
const char *func, const char *label, const u8 *data, size_t len)
|
|
{
|
|
size_t blen = len * 5 + 128;
|
|
char *buf = malloc(blen);
|
|
if (buf == NULL)
|
|
return;
|
|
|
|
sc_hex_dump(data, len, buf, blen);
|
|
|
|
if (label)
|
|
sc_do_log(ctx, type, file, line, func,
|
|
"\n%s (%"SC_FORMAT_LEN_SIZE_T"u byte%s):\n%s",
|
|
label, len, len==1?"":"s", buf);
|
|
else
|
|
sc_do_log(ctx, type, file, line, func,
|
|
"%"SC_FORMAT_LEN_SIZE_T"u byte%s:\n%s",
|
|
len, len==1?"":"s", buf);
|
|
|
|
free(buf);
|
|
}
|
|
|
|
void sc_hex_dump(const u8 * in, size_t count, char *buf, size_t len)
|
|
{
|
|
char *p = buf;
|
|
int lines = 0;
|
|
|
|
if (buf == NULL || (in == NULL && count != 0)) {
|
|
return;
|
|
}
|
|
buf[0] = 0;
|
|
if ((count * 5) > len)
|
|
return;
|
|
while (count) {
|
|
char ascbuf[17];
|
|
size_t i;
|
|
|
|
for (i = 0; i < count && i < 16; i++) {
|
|
sprintf(p, "%02X ", *in);
|
|
if (isprint(*in))
|
|
ascbuf[i] = *in;
|
|
else
|
|
ascbuf[i] = '.';
|
|
p += 3;
|
|
in++;
|
|
}
|
|
count -= i;
|
|
ascbuf[i] = 0;
|
|
for (; i < 16 && lines; i++) {
|
|
strcat(p, " ");
|
|
p += 3;
|
|
}
|
|
strcat(p, ascbuf);
|
|
p += strlen(p);
|
|
sprintf(p, "\n");
|
|
p++;
|
|
lines++;
|
|
}
|
|
}
|
|
|
|
const char *
|
|
sc_dump_hex(const u8 * in, size_t count)
|
|
{
|
|
static char dump_buf[0x1000];
|
|
size_t ii, size = sizeof(dump_buf) - 0x10;
|
|
size_t offs = 0;
|
|
|
|
memset(dump_buf, 0, sizeof(dump_buf));
|
|
if (in == NULL)
|
|
return dump_buf;
|
|
|
|
for (ii=0; ii<count; ii++) {
|
|
if (ii && !(ii%16)) {
|
|
if (!(ii%48))
|
|
snprintf(dump_buf + offs, size - offs, "\n");
|
|
else
|
|
snprintf(dump_buf + offs, size - offs, " ");
|
|
offs = strlen(dump_buf);
|
|
}
|
|
|
|
snprintf(dump_buf + offs, size - offs, "%02X", *(in + ii));
|
|
offs += 2;
|
|
|
|
if (offs > size)
|
|
break;
|
|
}
|
|
|
|
if (ii<count)
|
|
snprintf(dump_buf + offs, sizeof(dump_buf) - offs, "....\n");
|
|
|
|
return dump_buf;
|
|
}
|
|
|
|
const char *
|
|
sc_dump_oid(const struct sc_object_id *oid)
|
|
{
|
|
static char dump_buf[SC_MAX_OBJECT_ID_OCTETS * 20];
|
|
size_t ii;
|
|
|
|
memset(dump_buf, 0, sizeof(dump_buf));
|
|
if (oid)
|
|
for (ii=0; ii<SC_MAX_OBJECT_ID_OCTETS && oid->value[ii] != -1; ii++)
|
|
snprintf(dump_buf + strlen(dump_buf), sizeof(dump_buf) - strlen(dump_buf), "%s%i", (ii ? "." : ""), oid->value[ii]);
|
|
|
|
return dump_buf;
|
|
}
|