int main (int argc, char **argv) {
GMainLoop *loop;
GIOChannel *sock;
/* Initialize signal handlers */
signal(SIGPIPE, SIG_IGN);
signal(SIGINT, handle_sigint);
/* read nocat.conf */
read_conf_file( NC_CONF_PATH "/nocat.conf" );
initialize_driver();
/* initialize the firewall */
fw_init( nocat_conf );
/* initialize the peer table */
peer_tab = g_hash_new();
/* initialize the listen socket */
sock = http_bind_socket(
CONF("GatewayAddr"), CONFd("GatewayPort"), CONFd("ListenQueue") );
/* initialize the main loop and handlers */
loop = g_main_new(FALSE);
g_io_add_watch( sock, G_IO_IN, (GIOFunc) handle_accept, NULL );
g_timeout_add( 30000, (GSourceFunc) check_peers, NULL );
g_timeout_add( 1000, (GSourceFunc) check_sigint, loop );
/* Go! */
g_message("starting main loop");
g_main_run( loop );
g_message("exiting main loop");
return 0;
}
int
servant_cluster(const char *diskname, int mode, const void* argp)
{
enum cluster_type_e cluster_stack = get_cluster_type();
crm_system_name = strdup("sbd:cluster");
cl_log(LOG_INFO, "Monitoring %s cluster health", name_for_cluster_type(cluster_stack));
set_proc_title("sbd: watcher: Cluster");
sbd_membership_connect();
/* stonith_our_uname = cluster.uname; */
/* stonith_our_uuid = cluster.uuid; */
mainloop = g_main_new(FALSE);
notify_timer = g_timeout_add(timeout_loop * 1000, notify_timer_cb, NULL);
mainloop_add_signal(SIGTERM, cluster_shutdown);
mainloop_add_signal(SIGINT, cluster_shutdown);
g_main_run(mainloop);
g_main_destroy(mainloop);
clean_up(0);
return 0; /* never reached */
}
int main(int argc, char **argv)
{
static GOptionEntry options[] = {
{ "load", 'l', 0, G_OPTION_ARG_STRING, &autoload_module, "Module to load (default = bot)", "MODULE" },
{ NULL }
};
autoload_module = NULL;
core_register_options();
args_register(options);
args_execute(argc, argv);
core_preinit(argv[0]);
#ifdef HAVE_SOCKS
SOCKSinit(argv[0]);
#endif
noui_init();
if (autoload_module == NULL)
autoload_module = "bot";
do {
reload = FALSE;
module_load(autoload_module, NULL);
main_loop = g_main_new(TRUE);
g_main_run(main_loop);
g_main_destroy(main_loop);
}
while (reload);
noui_deinit();
return 0;
}
int main(int argc, char **argv)
{
core_init_paths(argc, argv);
#ifdef HAVE_SOCKS
SOCKSinit(argv[0]);
#endif
noui_init();
args_execute(argc, argv);
if (autoload_module == NULL)
autoload_module = "bot";
do {
reload = FALSE;
module_load(autoload_module, NULL);
main_loop = g_main_new(TRUE);
g_main_run(main_loop);
g_main_destroy(main_loop);
}
while (reload);
noui_deinit();
return 0;
}
int main(int argc, char **argv)
{
check_files();
#ifdef HAVE_SOCKS
SOCKSinit(argv[0]);
#endif
#ifdef ENABLE_NLS
/* initialize the i18n stuff */
bindtextdomain(PACKAGE, LOCALEDIR);
textdomain(PACKAGE);
#endif
textui_init();
args_execute(argc, argv);
if (!init_screen())
g_error(_("Can't initialize screen handling, quitting.\n"));
textui_finish_init();
main_loop = g_main_new(TRUE);
g_main_run(main_loop);
g_main_destroy(main_loop);
textui_deinit();
#ifdef MEM_DEBUG
ig_mem_profile();
#endif
return 0;
}
int run(void)
{
int ret = 0;
GMainLoop* main_loop;
GInetAddr* addr;
GServer* server;
/* Create the main loop */
main_loop = g_main_new(FALSE);
/* Create the interface */
addr = gnet_inetaddr_new_any ();
gnet_inetaddr_set_port (addr, OPT_VALUE_LISTEN);
/* Create the server */
server = gnet_server_new (addr, TRUE, ob_server_func, "hallo");
if (!server)
{
fprintf (stderr, "Error: Could not start server\n");
return(0);
}
ob_server = server;
signal (SIGTERM, ob_sig_term);
/* Start the main loop */
g_main_run(main_loop);
return(1);
}
int main(int argc, char **argv)
{
static struct poptOption options[] = {
{ "dummy", 'd', POPT_ARG_NONE, &dummy, 0, "Use the dummy terminal mode", NULL },
{ NULL, '\0', 0, NULL }
};
dummy = FALSE;
quitting = FALSE;
core_init_paths(argc, argv);
check_files();
#ifdef WIN32
winsock_init();
#endif
#ifdef HAVE_SOCKS
SOCKSinit(argv[0]);
#endif
#ifdef ENABLE_NLS
/* initialize the i18n stuff */
bindtextdomain(PACKAGE, LOCALEDIR);
textdomain(PACKAGE);
#endif
textui_init();
args_register(options);
args_execute(argc, argv);
if (!dummy && !term_init()) {
fprintf(stderr, "Can't initialize screen handling, quitting.\n");
fprintf(stderr, "You can still use the dummy mode with -d parameter\n");
return 1;
}
textui_finish_init();
main_loop = g_main_new(TRUE);
/* Does the same as g_main_run(main_loop), except we
can call our dirty-checker after each iteration */
while (!quitting) {
g_main_iteration(TRUE);
if (reload_config) {
/* SIGHUP received, do /RELOAD */
reload_config = FALSE;
signal_emit("command reload", 1, "");
}
dirty_check();
}
g_main_destroy(main_loop);
textui_deinit();
session_upgrade(); /* if we /UPGRADEd, start the new process */
return 0;
}
static void
mainloop_tests(void)
{
trig = mainloop_add_trigger(G_PRIORITY_HIGH, trigger_iterate_mainloop_tests, NULL);
mainloop_set_trigger(trig);
mainloop_add_signal(SIGTERM, test_shutdown);
crm_info("Starting");
mainloop = g_main_new(FALSE);
g_main_run(mainloop);
}
static void
start_mainloop(void)
{
mainloop = g_main_new(FALSE);
crmd_replies_needed++; /* The welcome message */
fprintf(stderr, "Waiting for %d replies from the CRMd", crmd_replies_needed);
crm_debug("Waiting for %d replies from the CRMd", crmd_replies_needed);
g_timeout_add(message_timeout_ms, resource_ipc_timeout, NULL);
g_main_run(mainloop);
}
int main (int argc, char **argv) {
GMainLoop *loop;
GIOChannel *sock;
int sock_fd;
loop = g_main_new(FALSE);
sock_fd = bind_socket( "0.0.0.0", 5280, 5 );
sock = g_io_channel_unix_new( sock_fd );
g_io_add_watch( sock, G_IO_IN, (GIOFunc)handle_accept, NULL );
g_warning("starting main loop");
g_main_run( loop );
}
int
main(int argc, char** argv)
{
int port = 8123;
GNetXmlRpcServer *server;
GMainLoop* main_loop;
Tcl_FindExecutable(argv[0]);
gnet_init ();
if (argc > 1)
port = atoi(argv[1]);
/* Create the main loop */
main_loop = g_main_new (FALSE);
server = gnet_xmlrpc_server_new(port);
printf("port = %d\n", port);
if (!server)
{
fprintf (stderr, "Error: Could not start server\n");
exit (EXIT_FAILURE);
}
tcl_interp = Tcl_CreateInterp();
Tcl_Init(tcl_interp);
Tcl_CreateCommand(tcl_interp, "ping",
tcl_ping, (ClientData) NULL,
(Tcl_CmdDeleteProc *) NULL);
gnet_xmlrpc_server_register_command(server,
"ping",
xmlrpc_cmd_ping,
NULL);
gnet_xmlrpc_server_register_command(server,
"cmd",
xmlrpc_cmd_tcl,
NULL);
/* Start the main loop */
g_main_run(main_loop);
exit (EXIT_SUCCESS);
return 0;
}
int
crmd_init(void)
{
int exit_code = 0;
enum crmd_fsa_state state;
fsa_state = S_STARTING;
fsa_input_register = 0; /* zero out the regester */
init_dotfile();
crm_debug("Starting %s", crm_system_name);
register_fsa_input(C_STARTUP, I_STARTUP, NULL);
crm_peer_init();
state = s_crmd_fsa(C_STARTUP);
if (state == S_PENDING || state == S_STARTING) {
/* Create the mainloop and run it... */
crmd_mainloop = g_main_new(FALSE);
crm_trace("Starting %s's mainloop", crm_system_name);
#ifdef REALTIME_SUPPORT
static int crm_realtime = 1;
if (crm_realtime == 1) {
cl_enable_realtime();
} else if (crm_realtime == 0) {
cl_disable_realtime();
}
cl_make_realtime(SCHED_RR, 5, 64, 64);
#endif
g_main_run(crmd_mainloop);
if (is_set(fsa_input_register, R_STAYDOWN)) {
crm_info("Inhibiting respawn by Heartbeat");
exit_code = 100;
}
} else {
crm_err("Startup of %s failed. Current state: %s",
crm_system_name, fsa_state2string(state));
exit_code = 1;
}
crm_info("[%s] stopped (%d)", crm_system_name, exit_code);
qb_log_fini();
return exit_code;
}
static void
read_msg_process(IPC_Channel* chan)
{
GHashTable* conn_cmd_attrs;
IPC_WaitConnection* conn_cmd = NULL;
char path[] = "path";
char socketpath[] = HA_LOGDAEMON_IPC;
GMainLoop* mainloop;
mainloop = g_main_new(FALSE);
G_main_add_SignalHandler(G_PRIORITY_HIGH, SIGTERM,
logd_term_action,mainloop, NULL);
conn_cmd_attrs = g_hash_table_new(g_str_hash, g_str_equal);
g_hash_table_insert(conn_cmd_attrs, path, socketpath);
conn_cmd = ipc_wait_conn_constructor(IPC_ANYTYPE, conn_cmd_attrs);
g_hash_table_destroy(conn_cmd_attrs);
if (conn_cmd == NULL){
fprintf(stderr, "ERROR: create waiting connection failed");
exit(1);
}
/*Create a source to handle new connect rquests for command*/
G_main_add_IPC_WaitConnection( G_PRIORITY_HIGH, conn_cmd, NULL, FALSE
, on_connect_cmd, chan, NULL);
chan->ops->set_high_flow_callback(chan, logd_suspend_clients, NULL);
chan->ops->set_low_flow_callback(chan, logd_resume_clients, NULL);
chan->high_flow_mark = chan->send_queue->max_qlen;
chan->low_flow_mark = (chan->send_queue->max_qlen*3)/4;
G_main_add_IPC_Channel(G_PRIORITY_DEFAULT, chan, FALSE,NULL,NULL,NULL);
G_main_add_SignalHandler(G_PRIORITY_DEFAULT, SIGHUP,
logd_hup_action, mainloop, NULL);
g_main_run(mainloop);
return;
}
int main (int argc, char **argv)
{
#ifdef HAVE_GNOME
GnomeProgram *app;
#endif
srandom (get_seed());
reset_game_params ();
prefs_read_config_file ();
parse_opts (argc, argv);
ui_start_player ();
signal (SIGINT, ui_cleanup);
signal (SIGTERM, ui_cleanup);
signal (SIGSEGV, ui_segv_cleanup);
signal (SIGCHLD, ui_child_cleanup);
if (!opt_quiet)
{
gtk_init(&argc,&argv);
gdk_rgb_init();
#ifdef HAVE_GNOME
app = gnome_program_init (PACKAGE, VERSION, LIBGNOME_MODULE, argc, argv, GNOME_PARAM_NONE);
#endif
gui_init ();
g_idle_add ((GSourceFunc) ui_sound_init, NULL);
gtk_main ();
}
else // background mode
{
GMainLoop *loop;
signal (SIGHUP, ignore);
set_game_params ();
ui_stopped = FALSE;
sound_set_enabled (FALSE);
g_idle_add (ui_send_make_move_bg, NULL);
#if GLIB_MAJOR_VERSION > 1
loop = g_main_loop_new (NULL, TRUE);
#else
loop = g_main_new (TRUE);
#endif
g_main_run (loop);
}
return 0;
}
/**
*
*@return non-zero on failure
*/
int
create_connection(void)
{
char path[] = IPC_PATH_ATTR;
char commpath[] = RECOVERYMGRSOCKPATH;
struct IPC_WAIT_CONNECTION* wconn;
GHashTable* wconnattrs;
/* Create a "waiting for connection" object */
wconnattrs = g_hash_table_new(g_str_hash, g_str_equal);
g_hash_table_insert(wconnattrs, path, commpath);
wconn = ipc_wait_conn_constructor(IPC_ANYTYPE, wconnattrs);
if (wconn == NULL) {
cl_log(LOG_CRIT, "Unable to create wcon of type %s", IPC_ANYTYPE
);
return 1;
}
/* Create a source to handle new connection requests */
G_main_add_IPC_WaitConnection(G_PRIORITY_HIGH, wconn
, NULL, FALSE, pending_conn_dispatch, wconn, NULL);
g_main_set_poll_func(cl_glibpoll);
/* Create the mainloop and run it... */
mainloop = g_main_new(FALSE);
g_main_run(mainloop);
wconn->ops->destroy(wconn);
/* free script hash table */
g_hash_table_foreach_remove(scripts, hash_remove_func, NULL);
/*unlink(PIDFILE); */
return 0;
}
int
main(int argc, char** argv)
{
gchar* hostname;
gint port;
GMainLoop* main_loop;
GConn* conn;
GIOChannel* in;
gnet_init ();
/* Parse args */
if (argc != 3)
{
g_print ("usage: %s <server> <port>\n", argv[0]);
exit(EXIT_FAILURE);
}
hostname = argv[1];
port = atoi(argv[2]);
/* Create the main loop */
main_loop = g_main_new(FALSE);
/* Create connection object */
conn = gnet_conn_new (hostname, port, ob_conn_func, NULL);
g_assert (conn);
/* Connect */
gnet_conn_connect (conn);
gnet_conn_set_watch_error (conn, TRUE);
gnet_conn_timeout (conn, 30000); /* 30 second timeout */
/* Read from stdin */
in = g_io_channel_unix_new (fileno(stdin));
g_io_add_watch(in, G_IO_IN | G_IO_ERR | G_IO_HUP | G_IO_NVAL,
ob_in_iofunc, conn);
/* Start the main loop */
g_main_run (main_loop);
exit (EXIT_SUCCESS);
return 0;
}
int main (int argc, char** argv)
{
gchar* hostname;
gint port;
GMainLoop* main_loop;
GConn* conn;
gnet_init ();
/* Parse args */
if (argc != 4)
{
g_print ("usage: %s <server> <port> <output-directory>\n", argv[0]);
exit(EXIT_FAILURE);
}
hostname = argv[1];
port = atoi(argv[2]);
out_dir = argv[3];
check_dir (out_dir);
update_filename ();
/* Create the main loop */
main_loop = g_main_new(FALSE);
/* Create connection object */
conn = gnet_conn_new (hostname, port, ob_conn_func, NULL);
g_assert (conn);
/* Connect */
gnet_conn_connect (conn);
gnet_conn_set_watch_error (conn, TRUE);
gnet_conn_timeout (conn, 30000); /* 30 second timeout */
//open the xml file
init_xml ();
atexit (flush_xml);
/* Start the main loop */
g_main_run (main_loop);
exit (EXIT_SUCCESS);
return 0;
}
static int
mainloop_fencing(stonith_t * st, const char *target, const char *action, int timeout, int tolerance)
{
crm_trigger_t *trig;
async_fence_data.st = st;
async_fence_data.target = target;
async_fence_data.action = action;
async_fence_data.timeout = timeout;
async_fence_data.tolerance = tolerance;
async_fence_data.rc = -1;
trig = mainloop_add_trigger(G_PRIORITY_HIGH, async_fence_helper, NULL);
mainloop_set_trigger(trig);
mainloop = g_main_new(FALSE);
g_main_run(mainloop);
return async_fence_data.rc;
}
int main (int argc, char **argv) {
GMainLoop *loop;
GIOChannel *sock;
/* read nocat.conf */
read_conf_file( NC_CONF_PATH "/nocat.conf" );
if (argc < 2 || strncmp(argv[1], "-D", 2) != 0)
daemonize();
/* initalize the log */
initialize_log();
/* set network parameters */
set_network_defaults( nocat_conf );
/* initialize the gateway type driver */
initialize_driver();
/* initialize the firewall */
fw_init( nocat_conf );
/* initialize the peer table */
peer_tab = g_hash_new();
/* initialize the listen socket */
sock = http_bind_socket(
CONF("GatewayAddr"), CONFd("GatewayPort"), CONFd("ListenQueue") );
/* initialize the main loop and handlers */
loop = g_main_new(FALSE);
g_io_add_watch( sock, G_IO_IN, (GIOFunc) handle_accept, NULL );
g_timeout_add( 30000, (GSourceFunc) check_peers, NULL );
g_timeout_add( 1000, (GSourceFunc) check_exit_signal, loop );
/* Go! */
g_message("starting main loop");
g_main_run( loop );
g_message("exiting main loop");
return 0;
}
//! This is the main function for the engine
void engine_main (int infd, int outfd)
{
GMainLoop *loop;
char *line;
engine_flag = TRUE;
signal (SIGHUP, ignore);
signal (SIGINT, ignore);
engine_fin = fdopen (infd, "r");
engine_fout = fdopen (outfd, "w");
assert (engine_fin);
assert (engine_fout);
channel_in = g_io_channel_unix_new (infd);
g_io_add_watch (channel_in, G_IO_IN, (GIOFunc) channel_process_input, NULL);
g_io_add_watch (channel_in, G_IO_HUP | G_IO_NVAL, (GIOFunc) engine_hup_cb, NULL);
#if GLIB_MAJOR_VERSION > 1
loop = g_main_loop_new (NULL, TRUE);
#else
loop = g_main_new (TRUE);
#endif
g_main_run (loop);
}
int
main(int argc, char** argv)
{
int port;
GServer* server;
GMainLoop* main_loop;
gnet_init ();
if (argc != 2)
{
fprintf (stderr, "usage: echoserver <port> \n");
exit(EXIT_FAILURE);
}
fprintf (stderr, "NOTE: You can not use the standard echoclient with this server.\n");
port = atoi(argv[argc - 1]);
/* Create the main loop */
main_loop = g_main_new (FALSE);
/* Create the server */
server = gnet_server_new (NULL, port, ob_server_func, NULL);
if (!server)
{
fprintf (stderr, "Error: Could not start server\n");
exit (EXIT_FAILURE);
}
ob_server = server;
signal (SIGINT, ob_sig_int);
/* Start the main loop */
g_main_run(main_loop);
exit (EXIT_SUCCESS);
return 0;
}
static void
write_msg_process(IPC_Channel* readchan)
{
GMainLoop* mainloop;
IPC_Channel* ch = readchan;
mainloop = g_main_new(FALSE);
G_main_add_IPC_Channel(G_PRIORITY_DEFAULT,
ch, FALSE,
direct_log, mainloop, NULL);
G_main_add_SignalHandler(G_PRIORITY_HIGH, SIGTERM,
logd_term_write_action, mainloop, NULL);
G_main_add_SignalHandler(G_PRIORITY_DEFAULT, SIGHUP,
logd_hup_action, mainloop, NULL);
g_main_run(mainloop);
}
int main(int argc, char **argv)
{
#ifdef HAVE_SOCKS
SOCKSinit(argv[0]);
#endif
textui_init();
args_execute(argc, argv);
if (!init_screen())
g_error(_("Can't initialize screen handling, quitting.\n"));
textui_finish_init();
main_loop = g_main_new(TRUE);
g_main_run(main_loop);
g_main_destroy(main_loop);
textui_deinit();
#ifdef MEM_DEBUG
ig_mem_profile();
#endif
return 0;
}
static void
async_echoserver(gchar *path, gboolean abstract)
{
GIOChannel *iochannel = NULL;
GMainLoop *main_loop = NULL;
g_assert(path != NULL);
if (abstract)
server = gnet_unix_socket_server_new_abstract(path);
else
server = gnet_unix_socket_server_new(path);
g_assert(server != NULL);
main_loop = g_main_new(FALSE);
/* Add a watch for incoming clients */
iochannel = gnet_unix_socket_get_io_channel(server);
g_io_add_watch(iochannel,
G_IO_IN | G_IO_ERR | G_IO_HUP | G_IO_NVAL,
async_server_iofunc, server);
/* Start the main loop */
g_main_run(main_loop);
}
int
main(int argc, char **argv)
{
int option_index = 0;
int argerr = 0;
int flag;
crm_log_cli_init("crmadmin");
crm_set_options(NULL, "command [options]", long_options,
"Development tool for performing some crmd-specific commands."
"\n Likely to be replaced by crm_node in the future");
if (argc < 2) {
crm_help('?', LSB_EXIT_EINVAL);
}
while (1) {
flag = crm_get_option(argc, argv, &option_index);
if (flag == -1)
break;
switch (flag) {
case 'V':
BE_VERBOSE = TRUE;
admin_verbose = XML_BOOLEAN_TRUE;
crm_bump_log_level();
break;
case 't':
message_timeout_ms = atoi(optarg);
if (message_timeout_ms < 1) {
message_timeout_ms = 30 * 1000;
}
break;
case '$':
case '?':
crm_help(flag, LSB_EXIT_OK);
break;
case 'D':
DO_WHOIS_DC = TRUE;
break;
case 'B':
BASH_EXPORT = TRUE;
break;
case 'K':
DO_RESET = TRUE;
crm_trace("Option %c => %s", flag, optarg);
dest_node = crm_strdup(optarg);
crmd_operation = CRM_OP_LOCAL_SHUTDOWN;
break;
case 'q':
BE_SILENT = TRUE;
break;
case 'i':
DO_DEBUG = debug_inc;
crm_trace("Option %c => %s", flag, optarg);
dest_node = crm_strdup(optarg);
break;
case 'd':
DO_DEBUG = debug_dec;
crm_trace("Option %c => %s", flag, optarg);
dest_node = crm_strdup(optarg);
break;
case 'S':
DO_HEALTH = TRUE;
crm_trace("Option %c => %s", flag, optarg);
dest_node = crm_strdup(optarg);
break;
case 'E':
DO_ELECT_DC = TRUE;
break;
case 'N':
DO_NODE_LIST = TRUE;
break;
case 'H':
DO_HEALTH = TRUE;
break;
default:
printf("Argument code 0%o (%c) is not (?yet?) supported\n", flag, flag);
++argerr;
break;
}
}
if (optind < argc) {
printf("non-option ARGV-elements: ");
while (optind < argc)
printf("%s ", argv[optind++]);
printf("\n");
}
if (optind > argc) {
++argerr;
}
if (argerr) {
crm_help('?', LSB_EXIT_GENERIC);
}
if (do_init()) {
int res = 0;
res = do_work();
if (res > 0) {
/* wait for the reply by creating a mainloop and running it until
* the callbacks are invoked...
*/
mainloop = g_main_new(FALSE);
crm_trace("Waiting for %d replies from the local CRM", expected_responses);
message_timer_id = g_timeout_add(message_timeout_ms, admin_message_timeout, NULL);
g_main_run(mainloop);
} else if (res < 0) {
crm_err("No message to send");
operation_status = -1;
}
} else {
crm_warn("Init failed, could not perform requested operations");
operation_status = -2;
}
crm_trace("%s exiting normally", crm_system_name);
return operation_status;
}
int
main(int argc, char **argv)
{
int argerr = 0;
int flag;
const char *source = NULL;
char *admin_input_xml = NULL;
char *admin_input_file = NULL;
gboolean dangerous_cmd = FALSE;
gboolean admin_input_stdin = FALSE;
xmlNode *output = NULL;
xmlNode *input = NULL;
int option_index = 0;
crm_log_init("cibadmin", LOG_CRIT, FALSE, FALSE, argc, argv);
crm_set_options("V?$o:QDUCEX:t:Srwlsh:MmBfbRx:pP5N:A:uncd", "command [options] [data]", long_options,
"Provides direct access to the cluster configuration."
"\n\n Allows the configuration, or sections of it, to be queried, modified, replaced and deleted."
"\n\n Where necessary, XML data will be obtained using the -X, -x, or -p options\n");
if(argc < 2) {
crm_help('?',LSB_EXIT_EINVAL);
}
while (1) {
flag = crm_get_option(argc, argv, &option_index);
if (flag == -1)
break;
switch(flag) {
case 't':
message_timeout_ms = atoi(optarg);
if(message_timeout_ms < 1) {
message_timeout_ms = 30;
}
break;
case 'A':
obj_type = crm_strdup(optarg);
command_options |= cib_xpath;
break;
case 'u':
cib_action = CIB_OP_UPGRADE;
dangerous_cmd = TRUE;
break;
case 'E':
cib_action = CIB_OP_ERASE;
dangerous_cmd = TRUE;
break;
case 'Q':
cib_action = CIB_OP_QUERY;
break;
case 'P':
cib_action = CIB_OP_APPLY_DIFF;
break;
case 'S':
cib_action = CIB_OP_SYNC;
break;
case 'U':
case 'M':
cib_action = CIB_OP_MODIFY;
break;
case 'R':
cib_action = CIB_OP_REPLACE;
break;
case 'C':
cib_action = CIB_OP_CREATE;
break;
case 'D':
cib_action = CIB_OP_DELETE;
break;
case '5':
cib_action = "md5-sum";
break;
case 'c':
command_options |= cib_can_create;
break;
case 'n':
command_options |= cib_no_children;
break;
case 'm':
cib_action = CIB_OP_ISMASTER;
command_options |= cib_scope_local;
break;
case 'B':
cib_action = CIB_OP_BUMP;
break;
case 'r':
dangerous_cmd = TRUE;
cib_action = CIB_OP_SLAVE;
break;
case 'w':
dangerous_cmd = TRUE;
cib_action = CIB_OP_MASTER;
command_options |= cib_scope_local;
break;
case 'V':
command_options = command_options | cib_verbose;
cl_log_enable_stderr(TRUE);
alter_debug(DEBUG_INC);
break;
case '?':
case '$':
crm_help(flag, LSB_EXIT_OK);
break;
case 'o':
crm_debug_2("Option %c => %s", flag, optarg);
obj_type = crm_strdup(optarg);
break;
case 'X':
crm_debug_2("Option %c => %s", flag, optarg);
admin_input_xml = crm_strdup(optarg);
break;
case 'x':
crm_debug_2("Option %c => %s", flag, optarg);
admin_input_file = crm_strdup(optarg);
break;
case 'p':
admin_input_stdin = TRUE;
break;
case 'h':
host = crm_strdup(optarg);
break;
case 'l':
command_options |= cib_scope_local;
break;
case 'd':
cib_action = CIB_OP_DELETE;
command_options |= cib_multiple;
dangerous_cmd = TRUE;
break;
case 'b':
dangerous_cmd = TRUE;
command_options |= cib_inhibit_bcast;
command_options |= cib_scope_local;
break;
case 's':
command_options |= cib_sync_call;
break;
case 'f':
force_flag = TRUE;
command_options |= cib_quorum_override;
break;
default:
printf("Argument code 0%o (%c)"
" is not (?yet?) supported\n",
flag, flag);
++argerr;
break;
}
}
if (optind < argc) {
printf("non-option ARGV-elements: ");
while (optind < argc)
printf("%s ", argv[optind++]);
printf("\n");
crm_help('?', LSB_EXIT_EINVAL);
}
if (optind > argc || cib_action == NULL) {
++argerr;
}
if (argerr) {
crm_help('?', LSB_EXIT_GENERIC);
}
if(dangerous_cmd && force_flag == FALSE) {
fprintf(stderr, "The supplied command is considered dangerous."
" To prevent accidental destruction of the cluster,"
" the --force flag is required in order to proceed.\n");
fflush(stderr);
exit(LSB_EXIT_GENERIC);
}
if(admin_input_file != NULL) {
input = filename2xml(admin_input_file);
source = admin_input_file;
} else if(admin_input_xml != NULL) {
source = "input string";
input = string2xml(admin_input_xml);
} else if(admin_input_stdin) {
source = "STDIN";
input = stdin2xml();
}
if(input != NULL) {
crm_log_xml_debug(input, "[admin input]");
} else if(source) {
fprintf(stderr, "Couldn't parse input from %s.\n", source);
return 1;
}
if(safe_str_eq(cib_action, "md5-sum")) {
char *digest = NULL;
if(input == NULL) {
fprintf(stderr,
"Please supply XML to process with -X, -x or -p\n");
exit(1);
}
digest = calculate_xml_digest(input, FALSE, FALSE);
fprintf(stderr, "Digest: ");
fprintf(stdout, "%s\n", crm_str(digest));
crm_free(digest);
exit(0);
}
exit_code = do_init();
if(exit_code != cib_ok) {
crm_err("Init failed, could not perform requested operations");
fprintf(stderr, "Init failed, could not perform requested operations\n");
return -exit_code;
}
exit_code = do_work(input, command_options, &output);
if (exit_code > 0) {
/* wait for the reply by creating a mainloop and running it until
* the callbacks are invoked...
*/
request_id = exit_code;
the_cib->cmds->register_callback(
the_cib, request_id, message_timeout_ms, FALSE, NULL,
"cibadmin_op_callback", cibadmin_op_callback);
mainloop = g_main_new(FALSE);
crm_debug_3("%s waiting for reply from the local CIB",
crm_system_name);
crm_info("Starting mainloop");
g_main_run(mainloop);
} else if(exit_code < 0) {
crm_err("Call failed: %s", cib_error2string(exit_code));
fprintf(stderr, "Call failed: %s\n",
cib_error2string(exit_code));
operation_status = exit_code;
if(exit_code == cib_dtd_validation) {
if(crm_str_eq(cib_action, CIB_OP_UPGRADE, TRUE)) {
xmlNode *obj = NULL;
int version = 0, rc = 0;
rc = the_cib->cmds->query(the_cib, NULL, &obj, command_options);
if(rc == cib_ok) {
update_validation(&obj, &version, TRUE, FALSE);
}
} else if(output) {
validate_xml_verbose(output);
}
}
}
if(output != NULL) {
char *buffer = dump_xml_formatted(output);
fprintf(stdout, "%s\n", crm_str(buffer));
crm_free(buffer);
}
the_cib->cmds->signoff(the_cib);
crm_debug_3("%s exiting normally", crm_system_name);
return -exit_code;
}
int
main(int argc, char **argv)
{
int argerr = 0;
int flag;
const char *source = NULL;
const char *admin_input_xml = NULL;
const char *admin_input_file = NULL;
gboolean dangerous_cmd = FALSE;
gboolean admin_input_stdin = FALSE;
xmlNode *output = NULL;
xmlNode *input = NULL;
int option_index = 0;
crm_xml_init(); /* Sets buffer allocation strategy */
crm_system_name = strdup("cibadmin");
crm_set_options(NULL, "command [options] [data]", long_options,
"Provides direct access to the cluster configuration."
"\n\nAllows the configuration, or sections of it, to be queried, modified, replaced and deleted."
"\n\nWhere necessary, XML data will be obtained using the -X, -x, or -p options\n");
if (argc < 2) {
crm_help('?', EX_USAGE);
}
while (1) {
flag = crm_get_option(argc, argv, &option_index);
if (flag == -1)
break;
switch (flag) {
case 't':
message_timeout_ms = atoi(optarg);
if (message_timeout_ms < 1) {
message_timeout_ms = 30;
}
break;
case 'A':
obj_type = optarg;
command_options |= cib_xpath;
break;
case 'e':
command_options |= cib_xpath_address;
break;
case 'u':
cib_action = CIB_OP_UPGRADE;
dangerous_cmd = TRUE;
break;
case 'E':
cib_action = CIB_OP_ERASE;
dangerous_cmd = TRUE;
break;
case 'Q':
cib_action = CIB_OP_QUERY;
quiet = TRUE;
break;
case 'P':
cib_action = CIB_OP_APPLY_DIFF;
break;
case 'U':
cib_user = optarg;
break;
case 'M':
cib_action = CIB_OP_MODIFY;
break;
case 'R':
cib_action = CIB_OP_REPLACE;
break;
case 'C':
cib_action = CIB_OP_CREATE;
break;
case 'D':
cib_action = CIB_OP_DELETE;
break;
case '5':
cib_action = "md5-sum";
break;
case '6':
cib_action = "md5-sum-versioned";
break;
case 'c':
command_options |= cib_can_create;
break;
case 'n':
command_options |= cib_no_children;
break;
case 'B':
cib_action = CIB_OP_BUMP;
break;
case 'V':
command_options = command_options | cib_verbose;
bump_log_num++;
break;
case '?':
case '$':
case '!':
crm_help(flag, EX_OK);
break;
case 'o':
crm_trace("Option %c => %s", flag, optarg);
obj_type = optarg;
break;
case 'X':
crm_trace("Option %c => %s", flag, optarg);
admin_input_xml = optarg;
break;
case 'x':
crm_trace("Option %c => %s", flag, optarg);
admin_input_file = optarg;
break;
case 'p':
admin_input_stdin = TRUE;
break;
case 'N':
case 'h':
host = strdup(optarg);
break;
case 'l':
command_options |= cib_scope_local;
break;
case 'd':
cib_action = CIB_OP_DELETE;
command_options |= cib_multiple;
dangerous_cmd = TRUE;
break;
case 'b':
dangerous_cmd = TRUE;
command_options |= cib_inhibit_bcast;
command_options |= cib_scope_local;
break;
case 's':
command_options |= cib_sync_call;
break;
case 'f':
force_flag = TRUE;
command_options |= cib_quorum_override;
break;
case 'a':
output = createEmptyCib(1);
if (optind < argc) {
crm_xml_add(output, XML_ATTR_VALIDATION, argv[optind]);
}
admin_input_xml = dump_xml_formatted(output);
fprintf(stdout, "%s\n", crm_str(admin_input_xml));
goto bail;
break;
default:
printf("Argument code 0%o (%c)" " is not (?yet?) supported\n", flag, flag);
++argerr;
break;
}
}
if (bump_log_num > 0) {
quiet = FALSE;
}
crm_log_init(NULL, LOG_CRIT, FALSE, FALSE, argc, argv, quiet);
while (bump_log_num > 0) {
crm_bump_log_level(argc, argv);
bump_log_num--;
}
if (optind < argc) {
printf("non-option ARGV-elements: ");
while (optind < argc)
printf("%s ", argv[optind++]);
printf("\n");
crm_help('?', EX_USAGE);
}
if (optind > argc || cib_action == NULL) {
++argerr;
}
if (argerr) {
crm_help('?', EX_USAGE);
}
if (dangerous_cmd && force_flag == FALSE) {
fprintf(stderr, "The supplied command is considered dangerous."
" To prevent accidental destruction of the cluster,"
" the --force flag is required in order to proceed.\n");
fflush(stderr);
exit_code = -EINVAL;
goto bail;
}
if (admin_input_file != NULL) {
input = filename2xml(admin_input_file);
source = admin_input_file;
} else if (admin_input_xml != NULL) {
source = "input string";
input = string2xml(admin_input_xml);
} else if (admin_input_stdin) {
source = "STDIN";
input = stdin2xml();
}
if (input != NULL) {
crm_log_xml_debug(input, "[admin input]");
} else if (source) {
fprintf(stderr, "Couldn't parse input from %s.\n", source);
exit_code = -EINVAL;
goto bail;
}
if (safe_str_eq(cib_action, "md5-sum")) {
char *digest = NULL;
if (input == NULL) {
fprintf(stderr, "Please supply XML to process with -X, -x or -p\n");
exit_code = -EINVAL;
goto bail;
}
digest = calculate_on_disk_digest(input);
fprintf(stderr, "Digest: ");
fprintf(stdout, "%s\n", crm_str(digest));
free(digest);
goto bail;
} else if (safe_str_eq(cib_action, "md5-sum-versioned")) {
char *digest = NULL;
const char *version = NULL;
if (input == NULL) {
fprintf(stderr, "Please supply XML to process with -X, -x or -p\n");
exit_code = -EINVAL;
goto bail;
}
version = crm_element_value(input, XML_ATTR_CRM_VERSION);
digest = calculate_xml_versioned_digest(input, FALSE, TRUE, version);
fprintf(stderr, "Versioned (%s) digest: ", version);
fprintf(stdout, "%s\n", crm_str(digest));
free(digest);
goto bail;
}
exit_code = do_init();
if (exit_code != pcmk_ok) {
crm_err("Init failed, could not perform requested operations");
fprintf(stderr, "Init failed, could not perform requested operations\n");
return crm_exit(-exit_code);
}
exit_code = do_work(input, command_options, &output);
if (exit_code > 0) {
/* wait for the reply by creating a mainloop and running it until
* the callbacks are invoked...
*/
request_id = exit_code;
the_cib->cmds->register_callback(the_cib, request_id, message_timeout_ms, FALSE, NULL,
"cibadmin_op_callback", cibadmin_op_callback);
mainloop = g_main_new(FALSE);
crm_trace("%s waiting for reply from the local CIB", crm_system_name);
crm_info("Starting mainloop");
g_main_run(mainloop);
} else if (exit_code < 0) {
crm_err("Call failed: %s", pcmk_strerror(exit_code));
fprintf(stderr, "Call failed: %s\n", pcmk_strerror(exit_code));
operation_status = exit_code;
if (exit_code == -pcmk_err_schema_validation) {
if (crm_str_eq(cib_action, CIB_OP_UPGRADE, TRUE)) {
xmlNode *obj = NULL;
int version = 0, rc = 0;
rc = the_cib->cmds->query(the_cib, NULL, &obj, command_options);
if (rc == pcmk_ok) {
update_validation(&obj, &version, 0, TRUE, FALSE);
}
} else if (output) {
validate_xml_verbose(output);
}
}
}
if (output != NULL) {
print_xml_output(output);
free_xml(output);
}
crm_trace("%s exiting normally", crm_system_name);
free_xml(input);
flag = the_cib->cmds->signoff(the_cib);
cib_delete(the_cib);
if(exit_code == pcmk_ok) {
exit_code = flag;
}
bail:
return crm_exit(exit_code);
}
int
main(int argc, char **argv)
{
int flag;
int argerr = 0;
gboolean allow_cores = TRUE;
crm_ipc_t *old_instance = NULL;
crm_system_name = CRM_SYSTEM_PENGINE;
mainloop_add_signal(SIGTERM, pengine_shutdown);
while ((flag = getopt(argc, argv, OPTARGS)) != EOF) {
switch (flag) {
case 'V':
crm_bump_log_level();
break;
case 'h': /* Help message */
usage(crm_system_name, EX_OK);
break;
case 'c':
allow_cores = TRUE;
break;
default:
++argerr;
break;
}
}
if (argc - optind == 1 && safe_str_eq("metadata", argv[optind])) {
pe_metadata();
return 0;
}
if (optind > argc) {
++argerr;
}
if (argerr) {
usage(crm_system_name, EX_USAGE);
}
crm_log_init(NULL, LOG_NOTICE, TRUE, FALSE, argc, argv, FALSE);
if (crm_is_writable(PE_STATE_DIR, NULL, CRM_DAEMON_USER, CRM_DAEMON_GROUP, FALSE) == FALSE) {
crm_err("Bad permissions on " PE_STATE_DIR ". Terminating");
fprintf(stderr, "ERROR: Bad permissions on " PE_STATE_DIR ". See logs for details\n");
fflush(stderr);
return 100;
}
/* find any previous instances and shut them down */
crm_debug("Checking for old instances of %s", CRM_SYSTEM_PENGINE);
old_instance = crm_ipc_new(CRM_SYSTEM_PENGINE, 0);
crm_ipc_connect(old_instance);
crm_debug("Terminating previous instance");
while (crm_ipc_connected(old_instance)) {
xmlNode *cmd = create_request(CRM_OP_QUIT, NULL, NULL, CRM_SYSTEM_PENGINE, CRM_SYSTEM_PENGINE, NULL);
crm_debug(".");
crm_ipc_send(old_instance, cmd, NULL, 0);
free_xml(cmd);
sleep(2);
}
crm_ipc_close(old_instance);
crm_ipc_destroy(old_instance);
crm_debug("Init server comms");
ipcs = mainloop_add_ipc_server(CRM_SYSTEM_PENGINE, QB_IPC_SHM, &ipc_callbacks);
if (ipcs == NULL) {
crm_err("Couldn't start IPC server");
return 1;
}
/* Create the mainloop and run it... */
crm_info("Starting %s", crm_system_name);
mainloop = g_main_new(FALSE);
g_main_run(mainloop);
#if HAVE_LIBXML2
crm_xml_cleanup();
#endif
crm_info("Exiting %s", crm_system_name);
qb_log_fini();
return 0;
}
void b_main_init()
{
if( loop == NULL )
loop = g_main_new( FALSE );
}
int
main(int argc, char **argv)
{
int flag;
int argerr = 0;
const char *xml_file = NULL;
crm_data_t *xml_graph = NULL;
set_crm_log_level(0);
/* crm_log_init("ttest"); */
g_log_set_handler(NULL,
G_LOG_LEVEL_ERROR | G_LOG_LEVEL_CRITICAL
| G_LOG_LEVEL_WARNING | G_LOG_LEVEL_MESSAGE
| G_LOG_LEVEL_INFO | G_LOG_LEVEL_DEBUG
| G_LOG_FLAG_RECURSION | G_LOG_FLAG_FATAL,
cl_glib_msg_handler, NULL);
/* and for good measure... - this enum is a bit field (!) */
g_log_set_always_fatal((GLogLevelFlags)0); /*value out of range*/
set_crm_log_level(LOG_WARNING);
transition_trigger = G_main_add_TriggerHandler(
G_PRIORITY_LOW, te_graph_trigger, NULL, NULL);
set_graph_functions(&ttest_graph_fns);
while (1) {
flag = getopt(argc, argv, OPTARGS);
if (flag == -1)
break;
switch(flag) {
case 'X':
xml_file = crm_strdup(optarg);
break;
case 'V':
cl_log_enable_stderr(TRUE);
alter_debug(DEBUG_INC);
break;
default:
printf("?? getopt returned character code 0%o ??\n", flag);
++argerr;
break;
}
}
if (optind < argc) {
printf("non-option ARGV-elements: ");
while (optind < argc)
printf("%s ", argv[optind++]);
printf("\n");
}
if (optind > argc) {
++argerr;
}
if (argerr) {
crm_err("%d errors in option parsing", argerr);
}
crm_debug("=#=#=#=#= Getting XML =#=#=#=#=");
if(xml_file != NULL) {
FILE *xml_strm = fopen(xml_file, "r");
if(xml_strm) {
xml_graph = file2xml(xml_strm, FALSE);
fclose(xml_strm);
} else {
cl_perror("Could not open %s for reading", xml_file);
xml_file = NULL;
}
}
if(xml_file == NULL) {
xml_graph = stdin2xml();
}
#ifdef MTRACE
mtrace();
#endif
transition_graph = unpack_graph(xml_graph);
trigger_graph();
print_graph(LOG_DEBUG, transition_graph);
transition_graph->completion_action = tg_shutdown;
mainloop = g_main_new(FALSE);
g_main_run(mainloop);
crm_info("Exiting ttest");
#ifdef MTRACE
muntrace();
#endif
crm_debug_4("Transition complete...");
return 0;
}
