int
main( int argc, char **argv )
{
set_mySubSystem( NULL, SUBSYSTEM_TYPE_STARTER );
dc_main_init = main_init;
dc_main_config = main_config;
dc_main_shutdown_fast = main_shutdown_fast;
dc_main_shutdown_graceful = main_shutdown_graceful;
dc_main_pre_dc_init = main_pre_dc_init;
return dc_main( argc, argv );
}
int
main( int argc, char **argv )
{
set_mySubSystem("FT_GAHP", SUBSYSTEM_TYPE_GAHP);
dc_main_init = main_init;
dc_main_config = main_config;
dc_main_shutdown_fast = main_shutdown_fast;
dc_main_shutdown_graceful = main_shutdown_graceful;
dc_main_pre_command_sock_init = main_pre_command_sock_init;
return dc_main( argc, argv );
}
int
main( int argc, char **argv )
{
set_mySubSystem( "GRIDMANAGER", SUBSYSTEM_TYPE_DAEMON );// used by Daemon Core
dc_main_init = main_init;
dc_main_config = main_config;
dc_main_shutdown_fast = main_shutdown_fast;
dc_main_shutdown_graceful = main_shutdown_graceful;
dc_main_pre_dc_init = main_pre_dc_init;
return dc_main( argc, argv );
}
int
main( int argc, char **argv )
{
if( argc == 2 && strncasecmp(argv[1],"-cl",3) == MATCH ) {
printClassAd();
exit(0);
}
set_mySubSystem( "SHADOW", SUBSYSTEM_TYPE_SHADOW );
dc_main_init = main_init;
dc_main_config = main_config;
dc_main_shutdown_fast = main_shutdown_fast;
dc_main_shutdown_graceful = main_shutdown_graceful;
return dc_main( argc, argv );
}
int
main( int argc, char **argv )
{
// parse args to see if we have been asked to run as a service.
// services are started without a console, so if we have one
// we can't possibly run as a service.
//
#ifdef WIN32
bool has_console = main_has_console();
bool is_daemon = dc_args_is_background(argc, argv);
#endif
set_mySubSystem( "MASTER", SUBSYSTEM_TYPE_MASTER );
SharedPortEndpoint::InitializeDaemonSocketDir();
dc_main_init = main_init;
dc_main_config = main_config;
dc_main_shutdown_fast = main_shutdown_fast;
dc_main_shutdown_graceful = main_shutdown_normal;
dc_main_pre_command_sock_init = main_pre_command_sock_init;
#ifdef WIN32
// if we have been asked to start as a daemon, on Windows
// first try and start as a service, if that doesn't work try
// to start as a background process. Note that we don't return
// from the call to start_as_service() if the service successfully
// started - just like dc_main().
//
NT_ServiceFlag = FALSE;
if (is_daemon) {
NT_ServiceFlag = TRUE;
DWORD err = start_as_service();
if (err == 0x666) {
// 0x666 is a special error code that tells us
// the Service Control Manager didn't create this process
// so we should go ahead run as normal background 'daemon'
NT_ServiceFlag = FALSE;
} else {
return (int)err;
}
}
#endif
return dc_main( argc, argv );
}
/*ARGSUSED*/
int
main(int argc, char *argv[] )
{
char *tmp = NULL;
int reserved_swap, free_swap;
char *host = NULL, *cluster = NULL, *proc = NULL;
char *bogus_capability;
int i;
set_mySubSystem( "SHADOW", SUBSYSTEM_TYPE_SHADOW );
myDistro->Init( argc, argv );
if( argc == 2 && strncasecmp(argv[1], "-cl", 3) == MATCH ) {
printClassAd();
exit( 0 );
}
#if defined(SYSCALL_DEBUG)
SyscallLabel = argv[0] + 7;
#endif
#if !defined(WIN32)
install_sig_handler(SIGPIPE, (SIG_HANDLER)SIG_IGN );
#endif
if( argc > 1 ) {
if( strcmp("-t",argv[1]) == MATCH ) {
Termlog = 1;
argv++;
argc--;
}
}
ShadowBDate = LastRestartTime = time(0);
_EXCEPT_Cleanup = ExceptCleanup;
MyPid = getpid();
config();
/* Start up with condor.condor privileges. */
/*
we need to do this AFTER we call config() so that if CONDOR_IDS
is being defined in the config file, we'll get the right value
*/
set_condor_priv();
if(Termlog)
dprintf_set_tool_debug(get_mySubSystem()->getName(), 0);
else
dprintf_config( get_mySubSystem()->getName() );
DebugId = whoami;
// create a database connection object
dprintf( D_ALWAYS, "******* Standard Shadow starting up *******\n" );
dprintf( D_ALWAYS, "** %s\n", CondorVersion() );
dprintf( D_ALWAYS, "** %s\n", CondorPlatform() );
dprintf( D_ALWAYS, "*******************************************\n" );
reserved_swap = param_integer("RESERVED_SWAP", 0);
reserved_swap *= 1024; /* megabytes -> kb */
bool use_sql_log = param_boolean("QUILL_USE_SQL_LOG", false);
FILEObj = FILESQL::createInstance(use_sql_log);
free_swap = sysapi_swap_space();
dprintf( D_FULLDEBUG, "*** Reserved Swap = %d\n", reserved_swap );
dprintf( D_FULLDEBUG, "*** Free Swap = %d\n", free_swap );
if( reserved_swap && free_swap < reserved_swap ) {
dprintf( D_ALWAYS, "Not enough reserved swap space\n" );
if(FILEObj) {
delete FILEObj;
}
exit( JOB_NO_MEM );
}
dprintf(D_ALWAYS, "uid=%d, euid=%d, gid=%d, egid=%d\n",
getuid(), geteuid(), getgid(), getegid());
dprintf(D_FULLDEBUG, "argc = %d\n", argc);
for(i = 0; i < argc; i++)
{
dprintf(D_FULLDEBUG, "argv[%d] = %s\n", i, argv[i]);
}
if( argc < 6 ) {
usage();
}
if (param_boolean("SHADOW_DEBUG_WAIT", false, false)) {
int debug_wait = 1;
dprintf(D_ALWAYS,
"SHADOW_DEBUG_WAIT is TRUE, waiting for debugger to attach to pid %d.\n",
(int)::getpid());
while (debug_wait) {
sleep(1);
}
}
CheckSpoolVersion(SPOOL_MIN_VERSION_SHADOW_SUPPORTS,SPOOL_CUR_VERSION_SHADOW_SUPPORTS);
if( strcmp("-pipe",argv[1]) == 0 ) {
bogus_capability = argv[2];
cluster = argv[3];
proc = argv[4];
// read the big comment in the function for why this is here.
RemoveNewShadowDroppings(cluster, proc);
pipe_setup( cluster, proc, bogus_capability );
} else {
schedd = argv[1];
host = argv[2];
bogus_capability = argv[3];
cluster = argv[4];
proc = argv[5];
if ( argc > 6 ) {
IpcFile = argv[6];
dprintf(D_FULLDEBUG,"Setting IpcFile to %s\n",IpcFile);
} else {
IpcFile = NULL;
}
// read the big comment in the function for why this is here.
RemoveNewShadowDroppings(cluster, proc);
regular_setup( host, cluster, proc );
}
scheddName = getenv( EnvGetName( ENV_SCHEDD_NAME ) );
#if 0
/* Don't want to share log file lock between child and pnarent */
(void)close( LockFd );
LockFd = -1;
#endif
// initialize the user log
initializeUserLog();
My_Filesystem_Domain = param( "FILESYSTEM_DOMAIN" );
dprintf( D_ALWAYS, "My_Filesystem_Domain = \"%s\"\n",
My_Filesystem_Domain );
My_UID_Domain = param( "UID_DOMAIN" );
dprintf( D_ALWAYS, "My_UID_Domain = \"%s\"\n", My_UID_Domain );
UseAFS = param_boolean_crufty( "USE_AFS", false ) ? TRUE : FALSE;
UseNFS = param_boolean_crufty( "USE_NFS", false ) ? TRUE : FALSE;
// if job specifies a checkpoint server host, this overrides
// the config file parameters
tmp = NULL;
if (JobAd->LookupString(ATTR_CKPT_SERVER, &tmp) == 1) {
if (CkptServerHost) free(CkptServerHost);
UseCkptServer = TRUE;
CkptServerHost = strdup(tmp);
StarterChoosesCkptServer = FALSE;
free(tmp);
} else {
free(tmp);
if (CkptServerHost) {
free(CkptServerHost);
}
CkptServerHost = param( "CKPT_SERVER_HOST" );
UseCkptServer = FALSE;
if( CkptServerHost && param_boolean_crufty( "USE_CKPT_SERVER", true ) ) {
UseCkptServer = TRUE;
}
StarterChoosesCkptServer =
param_boolean_crufty("STARTER_CHOOSES_CKPT_SERVER", true) ? TRUE : FALSE;
}
// Initialize location of our checkpoint file. If we stored it
// on a checkpoint server then set LastCkptServer. Otherwise,
// LastCkptServer should be NULL to indicate that we should
// look on the local disk for our checkpoint file.
LastCkptServer = NULL;
if (JobAd->LookupString(ATTR_LAST_CKPT_SERVER,
&LastCkptServer) == 0) {
free(LastCkptServer);
LastCkptServer = NULL;
}
// LIGO
if (param_boolean("ALWAYS_USE_LOCAL_CKPT_SERVER", false)) {
if (LastCkptServer) {
char *remoteHost = NULL;
JobAd->LookupString(ATTR_REMOTE_HOST, &remoteHost);
char *machineName = strrchr(remoteHost, '@');
if (machineName == NULL) {
machineName = remoteHost;
} else {
machineName++;
}
LastCkptServer = strdup(machineName);
CkptServerHost = strdup(machineName);
dprintf(D_ALWAYS, "ALWAYS_USE_LOCAL_CKPT_SERVER is true, forcing LastCkptServer to %s\n", LastCkptServer);
} else {
dprintf(D_ALWAYS, "ALWAYS_USE_LOCAL_CKPT_SERVER is true, but checkpoint is not on server, restoring file local file\n");
}
}
MaxDiscardedRunTime = param_integer( "MAX_DISCARDED_RUN_TIME", 3600 );
CompressPeriodicCkpt = param_boolean( "COMPRESS_PERIODIC_CKPT", false );
PeriodicSync = param_boolean( "PERIODIC_MEMORY_SYNC", false );
CompressVacateCkpt = param_boolean( "COMPRESS_VACATE_CKPT", false );
SlowCkptSpeed = param_integer( "SLOW_CKPT_SPEED", 0 );
// Install signal handlers such that all signals are blocked when inside
// the handler.
sigset_t fullset;
sigfillset(&fullset);
install_sig_handler_with_mask( SIGCHLD,&fullset, reaper );
// SIGUSR1 is sent by the schedd when a job is removed with
// condor_rm.
install_sig_handler_with_mask( SIGUSR1, &fullset, handle_sigusr1 );
// SIGQUIT is sent for a fast shutdow.
install_sig_handler_with_mask( SIGQUIT, &fullset, handle_sigquit );
// SIGTERM is sent for a graceful shutdow.
install_sig_handler_with_mask( SIGTERM, &fullset, handle_sigterm );
/* Here we block the async signals. We do this mainly because on HPUX,
* XDR wigs out if it is interrupted by a signal. We do it on all
* platforms because it seems like a safe idea. We unblock the signals
* during before select(), which is where we spend most of our time. */
block_signal(SIGCHLD);
block_signal(SIGUSR1);
/* If the completed job had been committed to the job queue,
but for some reason the shadow exited wierdly and the
schedd is trying to run it again, then simply write
the job termination events and send the email as if the job had
just ended. */
if (terminate_is_pending() == TRUE) {
/* This function will exit()! */
handle_terminate_pending();
}
HandleSyscalls();
Wrapup();
/* HACK! WHOOO!!!!! Throw the old shadow away already! */
/* This will figure out whether or not the job should go on hold AFTER the
job has exited for whatever reason, or if the job should be allowed
to exit. It modifies ExitReason approriately for job holding, or, get
this, just EXCEPTs if the jobs is supposed to go into idle state and
not leave. :) */
/* Small change by Todd : only check the static policy if the job really
exited of its own accord -- we don't want to even evaluate the static
policy if the job exited because it was preempted, for instance */
if (check_static_policy &&
(ExitReason == JOB_EXITED || ExitReason == JOB_KILLED
|| ExitReason == JOB_COREDUMPED))
{
static_policy();
}
if( My_UID_Domain ) {
free( My_UID_Domain );
}
if( My_Filesystem_Domain ) {
free( My_Filesystem_Domain );
}
if(FILEObj) {
delete FILEObj;
}
dprintf( D_ALWAYS, "********** Shadow Exiting(%d) **********\n",
ExitReason );
exit( ExitReason );
}
int
main( int argc, char ** const argv )
{
#ifndef WIN32
/* Add the signals we want unblocked into sigSet */
sigset_t sigSet;
struct sigaction act;
sigemptyset( &sigSet );
sigaddset(&sigSet,SIGTERM);
sigaddset(&sigSet,SIGQUIT);
sigaddset(&sigSet,SIGPIPE);
/* Set signal handlers */
sigemptyset(&act.sa_mask); /* do not block anything in handler */
act.sa_flags = 0;
/* Signals which should cause us to exit with status = signum */
act.sa_handler = quit_on_signal;
sigaction(SIGTERM,&act,0);
sigaction(SIGQUIT,&act,0);
sigaction(SIGPIPE,&act,0);
/* Unblock signals in our set */
sigprocmask( SIG_UNBLOCK, &sigSet, NULL );
#endif
set_mySubSystem("AMAZON_GAHP", SUBSYSTEM_TYPE_GAHP);
int min_workers = MIN_NUMBER_WORKERS;
int max_workers = -1;
const char * dprintfName = "EC2_GAHP";
int c = 0;
while ( (c = my_getopt(argc, argv, "l:f:d:w:m:" )) != -1 ) {
switch(c) {
case 'l':
if( my_optarg && *my_optarg ) {
dprintfName = my_optarg;
}
break;
case 'f':
break;
case 'd':
// Debug Level
if( my_optarg && *my_optarg ) {
set_debug_flags(my_optarg, 0);
}
break;
case 'w':
// Minimum number of worker pools
min_workers = atoi(my_optarg);
if( min_workers < MIN_NUMBER_WORKERS ) {
min_workers = MIN_NUMBER_WORKERS;
}
break;
case 'm':
// Maximum number of worker pools
max_workers = atoi(my_optarg);
if( max_workers <= 0 ) {
max_workers = -1;
}
break;
default:
usage();
}
}
config();
dprintf_config( dprintfName );
const char * debug_string = getenv( "DebugLevel" );
if( debug_string && * debug_string ) {
set_debug_flags( debug_string, 0 );
}
dprintf(D_FULLDEBUG, "Welcome to the EC2 GAHP\n");
const char *buff;
//Try to read env for amazon_http_proxy
buff = getenv(AMAZON_HTTP_PROXY);
if( buff && *buff ) {
set_amazon_proxy_server(buff);
dprintf(D_ALWAYS, "Using http proxy = %s\n", buff);
}
// Register all amazon commands
if( registerAllAmazonCommands() == false ) {
dprintf(D_ALWAYS, "Can't register Amazon Commands\n");
exit(1);
}
// Create IOProcess class
ioprocess = new IOProcess;
ASSERT(ioprocess);
if( ioprocess->startUp(REQUEST_INBOX, min_workers, max_workers) == false ) {
dprintf(D_ALWAYS, "Failed to start IO Process\n");
delete ioprocess;
exit(1);
}
// Print out the GAHP version to the screen
// now we're ready to roll
printf ("%s\n", version);
fflush(stdout);
dprintf( D_ALWAYS, "EC2 GAHP initialized\n" );
/* Our main thread should grab the mutex first. We will then
* release it and let other threads run when we would otherwise
* block.
*/
amazon_gahp_grab_big_mutex();
for(;;) {
ioprocess->stdinPipeHandler();
}
return 0;
}
int
main(int argc, const char **argv)
{
set_debug_flags(NULL, D_ALWAYS);
param_functions *p_funcs = NULL;
set_mySubSystem( "TEST_LOG_READER_STATE", SUBSYSTEM_TYPE_TOOL );
// initialize to read from config file
myDistro->Init( argc, argv );
config();
// Set up the dprintf stuff...
p_funcs = get_param_functions();
dprintf_config("TEST_LOG_READER_STATE", p_funcs);
Options opts;
if ( CheckArgs( argc, argv, opts ) < 0 ) {
fprintf( stderr, "CheckArgs() failed\n" );
exit( 1 );
}
ReadUserLog::FileState state;
if ( opts.needStateFile() && ( ReadState( opts, state ) < 0 ) ) {
fprintf( stderr, "ReadState() failed\n" );
exit( 1 );
}
ReadUserLog::FileState state2;
if ( opts.needStateFile2() && ( ReadState( opts, state2 ) < 0 ) ) {
fprintf( stderr, "ReadState() failed\n" );
exit( 1 );
}
int status = 0;
switch( opts.getCommand() )
{
case CMD_NONE:
status = -1;
break;
case CMD_LIST:
opts.dumpFieldList( );
break;
case CMD_DUMP:
status = DumpState( opts, state );
break;
case CMD_DIFF:
status = DiffState( opts, state, state2 );
break;
case CMD_ACCESS:
status = CheckStateAccess( opts, state );
break;
case CMD_VERIFY:
status = VerifyState( opts, state );
break;
}
if ( status == 0 ) {
exit( 0 );
} else {
exit( 2 );
}
}
int
main( int argc, char* argv[] )
{
int i;
param_functions *p_funcs = NULL;
set_mySubSystem( "DAEMON-TOOL", SUBSYSTEM_TYPE_TOOL );
MyName = argv[0];
myDistro->Init( argc, argv );
FILE *input_fp = stdin;
for( i=1; i<argc; i++ ) {
if( match_prefix( argv[i], "-daemontype" ) ) {
if( argv[i + 1] ) {
get_mySubSystem()->setName( argv[++i] );
get_mySubSystem()->setTypeFromName( );
} else {
usage();
}
} else if( match_prefix( argv[i], "-debug" ) ) {
// dprintf to console
Termlog = 1;
p_funcs = get_param_functions();
dprintf_config( "DAEMON-TOOL", p_funcs );
set_debug_flags(NULL, D_FULLDEBUG|D_SECURITY);
} else if( match_prefix( argv[i], "-" ) ) {
usage();
} else {
usage();
}
}
// If we didn't get told what subsystem we should use, set it
// to "TOOL".
if( !get_mySubSystem()->isNameValid() ) {
get_mySubSystem()->setName( "DAEMON-TOOL" );
}
config( 0, true );
IpVerify ipverify;
MyString line;
while( line.readLine(input_fp) ) {
line.chomp();
if( line.IsEmpty() || line[0] == '#' ) {
printf("%s\n",line.Value());
continue;
}
StringList fields(line.Value()," ");
fields.rewind();
char const *perm_str = fields.next();
char const *fqu = fields.next();
char const *ip = fields.next();
char const *expected = fields.next();
MyString sin_str = generate_sinful(ip, 0);
condor_sockaddr addr;
if( !addr.from_sinful(sin_str) ) {
fprintf(stderr,"Invalid ip address: %s\n",ip);
exit(1);
}
DCpermission perm = StringToDCpermission(perm_str);
if( perm == LAST_PERM ) {
fprintf(stderr,"Invalid permission level: %s\n",perm_str);
exit(1);
}
if( strcmp(fqu,"*") == 0 ) {
fqu = "";
}
char const *result;
MyString reason;
if( ipverify.Verify(perm,addr,fqu,&reason,&reason) != USER_AUTH_SUCCESS ) {
result = "DENIED";
}
else {
result = "ALLOWED";
}
if( expected && strcasecmp(expected,result) != 0 ) {
printf("Got wrong result '%s' for '%s': reason: %s!\n",
result,line.Value(),reason.Value());
printf("Aborting.\n");
exit(1);
}
if( expected ) {
printf("%s\n",line.Value());
}
else {
printf("%s %s\n",line.Value(),result);
}
}
}