a2870d0d11135e4c57bdc9551d99a849c39d3399
[amitay/samba.git] / ctdb / server / ctdbd.c
1 /* 
2    standalone ctdb daemon
3
4    Copyright (C) Andrew Tridgell  2006
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 3 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, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include "replace.h"
21 #include "system/filesys.h"
22 #include "system/time.h"
23 #include "system/wait.h"
24 #include "system/network.h"
25 #include "system/syslog.h"
26
27 #include <popt.h>
28 #include <talloc.h>
29 /* Allow use of deprecated function tevent_loop_allow_nesting() */
30 #define TEVENT_DEPRECATED
31 #include <tevent.h>
32
33 #include "lib/util/debug.h"
34 #include "lib/util/samba_util.h"
35
36 #include "ctdb_private.h"
37
38 #include "common/reqid.h"
39 #include "common/system.h"
40 #include "common/common.h"
41 #include "common/path.h"
42 #include "common/logging.h"
43 #include "common/logging_conf.h"
44
45 #include "ctdb_config.h"
46
47 int script_log_level;
48 bool fast_start;
49
50 /*
51   called by the transport layer when a packet comes in
52 */
53 static void ctdb_recv_pkt(struct ctdb_context *ctdb, uint8_t *data, uint32_t length)
54 {
55         struct ctdb_req_header *hdr = (struct ctdb_req_header *)data;
56
57         CTDB_INCREMENT_STAT(ctdb, node_packets_recv);
58
59         /* up the counter for this source node, so we know its alive */
60         if (ctdb_validate_pnn(ctdb, hdr->srcnode)) {
61                 /* as a special case, redirected calls don't increment the rx_cnt */
62                 if (hdr->operation != CTDB_REQ_CALL ||
63                     ((struct ctdb_req_call_old *)hdr)->hopcount == 0) {
64                         ctdb->nodes[hdr->srcnode]->rx_cnt++;
65                 }
66         }
67
68         ctdb_input_pkt(ctdb, hdr);
69 }
70
71 static const struct ctdb_upcalls ctdb_upcalls = {
72         .recv_pkt       = ctdb_recv_pkt,
73         .node_dead      = ctdb_node_dead,
74         .node_connected = ctdb_node_connected
75 };
76
77 static struct ctdb_context *ctdb_init(struct tevent_context *ev)
78 {
79         int ret;
80         struct ctdb_context *ctdb;
81
82         ctdb = talloc_zero(ev, struct ctdb_context);
83         if (ctdb == NULL) {
84                 DBG_ERR("Memory error\n");
85                 return NULL;
86         }
87         ctdb->ev  = ev;
88
89         /* Wrap early to exercise code. */
90         ret = reqid_init(ctdb, INT_MAX-200, &ctdb->idr);
91         if (ret != 0) {
92                 D_ERR("reqid_init failed (%s)\n", strerror(ret));
93                 talloc_free(ctdb);
94                 return NULL;
95         }
96
97         ret = srvid_init(ctdb, &ctdb->srv);
98         if (ret != 0) {
99                 D_ERR("srvid_init failed (%s)\n", strerror(ret));
100                 talloc_free(ctdb);
101                 return NULL;
102         }
103
104         ctdb->daemon.name = path_socket(ctdb, "ctdbd");
105         if (ctdb->daemon.name == NULL) {
106                 DBG_ERR("Memory allocation error\n");
107                 talloc_free(ctdb);
108                 return NULL;
109         }
110
111         ctdbd_pidfile = path_pidfile(ctdb, "ctdbd");
112         if (ctdbd_pidfile == NULL) {
113                 DBG_ERR("Memory allocation error\n");
114                 talloc_free(ctdb);
115                 return NULL;
116         }
117
118         gettimeofday(&ctdb->ctdbd_start_time, NULL);
119
120         gettimeofday(&ctdb->last_recovery_started, NULL);
121         gettimeofday(&ctdb->last_recovery_finished, NULL);
122
123         ctdb->recovery_mode    = CTDB_RECOVERY_NORMAL;
124         ctdb->recovery_master  = (uint32_t)-1;
125
126         ctdb->upcalls = &ctdb_upcalls;
127
128         ctdb->statistics.statistics_start_time = timeval_current();
129
130         ctdb->capabilities = CTDB_CAP_DEFAULT;
131
132         /*
133          * Initialise this node's PNN to the unknown value.  This will
134          * be set to the correct value by either ctdb_add_node() as
135          * part of loading the nodes file or by
136          * ctdb_tcp_listen_automatic() when the transport is
137          * initialised.  At some point we should de-optimise this and
138          * pull it out into ctdb_start_daemon() so it is done clearly
139          * and only in one place.
140          */
141         ctdb->pnn = CTDB_UNKNOWN_PNN;
142
143         ctdb->do_checkpublicip = true;
144
145         return ctdb;
146 }
147
148
149 /*
150   main program
151 */
152 int main(int argc, const char *argv[])
153 {
154         struct ctdb_context *ctdb = NULL;
155         int interactive_opt = 0;
156         bool interactive = false;
157
158         struct poptOption popt_options[] = {
159                 POPT_AUTOHELP
160                 { "interactive", 'i', POPT_ARG_NONE, &interactive_opt, 0,
161                   "don't fork, log to stderr", NULL },
162                 POPT_TABLEEND
163         };
164         int opt, ret;
165         const char **extra_argv;
166         poptContext pc;
167         struct tevent_context *ev;
168         const char *ctdb_base;
169         struct conf_context *conf;
170         const char *logging_location;
171         const char *test_mode;
172         bool ok;
173
174         /*
175          * Basic setup
176          */
177
178         talloc_enable_null_tracking();
179
180         fault_setup();
181
182         ev = tevent_context_init(NULL);
183         if (ev == NULL) {
184                 fprintf(stderr, "tevent_context_init() failed\n");
185                 exit(1);
186         }
187         tevent_loop_allow_nesting(ev);
188
189         ctdb = ctdb_init(ev);
190         if (ctdb == NULL) {
191                 fprintf(stderr, "Failed to init ctdb\n");
192                 exit(1);
193         }
194
195         /* Default value for CTDB_BASE - don't override */
196         setenv("CTDB_BASE", CTDB_ETCDIR, 0);
197         ctdb_base = getenv("CTDB_BASE");
198         if (ctdb_base == NULL) {
199                 D_ERR("CTDB_BASE not set\n");
200                 exit(1);
201         }
202
203         /*
204          * Command-line option handling
205          */
206
207         pc = poptGetContext(argv[0], argc, argv, popt_options, POPT_CONTEXT_KEEP_FIRST);
208
209         while ((opt = poptGetNextOpt(pc)) != -1) {
210                 switch (opt) {
211                 default:
212                         fprintf(stderr, "Invalid option %s: %s\n", 
213                                 poptBadOption(pc, 0), poptStrerror(opt));
214                         goto fail;
215                 }
216         }
217
218         /* If there are extra arguments then exit with usage message */
219         extra_argv = poptGetArgs(pc);
220         if (extra_argv) {
221                 extra_argv++;
222                 if (extra_argv[0])  {
223                         poptPrintHelp(pc, stdout, 0);
224                         goto fail;
225                 }
226         }
227
228         interactive = (interactive_opt != 0);
229
230         /*
231          * Configuration file handling
232          */
233
234         ret = ctdbd_config_load(ctdb, &conf);
235         if (ret != 0) {
236                 /* ctdbd_config_load() logs the failure */
237                 goto fail;
238         }
239
240         /*
241          * Logging setup/options
242          */
243
244         test_mode = getenv("CTDB_TEST_MODE");
245
246         /* Log to stderr (ignoring configuration) when running as interactive */
247         if (interactive) {
248                 logging_location = "file:";
249                 setenv("CTDB_INTERACTIVE", "true", 1);
250         } else {
251                 logging_location = logging_conf_location(conf);
252         }
253
254         if (strcmp(logging_location, "syslog") != 0 && test_mode == NULL) {
255                 /* This can help when CTDB logging is misconfigured */
256                 syslog(LOG_DAEMON|LOG_NOTICE,
257                        "CTDB logging to location %s",
258                        logging_location);
259         }
260
261         /* Initialize logging and set the debug level */
262         ok = ctdb_logging_init(ctdb,
263                                logging_location,
264                                logging_conf_log_level(conf));
265         if (!ok) {
266                 goto fail;
267         }
268         setenv("CTDB_LOGGING", logging_location, 1);
269         setenv("CTDB_DEBUGLEVEL", debug_level_to_string(DEBUGLEVEL), 1);
270
271         script_log_level = debug_level_from_string(
272                                         ctdb_config.script_log_level);
273
274         D_NOTICE("CTDB starting on node\n");
275
276         /*
277          * Cluster setup/options
278          */
279
280         ret = ctdb_set_transport(ctdb, ctdb_config.transport);
281         if (ret == -1) {
282                 D_ERR("ctdb_set_transport failed - %s\n", ctdb_errstr(ctdb));
283                 goto fail;
284         }
285
286         if (ctdb_config.recovery_lock == NULL) {
287                 D_WARNING("Recovery lock not set\n");
288         }
289         ctdb->recovery_lock = ctdb_config.recovery_lock;
290
291         /* tell ctdb what address to listen on */
292         if (ctdb_config.node_address) {
293                 ret = ctdb_set_address(ctdb, ctdb_config.node_address);
294                 if (ret == -1) {
295                         D_ERR("ctdb_set_address failed - %s\n",
296                               ctdb_errstr(ctdb));
297                         goto fail;
298                 }
299         }
300
301         /* tell ctdb what nodes are available */
302         ctdb->nodes_file = talloc_asprintf(ctdb, "%s/nodes", ctdb_base);
303         if (ctdb->nodes_file == NULL) {
304                 DBG_ERR(" Out of memory\n");
305                 goto fail;
306         }
307         ctdb_load_nodes_file(ctdb);
308
309         /*
310          * Database setup/options
311          */
312
313         ctdb->db_directory = ctdb_config.dbdir_volatile;
314         ctdb->db_directory_persistent = ctdb_config.dbdir_persistent;
315         ctdb->db_directory_state = ctdb_config.dbdir_state;
316
317         if (ctdb_config.lock_debug_script != NULL) {
318                 ret = setenv("CTDB_DEBUG_LOCKS",
319                              ctdb_config.lock_debug_script,
320                              1);
321                 if (ret != 0) {
322                         D_ERR("Failed to set up lock debugging (%s)\n",
323                               strerror(errno));
324                         goto fail;
325                 }
326         }
327
328         /*
329          * Legacy setup/options
330          */
331
332         ctdb->start_as_disabled = (int)ctdb_config.start_as_disabled;
333         ctdb->start_as_stopped  = (int)ctdb_config.start_as_stopped;
334
335         /* set ctdbd capabilities */
336         if (!ctdb_config.lmaster_capability) {
337                 ctdb->capabilities &= ~CTDB_CAP_LMASTER;
338         }
339         if (!ctdb_config.recmaster_capability) {
340                 ctdb->capabilities &= ~CTDB_CAP_RECMASTER;
341         }
342
343         ctdb->do_setsched = ctdb_config.realtime_scheduling;
344
345         /*
346          * Miscellaneous setup
347          */
348
349         ctdb_tunables_set_defaults(ctdb);
350
351         ctdb->event_script_dir = talloc_asprintf(ctdb,
352                                                  "%s/events/legacy",
353                                                  ctdb_base);
354         if (ctdb->event_script_dir == NULL) {
355                 DBG_ERR("Out of memory\n");
356                 goto fail;
357         }
358
359         ctdb->notification_script = talloc_asprintf(ctdb,
360                                                     "%s/notify.sh",
361                                                     ctdb_base);
362         if (ctdb->notification_script == NULL) {
363                 D_ERR("Unable to set notification script\n");
364                 goto fail;
365         }
366
367         /*
368          * Testing and debug options
369          */
370
371         if (test_mode != NULL) {
372                 ctdb->do_setsched = false;
373                 ctdb->do_checkpublicip = false;
374                 fast_start = true;
375         }
376
377         /* Don't fork when running in test mode */
378         interactive = interactive || test_mode != NULL;
379
380         /* start the protocol running (as a child) */
381         return ctdb_start_daemon(ctdb, !interactive);
382
383 fail:
384         talloc_free(ctdb);
385         exit(1);
386 }