wafsamba: fix pidl dependencies to rebuild on pidl changes
[Samba.git] / ctdb / server / ctdbd.c
blob7e71d6e82725c9c8b3006e6a31966a6becb870e6
1 /*
2 standalone ctdb daemon
4 Copyright (C) Andrew Tridgell 2006
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.
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.
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/>.
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"
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>
33 #include "lib/util/debug.h"
34 #include "lib/util/samba_util.h"
36 #include "ctdb_private.h"
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"
45 #include "ctdb_config.h"
47 int script_log_level;
48 bool fast_start;
51 called by the transport layer when a packet comes in
53 static void ctdb_recv_pkt(struct ctdb_context *ctdb, uint8_t *data, uint32_t length)
55 struct ctdb_req_header *hdr = (struct ctdb_req_header *)data;
57 CTDB_INCREMENT_STAT(ctdb, node_packets_recv);
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++;
68 ctdb_input_pkt(ctdb, hdr);
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
77 static struct ctdb_context *ctdb_init(struct tevent_context *ev)
79 int ret;
80 struct ctdb_context *ctdb;
82 ctdb = talloc_zero(ev, struct ctdb_context);
83 if (ctdb == NULL) {
84 DBG_ERR("Memory error\n");
85 return NULL;
87 ctdb->ev = ev;
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;
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;
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;
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;
118 gettimeofday(&ctdb->ctdbd_start_time, NULL);
120 gettimeofday(&ctdb->last_recovery_started, NULL);
121 gettimeofday(&ctdb->last_recovery_finished, NULL);
123 ctdb->recovery_mode = CTDB_RECOVERY_NORMAL;
124 ctdb->recovery_master = (uint32_t)-1;
126 ctdb->upcalls = &ctdb_upcalls;
128 ctdb->statistics.statistics_start_time = timeval_current();
130 ctdb->capabilities = CTDB_CAP_DEFAULT;
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.
141 ctdb->pnn = CTDB_UNKNOWN_PNN;
143 ctdb->do_checkpublicip = true;
145 return ctdb;
150 main program
152 int main(int argc, const char *argv[])
154 struct ctdb_context *ctdb = NULL;
155 int interactive_opt = 0;
156 bool interactive = false;
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
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;
175 * Basic setup
178 talloc_enable_null_tracking();
180 fault_setup();
182 ev = tevent_context_init(NULL);
183 if (ev == NULL) {
184 fprintf(stderr, "tevent_context_init() failed\n");
185 exit(1);
187 tevent_loop_allow_nesting(ev);
189 ctdb = ctdb_init(ev);
190 if (ctdb == NULL) {
191 fprintf(stderr, "Failed to init ctdb\n");
192 exit(1);
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);
204 * Command-line option handling
207 pc = poptGetContext(argv[0], argc, argv, popt_options, POPT_CONTEXT_KEEP_FIRST);
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;
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;
228 interactive = (interactive_opt != 0);
231 * Configuration file handling
234 ret = ctdbd_config_load(ctdb, &conf);
235 if (ret != 0) {
236 /* ctdbd_config_load() logs the failure */
237 goto fail;
241 * Logging setup/options
244 test_mode = getenv("CTDB_TEST_MODE");
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);
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);
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;
268 setenv("CTDB_LOGGING", logging_location, 1);
269 setenv("CTDB_DEBUGLEVEL", debug_level_to_string(DEBUGLEVEL), 1);
271 script_log_level = debug_level_from_string(
272 ctdb_config.script_log_level);
274 D_NOTICE("CTDB starting on node\n");
277 * Cluster setup/options
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;
286 if (ctdb_config.recovery_lock == NULL) {
287 D_WARNING("Recovery lock not set\n");
289 ctdb->recovery_lock = ctdb_config.recovery_lock;
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;
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;
307 ctdb_load_nodes_file(ctdb);
310 * Database setup/options
313 ctdb->db_directory = ctdb_config.dbdir_volatile;
314 ok = directory_exist(ctdb->db_directory);
315 if (! ok) {
316 D_ERR("Volatile database directory %s does not exist\n",
317 ctdb->db_directory);
318 goto fail;
321 ctdb->db_directory_persistent = ctdb_config.dbdir_persistent;
322 ok = directory_exist(ctdb->db_directory_persistent);
323 if (! ok) {
324 D_ERR("Persistent database directory %s does not exist\n",
325 ctdb->db_directory_persistent);
326 goto fail;
329 ctdb->db_directory_state = ctdb_config.dbdir_state;
330 ok = directory_exist(ctdb->db_directory_state);
331 if (! ok) {
332 D_ERR("State database directory %s does not exist\n",
333 ctdb->db_directory_state);
334 goto fail;
337 if (ctdb_config.lock_debug_script != NULL) {
338 ret = setenv("CTDB_DEBUG_LOCKS",
339 ctdb_config.lock_debug_script,
341 if (ret != 0) {
342 D_ERR("Failed to set up lock debugging (%s)\n",
343 strerror(errno));
344 goto fail;
349 * Legacy setup/options
352 ctdb->start_as_disabled = (int)ctdb_config.start_as_disabled;
353 ctdb->start_as_stopped = (int)ctdb_config.start_as_stopped;
355 /* set ctdbd capabilities */
356 if (!ctdb_config.lmaster_capability) {
357 ctdb->capabilities &= ~CTDB_CAP_LMASTER;
359 if (!ctdb_config.recmaster_capability) {
360 ctdb->capabilities &= ~CTDB_CAP_RECMASTER;
363 ctdb->do_setsched = ctdb_config.realtime_scheduling;
366 * Miscellaneous setup
369 ctdb_tunables_set_defaults(ctdb);
371 ctdb->event_script_dir = talloc_asprintf(ctdb,
372 "%s/events/legacy",
373 ctdb_base);
374 if (ctdb->event_script_dir == NULL) {
375 DBG_ERR("Out of memory\n");
376 goto fail;
379 ctdb->notification_script = talloc_asprintf(ctdb,
380 "%s/notify.sh",
381 ctdb_base);
382 if (ctdb->notification_script == NULL) {
383 D_ERR("Unable to set notification script\n");
384 goto fail;
388 * Testing and debug options
391 if (test_mode != NULL) {
392 ctdb->do_setsched = false;
393 ctdb->do_checkpublicip = false;
394 fast_start = true;
397 /* Don't fork when running in test mode */
398 interactive = interactive || test_mode != NULL;
400 /* start the protocol running (as a child) */
401 return ctdb_start_daemon(ctdb, !interactive);
403 fail:
404 talloc_free(ctdb);
405 exit(1);