static void WakeKernel(IOHibernateImageHeader * header)
{
uint32_t proc;
unsigned long cnt, newSP;
unsigned long *src, *dst;
unsigned int count;
unsigned int page;
unsigned int compressedSize;
int32_t byteCnt;
u_int32_t lowHalf, highHalf;
u_int32_t sum;
printf("\nWake Kernel!\n");
dst = (unsigned long *) (header->restore1CodePage << 12);
count = header->restore1PageCount;
proc = (header->restore1CodeOffset + ((uint32_t) dst));
newSP = header->restore1StackOffset + (header->restore1CodePage << 12);
src = (unsigned long *) (((u_int32_t) &header->fileExtentMap[0])
+ header->fileExtentMapSize);
sum = 0;
for (page = 0; page < count; page++)
{
compressedSize = 4096;
lowHalf = 1;
highHalf = 0;
for (cnt = 0; cnt < compressedSize; cnt += 0x20) {
dst[0] = src[0];
dst[1] = src[1];
dst[2] = src[2];
dst[3] = src[3];
dst[4] = src[4];
dst[5] = src[5];
dst[6] = src[6];
dst[7] = src[7];
for (byteCnt = 0; byteCnt < 0x20; byteCnt++) {
lowHalf += ((u_int8_t *) dst)[byteCnt];
highHalf += lowHalf;
}
src += 8;
dst += 8;
}
lowHalf %= 65521L;
highHalf %= 65521L;
sum += (highHalf << 16) | lowHalf;
}
header->actualRestore1Sum = sum;
startprog (proc, header);
return;
}
static int ExecKernel(void *binary)
{
entry_t kernelEntry;
int ret;
bootArgs->kaddr = bootArgs->ksize = 0;
ret = DecodeKernel(binary, &kernelEntry, (char **)&bootArgs->kaddr, (int *)&bootArgs->ksize);
if (ret != 0) {
return ret;
}
// Reserve space for boot args
reserveKernBootStruct();
// Load boot drivers from the specifed root path.
if (!gHaveKernelCache) {
LoadDrivers("/");
}
clearActivityIndicator();
if (gErrors) {
printf("Errors encountered while starting up the computer.\n");
printf("Pausing %d seconds...\n", kBootErrorTimeout);
sleep(kBootErrorTimeout);
}
setupFakeEfi();
verbose("Starting Darwin %s\n",( archCpuType == CPU_TYPE_I386 ) ? "x86" : "x86_64");
bool dummyVal;
if (getBoolForKey(kWaitForKeypressKey, &dummyVal, &bootInfo->bootConfig) && dummyVal) {
printf("Press any key to continue...");
getc();
}
// If we were in text mode, switch to graphics mode.
// This will draw the boot graphics unless we are in
// verbose mode.
if (gVerboseMode) {
setVideoMode(GRAPHICS_MODE, 1);
} else {
drawBootGraphics();
}
finalizeBootStruct();
// Jump to kernel's entry point. There's no going back now.
startprog(kernelEntry, bootArgs);
// Not reached
return 0;
}
void bsdboot(int drive, long loadflags, char *kernel)
{
long hmaddress, size, bootdev;
/***************************************************************\
* As a default set it to the first partition of the first *
* floppy or hard drive *
\***************************************************************/
part = unit = 0;
maj = (drive&0x80 ? 0 : 2); /* a good first bet */
if (openrd(kernel)) {
printf("Can't find %s\n", kernel);
exit(0);
}
hmaddress = loadprog(&size);
bootdev = MAKEBOOTDEV(maj, (slice >> 4), slice & 0xf, unit, part);
startprog(hmaddress, size, ((long)startaddr & 0xffffffl),
loadflags | RB_BOOTINFO, bootdev);
}
static int ExecKernel(void *binary)
{
int ret;
entry_t kernelEntry;
bootArgs->kaddr = bootArgs->ksize = 0;
execute_hook("ExecKernel", (void*)binary, NULL, NULL, NULL);
ret = DecodeKernel(binary,
&kernelEntry,
(char **) &bootArgs->kaddr,
(int *)&bootArgs->ksize );
if ( ret != 0 )
return ret;
// Reserve space for boot args
reserveKernBootStruct();
// Notify modules that the kernel has been decoded
execute_hook("DecodedKernel", (void*)binary, (void*)bootArgs->kaddr, (void*)bootArgs->ksize, NULL);
setupFakeEfi();
// Load boot drivers from the specifed root path.
//if (!gHaveKernelCache)
LoadDrivers("/");
execute_hook("DriversLoaded", (void*)binary, NULL, NULL, NULL);
clearActivityIndicator();
if (gErrors) {
printf("Errors encountered while starting up the computer.\n");
printf("Pausing %d seconds...\n", kBootErrorTimeout);
sleep(kBootErrorTimeout);
}
md0Ramdisk();
// Cleanup the PXE base code.
if ( (gBootFileType == kNetworkDeviceType) && gUnloadPXEOnExit ) {
if ( (ret = nbpUnloadBaseCode()) != nbpStatusSuccess ) {
printf("nbpUnloadBaseCode error %d\n", (int) ret);
sleep(2);
}
}
bool dummyVal;
if (getBoolForKey(kWaitForKeypressKey, &dummyVal, &bootInfo->chameleonConfig) && dummyVal) {
showTextBuffer(msgbuf, strlen(msgbuf));
}
usb_loop();
// If we were in text mode, switch to graphics mode.
// This will draw the boot graphics unless we are in
// verbose mode.
if (gVerboseMode) {
setVideoMode( GRAPHICS_MODE, 0 );
} else {
drawBootGraphics();
}
DBG("Starting Darwin/%s [%s]\n",( archCpuType == CPU_TYPE_I386 ) ? "x86" : "x86_64", gDarwinBuildVerStr);
DBG("Boot Args: %s\n", bootArgs->CommandLine);
setupBooterLog();
finalizeBootStruct();
// Jump to kernel's entry point. There's no going back now.
if ((checkOSVersion("10.7")) || (checkOSVersion("10.8")) || (checkOSVersion("10.9")))
{
// Notify modules that the kernel is about to be started
execute_hook("Kernel Start", (void*)kernelEntry, (void*)bootArgs, NULL, NULL);
// Masking out so that Lion doesn't doublefault
outb(0x21, 0xff); /* Maskout all interrupts Pic1 */
outb(0xa1, 0xff); /* Maskout all interrupts Pic2 */
startprog( kernelEntry, bootArgs );
} else {
// Notify modules that the kernel is about to be started
execute_hook("Kernel Start", (void*)kernelEntry, (void*)bootArgsPreLion, NULL, NULL);
startprog( kernelEntry, bootArgsPreLion );
}
// Not reached
return 0;
}
void
boot(int drive)
{
int addr;
int top;
int kern_entry;
int boot_start;
int boot_region_desc;
int boot_thread_state;
unsigned int size;
int env_start;
int env_size = 0;
char *p;
char *env = 0;
char *defaults = 0;
int defaults_size = 0;
int i;
int idt[2];
delayprompt = 10; /* default to 10s at the prompt */
switch(drive) {
case BIOS_DEV_FLOPPY:
dev = DEV_FLOPPY;
break;
case BIOS_FAKE_WD:
dev = DEV_WD;
break;
case BIOS_DEV_WIN:
default:
dev = DEV_HD;
break;
}
cnvmem = memsize(0);
extmem = memsize(1);
printf("\n>> Secondary Mach boot %s\n>> %d/%dk (? for help, ^C for intr)\n",
VERSIONDATE, cnvmem, extmem);
#ifdef DEBUG
printf("end x%x data 0x%x\n",end,edata);
#endif
/* sanity check: */
if ((int)end > KALLOC_OFFSET || (int)end > (BOOTSTACK-0x300)) {
printf("Size problem: 0x%x > 0x%x\n",end,
((int)end > KALLOC_OFFSET)?KALLOC_OFFSET:BOOTSTACK-0x300);
}
#if DEBUG
if (debug) {
printf("dev = %x\n", dev);
printf("unit = %x\n", unit);
printf("part = %x\n", part);
}
#endif
#if 0
dev = DEV_HD;
unit = 0;
part = 0;
#endif
reset_pic(); /* Lilo breaks PIC, BIOS disk ints fail */
calibrate_delay(); /* adjust delay for i/o operation */
gateA20();
if (dev == DEV_FLOPPY && devfs()) {
printf("No fd FS, using hd\n");
dev = DEV_HD;
part = 0;
}
bcopy(MACH_KERNEL, kern_prog.name, sizeof(MACH_KERNEL));
bcopy(BOOTSTRAP, boot_prog.name, sizeof(BOOTSTRAP));
bcopy(MACH_BOOT_ENV, env_prog.name, sizeof(MACH_BOOT_ENV));
reload_env_file:
if (openrd(env_prog.name, NULL) == 0 && fsize() != 0) {
const char *value;
/*
* Read mach_boot environment file if exists
*/
printf("Reading defaults from %s:\n",env_prog.name);
defaults_size = fsize()+1;
if (defaults != (char *)0)
free(defaults);
defaults = (char *)malloc(defaults_size);
read(defaults, defaults_size-1);
*(defaults+defaults_size-1) = 0;
printf("%s", defaults);
for (p = defaults; p < defaults + defaults_size; p++)
if (*p == '\n')
*p = '\0';
value = get_env("CONSOLE", defaults, defaults_size);
if (strcmp(value, "vga") == 0 || strcmp(value, "VGA") == 0)
com_enabled = 0;
/* WARNING: do not enable the remote console based
* on the latter argument in an environment file, since
* now, remote console enabling is decided by the primary
* boot ONLY and passed along through secondary's.
*/
if (*get_env("PROMPT", defaults, defaults_size) == '1')
prompt = 1;
if (com_enabled &&
(value = get_env("COM1_SETUP", defaults, defaults_size)))
com_setup(value);
if (value = get_env("DELAYPROMPT", defaults, defaults_size)) {
delayprompt = atoi(value);
/* don't allow stupid values */
if (delayprompt < 3)
delayprompt = 3;
}
}
for (;;) {
if ((!getbootline(kern_prog.name, boot_prog.name)) && defaults ) {
/*
* Get defaults from /mach_boot.env if any.
*/
const char *value;
if (value = get_env("KERNEL_NAME",
defaults, defaults_size)) {
strcpy(kern_prog.name, (char *)value);
strcpy(kern_prog.args, (char *)value);
kern_prog.args_size = strlen(value)+1;
}
if (value = get_env("KERNEL_ARGS",
defaults, defaults_size)) {
char *args;
args = kern_prog.args + kern_prog.args_size;
while (*value)
value = copyargs((char *)value, &args);
kern_prog.args_size = args - kern_prog.args;
}
if (value = get_env("BOOTSTRAP_NAME",
defaults, defaults_size)) {
strcpy(boot_prog.name, (char *)value);
strcpy(boot_prog.args, (char *)value);
boot_prog.args_size = strlen(value)+1;
}
if (value = get_env("BOOTSTRAP_ARGS",
defaults, defaults_size)) {
char *args;
args = boot_prog.args + boot_prog.args_size;
while (*value)
value = copyargs((char *)value, &args);
boot_prog.args_size = args - boot_prog.args;
}
}
if (cons_is_com) {
printf("console is COM1\n");
/* check if we already enabled remote console? */
p = kern_prog.args + kern_prog.args_size;
*p++ = '-';
*p++ = 'r';
*p++ = 0;
kern_prog.args_size += 3;
}
addr = KERNEL_BOOT_ADDR;
if (loadtext(&addr, &kern_prog)) {
strcpy(env_prog.name, kern_prog.name);
goto reload_env_file;
} else if (loadprog(&addr, &kern_prog)) {
printf("Can't load %s\n", kern_prog.name);
usage();
continue;
}
kern_entry = entry;
if (dev == DEV_WD)
net_get_root_device();
env_start = addr;
if (openrd("/mach_servers/environment", NULL) == 0 &&
fsize() != 0) {
unsigned int total = fsize()+1;
printf("Loading environment from /mach_servers/environment\n");
env = (char *)malloc(total);
read(env, total-1);
*(env+total-1) = 0;
for (p = env; p < env + total; p++)
if (*p == '\n')
*p = '\0';
pcpy(env, (void *)addr, total);
addr += total;
env_size += total;
free(env);
}
env = (char *)malloc(BOOT_LINE_LENGTH);
#if BOOT_ENV_COMPAT
/* should go away when all kernels are converted
to use BOOT_DEVICE */
p = env;
strcpy(p, "BOOTOFFSET=");
p = itoa(p + strlen(p), boff) + 1;
strcpy(p, "BOOTDEV=hd");
p += strlen(p)+1;
*(p-3) = dev;
strcpy(p, "BOOTUNIT=");
p = itoa(p + strlen(p), unit) + 1;
strcpy(p, "BOOTPART=");
p = itoa(p + strlen(p), part) + 1;
size = p - env;
pcpy(env, (void *)addr, size);
addr += size;
env_size += size;
#endif /* BOOT_ENV_COMPAT */
p = env;
strcpy(p, "BOOT_DEVICE=hd");
p += strlen(p);
*(p-2) = dev;
p = itoa(p, unit);
*p++ = 'a'+part;
size = p - env;
pcpy(env, (void *)addr, size);
addr += size;
env_size += size;
free(env);
if (strncmp("none",boot_prog.name,sizeof("none"))==0
||strncmp("null",boot_prog.name,sizeof("null"))==0) {
boot_start = 0;
boot_region_desc = 0;
boot_prog.sym_start = 0;
boot_prog.sym_size = 0;
boot_prog.args_start = 0;
boot_prog.args_size = 0;
region_count = 0;
boot_thread_state = 0;
top = page_align(addr);
goto boot_kernel_only;
}
boot_start = addr = page_align(addr);
if (loadprog(&addr, &boot_prog)) {
printf("Can't load %s\n", boot_prog.name);
usage();
continue;
}
boot_region_desc = addr;
addr = boot_region_desc + (region_count * sizeof(regions[0]));
pcpy(regions, (void *) boot_region_desc,
addr - boot_region_desc);
boot_thread_state = addr;
addr += sizeof(thread_state);
pcpy(&thread_state, (void *) boot_thread_state,
addr - boot_thread_state);
top = page_align(addr);
boot_kernel_only:
#ifdef DEBUG
if (debug) {
printf("startprog(\n");
printf(" entry 0x%x,\n", kern_entry);
printf(" -1,\n");
printf(" extmem 0x%x,\n", extmem);
printf(" cnvmem 0x%x,\n", cnvmem);
printf(" kern_sym_start 0x%x,\n",
kern_prog.sym_start);
printf(" kern_sym_size 0x%x,\n",
kern_prog.sym_size);
printf(" kern_args_start 0x%x,\n",
kern_prog.args_start);
printf(" kern_args_size 0x%x,\n",
kern_prog.args_size);
for (p = kern_prog.args;
p < &kern_prog.args[kern_prog.args_size];
p += strlen(p)+1)
printf("<%s>", p);
printf("\n");
printf(" boot_sym_start 0x%x,\n",
boot_prog.sym_start);
printf(" boot_sym_size 0x%x,\n",
boot_prog.sym_size);
printf(" boot_args_start 0x%x,\n",
boot_prog.args_start);
printf(" boot_args_size 0x%x,\n",
boot_prog.args_size);
for (p = boot_prog.args;
p < &boot_prog.args[boot_prog.args_size];
p += strlen(p)+1)
printf("<%s>", p);
printf("\n");
printf(" boot_start 0x%x,\n", boot_start);
printf(" boot_size 0x%x,\n",
boot_prog.sym_start - boot_start);
printf(" boot_region_desc 0x%x,\n",
boot_region_desc);
printf(" boot_region_count 0x%x,\n", region_count);
printf(" boot_thread_state_flavor %d,\n",
THREAD_SYSCALL_STATE);
printf(" boot_thread_state 0x%x (eip 0x%x, esp 0x%x),\n",
boot_thread_state,
thread_state.eip, thread_state.esp);
printf(" boot_thread_state_count %d,\n",
(int) i386_THREAD_SYSCALL_STATE_COUNT);
printf(" env_start 0x%x,\n", env_start);
printf(" env_size 0x%x,\n", env_size);
printf(" top 0x%x)\n", (int) top);
getchar();
continue;
}
#endif /* DEBUG */
/*
* New calling convention
*
* %esp -> -1
* size of extended memory (K)
* size of conventional memory (K)
* kern_sym_start
* kern_sym_size
* kern_args_start
* kern_args_size
* boot_sym_start
* boot_sym_size
* boot_args_start
* boot_args_size
* boot_start
* boot_size
* boot_region_desc
* boot_region_count
* boot_thread_state_flavor
* boot_thread_state
* boot_thread_state_count
* env_start
* env_size
* top of loaded memory
*/
startprog(
kern_entry,
-1,
extmem, cnvmem,
kern_prog.sym_start, kern_prog.sym_size,
kern_prog.args_start, kern_prog.args_size,
boot_prog.sym_start, boot_prog.sym_size,
boot_prog.args_start, boot_prog.args_size,
boot_start, boot_prog.sym_start - boot_start,
boot_region_desc, region_count,
THREAD_SYSCALL_STATE, boot_thread_state,
i386_THREAD_SYSCALL_STATE_COUNT,
env_start, env_size,
top);
}
}
int
exec_netbsd(const char *file, physaddr_t loadaddr, int boothowto, int floppy,
void (*callback)(void))
{
u_long boot_argv[BOOT_NARGS];
u_long marks[MARK_MAX];
struct btinfo_symtab btinfo_symtab;
u_long extmem;
u_long basemem;
#ifdef DEBUG
printf("exec: file=%s loadaddr=0x%lx\n",
file ? file : "NULL", loadaddr);
#endif
BI_ALLOC(32); /* ??? */
BI_ADD(&btinfo_console, BTINFO_CONSOLE, sizeof(struct btinfo_console));
howto = boothowto;
if (common_load_kernel(file, &basemem, &extmem, loadaddr, floppy, marks))
goto out;
boot_argv[0] = boothowto;
boot_argv[1] = 0;
boot_argv[2] = vtophys(bootinfo); /* old cyl offset */
boot_argv[3] = marks[MARK_END];
boot_argv[4] = extmem;
boot_argv[5] = basemem;
/* pull in any modules if necessary */
if (boot_modules_enabled) {
module_init(file);
if (btinfo_modulelist) {
BI_ADD(btinfo_modulelist, BTINFO_MODULELIST,
btinfo_modulelist_size);
}
}
userconf_init();
if (btinfo_userconfcommands != NULL)
BI_ADD(btinfo_userconfcommands, BTINFO_USERCONFCOMMANDS,
btinfo_userconfcommands_size);
#ifdef DEBUG
printf("Start @ 0x%lx [%ld=0x%lx-0x%lx]...\n", marks[MARK_ENTRY],
marks[MARK_NSYM], marks[MARK_SYM], marks[MARK_END]);
#endif
btinfo_symtab.nsym = marks[MARK_NSYM];
btinfo_symtab.ssym = marks[MARK_SYM];
btinfo_symtab.esym = marks[MARK_END];
BI_ADD(&btinfo_symtab, BTINFO_SYMTAB, sizeof(struct btinfo_symtab));
/* set new video mode if necessary */
vbe_commit();
BI_ADD(&btinfo_framebuffer, BTINFO_FRAMEBUFFER,
sizeof(struct btinfo_framebuffer));
if (callback != NULL)
(*callback)();
startprog(marks[MARK_ENTRY], BOOT_NARGS, boot_argv,
x86_trunc_page(basemem*1024));
panic("exec returned");
out:
BI_FREE();
bootinfo = 0;
return -1;
}
static int ExecKernel(void *binary)
{
entry_t kernelEntry;
int ret;
#ifdef APM_SUPPORT
BOOL apm;
#endif /* APM_SUPPORT */
BOOL bootGraphics;
bootArgs->kaddr = bootArgs->ksize = 0;
ret = DecodeKernel(binary,
&kernelEntry,
(char **) &bootArgs->kaddr,
&bootArgs->ksize );
if ( ret != 0 )
return ret;
// Reserve space for boot args
reserveKernBootStruct();
// Load boot drivers from the specifed root path.
if (!gHaveKernelCache) {
LoadDrivers("/");
}
clearActivityIndicator();
if (gErrors) {
printf("Errors encountered while starting up the computer.\n");
printf("Pausing %d seconds...\n", kBootErrorTimeout);
sleep(kBootErrorTimeout);
}
printf("Starting Darwin/x86");
turnOffFloppy();
#ifdef APM_SUPPORT
// Connect to APM BIOS.
if ( getBoolForKey("APM", &apm) && apm == YES )
{
if ( APMPresent() ) APMConnect32();
}
#endif /* APM_SUPPORT */
// Cleanup the PXE base code.
if ( (gBootFileType == kNetworkDeviceType) && gUnloadPXEOnExit ) {
if ( (ret = nbpUnloadBaseCode()) != nbpStatusSuccess )
{
printf("nbpUnloadBaseCode error %d\n", (int) ret);
sleep(2);
}
}
// Unless Boot Graphics = No, Always switch to graphics mode
// just before starting the kernel.
if (!getBoolForKey(kBootGraphicsKey, &bootGraphics)) {
bootGraphics = YES;
}
if (bootGraphics) {
if (bootArgs->graphicsMode == TEXT_MODE) {
// If we were in text mode, switch to graphics mode.
// This will draw the boot graphics.
setVideoMode( GRAPHICS_MODE );
} else {
// If we were already in graphics mode, clear the screen.
drawBootGraphics();
}
} else {
if (bootArgs->graphicsMode == GRAPHICS_MODE) {
setVideoMode( TEXT_MODE );
}
}
// Jump to kernel's entry point. There's no going back now.
startprog( kernelEntry, bootArgs );
// Not reached
return 0;
}
/*----------------------------------------------------------------------------*/
int
main(int argc, char **argv)
{
int heartbeat = 0;
int last_heartbeat = 0;
int latest_heartbeat = 0;
int ret = 0;
int delay = 0;
time_t now, last;
/* const char *cp; */
char err_str[MAX_STRING_SIZE];
char shadowd_pidfile[SGE_PATH_MAX];
dstring ds;
char buffer[256];
pid_t shadowd_pid;
#if 1
static int check_interval = CHECK_INTERVAL;
static int get_active_interval = GET_ACTIVE_INTERVAL;
static int delay_time = DELAY_TIME;
static int sge_test_heartbeat = 0;
char binpath[SGE_PATH_MAX];
char oldqmaster[SGE_PATH_MAX];
char shadow_err_file[SGE_PATH_MAX];
char qmaster_out_file[SGE_PATH_MAX];
#endif
lList *alp = NULL;
sge_gdi_ctx_class_t *ctx = NULL;
DENTER_MAIN(TOP_LAYER, "sge_shadowd");
sge_dstring_init(&ds, buffer, sizeof(buffer));
/* initialize recovery control variables */
{
char *s;
int val;
if ((s=getenv("SGE_CHECK_INTERVAL")) &&
sscanf(s, "%d", &val) == 1)
check_interval = val;
if ((s=getenv("SGE_GET_ACTIVE_INTERVAL")) &&
sscanf(s, "%d", &val) == 1)
get_active_interval = val;
if ((s=getenv("SGE_DELAY_TIME")) &&
sscanf(s, "%d", &val) == 1)
delay_time = val;
if ((s=getenv("SGE_TEST_HEARTBEAT_TIMEOUT")) &&
sscanf(s, "%d", &val) == 1)
sge_test_heartbeat = val;
}
/* This needs a better solution */
umask(022);
#ifdef __SGE_COMPILE_WITH_GETTEXT__
/* init language output for gettext() , it will use the right language */
sge_init_language_func((gettext_func_type) gettext,
(setlocale_func_type) setlocale,
(bindtextdomain_func_type) bindtextdomain,
(textdomain_func_type) textdomain);
sge_init_language(NULL,NULL);
#endif /* __SGE_COMPILE_WITH_GETTEXT__ */
log_state_set_log_file(TMP_ERR_FILE_SHADOWD);
if (sge_setup2(&ctx, SHADOWD, MAIN_THREAD, &alp, false) != AE_OK) {
answer_list_output(&alp);
SGE_EXIT((void**)&ctx, 1);
}
/* AA: TODO: change this */
ctx->set_exit_func(ctx, shadowd_exit_func);
sge_setup_sig_handlers(SHADOWD);
#if defined(SOLARIS)
/* Init shared SMF libs if necessary */
if (sge_smf_used() == 1 && sge_smf_init_libs() != 0) {
SGE_EXIT((void**)&ctx, 1);
}
#endif
if (ctx->get_qmaster_spool_dir(ctx) != NULL) {
char *shadowd_name = SGE_SHADOWD;
/* is there a running shadowd on this host (with unqualified name) */
sprintf(shadowd_pidfile, "%s/"SHADOWD_PID_FILE, ctx->get_qmaster_spool_dir(ctx),
ctx->get_unqualified_hostname(ctx));
DPRINTF(("pidfilename: %s\n", shadowd_pidfile));
if ((shadowd_pid = sge_readpid(shadowd_pidfile))) {
DPRINTF(("shadowd_pid: "sge_U32CFormat"\n", sge_u32c(shadowd_pid)));
if (!sge_checkprog(shadowd_pid, shadowd_name, PSCMD)) {
CRITICAL((SGE_EVENT, MSG_SHADOWD_FOUNDRUNNINGSHADOWDWITHPIDXNOTSTARTING_I, (int) shadowd_pid));
SGE_EXIT((void**)&ctx, 1);
}
}
ctx->prepare_enroll(ctx);
/* is there a running shadowd on this host (with aliased name) */
sprintf(shadowd_pidfile, "%s/"SHADOWD_PID_FILE, ctx->get_qmaster_spool_dir(ctx),
ctx->get_qualified_hostname(ctx));
DPRINTF(("pidfilename: %s\n", shadowd_pidfile));
if ((shadowd_pid = sge_readpid(shadowd_pidfile))) {
DPRINTF(("shadowd_pid: "sge_U32CFormat"\n", sge_u32c(shadowd_pid)));
if (!sge_checkprog(shadowd_pid, shadowd_name, PSCMD)) {
CRITICAL((SGE_EVENT, MSG_SHADOWD_FOUNDRUNNINGSHADOWDWITHPIDXNOTSTARTING_I, (int) shadowd_pid));
SGE_EXIT((void**)&ctx, 1);
}
}
} else {
ctx->prepare_enroll(ctx);
}
if (parse_cmdline_shadowd(argc, argv) == 1) {
SGE_EXIT((void**)&ctx, 0);
}
if (ctx->get_qmaster_spool_dir(ctx) == NULL) {
CRITICAL((SGE_EVENT, MSG_SHADOWD_CANTREADQMASTERSPOOLDIRFROMX_S, ctx->get_bootstrap_file(ctx)));
SGE_EXIT((void**)&ctx, 1);
}
if (chdir(ctx->get_qmaster_spool_dir(ctx))) {
CRITICAL((SGE_EVENT, MSG_SHADOWD_CANTCHANGETOQMASTERSPOOLDIRX_S, ctx->get_qmaster_spool_dir(ctx)));
SGE_EXIT((void**)&ctx, 1);
}
if (sge_set_admin_username(ctx->get_admin_user(ctx), err_str)) {
CRITICAL((SGE_EVENT, SFNMAX, err_str));
SGE_EXIT((void**)&ctx, 1);
}
if (sge_switch2admin_user()) {
CRITICAL((SGE_EVENT, SFNMAX, MSG_SHADOWD_CANTSWITCHTOADMIN_USER));
SGE_EXIT((void**)&ctx, 1);
}
sprintf(shadow_err_file, "messages_shadowd.%s", ctx->get_unqualified_hostname(ctx));
sprintf(qmaster_out_file, "messages_qmaster.%s", ctx->get_unqualified_hostname(ctx));
sge_copy_append(TMP_ERR_FILE_SHADOWD, shadow_err_file, SGE_MODE_APPEND);
unlink(TMP_ERR_FILE_SHADOWD);
log_state_set_log_as_admin_user(1);
log_state_set_log_file(shadow_err_file);
{
int* tmp_fd_array = NULL;
unsigned long tmp_fd_count = 0;
if (cl_com_set_handle_fds(cl_com_get_handle(prognames[SHADOWD] ,0), &tmp_fd_array, &tmp_fd_count) == CL_RETVAL_OK) {
sge_daemonize(tmp_fd_array, tmp_fd_count, ctx);
if (tmp_fd_array != NULL) {
sge_free(&tmp_fd_array);
}
} else {
sge_daemonize(NULL, 0, ctx);
}
}
/* shadowd pid file will contain aliased name */
sge_write_pid(shadowd_pidfile);
starting_up();
sge_setup_sig_handlers(SHADOWD);
last_heartbeat = get_qmaster_heartbeat(QMASTER_HEARTBEAT_FILE, 30);
last = (time_t) sge_get_gmt(); /* set time of last check time */
delay = 0;
while (!shut_me_down) {
sleep(check_interval);
/* get current heartbeat file content */
heartbeat = get_qmaster_heartbeat(QMASTER_HEARTBEAT_FILE, 30);
now = (time_t) sge_get_gmt();
/* Only check when we could read the heartbeat file at least two times
* (last_heartbeat and heartbeat) without error
*/
if (last_heartbeat > 0 && heartbeat > 0) {
/*
* OK we have to heartbeat entries to check. Check times ...
* now = current time
* last = last check time
*/
if ( (now - last) >= (get_active_interval + delay) ) {
delay = 0;
if (last_heartbeat == heartbeat) {
DPRINTF(("heartbeat not changed since seconds: "sge_U32CFormat"\n", sge_u32c(now - last)));
delay = delay_time; /* set delay time */
/*
* check if we are a possible new qmaster host (lock file of qmaster active, etc.)
*/
ret = check_if_valid_shadow(binpath, oldqmaster,
ctx->get_act_qmaster_file(ctx),
ctx->get_shadow_master_file(ctx),
ctx->get_qualified_hostname(ctx),
ctx->get_binary_path(ctx));
if (ret == 0) {
/* we can start a qmaster on this host */
if (qmaster_lock(QMASTER_LOCK_FILE)) {
ERROR((SGE_EVENT, SFNMAX, MSG_SHADOWD_FAILEDTOLOCKQMASTERSOMBODYWASFASTER));
} else {
int out, err;
/* still the old qmaster name in act_qmaster file and still the old heartbeat */
latest_heartbeat = get_qmaster_heartbeat( QMASTER_HEARTBEAT_FILE, 30);
/* TODO: what do we when there is a timeout ??? */
DPRINTF(("old qmaster name in act_qmaster and old heartbeat\n"));
if (!compare_qmaster_names(ctx->get_act_qmaster_file(ctx), oldqmaster) &&
!shadowd_is_old_master_enrolled(sge_test_heartbeat, sge_get_qmaster_port(NULL), oldqmaster) &&
(latest_heartbeat == heartbeat)) {
char qmaster_name[256];
strcpy(qmaster_name, SGE_PREFIX);
strcat(qmaster_name, prognames[QMASTER]);
DPRINTF(("qmaster_name: "SFN"\n", qmaster_name));
/*
* open logfile as admin user for initial qmaster/schedd
* startup messages
*/
out = SGE_OPEN3(qmaster_out_file, O_CREAT|O_WRONLY|O_APPEND,
0644);
err = out;
if (out == -1) {
/*
* First priority is the master restart
* => ignore this error
*/
out = 1;
err = 2;
}
sge_switch2start_user();
ret = startprog(out, err, NULL, binpath, qmaster_name, NULL);
sge_switch2admin_user();
if (ret) {
ERROR((SGE_EVENT, SFNMAX, MSG_SHADOWD_CANTSTARTQMASTER));
}
close(out);
} else {
qmaster_unlock(QMASTER_LOCK_FILE);
}
}
} else {
if (ret == -1) {
/* just log the more important failures */
WARNING((SGE_EVENT, MSG_SHADOWD_DELAYINGSHADOWFUNCFORXSECONDS_U, sge_u32c(delay) ));
}
}
}
/* Begin a new interval, set timers and hearbeat to current values */
last = now;
last_heartbeat = heartbeat;
}
} else {
if (last_heartbeat < 0 || heartbeat < 0) {
/* There was an error reading heartbeat or last_heartbeat */
DPRINTF(("can't read heartbeat file. last_heartbeat="sge_U32CFormat", heartbeat="sge_U32CFormat"\n",
sge_u32c(last_heartbeat), sge_u32c(heartbeat)));
} else {
DPRINTF(("have to read the heartbeat file twice to check time differences\n"));
}
}
}
sge_shutdown((void**)&ctx, 0);
DRETURN(EXIT_SUCCESS);
}
static int ExecKernel(void *binary)
{
entry_t kernelEntry;
int ret;
bootArgs->kaddr = bootArgs->ksize = 0;
execute_hook("ExecKernel", (void*)binary, NULL, NULL, NULL);
//Azi: gHaveKernelCache is set here
ret = DecodeKernel(binary,
&kernelEntry,
(char **) &bootArgs->kaddr,
(int *)&bootArgs->ksize );
if ( ret != 0 )
return ret;
// Reserve space for boot args
reserveKernBootStruct();
//Azi: ...
// Load boot drivers from the specifed root path,
// if we don't have a prelinked kernel - check load.c 43 & 264
if (!gHaveKernelCache) {
LoadDrivers("/");
}
clearActivityIndicator();
if (gErrors) {
printf("Errors encountered while starting up the computer.\n");
printf("Pausing %d seconds...\n", kBootErrorTimeout);
sleep(kBootErrorTimeout);
}
setupFakeEfi(); //Azi: check position on Mek (plkernel)
md0Ramdisk();
verbose("Starting Darwin %s\n",( archCpuType == CPU_TYPE_I386 ) ? "x86" : "x86_64");
// Cleanup the PXE base code.
if ( (gBootFileType == kNetworkDeviceType) && gUnloadPXEOnExit ) {
if ( (ret = nbpUnloadBaseCode()) != nbpStatusSuccess )
{
printf("nbpUnloadBaseCode error %d\n", (int) ret);
sleep(2);
}
}
bool dummyVal;
//Azi: Wait=y is breaking other keys when typed "after them" at boot prompt.
// Works properly if typed in first place or used on Boot.plist.
if (getBoolForKey(kWaitForKeypressKey, &dummyVal, &bootInfo->bootConfig) && dummyVal) {
printf("(Wait) "); // Add to trunk?? don't forget that puse uses printf, not verbose!!
pause();
}
usb_loop();
//autoresolution - Check if user disabled AutoResolution at the boot prompt.
// we can't check the plist here if we have AutoResolution=n there and we anabled it
// at boot prompt...?????
// getBoolForKey(kAutoResolutionKey, &gAutoResolution, &bootInfo->bootConfig);
finishAutoRes();
//Azi: closing Vbios after "if (gVerboseMode)" stuff eliminates the need for setting
// AutoResolution = true above; but creates another bug when booting in TextMode with -v arg.
// Simptoms include: staring some seconds at a nicely drawn white screen, after boot prompt.
// Think i'm just going to end up removing setting gAutoResolution = false
// on closeVbios().. the more i think, the less sense it makes doing it there!!
//autoresolution - end
// Notify modules that the kernel is about to be started
// testing...
if (gMacOSVersion[3] <= '6')
execute_hook("Kernel Start", (void*)kernelEntry, (void*)bootArgsPreLion, NULL, NULL);
else
execute_hook("Kernel Start", (void*)kernelEntry, (void*)bootArgs, NULL, NULL);
// If we were in text mode, switch to graphics mode.
// This will draw the boot graphics unless we are in
// verbose mode.
if(gVerboseMode)
setVideoMode( GRAPHICS_MODE, 0 );
else
drawBootGraphics();
setupBooterLog();
finalizeBootStruct();
//Azi: see asm.s LABEL(_disableIRQs)
// outb(0x21, 0xff);
// outb(0xa1, 0xff);
// Jump to kernel's entry point. There's no going back now.
if (gMacOSVersion[3] <= '6')
startprog( kernelEntry, bootArgsPreLion );
else
startprog( kernelEntry, bootArgs );
// Not reached
return 0;
}
