LockWait congestion.
[sahlberg/ctdb.git] / 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 "includes.h"
21 #include "lib/tevent/tevent.h"
22 #include "system/filesys.h"
23 #include "popt.h"
24 #include "system/time.h"
25 #include "system/wait.h"
26 #include "system/network.h"
27 #include "cmdline.h"
28 #include "../include/ctdb_private.h"
29
30 static struct {
31         const char *nlist;
32         const char *transport;
33         const char *myaddress;
34         const char *public_address_list;
35         const char *event_script_dir;
36         const char *notification_script;
37         const char *logfile;
38         const char *recovery_lock_file;
39         const char *db_dir;
40         const char *db_dir_persistent;
41         const char *db_dir_state;
42         const char *public_interface;
43         const char *single_public_ip;
44         const char *node_ip;
45         int         valgrinding;
46         int         nosetsched;
47         int         use_syslog;
48         int         start_as_disabled;
49         int         start_as_stopped;
50         int         no_lmaster;
51         int         no_recmaster;
52         int         lvs;
53         int         script_log_level;
54         int         no_publicipcheck;
55         int         max_persistent_check_errors;
56 } options = {
57         .nlist = ETCDIR "/ctdb/nodes",
58         .transport = "tcp",
59         .event_script_dir = ETCDIR "/ctdb/events.d",
60         .logfile = LOGDIR "/log.ctdb",
61         .db_dir = VARDIR "/ctdb",
62         .db_dir_persistent = VARDIR "/ctdb/persistent",
63         .db_dir_state = VARDIR "/ctdb/state",
64         .script_log_level = DEBUG_ERR,
65 };
66
67 int script_log_level;
68 bool fast_start;
69
70 /*
71   called by the transport layer when a packet comes in
72 */
73 static void ctdb_recv_pkt(struct ctdb_context *ctdb, uint8_t *data, uint32_t length)
74 {
75         struct ctdb_req_header *hdr = (struct ctdb_req_header *)data;
76
77         CTDB_INCREMENT_STAT(ctdb, node_packets_recv);
78
79         /* up the counter for this source node, so we know its alive */
80         if (ctdb_validate_pnn(ctdb, hdr->srcnode)) {
81                 /* as a special case, redirected calls don't increment the rx_cnt */
82                 if (hdr->operation != CTDB_REQ_CALL ||
83                     ((struct ctdb_req_call *)hdr)->hopcount == 0) {
84                         ctdb->nodes[hdr->srcnode]->rx_cnt++;
85                 }
86         }
87
88         ctdb_input_pkt(ctdb, hdr);
89 }
90
91 void ctdb_load_nodes_file(struct ctdb_context *ctdb)
92 {
93         int ret;
94
95         ret = ctdb_set_nlist(ctdb, options.nlist);
96         if (ret == -1) {
97                 DEBUG(DEBUG_ALERT,("ctdb_set_nlist failed - %s\n", ctdb_errstr(ctdb)));
98                 exit(1);
99         }
100 }
101
102 static const struct ctdb_upcalls ctdb_upcalls = {
103         .recv_pkt       = ctdb_recv_pkt,
104         .node_dead      = ctdb_node_dead,
105         .node_connected = ctdb_node_connected
106 };
107
108
109
110 /*
111   main program
112 */
113 int main(int argc, const char *argv[])
114 {
115         struct ctdb_context *ctdb;
116         int interactive = 0;
117
118         struct poptOption popt_options[] = {
119                 POPT_AUTOHELP
120                 POPT_CTDB_CMDLINE
121                 { "interactive", 'i', POPT_ARG_NONE, &interactive, 0, "don't fork", NULL },
122                 { "public-addresses", 0, POPT_ARG_STRING, &options.public_address_list, 0, "public address list file", "filename" },
123                 { "public-interface", 0, POPT_ARG_STRING, &options.public_interface, 0, "public interface", "interface"},
124                 { "single-public-ip", 0, POPT_ARG_STRING, &options.single_public_ip, 0, "single public ip", "ip-address"},
125                 { "event-script-dir", 0, POPT_ARG_STRING, &options.event_script_dir, 0, "event script directory", "dirname" },
126                 { "logfile", 0, POPT_ARG_STRING, &options.logfile, 0, "log file location", "filename" },
127                 { "nlist", 0, POPT_ARG_STRING, &options.nlist, 0, "node list file", "filename" },
128                 { "node-ip", 0, POPT_ARG_STRING, &options.node_ip, 0, "node ip", "ip-address"},
129                 { "notification-script", 0, POPT_ARG_STRING, &options.notification_script, 0, "notification script", "filename" },
130                 { "listen", 0, POPT_ARG_STRING, &options.myaddress, 0, "address to listen on", "address" },
131                 { "transport", 0, POPT_ARG_STRING, &options.transport, 0, "protocol transport", NULL },
132                 { "dbdir", 0, POPT_ARG_STRING, &options.db_dir, 0, "directory for the tdb files", NULL },
133                 { "dbdir-persistent", 0, POPT_ARG_STRING, &options.db_dir_persistent, 0, "directory for persistent tdb files", NULL },
134                 { "dbdir-state", 0, POPT_ARG_STRING, &options.db_dir_state, 0, "directory for internal state tdb files", NULL },
135                 { "reclock", 0, POPT_ARG_STRING, &options.recovery_lock_file, 0, "location of recovery lock file", "filename" },
136                 { "valgrinding", 0, POPT_ARG_NONE, &options.valgrinding, 0, "disable setscheduler SCHED_FIFO call, use mmap for tdbs", NULL },
137                 { "nosetsched", 0, POPT_ARG_NONE, &options.nosetsched, 0, "disable setscheduler SCHED_FIFO call, use mmap for tdbs", NULL },
138                 { "syslog", 0, POPT_ARG_NONE, &options.use_syslog, 0, "log messages to syslog", NULL },
139                 { "start-as-disabled", 0, POPT_ARG_NONE, &options.start_as_disabled, 0, "Node starts in disabled state", NULL },
140                 { "start-as-stopped", 0, POPT_ARG_NONE, &options.start_as_stopped, 0, "Node starts in stopped state", NULL },
141                 { "no-lmaster", 0, POPT_ARG_NONE, &options.no_lmaster, 0, "disable lmaster role on this node", NULL },
142                 { "no-recmaster", 0, POPT_ARG_NONE, &options.no_recmaster, 0, "disable recmaster role on this node", NULL },
143                 { "lvs", 0, POPT_ARG_NONE, &options.lvs, 0, "lvs is enabled on this node", NULL },
144                 { "script-log-level", 0, POPT_ARG_INT, &options.script_log_level, DEBUG_ERR, "log level of event script output", NULL },
145                 { "nopublicipcheck", 0, POPT_ARG_NONE, &options.no_publicipcheck, 0, "don't check we have/don't have the correct public ip addresses", NULL },
146                 { "max-persistent-check-errors", 0, POPT_ARG_INT,
147                   &options.max_persistent_check_errors, 0,
148                   "max allowed persistent check errors (default 0)", NULL },
149                 { "log-ringbuf-size", 0, POPT_ARG_INT, &log_ringbuf_size, DEBUG_ERR, "Number of log messages we can store in the memory ringbuffer", NULL },
150                 { "sloppy-start", 0, POPT_ARG_NONE, &fast_start, 0, "Do not perform full recovery on start", NULL },
151                 POPT_TABLEEND
152         };
153         int opt, ret;
154         const char **extra_argv;
155         int extra_argc = 0;
156         poptContext pc;
157         struct event_context *ev;
158
159         pc = poptGetContext(argv[0], argc, argv, popt_options, POPT_CONTEXT_KEEP_FIRST);
160
161         while ((opt = poptGetNextOpt(pc)) != -1) {
162                 switch (opt) {
163                 default:
164                         fprintf(stderr, "Invalid option %s: %s\n", 
165                                 poptBadOption(pc, 0), poptStrerror(opt));
166                         exit(1);
167                 }
168         }
169
170         /* setup the remaining options for the main program to use */
171         extra_argv = poptGetArgs(pc);
172         if (extra_argv) {
173                 extra_argv++;
174                 while (extra_argv[extra_argc]) extra_argc++;
175         }
176
177         talloc_enable_null_tracking();
178
179         ctdb_block_signal(SIGPIPE);
180         fault_setup("ctdbd");
181
182         ev = event_context_init(NULL);
183         tevent_loop_allow_nesting(ev);
184
185         ctdb = ctdb_cmdline_init(ev);
186
187         ctdb->start_as_disabled = options.start_as_disabled;
188         ctdb->start_as_stopped  = options.start_as_stopped;
189
190         script_log_level = options.script_log_level;
191
192         ret = ctdb_set_logfile(ctdb, options.logfile, options.use_syslog);
193         if (ret == -1) {
194                 printf("ctdb_set_logfile to %s failed - %s\n", 
195                        options.use_syslog?"syslog":options.logfile, ctdb_errstr(ctdb));
196                 exit(1);
197         }
198
199         DEBUG(DEBUG_NOTICE,("Starting CTDB daemon\n"));
200
201         gettimeofday(&ctdb->ctdbd_start_time, NULL);
202         gettimeofday(&ctdb->last_recovery_started, NULL);
203         gettimeofday(&ctdb->last_recovery_finished, NULL);
204         ctdb->recovery_mode    = CTDB_RECOVERY_NORMAL;
205         ctdb->recovery_master  = (uint32_t)-1;
206         ctdb->upcalls          = &ctdb_upcalls;
207         ctdb->idr              = idr_init(ctdb);
208         ctdb->recovery_lock_fd = -1;
209
210         ctdb_tunables_set_defaults(ctdb);
211
212         ctdb->tunable.disable_ip_failover = options.no_publicipcheck;
213
214         ret = ctdb_set_recovery_lock_file(ctdb, options.recovery_lock_file);
215         if (ret == -1) {
216                 DEBUG(DEBUG_ALERT,("ctdb_set_recovery_lock_file failed - %s\n", ctdb_errstr(ctdb)));
217                 exit(1);
218         }
219
220         ret = ctdb_set_transport(ctdb, options.transport);
221         if (ret == -1) {
222                 DEBUG(DEBUG_ALERT,("ctdb_set_transport failed - %s\n", ctdb_errstr(ctdb)));
223                 exit(1);
224         }
225
226         /* tell ctdb what address to listen on */
227         if (options.myaddress) {
228                 ret = ctdb_set_address(ctdb, options.myaddress);
229                 if (ret == -1) {
230                         DEBUG(DEBUG_ALERT,("ctdb_set_address failed - %s\n", ctdb_errstr(ctdb)));
231                         exit(1);
232                 }
233         }
234
235         /* set ctdbd capabilities */
236         ctdb->capabilities = 0;
237         if (options.no_lmaster == 0) {
238                 ctdb->capabilities |= CTDB_CAP_LMASTER;
239         }
240         if (options.no_recmaster == 0) {
241                 ctdb->capabilities |= CTDB_CAP_RECMASTER;
242         }
243         if (options.lvs != 0) {
244                 ctdb->capabilities |= CTDB_CAP_LVS;
245         }
246
247         /* tell ctdb what nodes are available */
248         ctdb_load_nodes_file(ctdb);
249
250         /* if a node-ip was specified, verify that it exists in the
251            nodes file
252         */
253         if (options.node_ip != NULL) {
254                 DEBUG(DEBUG_NOTICE,("IP for this node is %s\n", options.node_ip));
255                 ret = ctdb_ip_to_nodeid(ctdb, options.node_ip);
256                 if (ret == -1) {
257                         DEBUG(DEBUG_ALERT,("The specified node-ip:%s is not a valid node address. Exiting.\n", options.node_ip));
258                         exit(1);
259                 }
260                 ctdb->node_ip = options.node_ip;
261                 DEBUG(DEBUG_NOTICE,("This is node %d\n", ret));
262         }
263
264         if (options.db_dir) {
265                 ret = ctdb_set_tdb_dir(ctdb, options.db_dir);
266                 if (ret == -1) {
267                         DEBUG(DEBUG_ALERT,("ctdb_set_tdb_dir failed - %s\n", ctdb_errstr(ctdb)));
268                         exit(1);
269                 }
270         }
271         if (options.db_dir_persistent) {
272                 ret = ctdb_set_tdb_dir_persistent(ctdb, options.db_dir_persistent);
273                 if (ret == -1) {
274                         DEBUG(DEBUG_ALERT,("ctdb_set_tdb_dir_persistent failed - %s\n", ctdb_errstr(ctdb)));
275                         exit(1);
276                 }
277         }
278         if (options.db_dir_state) {
279                 ret = ctdb_set_tdb_dir_state(ctdb, options.db_dir_state);
280                 if (ret == -1) {
281                         DEBUG(DEBUG_ALERT,("ctdb_set_tdb_dir_state failed - %s\n", ctdb_errstr(ctdb)));
282                         exit(1);
283                 }
284         }
285
286         if (options.public_interface) {
287                 ctdb->default_public_interface = talloc_strdup(ctdb, options.public_interface);
288                 CTDB_NO_MEMORY(ctdb, ctdb->default_public_interface);
289         }
290
291         if (options.single_public_ip) {
292                 if (options.public_interface == NULL) {
293                         DEBUG(DEBUG_ALERT,("--single_public_ip used but --public_interface is not specified. You must specify the public interface when using single public ip. Exiting\n"));
294                         exit(10);
295                 }
296
297                 ret = ctdb_set_single_public_ip(ctdb, options.public_interface,
298                                                 options.single_public_ip);
299                 if (ret != 0) {
300                         DEBUG(DEBUG_ALERT,("Invalid --single-public-ip argument : %s . This is not a valid ip address. Exiting.\n", options.single_public_ip));
301                         exit(10);
302                 }
303         }
304
305         ret = ctdb_set_event_script_dir(ctdb, options.event_script_dir);
306         if (ret == -1) {
307                 DEBUG(DEBUG_ALERT,("Unable to setup event script directory\n"));
308                 exit(1);
309         }
310
311         if (options.notification_script != NULL) {
312                 ret = ctdb_set_notification_script(ctdb, options.notification_script);
313                 if (ret == -1) {
314                         DEBUG(DEBUG_ALERT,("Unable to setup notification script\n"));
315                         exit(1);
316                 }
317         }
318
319         ctdb->valgrinding = options.valgrinding;
320         if (options.valgrinding || options.nosetsched) {
321                 ctdb->do_setsched = 0;
322         } else {
323                 ctdb->do_setsched = 1;
324         }
325
326         if (options.max_persistent_check_errors < 0) {
327                 ctdb->max_persistent_check_errors = 0xFFFFFFFFFFFFFFFFLL;
328         } else {
329                 ctdb->max_persistent_check_errors = (uint64_t)options.max_persistent_check_errors;
330         }
331
332         if (getenv("CTDB_BASE") == NULL) {
333                 /* setup a environment variable for the event scripts to use
334                    to find the installation directory */
335                 setenv("CTDB_BASE", ETCDIR "/ctdb", 1);
336         }
337
338         /* start the protocol running (as a child) */
339         return ctdb_start_daemon(ctdb, interactive?False:True, options.use_syslog, options.public_address_list);
340 }