source: vendor/current/ctdb/server/ctdbd.c

/* 
   standalone ctdb daemon

   Copyright (C) Andrew Tridgell  2006

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 3 of the License, or
   (at your option) any later version.
   
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
   
   You should have received a copy of the GNU General Public License
   along with this program; if not, see <http://www.gnu.org/licenses/>.
*/

#include "replace.h"
#include "system/filesys.h"
#include "system/time.h"
#include "system/wait.h"
#include "system/network.h"

#include <popt.h>
#include <talloc.h>
/* Allow use of deprecated function tevent_loop_allow_nesting() */
#define TEVENT_DEPRECATED
#include <tevent.h>

#include "lib/util/debug.h"
#include "lib/util/samba_util.h"

#include "ctdb_private.h"

#include "common/reqid.h"
#include "common/system.h"
#include "common/cmdline.h"
#include "common/common.h"
#include "common/logging.h"

static struct {
        const char *nlist;
        const char *transport;
        const char *myaddress;
        const char *public_address_list;
        const char *event_script_dir;
        const char *notification_script;
        const char *logging;
        const char *recovery_lock_file;
        const char *db_dir;
        const char *db_dir_persistent;
        const char *db_dir_state;
        const char *public_interface;
        const char *single_public_ip;
        int         valgrinding;
        int         nosetsched;
        int         start_as_disabled;
        int         start_as_stopped;
        int         no_lmaster;
        int         no_recmaster;
        int         lvs;
        int         script_log_level;
        int         no_publicipcheck;
        int         max_persistent_check_errors;
} options = {
        .nlist = NULL,
        .public_address_list = NULL,
        .transport = "tcp",
        .event_script_dir = NULL,
        .logging = "file:" LOGDIR "/log.ctdb",
        .db_dir = CTDB_VARDIR,
        .db_dir_persistent = CTDB_VARDIR "/persistent",
        .db_dir_state = CTDB_VARDIR "/state",
        .script_log_level = DEBUG_ERR,
};

int script_log_level;
bool fast_start;

/*
  called by the transport layer when a packet comes in
*/
static void ctdb_recv_pkt(struct ctdb_context *ctdb, uint8_t *data, uint32_t length)
{
        struct ctdb_req_header *hdr = (struct ctdb_req_header *)data;

        CTDB_INCREMENT_STAT(ctdb, node_packets_recv);

        /* up the counter for this source node, so we know its alive */
        if (ctdb_validate_pnn(ctdb, hdr->srcnode)) {
                /* as a special case, redirected calls don't increment the rx_cnt */
                if (hdr->operation != CTDB_REQ_CALL ||
                    ((struct ctdb_req_call_old *)hdr)->hopcount == 0) {
                        ctdb->nodes[hdr->srcnode]->rx_cnt++;
                }
        }

        ctdb_input_pkt(ctdb, hdr);
}

static const struct ctdb_upcalls ctdb_upcalls = {
        .recv_pkt       = ctdb_recv_pkt,
        .node_dead      = ctdb_node_dead,
        .node_connected = ctdb_node_connected
};



/*
  main program
*/
int main(int argc, const char *argv[])
{
        struct ctdb_context *ctdb;
        int interactive = 0;

        struct poptOption popt_options[] = {
                POPT_AUTOHELP
                POPT_CTDB_CMDLINE
                { "interactive", 'i', POPT_ARG_NONE, &interactive, 0, "don't fork", NULL },
                { "public-addresses", 0, POPT_ARG_STRING, &options.public_address_list, 0, "public address list file", "filename" },
                { "public-interface", 0, POPT_ARG_STRING, &options.public_interface, 0, "public interface", "interface"},
                { "single-public-ip", 0, POPT_ARG_STRING, &options.single_public_ip, 0, "single public ip", "ip-address"},
                { "event-script-dir", 0, POPT_ARG_STRING, &options.event_script_dir, 0, "event script directory", "dirname" },
                { "logging", 0, POPT_ARG_STRING, &options.logging, 0, "logging method to be used", NULL },
                { "nlist", 0, POPT_ARG_STRING, &options.nlist, 0, "node list file", "filename" },
                { "notification-script", 0, POPT_ARG_STRING, &options.notification_script, 0, "notification script", "filename" },
                { "listen", 0, POPT_ARG_STRING, &options.myaddress, 0, "address to listen on", "address" },
                { "transport", 0, POPT_ARG_STRING, &options.transport, 0, "protocol transport", NULL },
                { "dbdir", 0, POPT_ARG_STRING, &options.db_dir, 0, "directory for the tdb files", NULL },
                { "dbdir-persistent", 0, POPT_ARG_STRING, &options.db_dir_persistent, 0, "directory for persistent tdb files", NULL },
                { "dbdir-state", 0, POPT_ARG_STRING, &options.db_dir_state, 0, "directory for internal state tdb files", NULL },
                { "reclock", 0, POPT_ARG_STRING, &options.recovery_lock_file, 0, "location of recovery lock file", "filename" },
                { "pidfile", 0, POPT_ARG_STRING, &ctdbd_pidfile, 0, "location of PID file", "filename" },
                { "valgrinding", 0, POPT_ARG_NONE, &options.valgrinding, 0, "disable setscheduler SCHED_FIFO call, use mmap for tdbs", NULL },
                { "nosetsched", 0, POPT_ARG_NONE, &options.nosetsched, 0, "disable setscheduler SCHED_FIFO call, use mmap for tdbs", NULL },
                { "start-as-disabled", 0, POPT_ARG_NONE, &options.start_as_disabled, 0, "Node starts in disabled state", NULL },
                { "start-as-stopped", 0, POPT_ARG_NONE, &options.start_as_stopped, 0, "Node starts in stopped state", NULL },
                { "no-lmaster", 0, POPT_ARG_NONE, &options.no_lmaster, 0, "disable lmaster role on this node", NULL },
                { "no-recmaster", 0, POPT_ARG_NONE, &options.no_recmaster, 0, "disable recmaster role on this node", NULL },
                { "lvs", 0, POPT_ARG_NONE, &options.lvs, 0, "lvs is enabled on this node", NULL },
                { "script-log-level", 0, POPT_ARG_INT, &options.script_log_level, 0, "log level of event script output", NULL },
                { "nopublicipcheck", 0, POPT_ARG_NONE, &options.no_publicipcheck, 0, "don't check we have/don't have the correct public ip addresses", NULL },
                { "max-persistent-check-errors", 0, POPT_ARG_INT,
                  &options.max_persistent_check_errors, 0,
                  "max allowed persistent check errors (default 0)", NULL },
                { "sloppy-start", 0, POPT_ARG_NONE, &fast_start, 0, "Do not perform full recovery on start", NULL },
                POPT_TABLEEND
        };
        int opt, ret;
        const char **extra_argv;
        int extra_argc = 0;
        poptContext pc;
        struct tevent_context *ev;

        pc = poptGetContext(argv[0], argc, argv, popt_options, POPT_CONTEXT_KEEP_FIRST);

        while ((opt = poptGetNextOpt(pc)) != -1) {
                switch (opt) {
                default:
                        fprintf(stderr, "Invalid option %s: %s\n", 
                                poptBadOption(pc, 0), poptStrerror(opt));
                        exit(1);
                }
        }

        /* setup the remaining options for the main program to use */
        extra_argv = poptGetArgs(pc);
        if (extra_argv) {
                extra_argv++;
                while (extra_argv[extra_argc]) extra_argc++;
        }

        talloc_enable_null_tracking();

        fault_setup();

        ev = tevent_context_init(NULL);
        if (ev == NULL) {
                DEBUG(DEBUG_ALERT,("tevent_context_init() failed\n"));
                exit(1);
        }
        tevent_loop_allow_nesting(ev);

        ctdb = ctdb_cmdline_init(ev);

        ctdb->start_as_disabled = options.start_as_disabled;
        ctdb->start_as_stopped  = options.start_as_stopped;

        script_log_level = options.script_log_level;

        if (!ctdb_logging_init(ctdb, options.logging)) {
                exit(1);
        }

        DEBUG(DEBUG_NOTICE,("CTDB starting on node\n"));

        gettimeofday(&ctdb->ctdbd_start_time, NULL);
        gettimeofday(&ctdb->last_recovery_started, NULL);
        gettimeofday(&ctdb->last_recovery_finished, NULL);
        ctdb->recovery_mode    = CTDB_RECOVERY_NORMAL;
        ctdb->recovery_master  = (uint32_t)-1;
        ctdb->upcalls          = &ctdb_upcalls;
        ctdb->recovery_lock_fd = -1;

        ret = reqid_init(ctdb, 0, &ctdb->idr);;
        if (ret != 0) {
                DEBUG(DEBUG_ALERT, ("reqid_init failed (%s)\n", strerror(ret)));
                exit(1);
        }

        ctdb_tunables_set_defaults(ctdb);

        ret = ctdb_set_recovery_lock_file(ctdb, options.recovery_lock_file);
        if (ret == -1) {
                DEBUG(DEBUG_ALERT,("ctdb_set_recovery_lock_file failed - %s\n", ctdb_errstr(ctdb)));
                exit(1);
        }

        ret = ctdb_set_transport(ctdb, options.transport);
        if (ret == -1) {
                DEBUG(DEBUG_ALERT,("ctdb_set_transport failed - %s\n", ctdb_errstr(ctdb)));
                exit(1);
        }

        /* tell ctdb what address to listen on */
        if (options.myaddress) {
                ret = ctdb_set_address(ctdb, options.myaddress);
                if (ret == -1) {
                        DEBUG(DEBUG_ALERT,("ctdb_set_address failed - %s\n", ctdb_errstr(ctdb)));
                        exit(1);
                }
        }

        /* set ctdbd capabilities */
        ctdb->capabilities = CTDB_CAP_DEFAULT;
        if (options.no_lmaster != 0) {
                ctdb->capabilities &= ~CTDB_CAP_LMASTER;
        }
        if (options.no_recmaster != 0) {
                ctdb->capabilities &= ~CTDB_CAP_RECMASTER;
        }
        if (options.lvs != 0) {
                ctdb->capabilities |= CTDB_CAP_LVS;
        }

        /* Initialise this node's PNN to the unknown value.  This will
         * be set to the correct value by either ctdb_add_node() as
         * part of loading the nodes file or by
         * ctdb_tcp_listen_automatic() when the transport is
         * initialised.  At some point we should de-optimise this and
         * pull it out into ctdb_start_daemon() so it is done clearly
         * and only in one place.
         */
        ctdb->pnn = -1;

        /* Default value for CTDB_BASE - don't override */
        setenv("CTDB_BASE", CTDB_ETCDIR, 0);

        /* tell ctdb what nodes are available */
        if (options.nlist != NULL) {
                ctdb->nodes_file = options.nlist;
        } else {
                ctdb->nodes_file =
                        talloc_asprintf(ctdb, "%s/nodes", getenv("CTDB_BASE"));
                if (ctdb->nodes_file == NULL) {
                        DEBUG(DEBUG_ALERT,(__location__ " Out of memory\n"));
                        exit(1);
                }
        }
        ctdb_load_nodes_file(ctdb);

        ctdb->db_directory = options.db_dir;
        mkdir_p_or_die(ctdb->db_directory, 0700);

        ctdb->db_directory_persistent = options.db_dir_persistent;
        mkdir_p_or_die(ctdb->db_directory_persistent, 0700);

        ctdb->db_directory_state = options.db_dir_state;
        mkdir_p_or_die(ctdb->db_directory_state, 0700);

        if (options.public_interface) {
                ctdb->default_public_interface = talloc_strdup(ctdb, options.public_interface);
                CTDB_NO_MEMORY(ctdb, ctdb->default_public_interface);
        }

        if (options.single_public_ip) {
                if (options.public_interface == NULL) {
                        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"));
                        exit(10);
                }

                ret = ctdb_set_single_public_ip(ctdb, options.public_interface,
                                                options.single_public_ip);
                if (ret != 0) {
                        DEBUG(DEBUG_ALERT,("Invalid --single-public-ip argument : %s . This is not a valid ip address. Exiting.\n", options.single_public_ip));
                        exit(10);
                }
        }

        if (options.event_script_dir != NULL) {
                ctdb->event_script_dir = options.event_script_dir;
        } else {
                ctdb->event_script_dir = talloc_asprintf(ctdb, "%s/events.d",
                                                         getenv("CTDB_BASE"));
                if (ctdb->event_script_dir == NULL) {
                        DEBUG(DEBUG_ALERT,(__location__ " Out of memory\n"));
                        exit(1);
                }
        }

        if (options.notification_script != NULL) {
                ret = ctdb_set_notification_script(ctdb, options.notification_script);
                if (ret == -1) {
                        DEBUG(DEBUG_ALERT,("Unable to setup notification script\n"));
                        exit(1);
                }
        }

        ctdb->valgrinding = options.valgrinding;
        if (options.valgrinding || options.nosetsched) {
                ctdb->do_setsched = 0;
        } else {
                ctdb->do_setsched = 1;
        }

        ctdb->public_addresses_file = options.public_address_list;
        ctdb->do_checkpublicip = !options.no_publicipcheck;

        if (options.max_persistent_check_errors < 0) {
                ctdb->max_persistent_check_errors = 0xFFFFFFFFFFFFFFFFLL;
        } else {
                ctdb->max_persistent_check_errors = (uint64_t)options.max_persistent_check_errors;
        }

        /* start the protocol running (as a child) */
        return ctdb_start_daemon(ctdb, interactive?false:true);
}