ctdb-daemon: Use a local variable instead of repeating getenv()
[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
26 #include <popt.h>
27 #include <talloc.h>
28 /* Allow use of deprecated function tevent_loop_allow_nesting() */
29 #define TEVENT_DEPRECATED
30 #include <tevent.h>
31
32 #include "lib/util/debug.h"
33 #include "lib/util/samba_util.h"
34
35 #include "ctdb_private.h"
36
37 #include "common/reqid.h"
38 #include "common/system.h"
39 #include "common/common.h"
40 #include "common/logging.h"
41
42 static struct {
43         const char *debuglevel;
44         const char *transport;
45         const char *myaddress;
46         const char *notification_script;
47         const char *logging;
48         const char *recovery_lock;
49         const char *db_dir;
50         const char *db_dir_persistent;
51         const char *db_dir_state;
52         int         valgrinding;
53         int         nosetsched;
54         int         start_as_disabled;
55         int         start_as_stopped;
56         int         no_lmaster;
57         int         no_recmaster;
58         int         script_log_level;
59         int         no_publicipcheck;
60         int         max_persistent_check_errors;
61         int         torture;
62 } options = {
63         .debuglevel = "NOTICE",
64         .transport = "tcp",
65         .logging = "file:" LOGDIR "/log.ctdb",
66         .db_dir = CTDB_VARDIR,
67         .db_dir_persistent = CTDB_VARDIR "/persistent",
68         .db_dir_state = CTDB_VARDIR "/state",
69         .script_log_level = DEBUG_ERR,
70 };
71
72 int script_log_level;
73 bool fast_start;
74
75 /*
76   called by the transport layer when a packet comes in
77 */
78 static void ctdb_recv_pkt(struct ctdb_context *ctdb, uint8_t *data, uint32_t length)
79 {
80         struct ctdb_req_header *hdr = (struct ctdb_req_header *)data;
81
82         CTDB_INCREMENT_STAT(ctdb, node_packets_recv);
83
84         /* up the counter for this source node, so we know its alive */
85         if (ctdb_validate_pnn(ctdb, hdr->srcnode)) {
86                 /* as a special case, redirected calls don't increment the rx_cnt */
87                 if (hdr->operation != CTDB_REQ_CALL ||
88                     ((struct ctdb_req_call_old *)hdr)->hopcount == 0) {
89                         ctdb->nodes[hdr->srcnode]->rx_cnt++;
90                 }
91         }
92
93         ctdb_input_pkt(ctdb, hdr);
94 }
95
96 static const struct ctdb_upcalls ctdb_upcalls = {
97         .recv_pkt       = ctdb_recv_pkt,
98         .node_dead      = ctdb_node_dead,
99         .node_connected = ctdb_node_connected
100 };
101
102
103
104 /*
105   main program
106 */
107 int main(int argc, const char *argv[])
108 {
109         struct ctdb_context *ctdb;
110         int interactive = 0;
111         const char *ctdb_socket;
112
113         struct poptOption popt_options[] = {
114                 POPT_AUTOHELP
115                 { "debug", 'd', POPT_ARG_STRING, &options.debuglevel, 0, "debug level", NULL },
116                 { "interactive", 'i', POPT_ARG_NONE, &interactive, 0, "don't fork", NULL },
117                 { "logging", 0, POPT_ARG_STRING, &options.logging, 0, "logging method to be used", NULL },
118                 { "notification-script", 0, POPT_ARG_STRING, &options.notification_script, 0, "notification script", "filename" },
119                 { "listen", 0, POPT_ARG_STRING, &options.myaddress, 0, "address to listen on", "address" },
120                 { "transport", 0, POPT_ARG_STRING, &options.transport, 0, "protocol transport", NULL },
121                 { "dbdir", 0, POPT_ARG_STRING, &options.db_dir, 0, "directory for the tdb files", NULL },
122                 { "dbdir-persistent", 0, POPT_ARG_STRING, &options.db_dir_persistent, 0, "directory for persistent tdb files", NULL },
123                 { "dbdir-state", 0, POPT_ARG_STRING, &options.db_dir_state, 0, "directory for internal state tdb files", NULL },
124                 { "reclock", 0, POPT_ARG_STRING, &options.recovery_lock, 0, "recovery lock", "lock" },
125                 { "valgrinding", 0, POPT_ARG_NONE, &options.valgrinding, 0, "disable setscheduler SCHED_FIFO call, use mmap for tdbs", NULL },
126                 { "nosetsched", 0, POPT_ARG_NONE, &options.nosetsched, 0, "disable setscheduler SCHED_FIFO call, use mmap for tdbs", NULL },
127                 { "start-as-disabled", 0, POPT_ARG_NONE, &options.start_as_disabled, 0, "Node starts in disabled state", NULL },
128                 { "start-as-stopped", 0, POPT_ARG_NONE, &options.start_as_stopped, 0, "Node starts in stopped state", NULL },
129                 { "no-lmaster", 0, POPT_ARG_NONE, &options.no_lmaster, 0, "disable lmaster role on this node", NULL },
130                 { "no-recmaster", 0, POPT_ARG_NONE, &options.no_recmaster, 0, "disable recmaster role on this node", NULL },
131                 { "script-log-level", 0, POPT_ARG_INT, &options.script_log_level, 0, "log level of event script output", NULL },
132                 { "nopublicipcheck", 0, POPT_ARG_NONE, &options.no_publicipcheck, 0, "don't check we have/don't have the correct public ip addresses", NULL },
133                 { "max-persistent-check-errors", 0, POPT_ARG_INT,
134                   &options.max_persistent_check_errors, 0,
135                   "max allowed persistent check errors (default 0)", NULL },
136                 { "sloppy-start", 0, POPT_ARG_NONE, &fast_start, 0, "Do not perform full recovery on start", NULL },
137                 { "torture", 0, POPT_ARG_NONE, &options.torture, 0, "enable nastiness in library", NULL },
138                 POPT_TABLEEND
139         };
140         int opt, ret;
141         const char **extra_argv;
142         poptContext pc;
143         struct tevent_context *ev;
144         const char *ctdb_base;
145
146         /* Environment variable overrides default */
147         ctdbd_pidfile = getenv("CTDB_PIDFILE");
148         if (ctdbd_pidfile == NULL) {
149                 ctdbd_pidfile = CTDB_RUNDIR "/ctdbd.pid";
150         }
151
152         /* Environment variable overrides default */
153         ctdb_socket = getenv("CTDB_SOCKET");
154         if (ctdb_socket == NULL) {
155                 ctdb_socket = CTDB_SOCKET;
156         }
157
158         pc = poptGetContext(argv[0], argc, argv, popt_options, POPT_CONTEXT_KEEP_FIRST);
159
160         while ((opt = poptGetNextOpt(pc)) != -1) {
161                 switch (opt) {
162                 default:
163                         fprintf(stderr, "Invalid option %s: %s\n", 
164                                 poptBadOption(pc, 0), poptStrerror(opt));
165                         exit(1);
166                 }
167         }
168
169         /* If there are extra arguments then exit with usage message */
170         extra_argv = poptGetArgs(pc);
171         if (extra_argv) {
172                 extra_argv++;
173                 if (extra_argv[0])  {
174                         poptPrintHelp(pc, stdout, 0);
175                         exit(1);
176                 }
177         }
178
179         talloc_enable_null_tracking();
180
181         fault_setup();
182
183         ev = tevent_context_init(NULL);
184         if (ev == NULL) {
185                 fprintf(stderr, "tevent_context_init() failed\n");
186                 exit(1);
187         }
188         tevent_loop_allow_nesting(ev);
189
190         ctdb = ctdb_init(ev);
191         if (ctdb == NULL) {
192                 fprintf(stderr, "Failed to init ctdb\n");
193                 exit(1);
194         }
195
196         if (options.torture == 1) {
197                 ctdb_set_flags(ctdb, CTDB_FLAG_TORTURE);
198         }
199
200         /* Log to stderr when running as interactive */
201         if (interactive) {
202                 options.logging = "file:";
203         }
204
205         /* Initialize logging and set the debug level */
206         if (!ctdb_logging_init(ctdb, options.logging, options.debuglevel)) {
207                 exit(1);
208         }
209         setenv("CTDB_LOGGING", options.logging, 1);
210         setenv("CTDB_DEBUGLEVEL", debug_level_to_string(DEBUGLEVEL), 1);
211
212         ret = ctdb_set_socketname(ctdb, ctdb_socket);
213         if (ret == -1) {
214                 DEBUG(DEBUG_ERR, ("ctdb_set_socketname() failed\n"));
215                 exit(1);
216         }
217
218         ctdb->start_as_disabled = options.start_as_disabled;
219         ctdb->start_as_stopped  = options.start_as_stopped;
220
221         script_log_level = options.script_log_level;
222
223         DEBUG(DEBUG_NOTICE,("CTDB starting on node\n"));
224
225         gettimeofday(&ctdb->ctdbd_start_time, NULL);
226         gettimeofday(&ctdb->last_recovery_started, NULL);
227         gettimeofday(&ctdb->last_recovery_finished, NULL);
228         ctdb->recovery_mode    = CTDB_RECOVERY_NORMAL;
229         ctdb->recovery_master  = (uint32_t)-1;
230         ctdb->upcalls          = &ctdb_upcalls;
231
232         if (options.recovery_lock == NULL) {
233                 DEBUG(DEBUG_WARNING, ("Recovery lock not set\n"));
234         }
235         ctdb->recovery_lock = options.recovery_lock;
236
237         TALLOC_FREE(ctdb->idr);
238         ret = reqid_init(ctdb, 0, &ctdb->idr);;
239         if (ret != 0) {
240                 DEBUG(DEBUG_ERR, ("reqid_init failed (%s)\n", strerror(ret)));
241                 exit(1);
242         }
243
244         ctdb_tunables_set_defaults(ctdb);
245
246         ret = ctdb_set_transport(ctdb, options.transport);
247         if (ret == -1) {
248                 DEBUG(DEBUG_ERR,("ctdb_set_transport failed - %s\n",
249                                  ctdb_errstr(ctdb)));
250                 exit(1);
251         }
252
253         /* tell ctdb what address to listen on */
254         if (options.myaddress) {
255                 ret = ctdb_set_address(ctdb, options.myaddress);
256                 if (ret == -1) {
257                         DEBUG(DEBUG_ERR,("ctdb_set_address failed - %s\n",
258                                          ctdb_errstr(ctdb)));
259                         exit(1);
260                 }
261         }
262
263         /* set ctdbd capabilities */
264         ctdb->capabilities = CTDB_CAP_DEFAULT;
265         if (options.no_lmaster != 0) {
266                 ctdb->capabilities &= ~CTDB_CAP_LMASTER;
267         }
268         if (options.no_recmaster != 0) {
269                 ctdb->capabilities &= ~CTDB_CAP_RECMASTER;
270         }
271
272         /* Initialise this node's PNN to the unknown value.  This will
273          * be set to the correct value by either ctdb_add_node() as
274          * part of loading the nodes file or by
275          * ctdb_tcp_listen_automatic() when the transport is
276          * initialised.  At some point we should de-optimise this and
277          * pull it out into ctdb_start_daemon() so it is done clearly
278          * and only in one place.
279          */
280         ctdb->pnn = -1;
281
282         /* Default value for CTDB_BASE - don't override */
283         setenv("CTDB_BASE", CTDB_ETCDIR, 0);
284         ctdb_base = getenv("CTDB_BASE");
285         if (ctdb_base == NULL) {
286                 D_ERR("CTDB_BASE not set\n");
287                 exit(1);
288         }
289
290         /* tell ctdb what nodes are available */
291         ctdb->nodes_file = talloc_asprintf(ctdb, "%s/nodes", ctdb_base);
292         if (ctdb->nodes_file == NULL) {
293                 DEBUG(DEBUG_ERR,(__location__ " Out of memory\n"));
294                 exit(1);
295         }
296         ctdb_load_nodes_file(ctdb);
297
298         ctdb->db_directory = options.db_dir;
299         mkdir_p_or_die(ctdb->db_directory, 0700);
300
301         ctdb->db_directory_persistent = options.db_dir_persistent;
302         mkdir_p_or_die(ctdb->db_directory_persistent, 0700);
303
304         ctdb->db_directory_state = options.db_dir_state;
305         mkdir_p_or_die(ctdb->db_directory_state, 0700);
306
307         ctdb->event_script_dir = talloc_asprintf(ctdb,
308                                                  "%s/events.d",
309                                                  ctdb_base);
310         if (ctdb->event_script_dir == NULL) {
311                 DBG_ERR("Out of memory\n");
312                 exit(1);
313         }
314
315         if (options.notification_script != NULL) {
316                 ctdb->notification_script = talloc_strdup(
317                                 ctdb, options.notification_script);
318                 if (ctdb->notification_script == NULL) {
319                         D_ERR("Unable to set notification script\n");
320                         exit(1);
321                 }
322         }
323
324         ctdb->valgrinding = (options.valgrinding == 1);
325         ctdb->do_setsched = (options.nosetsched != 1);
326         if (ctdb->valgrinding) {
327                 ctdb->do_setsched = false;
328         }
329
330         ctdb->do_checkpublicip = (options.no_publicipcheck == 0);
331
332         if (options.max_persistent_check_errors < 0) {
333                 ctdb->max_persistent_check_errors = 0xFFFFFFFFFFFFFFFFLL;
334         } else {
335                 ctdb->max_persistent_check_errors = (uint64_t)options.max_persistent_check_errors;
336         }
337
338         /* start the protocol running (as a child) */
339         return ctdb_start_daemon(ctdb, interactive?false:true);
340 }