added ttf2pt1 dependencies
[swftools.git] / lib / log.c
1 /* log.c 
2    Logging facilities for displaying information on screen, as well as
3    (optional) storing it to a file and transmitting it over the network.
4
5    Part of the swftools package.
6    
7    Copyright (c) 2001 Matthias Kramm <kramm@quiss.org> 
8
9    This file is distributed under the GPL, see file COPYING for details */
10
11 #ifdef __NT__
12 #include "stdafx.h"
13 #include <string.h>
14 #include <winsock2.h>
15 #include <stdlib.h>
16 #include <malloc.h>
17 #if _MSC_VER > 1000
18 #pragma once
19 #endif // _MSC_VER > 1000
20 #else
21 #include <stdio.h>
22 #include <stdlib.h>
23 #include <stdarg.h>
24 #include <string.h>
25 #include <unistd.h>
26 #endif
27
28 #include "log.h"
29
30 #define LOGLEVEL_FATAL 0
31 #define LOGLEVEL_ERROR 1
32 #define LOGLEVEL_WARNING 2
33 #define LOGLEVEL_NOTICE 3
34 #define LOGLEVEL_VERBOSE 4
35 #define LOGLEVEL_DEBUG 5
36
37 int screenloglevel;
38 int fileloglevel;
39 int socketloglevel;
40 FILE *logFile = 0;
41 #ifdef __NT__
42 SOCKET logSocket;
43 #else
44 int logSocket = 0;
45 #endif
46
47 char bLogToSock = 0;
48
49 void initlogSocket(char* servAddr, char* logPort);
50
51 void initLog(char* pLogName, int fileloglevel, char* servAddr, char* logPort, int serverlevel, int screenlevel)
52 {
53    screenloglevel = screenlevel;
54    fileloglevel = fileloglevel;
55    socketloglevel = screenlevel;
56    logFile = NULL;
57    bLogToSock = 0;
58
59    if (pLogName && fileloglevel>=0)
60    logFile = fopen(pLogName, "a+");
61    bLogToSock = (servAddr && logPort && (serverlevel>=0));
62    if(bLogToSock)
63        initlogSocket(servAddr, logPort);
64 }
65
66 void initlogSocket(char* servAddr, char* logPort)
67 {
68 #ifndef __NT__
69    bLogToSock = 0;
70 #else
71    // init winsock
72    // check and prepare WinSock DLL
73    WORD wVersionRequested = MAKEWORD( 2, 2 );
74    WSADATA wsaData;
75    if ( WSAStartup(wVersionRequested, &wsaData) != 0 )
76    {
77       bLogToSock = false;
78       return;
79    }
80    // Confirm that the WinSock DLL supports 2.2.
81    // Note that if the DLL supports versions greater
82    // than 2.2 in addition to 2.2, it will still return
83    // 2.2 in wVersion since that is the version we
84    // requested.
85
86    if ( LOBYTE( wsaData.wVersion ) != 2 || HIBYTE( wsaData.wVersion ) != 2 )
87    {
88       bLogToSock = false;
89       return;
90    }
91
92    struct hostent *hp;
93    hp = gethostbyname(servAddr);
94    if (hp == NULL) // we don't know who this host is
95    {
96       bLogToSock = false;
97       return;
98    }
99
100    // connect socket
101    sockaddr_in SocketAddress;
102
103    memset(&SocketAddress, 0, sizeof(SocketAddress));
104    memcpy((char*)&SocketAddress.sin_addr, hp->h_addr, hp->h_length); // set address
105    SocketAddress.sin_family = hp->h_addrtype;
106    SocketAddress.sin_port = htons((u_short)atoi(logPort));
107
108    logSocket = socket(hp->h_addrtype, SOCK_STREAM, 0);
109    if (logSocket == INVALID_SOCKET)
110    {
111       bLogToSock = false;
112       return;
113    }
114
115    // try to connect to the specified socket
116    if ( connect(logSocket, (struct sockaddr*)&SocketAddress, sizeof (SocketAddress)) == SOCKET_ERROR) {
117       bLogToSock = false;
118       return;
119    }
120    bLogToSock = true;
121 #endif
122 }
123
124 void exitLog()
125 {
126    // close socket communication
127    if(bLogToSock)
128 #ifndef __NT__
129      close(logSocket);
130 #else
131      closesocket(logSocket);
132 #endif
133    // close file
134    if(logFile != NULL)
135      fclose(logFile);
136 }
137
138
139 static char * logimportance[]= {"Fatal","Error","Warning","Notice","Verbose","Debug"};
140 static int loglevels=6;
141 static char * logimportance2[]= {"       ","FATAL  ","ERROR  ","WARNING","NOTICE ","VERBOSE","DEBUG  "};
142 void log(char* logString)
143 {
144    char timebuffer[32];
145    char* logBuffer;
146    char dbuffer[9];
147    char tbuffer[9];
148    int level;
149    char*lt;
150    char*gt;
151    int l;
152
153    logBuffer = (char*)malloc (strlen(logString) + 24 + 15);
154 #ifndef __NT__
155    {
156      /*time_t t = time(0);
157      tm*t2 = localtime(t);
158      strftime(dbuffer, 8, "%m %d", t2);
159      strftime(tbuffer, 8, "%m %d", t2);
160      dbuffer[0]=0; //FIXME
161      tbuffer[0]=0;*/
162      time_t t = time(0);
163      char* a = ctime(&t);
164      int l = strlen(a);
165      while(a[l-1] == 13 || a[l-1] == 10)
166        l--;
167      a[l]=0;
168      sprintf(timebuffer, "%s", a);
169    }
170 #else
171    _strdate( dbuffer );
172    _strtime( tbuffer );
173    sprintf(timebuffer, "%s - %s",dbuffer,tbuffer);
174 #endif
175
176    // search for <level> field
177    level = -1;
178    lt=strchr(logString, '<');
179    gt=strchr(logString, '>');
180    if(lt && gt && lt<gt)
181    {
182        int t;
183        for(t=0;t<loglevels;t++)
184        {
185 #ifndef __NT__
186            if(!strncasecmp(lt+1,logimportance[t],strlen(logimportance[t])))
187 #else
188            if(!strnicmp(lt+1,logimportance[t],strlen(logimportance[t])))
189 #endif
190            {
191                logString = gt+1;
192                while(logString[0]==' ') logString ++;
193                level = t;
194                break;
195            }
196        }
197    }
198    
199 //   sprintf(logBuffer, "%s: %s %s", timebuffer, logimportance2[level + 1],logString);
200    sprintf(logBuffer, "%s %s", logimportance2[level + 1],logString);
201
202    // we always do exactly one newline.
203    
204    l=strlen(logBuffer)-1;
205    while((logBuffer[l]==13 || logBuffer[l]==10) && l>=0)
206    {
207        logBuffer[l]=0;
208        l--;
209    }
210
211    if (level <= screenloglevel)
212    {
213        printf("%s\n", logBuffer); 
214        fflush(stdout);
215    }
216
217    if (level <= fileloglevel)
218    {
219        if (logFile != NULL)
220        {
221           fprintf(logFile, "%s\n", logBuffer); 
222           fflush(logFile);
223        }
224    }
225
226    if (level <= socketloglevel)
227    {
228        if (bLogToSock)
229        {
230           // send data
231 #ifndef __NT__
232           write(logSocket, logBuffer, strlen(logBuffer));
233 #else
234           send(logSocket, logBuffer, strlen(logBuffer), 0);
235 #endif
236        }
237    }
238    free (logBuffer);
239 }
240
241 void logf(const char* pszFormat, ...)
242 {
243     char buf[1024];
244         va_list arglist;
245         va_start(arglist, pszFormat);
246     buf[0] = 0;
247     vsprintf(&buf[strlen(buf)], pszFormat, arglist);
248         va_end(arglist);
249     strcat(buf, "\n");
250     log(buf);
251 }
252