int main(int argc, char *argv[])
{
chdir(BBSHOME);
setuid(BBSUID);
setgid(BBSGID);
setreuid(BBSUID, BBSUID);
setregid(BBSGID, BBSGID);
#ifndef CYGWIN
#undef time
bbssettime(time(0));
sleep(1);
#define time(x) bbstime(x)
#endif
setpublicshmreadonly(0);
#ifndef CYGWIN
setpublicshmreadonly(1);
#endif
init_bbslog();
if (argc > 1) {
if (strcasecmp(argv[1], "killuser") == 0) {
//Added by Marvel
resolve_utmp();
if (resolve_ucache() != 0)
return -1;
return dokilluser();
}
if (strcasecmp(argv[1], "giveup") == 0) {
if (resolve_ucache() != 0)
return -1;
return doupdategiveupuser();
}
if (strcasecmp(argv[1], "allboards") == 0)
return dokillalldir();
if (strcasecmp(argv[1], "daemon") == 0)
return miscd_dodaemon(argv[1], argv[2]);
if (strcasecmp(argv[1], "killdir") == 0)
return dokilldir(argv[2]);
if (strcasecmp(argv[1], "flush") == 0) {
if (resolve_ucache() != 0)
return -1;
resolve_boards();
flushdata();
return 0;
}
return miscd_dodaemon(NULL, argv[1]);
}
printf("Usage : %s daemon: to run as a daemon (this is the most common use)\n", argv[0]);
printf(" %s killuser: to kill old users\n", argv[0]);
printf(" %s giveup: to unlock given-up users\n", argv[0]);
printf(" %s killdir <BOARDNAME>: to delete old file in <BOARDNAME>\n", argv[0]);
printf(" %s allboards: to delete old files in all boards\n", argv[0]);
printf(" %s flush: to synchronize .PASSWDS and .BOARDS to disk\n", argv[0]);
printf("That's all, folks. See doc/README.SYSOP for more details\n");
return 0;
}
static int miscd_dodaemon(char *argv1, char *daemon)
{
struct sigaction act;
char *commandline;
char commbuf[10];
char ch;
if (!check_file_writable(PASSFILE))
{
fprintf(stderr, "Error! File %s is not writable.\n", PASSFILE);
exit(-1);
}
if (!check_file_writable(BOARDS))
{
fprintf(stderr, "Error! File %s is not writable.\n", BOARDS);
exit(-1);
}
truncate(BOARDS, MAXBOARD * sizeof(struct boardheader));
if (load_ucache() != 0) {
printf("ft,load ucache error!");
exit(-1);
}
/* init tmpfs */
sprintf(genbuf1,"%s/home",TMPFSROOT);
mkdir(genbuf1,0700);
sprintf(genbuf1,"%s/boards",TMPFSROOT);
mkdir(genbuf1,0700);
for (ch='A';ch<='Z';ch++) {
sprintf(genbuf1,"%s/home/%c",TMPFSROOT,ch);
mkdir(genbuf1,0700);
}
resolve_boards();
resolve_utmp();
resolve_guest_table();
if (argv1 != NULL) {
switch (fork()) {
case -1:
printf("faint, i can't fork.\n");
exit(0);
break;
case 0:
break;
default:
exit(0);
break;
}
commandline = argv1;
} else {
commandline = commbuf;
}
setsid();
#if defined(FREEBSD) || defined(MACOSX)
setpgid(0, 0);
#else
// by zixia setpgrp(0, 0);
setpgrp();
#endif
#ifdef AIX
act.sa_handler = NULL;
act.sa_flags = SA_RESTART | SA_NOCLDWAIT;
sigaction(SIGCHLD, &act, NULL);
#else
act.sa_handler = reaper;
act.sa_flags = SA_RESTART;
sigaction(SIGCHLD, &act, NULL);
#endif
if (((daemon == NULL) || (!strcmp(daemon, "timed"))) && ((argv1 == NULL) || fork())) {
strcpy(commandline, "timed");
timed();
exit(0);
}
if (((daemon == NULL) || (!strcmp(daemon, "killd"))) && ((argv1 == NULL) || fork())) {
strcpy(commandline, "killd");
char line[20];
const char *path = "var/killd.pid";
int pidfd = open(path, O_RDWR | O_CREAT, 0660);
if (write_lock(pidfd, 0, SEEK_SET, 0) < 0) {
bbslog("3error", "killd had already been started!");
exit(-1);
}
snprintf(line, sizeof(line), "%ld\n", (long)getpid());
ftruncate(pidfd, 0);
write(pidfd, line, strlen(line));
while (1) {
time_t ft;
ft = getnextday4am();
do {
sleep(ft - time(0));
} while (ft > time(0));
if (argv1 == NULL) {
dokilluser();
//doupdategiveupuser();
} else {
switch (fork()) {
case -1:
bbslog("3error", "fork failed\n");
break;
case 0:
dokilluser();
//doupdategiveupuser();
exit(0);
break;
default:
break;
}
}
switch (fork()) {
case -1:
bbslog("3error", "fork failed\n");
break;
case 0:
dokillalldir();
exit(0);
break;
default:
break;
}
};
exit(0);
}
if (((daemon == NULL) || (!strcmp(daemon, "userd"))) && ((argv1 == NULL) || fork())) {
strcpy(commandline, "userd");
userd();
exit(0);
}
if ((daemon == NULL) || (!strcmp(daemon, "flushd"))) {
strcpy(commandline, "flushd");
flushd();
exit(0);
}
return 0;
}
