int
main(int argc, char **argv)
{
#ifndef AFS_PTHREAD_ENV
PROCESS pid;
#endif
setprogname(argv[0]);
#ifndef AFS_NT40_ENV
signal(SIGUSR1, sigusr1);
signal(SIGINT, sigint);
#endif
#ifndef AFS_PTHREAD_ENV
LWP_InitializeProcessSupport(LWP_NORMAL_PRIORITY, &pid);
#endif
memset(somebuf, 0, sizeof(somebuf));
if (argc >= 2 && strcmp(argv[1], "server") == 0)
rxperf_server(argc - 1, argv + 1);
else if (argc >= 2 && strcmp(argv[1], "client") == 0)
rxperf_client(argc - 1, argv + 1);
else
usage();
return 0;
}
/* intialize the whole system */
int
bnode_Init(void)
{
PROCESS junk;
afs_int32 code;
struct sigaction newaction;
static int initDone = 0;
if (initDone)
return 0;
initDone = 1;
memset(&bnode_stats, 0, sizeof(bnode_stats));
LWP_InitializeProcessSupport(1, &junk); /* just in case */
IOMGR_Initialize();
code = LWP_CreateProcess(bproc, BNODE_LWP_STACKSIZE,
/* priority */ 1, (void *) /* parm */ 0,
"bnode-manager", &bproc_pid);
if (code)
return code;
memset(&newaction, 0, sizeof(newaction));
newaction.sa_handler = bnode_Int;
code = sigaction(SIGCHLD, &newaction, NULL);
if (code)
return errno;
code = sigaction(SIGQUIT, &newaction, NULL);
if (code)
return errno;
code = sigaction(SIGTERM, &newaction, NULL);
if (code)
return errno;
return code;
}
void
rxi_InitializeThreadSupport(void)
{
PROCESS junk;
LWP_InitializeProcessSupport(LWP_NORMAL_PRIORITY, &junk);
IOMGR_Initialize();
FD_ZERO(&rx_selectMask);
}
int
main(int argc, char **argv)
{
ConnCacheEntry cce;
struct rx_connection conn;
struct rx_peer peer;
unsigned long number;
void *pe, *pe2;
PROCESS p;
LWP_InitializeProcessSupport(4, &p);
arla_loginit("/dev/stdout", 0);
cell_init(0, arla_log_method);
poller_init();
memset(&cce, 0, sizeof(cce));
memset(&conn, 0, sizeof(conn));
memset(&peer, 0, sizeof(peer));
conn.peer = &peer;
cce.connection = &conn;
printf("add\n");
number = 1000000;
while(number--) {
pe = poller_add_conn(&cce);
}
poller_remove(pe);
printf("add-remove\n");
number = 1000000;
while(number--) {
pe = poller_add_conn(&cce);
poller_remove(pe);
}
printf("add-add-remove-remove-remove\n");
pe = NULL;
number = 1000000;
while(number--) {
pe = poller_add_conn(&cce);
pe2 = poller_add_conn(&cce);
if (pe != pe2)
exit(-1);
poller_remove(pe);
poller_remove(pe2);
}
return 0;
}
afs_int32
init_krb_udp(void)
#endif
{
struct sockaddr_in taddr;
static PROCESS slPid; /* socket listener pid */
static PROCESS checkPid; /* fiveminute check */
afs_int32 code;
char *krb4name; /* kerberos version4 service */
#if MAIN
PROCESS junk;
#endif
struct servent *sp;
static int inited = 0;
afs_int32 kerb_port;
if (inited)
return -1;
inited = 1;
memset(&taddr, 0, sizeof(taddr));
krb4name = "kerberos4";
sp = getservbyname(krb4name, "udp");
taddr.sin_family = AF_INET; /* added for NCR port */
#ifdef STRUCT_SOCKADDR_HAS_SA_LEN
taddr.sin_len = sizeof(struct sockaddr_in);
#endif
if (!sp) {
/* if kerberos-4 is not available, try "kerberos-iv" */
krb4name = "kerberos-iv";
sp = getservbyname(krb4name, "udp");
}
if (!sp) {
/* if kerberos-iv is not available, try "kerberos" */
krb4name = "kerberos";
sp = getservbyname(krb4name, "udp");
}
if (!sp) {
fprintf(stderr,
"kerberos/udp is unknown; check /etc/services. Using port=%d as default\n",
KRB_PORT);
taddr.sin_port = htons(KRB_PORT);
} else {
/* copy the port number */
fprintf(stderr, "%s/udp port=%hu\n", krb4name,
(unsigned short)sp->s_port);
taddr.sin_port = sp->s_port;
}
kerb_port = taddr.sin_port;
sock_kerb = socket(AF_INET, SOCK_DGRAM, 0);
code = bind(sock_kerb, (struct sockaddr *)&taddr, sizeof(taddr));
if (code < 0) {
perror("calling bind");
sock_kerb = -1;
}
sp = getservbyname("kerberos5", "udp");
if (!sp) {
fprintf(stderr,
"kerberos5/udp is unknown; check /etc/services. Using port=%d as default\n",
KRB5_PORT);
taddr.sin_port = htons(KRB5_PORT);
} else {
/* copy the port number */
fprintf(stderr, "kerberos5/udp port=%hu\n",
(unsigned short)sp->s_port);
taddr.sin_port = sp->s_port;
}
if (taddr.sin_port != kerb_port) { /* a different port */
sock_kerb5 = socket(AF_INET, SOCK_DGRAM, 0);
code = bind(sock_kerb5, (struct sockaddr *)&taddr, sizeof(taddr));
if (code < 0) {
perror("calling bind");
sock_kerb5 = -1;
}
}
/* Bail out if we can't bind with any port */
if ((sock_kerb < 0) && (sock_kerb5 < 0))
return -1;
#if MAIN
/* this has already been done */
LWP_InitializeProcessSupport(LWP_NORMAL_PRIORITY, &junk);
IOMGR_Initialize();
#endif
LWP_CreateProcess(SocketListener, /*stacksize */ 16000,
LWP_NORMAL_PRIORITY, (void *)0, "Socket Listener",
&slPid);
/* just to close the log every five minutes */
LWP_CreateProcess(FiveMinuteCheckLWP, 24 * 1024, LWP_MAX_PRIORITY - 2,
(void *)&fiveminutes, "FiveMinuteChecks", &checkPid);
#if MAIN
initialize_ka_error_table();
initialize_rxk_error_table();
while (1) /* don't just stand there, run it */
IOMGR_Sleep(60);
#else
return 0;
#endif
}
static int
backupInit(void)
{
afs_int32 code;
static int initd = 0; /* ever called? */
PROCESS watcherPid;
PROCESS pid; /* LWP process ID */
/* Initialization */
initialize_CMD_error_table();
/* don't run more than once */
if (initd) {
afs_com_err(whoami, 0, "Backup already initialized.");
return 0;
}
initd = 1;
code = bc_InitConfig((char *)DefaultConfDir);
if (code) {
afs_com_err(whoami, code,
"Can't initialize from config files in directory '%s'",
DefaultConfDir);
return (code);
}
/*
* Set up Rx.
*/
code = LWP_InitializeProcessSupport(LWP_NORMAL_PRIORITY, &pid);
if (code) {
afs_com_err(whoami, code, "; Can't initialize LWP");
return (code);
}
code = rx_Init(htons(0));
if (code) {
afs_com_err(whoami, code, "; Can't initialize Rx");
return (code);
}
rx_SetRxDeadTime(60);
/* VLDB initialization */
code = vldbClientInit(0, localauth, tcell, &cstruct, &tokenExpires);
if (code)
return (code);
/* Backup database initialization */
code = udbClientInit(0, localauth, tcell);
if (code)
return (code);
/* setup status monitoring thread */
initStatus();
code =
LWP_CreateProcess(statusWatcher, 20480, LWP_NORMAL_PRIORITY,
(void *)2, "statusWatcher", &watcherPid);
if (code) {
afs_com_err(whoami, code, "; Can't create status monitor task");
return (code);
}
return (0);
}
int main(int argc, char **argv)
{
PROCESS pid;
char *progname = strdup(argv[0]);
if (progname == NULL)
progname = "foo";
if (argc <= 1 )
usage(progname);
printf("starting LWP support\n");
if (LWP_InitializeProcessSupport(LWP_NORMAL_PRIORITY, &pid))
errx(1, "LWP_InitializeProcessSupport()");
printf("starting IOMGR support\n");
if (IOMGR_Initialize())
errx(1, "IOMGR_Initialize()");
while (argv[1]) {
if (strcasecmp("pc", argv[1]) == 0) {
startPCtest();
} else if (strcasecmp("sleep", argv[1]) == 0) {
putMrSleeptoBed();
} else if (strcasecmp("selectproducer", argv[1]) == 0) {
SelectProducer(NULL);
exit(1); /* Special case */
} else if (strcasecmp("selectconsumer", argv[1]) == 0) {
startSelectPC (progname);
} else if (strcasecmp("cancel", argv[1]) == 0) {
yaEndlessLoop();
} else if (strcasecmp("deadlock-write", argv[1]) == 0) {
deadlock_write();
} else if (strcasecmp("deadlock-read", argv[1]) == 0) {
deadlock_read();
} else if (strcasecmp("deadlock-read2", argv[1]) == 0) {
deadlock_read2();
} else if (strcasecmp("overrun-stack", argv[1]) == 0) {
PROCESS tpid;
if (LWP_CreateProcess (overrun_stack, LWPTEST_STACKSIZE, 1,
NULL, "overunner", &tpid))
errx (1, "Cannot create stack overrunner process");
} else if (strcasecmp("underrun-stack", argv[1]) == 0) {
PROCESS tpid;
if (LWP_CreateProcess (underrun_stack, LWPTEST_STACKSIZE, 1,
NULL, "underrunner", &tpid))
errx (1, "Cannot create stack underrunner process");
} else if (strcasecmp("version", argv[1]) == 0) {
printf("Version: "
"$arla: testlwp.c,v 1.9 2002/06/01 17:47:49 lha Exp $\n");
exit (0);
} else {
printf("unknown command %s\n", argv[1]);
exit (1);
}
argc--;
argv++;
}
LWP_WaitProcess((char *) main);
return 0;
}
