1 /*
2     $Id: mjpeg_logging.c,v 1.16 2007/04/01 18:06:06 sms00 Exp $
3 
4     Copyright (C) 2000 Herbert Valerio Riedel <hvr@gnu.org>
5 
6     This program is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.
10 
11     This program is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.
15 
16     You should have received a copy of the GNU General Public License
17     along with this program; if not, write to the Free Software
18     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19 */
20 
21 
22 #ifdef HAVE_CONFIG_H
23 # include <config.h>
24 #endif
25 
26 #include <stdlib.h>
27 #include <stdarg.h>
28 #include <stdio.h>
29 #include <assert.h>
30 #include <string.h>
31 
32 #include "mjpeg_logging.h"
33 
34 #ifdef HAVE___PROGNAME
35 extern const char *__progname;
36 #endif
37 
38 /*
39  * Put these here and NOT in the exported header file mjpeg_logging.h
40  *
41  * since ALL program use of these should use the API below (mjpeg_warn,
42  * mjpeg_error,etc) these symbols do not need to be exported and possibly
43  * conflict with syslog.h
44 */
45 
46 #define LOG_DEBUG 1
47 #define LOG_INFO 2
48 #define LOG_WARN 3
49 #define LOG_ERROR 4
50 
51 static log_level_t mjpeg_log_verbosity = 0;
52 static char *default_handler_id = NULL;
53 
default_mjpeg_log_filter(log_level_t level)54 static int default_mjpeg_log_filter( log_level_t level )
55 {
56   int verb_from_env;
57   if( mjpeg_log_verbosity == 0 )
58     {
59       char *mjpeg_verb_env = getenv("MJPEG_VERBOSITY");
60       if( mjpeg_verb_env != NULL )
61         {
62           verb_from_env = LOG_WARN-atoi(mjpeg_verb_env);
63           if( verb_from_env >= LOG_DEBUG && verb_from_env <= LOG_ERROR )
64             mjpeg_log_verbosity = (log_level_t)verb_from_env;
65         }
66     }
67   return (level < LOG_WARN && level < mjpeg_log_verbosity);
68 }
69 
70 static mjpeg_log_filter_t _filter = default_mjpeg_log_filter;
71 
72 static void
default_mjpeg_log_handler(log_level_t level,const char message[])73 default_mjpeg_log_handler(log_level_t level, const char message[])
74 {
75   const char *ids;
76 
77   if( (*_filter)( level ) )
78     return;
79   if (default_handler_id != NULL) {
80     ids = default_handler_id;
81   } else {
82 #ifdef HAVE___PROGNAME
83     ids = __progname;
84 #else
85     ids = "???";
86 #endif
87   }
88   switch(level) {
89   case LOG_ERROR:
90     fprintf(stderr, "**ERROR: [%s] %s\n", ids, message);
91     break;
92   case LOG_DEBUG:
93     fprintf(stderr, "--DEBUG: [%s] %s\n", ids, message);
94     break;
95   case LOG_WARN:
96     fprintf(stderr, "++ WARN: [%s] %s\n", ids, message);
97     break;
98   case LOG_INFO:
99     fprintf(stderr, "   INFO: [%s] %s\n", ids, message);
100     break;
101   default:
102     assert(0);
103   }
104 }
105 
106 static mjpeg_log_handler_t _handler = default_mjpeg_log_handler;
107 
108 
109 mjpeg_log_handler_t
mjpeg_log_set_handler(mjpeg_log_handler_t new_handler)110 mjpeg_log_set_handler(mjpeg_log_handler_t new_handler)
111 {
112   mjpeg_log_handler_t old_handler = _handler;
113 
114   _handler = new_handler;
115   return old_handler;
116 }
117 
118 /***************
119  * Set default log handlers degree of verboseity.
120  * 0 = quiet, 1 = info, 2 = debug
121  *************/
122 
123 int
mjpeg_default_handler_verbosity(int verbosity)124 mjpeg_default_handler_verbosity(int verbosity)
125 {
126   int prev_verb = mjpeg_log_verbosity;
127   mjpeg_log_verbosity = (log_level_t)(LOG_WARN - verbosity);
128   return prev_verb;
129 }
130 
131 /*
132  * Set identifier string used by default handler
133  */
134 int
mjpeg_default_handler_identifier(const char * new_id)135 mjpeg_default_handler_identifier(const char *new_id)
136 {
137   const char *s;
138   if (new_id == NULL) {
139     if (default_handler_id != NULL)
140        free(default_handler_id);
141     default_handler_id = NULL;
142     return 0;
143   }
144   /* find basename of new_id (remove any directory prefix) */
145   if ((s = strrchr(new_id, '/')) == NULL)
146     s = new_id;
147   else
148     s = s + 1;
149   default_handler_id = strdup(s);
150   return 0;
151 }
152 
153 static void
mjpeg_logv(log_level_t level,const char format[],va_list args)154 mjpeg_logv(log_level_t level, const char format[], va_list args)
155 {
156   char buf[1024] = { 0, };
157 
158   /* TODO: Original had a re-entrancy error trap to assist bug
159      finding.  To make this work with multi-threaded applications a
160      lock is needed hence delete.
161   */
162 
163   vsnprintf(buf, sizeof(buf)-1, format, args);
164   _handler(level, buf);
165 }
166 
167 void
mjpeg_log(log_level_t level,const char format[],...)168 mjpeg_log(log_level_t level, const char format[], ...)
169 {
170   va_list args;
171   va_start (args, format);
172   mjpeg_logv(level, format, args);
173   va_end (args);
174 }
175 
176 void
mjpeg_debug(const char format[],...)177 mjpeg_debug(const char format[], ...)
178 {
179   va_list args;
180   va_start (args, format);
181   mjpeg_logv(LOG_DEBUG, format, args);
182   va_end (args);
183 }
184 
185 void
mjpeg_info(const char format[],...)186 mjpeg_info(const char format[], ...)
187 {
188   va_list args;
189   va_start (args, format);
190   mjpeg_logv(LOG_INFO, format, args);
191   va_end (args);
192 }
193 
194 void
mjpeg_warn(const char format[],...)195 mjpeg_warn(const char format[], ...)
196 {
197   va_list args;
198   va_start (args, format);
199   mjpeg_logv(LOG_WARN, format, args);
200   va_end (args);
201 }
202 
203 void
mjpeg_error(const char format[],...)204 mjpeg_error(const char format[], ...)
205 {
206   va_list args;
207   va_start (args, format);
208   mjpeg_logv(LOG_ERROR, format, args);
209   va_end (args);
210 }
211 
212 void
mjpeg_error_exit1(const char format[],...)213 mjpeg_error_exit1(const char format[], ...)
214 {
215   va_list args;
216   va_start( args, format );
217   mjpeg_logv( LOG_ERROR, format, args);
218   va_end(args);
219   exit(EXIT_FAILURE);
220 }
221 
222 log_level_t
mjpeg_loglev_t(const char * level)223 mjpeg_loglev_t(const char *level)
224 {
225     if (strcasecmp("debug", level) == 0) return(LOG_DEBUG);
226     else if (strcasecmp("info", level) == 0) return(LOG_INFO);
227     else if (strcasecmp("warn", level) == 0) return(LOG_WARN);
228     else if (strcasecmp("error", level) == 0) return(LOG_ERROR);
229     return(0);
230 }
231