2 * Copyright (C) 1994, Index Data I/S
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.8 1995-03-20 09:46:26 quinn
10 * Revision 1.7 1995/03/16 13:29:04 quinn
13 * Revision 1.6 1995/03/15 15:18:52 quinn
14 * Little changes to better support nonblocking I/O
17 * Revision 1.5 1995/03/15 08:37:45 quinn
18 * Now we're pretty much set for nonblocking I/O.
20 * Revision 1.4 1995/03/14 16:59:48 quinn
23 * Revision 1.3 1995/03/14 11:30:15 quinn
26 * Revision 1.2 1995/03/14 10:28:03 quinn
27 * More work on demo server.
29 * Revision 1.1 1995/03/10 18:22:45 quinn
30 * The rudiments of an asynchronous server.
35 * Simple, static server. I wouldn't advise a static server unless you
36 * really have to, but it's great for debugging memory management. :)
54 #define DEFAULT_LISTENER "tcp:localhost:9999"
57 * handle incoming connect requests.
59 void listener(IOCHAN h, int event)
61 COMSTACK line = (COMSTACK) iochan_getdata(h);
64 if (event == EVENT_INPUT)
66 if (cs_listen(line, 0, 0) < 0)
68 if (cs_errno(line) == CSNODATA)
70 fprintf(stderr, "cs_listen failed.\n");
73 iochan_setevent(h, EVENT_OUTPUT);
74 iochan_setflags(h, EVENT_OUTPUT | EVENT_EXCEPT); /* set up for acpt */
76 else if (event == EVENT_OUTPUT)
81 if (!(new_line = cs_accept(line)))
83 fprintf(stderr, "Accept failed.\n");
86 if (!(new_chan = iochan_create(cs_fileno(new_line), ir_session,
89 fprintf(stderr, "Failed to create iochan\n");
92 if (!(newas = create_association(new_chan, new_line)))
94 fprintf(stderr, "Failed to create new assoc.\n");
97 iochan_setdata(new_chan, newas);
98 iochan_setflags(h, EVENT_INPUT | EVENT_EXCEPT); /* reset for listen */
102 fprintf(stderr, "Bad event on listener.\n");
108 * Set up a listening endpoint, and give it to the event-handler.
110 void add_listener(char *where)
114 char mode[100], addr[100];
118 fprintf(stderr, "Adding listener on %s\n", where);
119 if (!where || sscanf(where, "%[^:]:%s", mode, addr) != 2)
121 fprintf(stderr, "%s: Address format: ('tcp'|'osi')':'<address>.\n",
125 if (!strcmp(mode, "tcp"))
127 if (!(ap = tcpip_strtoaddr(addr)))
129 fprintf(stderr, "Address resolution failed for TCP.\n");
134 else if (!strcmp(mode, "osi"))
136 if (!(ap = mosi_strtoaddr(addr)))
138 fprintf(stderr, "Address resolution failed for TCP.\n");
145 fprintf(stderr, "You must specify either 'osi:' or 'tcp:'.\n");
148 if (!(l = cs_create(type, 0)))
150 fprintf(stderr, "Failed to create listener\n");
153 if (cs_bind(l, ap, CS_SERVER) < 0)
155 fprintf(stderr, "Failed to bind.\n");
159 if (!(lst = iochan_create(cs_fileno(l), listener, EVENT_INPUT |
162 fprintf(stderr, "Failed to create IOCHAN-type\n");
165 iochan_setdata(lst, l);
168 int statserv_main(int argc, char **argv)
170 int ret, listeners = 0;
174 while ((ret = options("l:", argv, argc, &arg)) != -2)
177 case 0: me = arg; break;
178 case 'l': add_listener(arg); listeners++; break;
180 fprintf(stderr, "Usage: %s [-l <listener-addr>]\n", me);
184 add_listener(DEFAULT_LISTENER);