solaris-fixes branch: Applied the swap-patch by Christophe Kalt.
[collectd.git] / src / collectd.c
1 /**
2  * collectd - src/collectd.c
3  * Copyright (C) 2005,2006  Florian octo Forster
4  *
5  * This program is free software; you can redistribute it and/or modify it
6  * under the terms of the GNU General Public License as published by the
7  * Free Software Foundation; either version 2 of the License, or (at your
8  * option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License along
16  * with this program; if not, write to the Free Software Foundation, Inc.,
17  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
18  *
19  * Authors:
20  *   Florian octo Forster <octo at verplant.org>
21  *   Alvaro Barcellos <alvaro.barcellos at gmail.com>
22  **/
23
24 #include "collectd.h"
25 #include "common.h"
26 #include "utils_debug.h"
27
28 #include "network.h"
29 #include "plugin.h"
30 #include "configfile.h"
31
32 static int loop = 0;
33
34 #if HAVE_LIBKSTAT
35 kstat_ctl_t *kc;
36 #endif /* HAVE_LIBKSTAT */
37
38 /*
39  * exported variables
40  */
41 time_t curtime;
42 int    operating_mode;
43
44 static void sigIntHandler (int signal)
45 {
46         loop++;
47 }
48
49 static void sigTermHandler (int signal)
50 {
51         loop++;
52 }
53
54 static int change_basedir (char *dir)
55 {
56         int dirlen = strlen (dir);
57         
58         while ((dirlen > 0) && (dir[dirlen - 1] == '/'))
59                 dir[--dirlen] = '\0';
60
61         if (dirlen <= 0)
62                 return (-1);
63
64         if (chdir (dir) == -1)
65         {
66                 if (errno == ENOENT)
67                 {
68                         if (mkdir (dir, 0755) == -1)
69                         {
70                                 syslog (LOG_ERR, "mkdir (%s): %s", dir, strerror (errno));
71                                 return (-1);
72                         }
73                         else if (chdir (dir) == -1)
74                         {
75                                 syslog (LOG_ERR, "chdir (%s): %s", dir, strerror (errno));
76                                 return (-1);
77                         }
78                 }
79                 else
80                 {
81                         syslog (LOG_ERR, "chdir: %s", strerror (errno));
82                         return (-1);
83                 }
84         }
85
86         return (0);
87 } /* static int change_basedir (char *dir) */
88
89 #if HAVE_LIBKSTAT
90 static void update_kstat (void)
91 {
92         if (kc == NULL)
93         {
94                 if ((kc = kstat_open ()) == NULL)
95                         syslog (LOG_ERR, "Unable to open kstat control structure");
96         }
97         else
98         {
99                 kid_t kid;
100                 kid = kstat_chain_update (kc);
101                 if (kid > 0)
102                 {
103                         syslog (LOG_INFO, "kstat chain has been updated");
104                         plugin_init_all ();
105                 }
106                 else if (kid < 0)
107                         syslog (LOG_ERR, "kstat chain update failed");
108                 /* else: everything works as expected */
109         }
110
111         return;
112 } /* static void update_kstat (void) */
113 #endif /* HAVE_LIBKSTAT */
114
115 /* TODO
116  * Remove all settings but `-f' and `-C'
117  */
118 static void exit_usage (char *name)
119 {
120         printf ("Usage: "PACKAGE" [OPTIONS]\n\n"
121                         
122                         "Available options:\n"
123                         "  General:\n"
124                         "    -C <file>       Configuration file.\n"
125                         "                    Default: "CONFIGFILE"\n"
126 #if COLLECT_DAEMON
127                         "    -f              Don't fork to the background.\n"
128 #endif
129                         "\nBuiltin defaults:\n"
130                         "  Config-File       "CONFIGFILE"\n"
131                         "  PID-File          "PIDFILE"\n"
132                         "  Data-Directory    "PKGLOCALSTATEDIR"\n"
133 #if COLLECT_DEBUG
134                         "  Log-File          "LOGFILE"\n"
135 #endif
136                         "  Step              "COLLECTD_STEP" seconds\n"
137                         "  Heartbeat         "COLLECTD_HEARTBEAT" seconds\n"
138                         "\n"PACKAGE" "VERSION", http://collectd.org/\n"
139                         "by Florian octo Forster <octo@verplant.org>\n"
140                         "for contributions see `AUTHORS'\n");
141         exit (0);
142 } /* static void exit_usage (char *name) */
143
144 static int start_client (void)
145 {
146         int step;
147
148         struct timeval tv_now;
149         struct timeval tv_next;
150         struct timespec ts_wait;
151
152         step = atoi (COLLECTD_STEP);
153         if (step <= 0)
154                 step = 10;
155
156 #if HAVE_LIBKSTAT
157         kc = NULL;
158         update_kstat ();
159 #endif
160
161 #if HAVE_LIBSTATGRAB
162         if (sg_init ())
163         {
164                 syslog (LOG_ERR, "sg_init: %s", sg_str_error (sg_get_error ()));
165                 return (-1);
166         }
167
168         if (sg_drop_privileges ())
169         {
170                 syslog (LOG_ERR, "sg_drop_privileges: %s", sg_str_error (sg_get_error ()));
171                 return (-1);
172         }
173 #endif
174
175         plugin_init_all ();
176
177         while (loop == 0)
178         {
179                 if (gettimeofday (&tv_next, NULL) < 0)
180                 {
181                         syslog (LOG_ERR, "gettimeofday failed: %s", strerror (errno));
182                         return (-1);
183                 }
184                 tv_next.tv_sec += step;
185
186 #if HAVE_LIBKSTAT
187                 update_kstat ();
188 #endif
189                 /* `curtime' is used by many (all?) plugins as the
190                  * data-sample-time passed to RRDTool */
191                 curtime = time (NULL);
192
193                 /* Issue all plugins */
194                 plugin_read_all ();
195
196                 if (gettimeofday (&tv_now, NULL) < 0)
197                 {
198                         syslog (LOG_ERR, "gettimeofday failed: %s", strerror (errno));
199                         return (-1);
200                 }
201
202                 if (timeval_sub_timespec (&tv_next, &tv_now, &ts_wait) != 0)
203                 {
204                         syslog (LOG_WARNING, "No sleeping because `timeval_sub_timespec' returned non-zero!");
205                         continue;
206                 }
207
208                 while (nanosleep (&ts_wait, &ts_wait) == -1)
209                 {
210                         if (errno != EINTR)
211                         {
212                                 syslog (LOG_ERR, "nanosleep failed: %s", strerror (errno));
213                                 break;
214                         }
215                 }
216         }
217
218         return (0);
219 } /* static int start_client (void) */
220
221 #if HAVE_LIBRRD
222 static int start_server (void)
223 {
224         /* FIXME use stack here! */
225         char *host;
226         char *type;
227         char *instance;
228         char *values;
229
230         while (loop == 0)
231         {
232                 if (network_receive (&host, &type, &instance, &values) == 0)
233                         plugin_write (host, type, instance, values);
234
235                 if (host     != NULL) free (host);     host     = NULL;
236                 if (type     != NULL) free (type);     type     = NULL;
237                 if (instance != NULL) free (instance); instance = NULL;
238                 if (values   != NULL) free (values);   values   = NULL;
239         }
240         
241         return (0);
242 } /* static int start_server (void) */
243 #endif /* HAVE_LIBRRD */
244
245 #if COLLECT_DAEMON
246 static int pidfile_create (const char *file)
247 {
248         FILE *fh;
249
250         if (file == NULL)
251                 file = PIDFILE;
252
253         if ((fh = fopen (file, "w")) == NULL)
254         {
255                 syslog (LOG_ERR, "fopen (%s): %s", file, strerror (errno));
256                 return (1);
257         }
258
259         fprintf (fh, "%i\n", (int) getpid ());
260         fclose(fh);
261
262         return (0);
263 } /* static int pidfile_create (const char *file) */
264 #endif /* COLLECT_DAEMON */
265
266 #if COLLECT_DAEMON
267 static int pidfile_remove (const char *file)
268 {
269         if (file == NULL) {
270                 file = PIDFILE;
271         }
272         return (unlink (file));
273 } /* static int pidfile_remove (const char *file) */
274 #endif /* COLLECT_DAEMON */
275
276 int main (int argc, char **argv)
277 {
278         struct sigaction sigIntAction;
279         struct sigaction sigTermAction;
280         char *datadir    = PKGLOCALSTATEDIR;
281         char *configfile = CONFIGFILE;
282 #if COLLECT_DAEMON
283         struct sigaction sigChldAction;
284         char *pidfile    = PIDFILE;
285         pid_t pid;
286         int daemonize    = 1;
287 #endif
288 #if COLLECT_DEBUG
289         char *logfile    = LOGFILE;
290 #endif
291
292 #if HAVE_LIBRRD
293         operating_mode = MODE_LOCAL;
294 #endif
295
296         /* open syslog */
297         openlog (PACKAGE, LOG_CONS | LOG_PID, LOG_DAEMON);
298
299         /* read options */
300         while (1)
301         {
302                 int c;
303
304                 c = getopt (argc, argv, "hC:"
305 #if COLLECT_DAEMON
306                                 "f"
307 #endif
308                 );
309
310                 if (c == -1)
311                         break;
312
313                 switch (c)
314                 {
315                         case 'C':
316                                 configfile = optarg;
317                                 break;
318 #if COLLECT_DAEMON
319                         case 'f':
320                                 daemonize = 0;
321                                 break;
322 #endif /* COLLECT_DAEMON */
323                         case 'h':
324                         default:
325                                 exit_usage (argv[0]);
326                 } /* switch (c) */
327         } /* while (1) */
328
329 #if COLLECT_DEBUG
330         if ((logfile = cf_get_option ("LogFile", LOGFILE)) != NULL)
331                 DBG_STARTFILE (logfile, "Debug file opened.");
332 #endif
333
334         /*
335          * Read options from the config file, the environment and the command
336          * line (in that order, with later options overwriting previous ones in
337          * general).
338          * Also, this will automatically load modules.
339          */
340         if (cf_read (configfile))
341         {
342                 fprintf (stderr, "Error: Reading the config file failed!\n"
343                                 "Read the syslog for details.\n");
344                 return (1);
345         }
346
347         /*
348          * Change directory. We do this _after_ reading the config and loading
349          * modules to relative paths work as expected.
350          */
351         if ((datadir = cf_get_option ("DataDir", PKGLOCALSTATEDIR)) == NULL)
352         {
353                 fprintf (stderr, "Don't have a datadir to use. This should not happen. Ever.");
354                 return (1);
355         }
356         if (change_basedir (datadir))
357         {
358                 fprintf (stderr, "Error: Unable to change to directory `%s'.\n", datadir);
359                 return (1);
360         }
361
362 #if COLLECT_DAEMON
363         /*
364          * fork off child
365          */
366         sigChldAction.sa_handler = SIG_IGN;
367         sigaction (SIGCHLD, &sigChldAction, NULL);
368
369         if ((pidfile = cf_get_option ("PIDFile", PIDFILE)) == NULL)
370         {
371                 fprintf (stderr, "Cannot obtain pidfile. This shoud not happen. Ever.");
372                 return (1);
373         }
374
375         if (daemonize)
376         {
377                 if ((pid = fork ()) == -1)
378                 {
379                         /* error */
380                         fprintf (stderr, "fork: %s", strerror (errno));
381                         return (1);
382                 }
383                 else if (pid != 0)
384                 {
385                         /* parent */
386                         /* printf ("Running (PID %i)\n", pid); */
387                         return (0);
388                 }
389
390                 /* Detach from session */
391                 setsid ();
392
393                 /* Write pidfile */
394                 if (pidfile_create (pidfile))
395                         exit (2);
396
397                 /* close standard descriptors */
398                 close (2);
399                 close (1);
400                 close (0);
401
402                 if (open ("/dev/null", O_RDWR) != 0)
403                 {
404                         syslog (LOG_ERR, "Error: Could not connect `STDIN' to `/dev/null'");
405                         return (1);
406                 }
407                 if (dup (0) != 1)
408                 {
409                         syslog (LOG_ERR, "Error: Could not connect `STDOUT' to `/dev/null'");
410                         return (1);
411                 }
412                 if (dup (0) != 2)
413                 {
414                         syslog (LOG_ERR, "Error: Could not connect `STDERR' to `/dev/null'");
415                         return (1);
416                 }
417         } /* if (daemonize) */
418 #endif /* COLLECT_DAEMON */
419
420         /*
421          * install signal handlers
422          */
423         sigIntAction.sa_handler = sigIntHandler;
424         sigaction (SIGINT, &sigIntAction, NULL);
425
426         sigTermAction.sa_handler = sigTermHandler;
427         sigaction (SIGTERM, &sigTermAction, NULL);
428
429         /*
430          * run the actual loops
431          */
432 #if HAVE_LIBRRD
433         if (operating_mode == MODE_SERVER)
434                 start_server ();
435         else /* if (operating_mode == MODE_CLIENT || operating_mode == MODE_LOCAL || operating_mode == MODE_LOG) */
436 #endif
437                 start_client ();
438
439 #if COLLECT_DEBUG
440         if (logfile != NULL)
441                 DBG_STOPFILE("debug file closed.");
442 #endif
443
444         /* close syslog */
445         syslog (LOG_INFO, "Exiting normally");
446         closelog ();
447
448 #if COLLECT_DAEMON
449         if (daemonize)
450                 pidfile_remove (pidfile);
451 #endif /* COLLECT_DAEMON */
452
453         return (0);
454 } /* int main (int argc, char **argv) */