summaryrefslogtreecommitdiff
path: root/opentracker.c
diff options
context:
space:
mode:
Diffstat (limited to 'opentracker.c')
-rw-r--r--opentracker.c895
1 files changed, 517 insertions, 378 deletions
diff --git a/opentracker.c b/opentracker.c
index 09010c7..f63db72 100644
--- a/opentracker.c
+++ b/opentracker.c
@@ -5,59 +5,59 @@
5 $Id$ */ 5 $Id$ */
6 6
7/* System */ 7/* System */
8#include <stdlib.h>
9#include <string.h>
10#include <arpa/inet.h> 8#include <arpa/inet.h>
11#include <sys/socket.h> 9#include <ctype.h>
12#include <unistd.h>
13#include <errno.h> 10#include <errno.h>
11#include <pthread.h>
12#include <pwd.h>
14#include <signal.h> 13#include <signal.h>
15#include <stdio.h> 14#include <stdio.h>
16#include <pwd.h> 15#include <stdlib.h>
17#include <ctype.h> 16#include <string.h>
18#include <pthread.h> 17#include <sys/socket.h>
18#include <unistd.h>
19#ifdef WANT_SYSLOGS 19#ifdef WANT_SYSLOGS
20#include <syslog.h> 20#include <syslog.h>
21#endif 21#endif
22 22
23/* Libowfat */ 23/* Libowfat */
24#include "socket.h" 24#include "byte.h"
25#include "io.h" 25#include "io.h"
26#include "iob.h" 26#include "iob.h"
27#include "byte.h"
28#include "scan.h"
29#include "ip6.h" 27#include "ip6.h"
28#include "scan.h"
29#include "socket.h"
30 30
31/* Opentracker */ 31/* Opentracker */
32#include "trackerlogic.h"
33#include "ot_mutex.h"
34#include "ot_http.h"
35#include "ot_udp.h"
36#include "ot_accesslist.h" 32#include "ot_accesslist.h"
37#include "ot_stats.h" 33#include "ot_http.h"
38#include "ot_livesync.h" 34#include "ot_livesync.h"
35#include "ot_mutex.h"
36#include "ot_stats.h"
37#include "ot_udp.h"
38#include "trackerlogic.h"
39 39
40/* Globals */ 40/* Globals */
41time_t g_now_seconds; 41time_t g_now_seconds;
42char * g_redirecturl; 42char *g_redirecturl;
43uint32_t g_tracker_id; 43uint32_t g_tracker_id;
44volatile int g_opentracker_running = 1; 44volatile int g_opentracker_running = 1;
45int g_self_pipe[2]; 45int g_self_pipe[2];
46 46
47static char * g_serverdir; 47static char *g_serverdir;
48static char * g_serveruser; 48static char *g_serveruser;
49static unsigned int g_udp_workers; 49static unsigned int g_udp_workers;
50 50
51static void panic( const char *routing ) __attribute__ ((noreturn)); 51static void panic(const char *routine) __attribute__((noreturn));
52static void panic( const char *routine ) { 52static void panic(const char *routine) {
53 fprintf( stderr, "%s: %s\n", routine, strerror(errno) ); 53 fprintf(stderr, "%s: %s\n", routine, strerror(errno));
54 exit( 111 ); 54 exit(111);
55} 55}
56 56
57static void signal_handler( int s ) { 57static void signal_handler(int s) {
58 if( s == SIGINT ) { 58 if (s == SIGINT) {
59 /* Any new interrupt signal quits the application */ 59 /* Any new interrupt signal quits the application */
60 signal( SIGINT, SIG_DFL); 60 signal(SIGINT, SIG_DFL);
61 61
62 /* Tell all other threads to not acquire any new lock on a bucket 62 /* Tell all other threads to not acquire any new lock on a bucket
63 but cancel their operations and return */ 63 but cancel their operations and return */
@@ -69,483 +69,567 @@ static void signal_handler( int s ) {
69 closelog(); 69 closelog();
70#endif 70#endif
71 71
72 exit( 0 ); 72 exit(0);
73 } else if( s == SIGALRM ) {
74 /* Maintain our copy of the clock. time() on BSDs is very expensive. */
75 g_now_seconds = time(NULL);
76 alarm(5);
77 } 73 }
78} 74}
79 75
80static void defaul_signal_handlers( void ) { 76static void defaul_signal_handlers(void) {
81 sigset_t signal_mask; 77 sigset_t signal_mask;
82 sigemptyset(&signal_mask); 78 sigemptyset(&signal_mask);
83 sigaddset (&signal_mask, SIGPIPE); 79 sigaddset(&signal_mask, SIGPIPE);
84 sigaddset (&signal_mask, SIGHUP); 80 sigaddset(&signal_mask, SIGHUP);
85 sigaddset (&signal_mask, SIGINT); 81 sigaddset(&signal_mask, SIGINT);
86 sigaddset (&signal_mask, SIGALRM); 82 sigaddset(&signal_mask, SIGALRM);
87 pthread_sigmask (SIG_BLOCK, &signal_mask, NULL); 83 pthread_sigmask(SIG_BLOCK, &signal_mask, NULL);
88} 84}
89 85
90static void install_signal_handlers( void ) { 86static void install_signal_handlers(void) {
91 struct sigaction sa; 87 struct sigaction sa;
92 sigset_t signal_mask; 88 sigset_t signal_mask;
93 sigemptyset(&signal_mask); 89 sigemptyset(&signal_mask);
94 90
95 sa.sa_handler = signal_handler; 91 sa.sa_handler = signal_handler;
96 sigemptyset(&sa.sa_mask); 92 sigemptyset(&sa.sa_mask);
97 sa.sa_flags = SA_RESTART; 93 sa.sa_flags = SA_RESTART;
98 if ((sigaction(SIGINT, &sa, NULL) == -1) || (sigaction(SIGALRM, &sa, NULL) == -1) ) 94 if ((sigaction(SIGINT, &sa, NULL) == -1) || (sigaction(SIGALRM, &sa, NULL) == -1))
99 panic( "install_signal_handlers" ); 95 panic("install_signal_handlers");
100 96
101 sigaddset (&signal_mask, SIGINT); 97 sigaddset(&signal_mask, SIGINT);
102 sigaddset (&signal_mask, SIGALRM); 98 pthread_sigmask(SIG_UNBLOCK, &signal_mask, NULL);
103 pthread_sigmask (SIG_UNBLOCK, &signal_mask, NULL);
104} 99}
105 100
106static void usage( char *name ) { 101static void usage(char *name) {
107 fprintf( stderr, "Usage: %s [-i ip] [-p port] [-P port] [-r redirect] [-d dir] [-u user] [-A ip] [-f config] [-s livesyncport]" 102 fprintf(stderr,
103 "Usage: %s [-i ip] [-p port] [-P port] [-r redirect] [-d dir] [-u user] [-A ip[/bits]] [-f config] [-s livesyncport]"
108#ifdef WANT_ACCESSLIST_BLACK 104#ifdef WANT_ACCESSLIST_BLACK
109 " [-b blacklistfile]" 105 " [-b blacklistfile]"
110#elif defined ( WANT_ACCESSLIST_WHITE ) 106#elif defined(WANT_ACCESSLIST_WHITE)
111 " [-w whitelistfile]" 107 " [-w whitelistfile]"
112#endif 108#endif
113 "\n", name ); 109 "\n",
110 name);
114} 111}
115 112
116#define HELPLINE(opt,desc) fprintf(stderr, "\t%-10s%s\n",opt,desc) 113#define HELPLINE(opt, desc) fprintf(stderr, "\t%-10s%s\n", opt, desc)
117static void help( char *name ) { 114static void help(char *name) {
118 usage( name ); 115 usage(name);
119 116
120 HELPLINE("-f config","include and execute the config file"); 117 HELPLINE("-f config", "include and execute the config file");
121 HELPLINE("-i ip","specify ip to bind to (default: *, you may specify more than one)"); 118 HELPLINE("-i ip", "specify ip to bind to with next -[pP] (default: any, overrides preceeding ones)");
122 HELPLINE("-p port","specify tcp port to bind to (default: 6969, you may specify more than one)"); 119 HELPLINE("-p port", "do bind to tcp port (default: 6969, you may specify more than one)");
123 HELPLINE("-P port","specify udp port to bind to (default: 6969, you may specify more than one)"); 120 HELPLINE("-P port", "do bind to udp port (default: 6969, you may specify more than one)");
124 HELPLINE("-r redirecturl","specify url where / should be redirected to (default none)"); 121 HELPLINE("-r redirecturl", "specify url where / should be redirected to (default none)");
125 HELPLINE("-d dir","specify directory to try to chroot to (default: \".\")"); 122 HELPLINE("-d dir", "specify directory to try to chroot to (default: \".\")");
126 HELPLINE("-u user","specify user under whose priviliges opentracker should run (default: \"nobody\")"); 123 HELPLINE("-u user", "specify user under whose privileges opentracker should run (default: \"nobody\")");
127 HELPLINE("-A ip","bless an ip address as admin address (e.g. to allow syncs from this address)"); 124 HELPLINE("-A ip[/bits]", "bless an ip address or net as admin address (e.g. to allow syncs from this address)");
128#ifdef WANT_ACCESSLIST_BLACK 125#ifdef WANT_ACCESSLIST_BLACK
129 HELPLINE("-b file","specify blacklist file."); 126 HELPLINE("-b file", "specify blacklist file.");
130#elif defined( WANT_ACCESSLIST_WHITE ) 127#elif defined(WANT_ACCESSLIST_WHITE)
131 HELPLINE("-w file","specify whitelist file."); 128 HELPLINE("-w file", "specify whitelist file.");
132#endif 129#endif
133 130
134 fprintf( stderr, "\nExample: ./opentracker -i 127.0.0.1 -p 6969 -P 6969 -f ./opentracker.conf -i 10.1.1.23 -p 2710 -p 80\n" ); 131 fprintf(stderr, "\nExample: ./opentracker -i 127.0.0.1 -p 6969 -P 6969 -f ./opentracker.conf -i 10.1.1.23 -p 2710 -p 80\n");
132 fprintf(stderr, " Here -i 127.0.0.1 selects the ip address for the next -p 6969 and -P 6969.\n");
133 fprintf(stderr, " If no port is bound from config file or command line, the last address given\n");
134 fprintf(stderr, " (or ::1 if none is set) will be used on port 6969.\n");
135} 135}
136#undef HELPLINE 136#undef HELPLINE
137 137
138static size_t header_complete( char * request, ssize_t byte_count ) { 138static ssize_t header_complete(char *request, ssize_t byte_count) {
139 int i = 0, state = 0; 139 ssize_t i = 0, state = 0;
140 140
141 for( i=1; i < byte_count; i+=2 ) 141 for (i = 1; i < byte_count; i += 2)
142 if( request[i] <= 13 ) { 142 if (request[i] <= 13) {
143 i--; 143 i--;
144 for( state = 0 ; i < byte_count; ++i ) { 144 for (state = 0; i < byte_count; ++i) {
145 char c = request[i]; 145 char c = request[i];
146 if( c == '\r' || c == '\n' ) 146 if (c == '\r' || c == '\n')
147 state = ( state >> 2 ) | ( ( c << 6 ) & 0xc0 ); 147 state = (state >> 2) | ((c << 6) & 0xc0);
148 else 148 else
149 break; 149 break;
150 if( state >= 0xa0 || state == 0x99 ) return i + 1; 150 if (state >= 0xa0 || state == 0x99)
151 return i + 1;
151 } 152 }
152 } 153 }
153 return 0; 154 return 0;
154} 155}
155 156
156static void handle_dead( const int64 sock ) { 157static void handle_dead(const int64 sock) {
157 struct http_data* cookie=io_getcookie( sock ); 158 struct http_data *cookie = io_getcookie(sock);
158 if( cookie ) { 159 if (cookie) {
159 iob_reset( &cookie->batch ); 160 size_t i;
160 array_reset( &cookie->request ); 161 for (i = 0; i < cookie->batches; ++i)
161 if( cookie->flag & STRUCT_HTTP_FLAG_WAITINGFORTASK ) 162 iob_reset(cookie->batch + i);
162 mutex_workqueue_canceltask( sock ); 163 free(cookie->batch);
163 free( cookie ); 164 array_reset(&cookie->request);
165 if (cookie->flag & (STRUCT_HTTP_FLAG_WAITINGFORTASK | STRUCT_HTTP_FLAG_CHUNKED_IN_TRANSFER))
166 mutex_workqueue_canceltask(sock);
167 free(cookie);
164 } 168 }
165 io_close( sock ); 169 io_close(sock);
166} 170}
167 171
168static void handle_read( const int64 sock, struct ot_workstruct *ws ) { 172static void handle_read(const int64 sock, struct ot_workstruct *ws) {
169 struct http_data* cookie = io_getcookie( sock ); 173 struct http_data *cookie = io_getcookie(sock);
170 ssize_t byte_count; 174 ssize_t byte_count = io_tryread(sock, ws->inbuf, G_INBUF_SIZE);
171 175
172 if( ( byte_count = io_tryread( sock, ws->inbuf, G_INBUF_SIZE ) ) <= 0 ) { 176 if (byte_count == 0 || byte_count == -3) {
173 handle_dead( sock ); 177 handle_dead(sock);
174 return; 178 return;
175 } 179 }
176 180
181 if (byte_count == -1)
182 return;
183
177 /* If we get the whole request in one packet, handle it without copying */ 184 /* If we get the whole request in one packet, handle it without copying */
178 if( !array_start( &cookie->request ) ) { 185 if (!array_start(&cookie->request)) {
179 if( ( ws->header_size = header_complete( ws->inbuf, byte_count ) ) ) { 186 if ((ws->header_size = header_complete(ws->inbuf, byte_count))) {
180 ws->request = ws->inbuf; 187 ws->request = ws->inbuf;
181 ws->request_size = byte_count; 188 ws->request_size = byte_count;
182 http_handle_request( sock, ws ); 189 http_handle_request(sock, ws);
183 } else 190 } else
184 array_catb( &cookie->request, ws->inbuf, byte_count ); 191 array_catb(&cookie->request, ws->inbuf, (size_t)byte_count);
185 return; 192 return;
186 } 193 }
187 194
188 array_catb( &cookie->request, ws->inbuf, byte_count ); 195 array_catb(&cookie->request, ws->inbuf, byte_count);
189 if( array_failed( &cookie->request ) || array_bytes( &cookie->request ) > 8192 ) { 196 if (array_failed(&cookie->request) || array_bytes(&cookie->request) > 8192) {
190 http_issue_error( sock, ws, CODE_HTTPERROR_500 ); 197 http_issue_error(sock, ws, CODE_HTTPERROR_500);
191 return; 198 return;
192 } 199 }
193 200
194 while( ( ws->header_size = header_complete( array_start( &cookie->request ), array_bytes( &cookie->request ) ) ) ) { 201 while ((ws->header_size = header_complete(array_start(&cookie->request), array_bytes(&cookie->request)))) {
195 ws->request = array_start( &cookie->request ); 202 ws->request = array_start(&cookie->request);
196 ws->request_size = array_bytes( &cookie->request ); 203 ws->request_size = array_bytes(&cookie->request);
197 http_handle_request( sock, ws ); 204 http_handle_request(sock, ws);
198#ifdef WANT_KEEPALIVE 205#ifdef WANT_KEEPALIVE
199 if( !ws->keep_alive ) 206 if (!ws->keep_alive)
200#endif 207#endif
201 return; 208 return;
202 } 209 }
203} 210}
204 211
205static void handle_write( const int64 sock ) { 212static void handle_write(const int64 sock) {
206 struct http_data* cookie=io_getcookie( sock ); 213 struct http_data *cookie = io_getcookie(sock);
207 if( !cookie || ( iob_send( sock, &cookie->batch ) <= 0 ) ) 214 size_t i;
208 handle_dead( sock ); 215 int chunked = 0;
216
217 /* Look for the first io_batch still containing bytes to write */
218 if (cookie) {
219 if (cookie->flag & STRUCT_HTTP_FLAG_CHUNKED_IN_TRANSFER)
220 chunked = 1;
221
222 for (i = 0; i < cookie->batches; ++i) {
223 if (cookie->batch[i].bytesleft) {
224 int64 res = iob_send(sock, cookie->batch + i);
225
226 if (res == -3) {
227 handle_dead(sock);
228 return;
229 }
230
231 if (!cookie->batch[i].bytesleft)
232 continue;
233
234 if (res == -1 || res > 0 || i < cookie->batches - 1)
235 return;
236 }
237 }
238 }
239
240 /* In a chunked transfer after all batches accumulated have been sent, wait for the next one */
241 if (chunked)
242 io_dontwantwrite(sock);
243 else
244 handle_dead(sock);
209} 245}
210 246
211static void handle_accept( const int64 serversocket ) { 247static void handle_accept(const int64 serversocket) {
212 struct http_data *cookie; 248 struct http_data *cookie;
213 int64 sock; 249 int64 sock;
214 ot_ip6 ip; 250 ot_ip6 ip;
215 uint16 port; 251 uint16 port;
216 tai6464 t; 252 tai6464 t;
217 253
218 while( ( sock = socket_accept6( serversocket, ip, &port, NULL ) ) != -1 ) { 254 while ((sock = socket_accept6(serversocket, ip, &port, NULL)) != -1) {
219 255
220 /* Put fd into a non-blocking mode */ 256 /* Put fd into a non-blocking mode */
221 io_nonblock( sock ); 257 io_nonblock(sock);
222 258
223 if( !io_fd( sock ) || 259 if (!io_fd(sock) || !(cookie = (struct http_data *)malloc(sizeof(struct http_data)))) {
224 !( cookie = (struct http_data*)malloc( sizeof(struct http_data) ) ) ) { 260 io_close(sock);
225 io_close( sock );
226 continue; 261 continue;
227 } 262 }
228 memset(cookie, 0, sizeof( struct http_data ) ); 263 memset(cookie, 0, sizeof(struct http_data));
229 memcpy(cookie->ip,ip,sizeof(ot_ip6)); 264 memcpy(cookie->ip, ip, sizeof(ot_ip6));
230 265
231 io_setcookie( sock, cookie ); 266 io_setcookie(sock, cookie);
232 io_wantread( sock ); 267 io_wantread(sock);
233 268
234 stats_issue_event( EVENT_ACCEPT, FLAG_TCP, (uintptr_t)ip); 269 stats_issue_event(EVENT_ACCEPT, FLAG_TCP, (uintptr_t)ip);
235 270
236 /* That breaks taia encapsulation. But there is no way to take system 271 /* That breaks taia encapsulation. But there is no way to take system
237 time this often in FreeBSD and libowfat does not allow to set unix time */ 272 time this often in FreeBSD and libowfat does not allow to set unix time */
238 taia_uint( &t, 0 ); /* Clear t */ 273 taia_uint(&t, 0); /* Clear t */
239 tai_unix( &(t.sec), (g_now_seconds + OT_CLIENT_TIMEOUT) ); 274 tai_unix(&(t.sec), (g_now_seconds + OT_CLIENT_TIMEOUT));
240 io_timeout( sock, t ); 275 io_timeout(sock, t);
241 } 276 }
242 io_eagain(serversocket); 277 io_eagain(serversocket);
243} 278}
244 279
245static void * server_mainloop( void * args ) { 280static void *server_mainloop(void *args) {
246 struct ot_workstruct ws; 281 struct ot_workstruct ws;
247 time_t next_timeout_check = g_now_seconds + OT_CLIENT_TIMEOUT_CHECKINTERVAL; 282 time_t next_timeout_check = g_now_seconds + OT_CLIENT_TIMEOUT_CHECKINTERVAL;
248 struct iovec *iovector; 283 struct iovec *iovector;
249 int iovec_entries; 284 size_t iovec_entries;
285 int is_partial;
250 286
251 (void)args; 287 (void)args;
252 288
253 /* Initialize our "thread local storage" */ 289 /* Initialize our "thread local storage" */
254 ws.inbuf = malloc( G_INBUF_SIZE ); 290 ws.inbuf = malloc(G_INBUF_SIZE);
255 ws.outbuf = malloc( G_OUTBUF_SIZE ); 291 ws.outbuf = malloc(G_OUTBUF_SIZE);
256#ifdef _DEBUG_HTTPERROR 292#ifdef _DEBUG_HTTPERROR
257 ws.debugbuf= malloc( G_DEBUGBUF_SIZE ); 293 ws.debugbuf = malloc(G_DEBUGBUF_SIZE);
258#endif 294#endif
259 if( !ws.inbuf || !ws.outbuf )
260 panic( "Initializing worker failed" );
261 295
262 for( ; ; ) { 296 if (!ws.inbuf || !ws.outbuf)
297 panic("Initializing worker failed");
298
299#ifdef WANT_ARC4RANDOM
300 arc4random_buf(&ws.rand48_state[0], 3 * sizeof(uint16_t));
301#else
302 ws.rand48_state[0] = (uint16_t)random();
303 ws.rand48_state[1] = (uint16_t)random();
304 ws.rand48_state[2] = (uint16_t)random();
305#endif
306
307 for (;;) {
263 int64 sock; 308 int64 sock;
264 309
265 io_wait(); 310 io_wait();
266 311
267 while( ( sock = io_canread( ) ) != -1 ) { 312 while ((sock = io_canread()) != -1) {
268 const void *cookie = io_getcookie( sock ); 313 const void *cookie = io_getcookie(sock);
269 if( (intptr_t)cookie == FLAG_TCP ) 314 if ((intptr_t)cookie == FLAG_TCP)
270 handle_accept( sock ); 315 handle_accept(sock);
271 else if( (intptr_t)cookie == FLAG_UDP ) 316 else if ((intptr_t)cookie == FLAG_UDP)
272 handle_udp6( sock, &ws ); 317 handle_udp6(sock, &ws);
273 else if( (intptr_t)cookie == FLAG_SELFPIPE ) { 318 else if ((intptr_t)cookie == FLAG_SELFPIPE)
274 io_tryread( sock, ws.inbuf, G_INBUF_SIZE ); 319 io_tryread(sock, ws.inbuf, G_INBUF_SIZE);
275 fprintf(stderr, "pipe\n"); 320 else
276 } else 321 handle_read(sock, &ws);
277 handle_read( sock, &ws );
278 } 322 }
279 323
280 while( ( sock = mutex_workqueue_popresult( &iovec_entries, &iovector ) ) != -1 ) 324 while ((sock = mutex_workqueue_popresult(&iovec_entries, &iovector, &is_partial)) != -1)
281 http_sendiovecdata( sock, &ws, iovec_entries, iovector ); 325 http_sendiovecdata(sock, &ws, iovec_entries, iovector, is_partial);
282 326
283 while( ( sock = io_canwrite( ) ) != -1 ) 327 while ((sock = io_canwrite()) != -1)
284 handle_write( sock ); 328 handle_write(sock);
285 329
286 if( g_now_seconds > next_timeout_check ) { 330 if (g_now_seconds > next_timeout_check) {
287 while( ( sock = io_timeouted() ) != -1 ) 331 while ((sock = io_timeouted()) != -1)
288 handle_dead( sock ); 332 handle_dead(sock);
289 next_timeout_check = g_now_seconds + OT_CLIENT_TIMEOUT_CHECKINTERVAL; 333 next_timeout_check = g_now_seconds + OT_CLIENT_TIMEOUT_CHECKINTERVAL;
290 } 334 }
291 335
292 livesync_ticker(); 336 livesync_ticker();
293
294 /* Enforce setting the clock */
295 signal_handler( SIGALRM );
296 } 337 }
297 return 0; 338 return 0;
298} 339}
299 340
300static int64_t ot_try_bind( ot_ip6 ip, uint16_t port, PROTO_FLAG proto ) { 341static int64_t ot_try_bind(ot_ip6 ip, uint16_t port, PROTO_FLAG proto) {
301 int64 sock = proto == FLAG_TCP ? socket_tcp6( ) : socket_udp6( ); 342 int64 sock = proto == FLAG_TCP ? socket_tcp6() : socket_udp6();
302
303#ifndef WANT_V6
304 if( !ip6_isv4mapped(ip) ) {
305 exerr( "V4 Tracker is V4 only!" );
306 }
307#else
308 if( ip6_isv4mapped(ip) ) {
309 exerr( "V6 Tracker is V6 only!" );
310 }
311#endif
312 343
313#ifdef _DEBUG 344#ifdef _DEBUG
314 { 345 {
315 char *protos[] = {"TCP","UDP","UDP mcast"}; 346 char *protos[] = {"TCP", "UDP", "UDP mcast"};
316 char _debug[512]; 347 char _debug[512];
317 int off = snprintf( _debug, sizeof(_debug), "Binding socket type %s to address [", protos[proto] ); 348 int off = snprintf(_debug, sizeof(_debug), "Binding socket type %s to address [", protos[proto]);
318 off += fmt_ip6c( _debug+off, ip); 349 off += fmt_ip6c(_debug + off, ip);
319 snprintf( _debug + off, sizeof(_debug)-off, "]:%d...", port); 350 snprintf(_debug + off, sizeof(_debug) - off, "]:%d...", port);
320 fputs( _debug, stderr ); 351 fputs(_debug, stderr);
321 } 352 }
322#endif 353#endif
323 354
324 if( socket_bind6_reuse( sock, ip, port, 0 ) == -1 ) 355 if (socket_bind6_reuse(sock, ip, port, 0) == -1)
325 panic( "socket_bind6_reuse" ); 356 panic("socket_bind6_reuse");
326 357
327 if( ( proto == FLAG_TCP ) && ( socket_listen( sock, SOMAXCONN) == -1 ) ) 358 if ((proto == FLAG_TCP) && (socket_listen(sock, SOMAXCONN) == -1))
328 panic( "socket_listen" ); 359 panic("socket_listen");
329 360
330 if( !io_fd( sock ) ) 361 if (!io_fd(sock))
331 panic( "io_fd" ); 362 panic("io_fd");
332 363
333 io_setcookie( sock, (void*)proto ); 364 io_setcookie(sock, (void *)proto);
334 365
335 if( (proto == FLAG_UDP) && g_udp_workers ) { 366 if ((proto == FLAG_UDP) && g_udp_workers) {
336 io_block( sock ); 367 io_block(sock);
337 udp_init( sock, g_udp_workers ); 368 udp_init(sock, g_udp_workers);
338 } else 369 } else
339 io_wantread( sock ); 370 io_wantread(sock);
340 371
341#ifdef _DEBUG 372#ifdef _DEBUG
342 fputs( " success.\n", stderr); 373 fputs(" success.\n", stderr);
343#endif 374#endif
344 375
345 return sock; 376 return sock;
346} 377}
347 378
348char * set_config_option( char **option, char *value ) { 379char *set_config_option(char **option, char *value) {
349#ifdef _DEBUG 380#ifdef _DEBUG
350 fprintf( stderr, "Setting config option: %s\n", value ); 381 fprintf(stderr, "Setting config option: %s\n", value);
351#endif 382#endif
352 while( isspace(*value) ) ++value; 383 while (isspace(*value))
353 free( *option ); 384 ++value;
354 return *option = strdup( value ); 385 free(*option);
386 return *option = strdup(value);
355} 387}
356 388
357static int scan_ip6_port( const char *src, ot_ip6 ip, uint16 *port ) { 389static int scan_ip6_port(const char *src, ot_ip6 ip, uint16 *port) {
358 const char *s = src; 390 const char *s = src;
359 int off, bracket = 0; 391 int off, bracket = 0;
360 while( isspace(*s) ) ++s; 392 while (isspace(*s))
361 if( *s == '[' ) ++s, ++bracket; /* for v6 style notation */ 393 ++s;
362 if( !(off = scan_ip6( s, ip ) ) ) 394 if (*s == '[')
395 ++s, ++bracket; /* for v6 style notation */
396 if (!(off = scan_ip6(s, ip)))
363 return 0; 397 return 0;
364 s += off; 398 s += off;
365 if( bracket && *s == ']' ) ++s; 399 if (bracket && *s == ']')
366 if( *s == 0 || isspace(*s)) return s-src; 400 ++s;
367 if( !ip6_isv4mapped(ip)){ 401 if (*s == 0 || isspace(*s))
368 if( *s != ':' && *s != '.' ) return 0; 402 return s - src;
369 if( !bracket && *(s) == ':' ) return 0; 403 if (!ip6_isv4mapped(ip)) {
404 if (*s != ':' && *s != '.')
405 return 0;
406 if (!bracket && *(s) == ':')
407 return 0;
370 s++; 408 s++;
371 } else { 409 } else {
372 if( *(s++) != ':' ) return 0; 410 if (*(s++) != ':')
411 return 0;
412 }
413 if (!(off = scan_ushort(s, port)))
414 return 0;
415 return off + s - src;
416}
417
418static int scan_ip6_net(const char *src, ot_net *net) {
419 const char *s = src;
420 int off;
421 while (isspace(*s))
422 ++s;
423 if (!(off = scan_ip6(s, net->address)))
424 return 0;
425 s += off;
426 if (*s != '/')
427 net->bits = 128;
428 else {
429 s++;
430 if (!(off = scan_int(s, &net->bits)))
431 return 0;
432 if (ip6_isv4mapped(net->address))
433 net->bits += 96;
434 if (net->bits > 128)
435 return 0;
436 s += off;
373 } 437 }
374 if( !(off = scan_ushort (s, port ) ) ) 438 return off + s - src;
375 return 0;
376 return off+s-src;
377} 439}
378 440
379int parse_configfile( char * config_filename ) { 441int parse_configfile(char *config_filename) {
380 FILE * accesslist_filehandle; 442 FILE *accesslist_filehandle;
381 char inbuf[512]; 443 char inbuf[512];
382 ot_ip6 tmpip; 444 ot_ip6 tmpip;
383 int bound = 0; 445#if defined(WANT_RESTRICT_STATS) || defined(WANT_IP_FROM_PROXY) || defined(WANT_SYNC_LIVE)
446 ot_net tmpnet;
447#endif
448 int bound = 0;
384 449
385 accesslist_filehandle = fopen( config_filename, "r" ); 450 accesslist_filehandle = fopen(config_filename, "r");
386 451
387 if( accesslist_filehandle == NULL ) { 452 if (accesslist_filehandle == NULL) {
388 fprintf( stderr, "Warning: Can't open config file: %s.", config_filename ); 453 fprintf(stderr, "Warning: Can't open config file: %s.", config_filename);
389 return 0; 454 return 0;
390 } 455 }
391 456
392 while( fgets( inbuf, sizeof(inbuf), accesslist_filehandle ) ) { 457 while (fgets(inbuf, sizeof(inbuf), accesslist_filehandle)) {
393 char *p = inbuf; 458 char *p = inbuf;
394 size_t strl; 459 size_t strl;
395 460
396 /* Skip white spaces */ 461 /* Skip white spaces */
397 while(isspace(*p)) ++p; 462 while (isspace(*p))
463 ++p;
398 464
399 /* Ignore comments and empty lines */ 465 /* Ignore comments and empty lines */
400 if((*p=='#')||(*p=='\n')||(*p==0)) continue; 466 if ((*p == '#') || (*p == '\n') || (*p == 0))
467 continue;
401 468
402 /* consume trailing new lines and spaces */ 469 /* consume trailing new lines and spaces */
403 strl = strlen(p); 470 strl = strlen(p);
404 while( strl && isspace(p[strl-1])) 471 while (strl && isspace(p[strl - 1]))
405 p[--strl] = 0; 472 p[--strl] = 0;
406 473
407 /* Scan for commands */ 474 /* Scan for commands */
408 if(!byte_diff(p,15,"tracker.rootdir" ) && isspace(p[15])) { 475 if (!byte_diff(p, 15, "tracker.rootdir") && isspace(p[15])) {
409 set_config_option( &g_serverdir, p+16 ); 476 set_config_option(&g_serverdir, p + 16);
410 } else if(!byte_diff(p,12,"tracker.user" ) && isspace(p[12])) { 477 } else if (!byte_diff(p, 12, "tracker.user") && isspace(p[12])) {
411 set_config_option( &g_serveruser, p+13 ); 478 set_config_option(&g_serveruser, p + 13);
412 } else if(!byte_diff(p,14,"listen.tcp_udp" ) && isspace(p[14])) { 479 } else if (!byte_diff(p, 14, "listen.tcp_udp") && isspace(p[14])) {
413 uint16_t tmpport = 6969; 480 uint16_t tmpport = 6969;
414 if( !scan_ip6_port( p+15, tmpip, &tmpport )) goto parse_error; 481 if (!scan_ip6_port(p + 15, tmpip, &tmpport))
415 ot_try_bind( tmpip, tmpport, FLAG_TCP ); ++bound; 482 goto parse_error;
416 ot_try_bind( tmpip, tmpport, FLAG_UDP ); ++bound; 483 ot_try_bind(tmpip, tmpport, FLAG_TCP);
417 } else if(!byte_diff(p,10,"listen.tcp" ) && isspace(p[10])) { 484 ++bound;
485 ot_try_bind(tmpip, tmpport, FLAG_UDP);
486 ++bound;
487 } else if (!byte_diff(p, 10, "listen.tcp") && isspace(p[10])) {
418 uint16_t tmpport = 6969; 488 uint16_t tmpport = 6969;
419 if( !scan_ip6_port( p+11, tmpip, &tmpport )) goto parse_error; 489 if (!scan_ip6_port(p + 11, tmpip, &tmpport))
420 ot_try_bind( tmpip, tmpport, FLAG_TCP ); 490 goto parse_error;
491 ot_try_bind(tmpip, tmpport, FLAG_TCP);
421 ++bound; 492 ++bound;
422 } else if(!byte_diff(p, 10, "listen.udp" ) && isspace(p[10])) { 493 } else if (!byte_diff(p, 10, "listen.udp") && isspace(p[10])) {
423 uint16_t tmpport = 6969; 494 uint16_t tmpport = 6969;
424 if( !scan_ip6_port( p+11, tmpip, &tmpport )) goto parse_error; 495 if (!scan_ip6_port(p + 11, tmpip, &tmpport))
425 ot_try_bind( tmpip, tmpport, FLAG_UDP ); 496 goto parse_error;
497 ot_try_bind(tmpip, tmpport, FLAG_UDP);
426 ++bound; 498 ++bound;
427 } else if(!byte_diff(p,18,"listen.udp.workers" ) && isspace(p[18])) { 499 } else if (!byte_diff(p, 18, "listen.udp.workers") && isspace(p[18])) {
428 char *value = p + 18; 500 char *value = p + 18;
429 while( isspace(*value) ) ++value; 501 while (isspace(*value))
430 scan_uint( value, &g_udp_workers ); 502 ++value;
503 scan_uint(value, &g_udp_workers);
431#ifdef WANT_ACCESSLIST_WHITE 504#ifdef WANT_ACCESSLIST_WHITE
432 } else if(!byte_diff(p, 16, "access.whitelist" ) && isspace(p[16])) { 505 } else if (!byte_diff(p, 16, "access.whitelist") && isspace(p[16])) {
433 set_config_option( &g_accesslist_filename, p+17 ); 506 set_config_option(&g_accesslist_filename, p + 17);
434#elif defined( WANT_ACCESSLIST_BLACK ) 507#elif defined(WANT_ACCESSLIST_BLACK)
435 } else if(!byte_diff(p, 16, "access.blacklist" ) && isspace(p[16])) { 508 } else if (!byte_diff(p, 16, "access.blacklist") && isspace(p[16])) {
436 set_config_option( &g_accesslist_filename, p+17 ); 509 set_config_option(&g_accesslist_filename, p + 17);
510#endif
511#ifdef WANT_DYNAMIC_ACCESSLIST
512 } else if (!byte_diff(p, 15, "access.fifo_add") && isspace(p[15])) {
513 set_config_option(&g_accesslist_pipe_add, p + 16);
514 } else if (!byte_diff(p, 18, "access.fifo_delete") && isspace(p[18])) {
515 set_config_option(&g_accesslist_pipe_delete, p + 19);
437#endif 516#endif
438#ifdef WANT_RESTRICT_STATS 517#ifdef WANT_RESTRICT_STATS
439 } else if(!byte_diff(p, 12, "access.stats" ) && isspace(p[12])) { 518 } else if (!byte_diff(p, 12, "access.stats") && isspace(p[12])) {
440 if( !scan_ip6( p+13, tmpip )) goto parse_error; 519 if (!scan_ip6_net(p + 13, &tmpnet))
441 accesslist_blessip( tmpip, OT_PERMISSION_MAY_STAT ); 520 goto parse_error;
521 accesslist_bless_net(&tmpnet, OT_PERMISSION_MAY_STAT);
442#endif 522#endif
443 } else if(!byte_diff(p, 17, "access.stats_path" ) && isspace(p[17])) { 523 } else if (!byte_diff(p, 17, "access.stats_path") && isspace(p[17])) {
444 set_config_option( &g_stats_path, p+18 ); 524 set_config_option(&g_stats_path, p + 18);
445#ifdef WANT_IP_FROM_PROXY 525#ifdef WANT_IP_FROM_PROXY
446 } else if(!byte_diff(p, 12, "access.proxy" ) && isspace(p[12])) { 526 } else if (!byte_diff(p, 12, "access.proxy") && isspace(p[12])) {
447 if( !scan_ip6( p+13, tmpip )) goto parse_error; 527 if (!scan_ip6_net(p + 13, &tmpnet))
448 accesslist_blessip( tmpip, OT_PERMISSION_MAY_PROXY ); 528 goto parse_error;
529 accesslist_bless_net(&tmpnet, OT_PERMISSION_MAY_PROXY);
449#endif 530#endif
450 } else if(!byte_diff(p, 20, "tracker.redirect_url" ) && isspace(p[20])) { 531 } else if (!byte_diff(p, 20, "tracker.redirect_url") && isspace(p[20])) {
451 set_config_option( &g_redirecturl, p+21 ); 532 set_config_option(&g_redirecturl, p + 21);
452#ifdef WANT_SYNC_LIVE 533#ifdef WANT_SYNC_LIVE
453 } else if(!byte_diff(p, 24, "livesync.cluster.node_ip" ) && isspace(p[24])) { 534 } else if (!byte_diff(p, 24, "livesync.cluster.node_ip") && isspace(p[24])) {
454 if( !scan_ip6( p+25, tmpip )) goto parse_error; 535 if (!scan_ip6_net(p + 25, &tmpnet))
455 accesslist_blessip( tmpip, OT_PERMISSION_MAY_LIVESYNC ); 536 goto parse_error;
456 } else if(!byte_diff(p, 23, "livesync.cluster.listen" ) && isspace(p[23])) { 537 accesslist_bless_net(&tmpnet, OT_PERMISSION_MAY_LIVESYNC);
538 } else if (!byte_diff(p, 23, "livesync.cluster.listen") && isspace(p[23])) {
457 uint16_t tmpport = LIVESYNC_PORT; 539 uint16_t tmpport = LIVESYNC_PORT;
458 if( !scan_ip6_port( p+24, tmpip, &tmpport )) goto parse_error; 540 if (!scan_ip6_port(p + 24, tmpip, &tmpport))
459 livesync_bind_mcast( tmpip, tmpport ); 541 goto parse_error;
542 livesync_bind_mcast(tmpip, tmpport);
460#endif 543#endif
461 } else 544 } else
462 fprintf( stderr, "Unhandled line in config file: %s\n", inbuf ); 545 fprintf(stderr, "Unhandled line in config file: %s\n", inbuf);
463 continue; 546 continue;
464 parse_error: 547 parse_error:
465 fprintf( stderr, "Parse error in config file: %s\n", inbuf); 548 fprintf(stderr, "Parse error in config file: %s\n", inbuf);
466 } 549 }
467 fclose( accesslist_filehandle ); 550 fclose(accesslist_filehandle);
468 return bound; 551 return bound;
469} 552}
470 553
471void load_state(const char * const state_filename ) { 554void load_state(const char *const state_filename) {
472 FILE * state_filehandle; 555 FILE *state_filehandle;
473 char inbuf[512]; 556 char inbuf[512];
474 ot_hash infohash; 557 ot_hash infohash;
475 unsigned long long base, downcount; 558 unsigned long long base, downcount;
476 int consumed; 559 int consumed;
477 560
478 state_filehandle = fopen( state_filename, "r" ); 561 state_filehandle = fopen(state_filename, "r");
479 562
480 if( state_filehandle == NULL ) { 563 if (state_filehandle == NULL) {
481 fprintf( stderr, "Warning: Can't open config file: %s.", state_filename ); 564 fprintf(stderr, "Warning: Can't open config file: %s.", state_filename);
482 return; 565 return;
483 } 566 }
484 567
485 /* We do ignore anything that is not of the form "^[:xdigit:]:\d+:\d+" */ 568 /* We do ignore anything that is not of the form "^[:xdigit:]:\d+:\d+" */
486 while( fgets( inbuf, sizeof(inbuf), state_filehandle ) ) { 569 while (fgets(inbuf, sizeof(inbuf), state_filehandle)) {
487 int i; 570 size_t i;
488 for( i=0; i<(int)sizeof(ot_hash); ++i ) { 571 for (i = 0; i < sizeof(ot_hash); ++i) {
489 int eger = 16 * scan_fromhex( inbuf[ 2*i ] ) + scan_fromhex( inbuf[ 1 + 2*i ] ); 572 int eger = 16 * scan_fromhex(inbuf[2 * i]) + scan_fromhex(inbuf[1 + 2 * i]);
490 if( eger < 0 ) 573 if (eger < 0)
491 continue; 574 continue;
492 infohash[i] = eger; 575 infohash[i] = eger;
493 } 576 }
494 577
495 if( i != (int)sizeof(ot_hash) ) continue; 578 if (i != sizeof(ot_hash))
579 continue;
496 i *= 2; 580 i *= 2;
497 581
498 if( inbuf[ i++ ] != ':' || !( consumed = scan_ulonglong( inbuf+i, &base ) ) ) continue; 582 if (inbuf[i++] != ':' || !(consumed = scan_ulonglong(inbuf + i, &base)))
583 continue;
499 i += consumed; 584 i += consumed;
500 if( inbuf[ i++ ] != ':' || !( consumed = scan_ulonglong( inbuf+i, &downcount ) ) ) continue; 585 if (inbuf[i++] != ':' || !(consumed = scan_ulonglong(inbuf + i, &downcount)))
501 add_torrent_from_saved_state( infohash, base, downcount ); 586 continue;
587 add_torrent_from_saved_state(infohash, base, downcount);
502 } 588 }
503 589
504 fclose( state_filehandle ); 590 fclose(state_filehandle);
505} 591}
506 592
507int drop_privileges ( const char * const serveruser, const char * const serverdir ) { 593int drop_privileges(const char *const serveruser, const char *const serverdir) {
508 struct passwd *pws = NULL; 594 struct passwd *pws = NULL;
509 595
510#ifdef _DEBUG 596#ifdef _DEBUG
511 if( !geteuid() ) 597 if (!geteuid())
512 fprintf( stderr, "Dropping to user %s.\n", serveruser ); 598 fprintf(stderr, "Dropping to user %s.\n", serveruser);
513 if( serverdir ) 599 if (serverdir)
514 fprintf( stderr, "ch%s'ing to directory %s.\n", geteuid() ? "dir" : "root", serverdir ); 600 fprintf(stderr, "ch%s'ing to directory %s.\n", geteuid() ? "dir" : "root", serverdir);
515#endif 601#endif
516 602
517 /* Grab pws entry before chrooting */ 603 /* Grab pws entry before chrooting */
518 pws = getpwnam( serveruser ); 604 pws = getpwnam(serveruser);
519 endpwent(); 605 endpwent();
520 606
521 if( geteuid() == 0 ) { 607 if (geteuid() == 0) {
522 /* Running as root: chroot and drop privileges */ 608 /* Running as root: chroot and drop privileges */
523 if( serverdir && chroot( serverdir ) ) { 609 if (serverdir && chroot(serverdir)) {
524 fprintf( stderr, "Could not chroot to %s, because: %s\n", serverdir, strerror(errno) ); 610 fprintf(stderr, "Could not chroot to %s, because: %s\n", serverdir, strerror(errno));
525 return -1; 611 return -1;
526 } 612 }
527 613
528 if(chdir("/")) 614 if (chdir("/"))
529 panic("chdir() failed after chrooting: "); 615 panic("chdir() failed after chrooting: ");
530 616
531 /* If we can't find server user, revert to nobody's default uid */ 617 /* If we can't find server user, revert to nobody's default uid */
532 if( !pws ) { 618 if (!pws) {
533 fprintf( stderr, "Warning: Could not get password entry for %s. Reverting to uid -2.\n", serveruser ); 619 fprintf(stderr, "Warning: Could not get password entry for %s. Reverting to uid -2.\n", serveruser);
534 setegid( (gid_t)-2 ); setgid( (gid_t)-2 ); 620 if (setegid((gid_t)-2) || setgid((gid_t)-2) || setuid((uid_t)-2) || seteuid((uid_t)-2))
535 setuid( (uid_t)-2 ); seteuid( (uid_t)-2 ); 621 panic("Could not set uid to value -2");
536 } 622 } else {
537 else { 623 if (setegid(pws->pw_gid) || setgid(pws->pw_gid) || setuid(pws->pw_uid) || seteuid(pws->pw_uid))
538 setegid( pws->pw_gid ); setgid( pws->pw_gid ); 624 panic("Could not set uid to specified value");
539 setuid( pws->pw_uid ); seteuid( pws->pw_uid );
540 } 625 }
541 626
542 if( geteuid() == 0 || getegid() == 0 ) 627 if (geteuid() == 0 || getegid() == 0)
543 panic("Still running with root privileges?!"); 628 panic("Still running with root privileges?!");
544 } 629 } else {
545 else {
546 /* Normal user, just chdir() */ 630 /* Normal user, just chdir() */
547 if( serverdir && chdir( serverdir ) ) { 631 if (serverdir && chdir(serverdir)) {
548 fprintf( stderr, "Could not chroot to %s, because: %s\n", serverdir, strerror(errno) ); 632 fprintf(stderr, "Could not chroot to %s, because: %s\n", serverdir, strerror(errno));
549 return -1; 633 return -1;
550 } 634 }
551 } 635 }
@@ -553,118 +637,173 @@ int drop_privileges ( const char * const serveruser, const char * const serverdi
553 return 0; 637 return 0;
554} 638}
555 639
556int main( int argc, char **argv ) { 640/* Maintain our copy of the clock. time() on BSDs is very expensive. */
557 ot_ip6 serverip, tmpip; 641static void *time_caching_worker(void *args) {
558 int bound = 0, scanon = 1; 642 (void)args;
559 uint16_t tmpport; 643 while (1) {
560 char * statefile = 0; 644 g_now_seconds = time(NULL);
645 sleep(5);
646 }
647 return NULL;
648}
649
650int main(int argc, char **argv) {
651 ot_ip6 serverip;
652 ot_net tmpnet;
653 int bound = 0, scanon = 1;
654 uint16_t tmpport;
655 char *statefile = 0;
656 pthread_t thread_id; /* time cacher */
561 657
562 memset( serverip, 0, sizeof(ot_ip6) ); 658 memset(serverip, 0, sizeof(ot_ip6));
563#ifndef WANT_V6 659#ifdef WANT_V4_ONLY
564 serverip[10]=serverip[11]=-1; 660 serverip[10] = serverip[11] = -1;
565 noipv6=1;
566#endif 661#endif
567 662
568#ifdef WANT_DEV_RANDOM 663#ifdef WANT_DEV_RANDOM
569 srandomdev(); 664 srandomdev();
570#else 665#else
571 srandom( time(NULL) ); 666 srandom(time(NULL));
572#endif 667#endif
573 668
574 while( scanon ) { 669 while (scanon) {
575 switch( getopt( argc, argv, ":i:p:A:P:d:u:r:s:f:l:v" 670 switch (getopt(argc, argv,
671 ":i:p:A:P:d:u:r:s:f:l:v"
576#ifdef WANT_ACCESSLIST_BLACK 672#ifdef WANT_ACCESSLIST_BLACK
577"b:" 673 "b:"
578#elif defined( WANT_ACCESSLIST_WHITE ) 674#elif defined(WANT_ACCESSLIST_WHITE)
579"w:" 675 "w:"
580#endif 676#endif
581 "h" ) ) { 677 "h")) {
582 case -1 : scanon = 0; break; 678 case -1:
583 case 'i': 679 scanon = 0;
584 if( !scan_ip6( optarg, serverip )) { usage( argv[0] ); exit( 1 ); } 680 break;
585 break; 681 case 'i':
682 if (!scan_ip6(optarg, serverip)) {
683 usage(argv[0]);
684 exit(1);
685 }
686 break;
586#ifdef WANT_ACCESSLIST_BLACK 687#ifdef WANT_ACCESSLIST_BLACK
587 case 'b': set_config_option( &g_accesslist_filename, optarg); break; 688 case 'b':
588#elif defined( WANT_ACCESSLIST_WHITE ) 689 set_config_option(&g_accesslist_filename, optarg);
589 case 'w': set_config_option( &g_accesslist_filename, optarg); break; 690 break;
691#elif defined(WANT_ACCESSLIST_WHITE)
692 case 'w':
693 set_config_option(&g_accesslist_filename, optarg);
694 break;
590#endif 695#endif
591 case 'p': 696 case 'p':
592 if( !scan_ushort( optarg, &tmpport)) { usage( argv[0] ); exit( 1 ); } 697 if (!scan_ushort(optarg, &tmpport)) {
593 ot_try_bind( serverip, tmpport, FLAG_TCP ); bound++; break; 698 usage(argv[0]);
594 case 'P': 699 exit(1);
595 if( !scan_ushort( optarg, &tmpport)) { usage( argv[0] ); exit( 1 ); } 700 }
596 ot_try_bind( serverip, tmpport, FLAG_UDP ); bound++; break; 701 ot_try_bind(serverip, tmpport, FLAG_TCP);
702 bound++;
703 break;
704 case 'P':
705 if (!scan_ushort(optarg, &tmpport)) {
706 usage(argv[0]);
707 exit(1);
708 }
709 ot_try_bind(serverip, tmpport, FLAG_UDP);
710 bound++;
711 break;
597#ifdef WANT_SYNC_LIVE 712#ifdef WANT_SYNC_LIVE
598 case 's': 713 case 's':
599 if( !scan_ushort( optarg, &tmpport)) { usage( argv[0] ); exit( 1 ); } 714 if (!scan_ushort(optarg, &tmpport)) {
600 livesync_bind_mcast( serverip, tmpport); break; 715 usage(argv[0]);
716 exit(1);
717 }
718 livesync_bind_mcast(serverip, tmpport);
719 break;
601#endif 720#endif
602 case 'd': set_config_option( &g_serverdir, optarg ); break; 721 case 'd':
603 case 'u': set_config_option( &g_serveruser, optarg ); break; 722 set_config_option(&g_serverdir, optarg);
604 case 'r': set_config_option( &g_redirecturl, optarg ); break; 723 break;
605 case 'l': statefile = optarg; break; 724 case 'u':
606 case 'A': 725 set_config_option(&g_serveruser, optarg);
607 if( !scan_ip6( optarg, tmpip )) { usage( argv[0] ); exit( 1 ); } 726 break;
608 accesslist_blessip( tmpip, 0xffff ); /* Allow everything for now */ 727 case 'r':
609 break; 728 set_config_option(&g_redirecturl, optarg);
610 case 'f': bound += parse_configfile( optarg ); break; 729 break;
611 case 'h': help( argv[0] ); exit( 0 ); 730 case 'l':
612 case 'v': { 731 statefile = optarg;
613 char buffer[8192]; 732 break;
614 stats_return_tracker_version( buffer ); 733 case 'A':
615 fputs( buffer, stderr ); 734 if (!scan_ip6_net(optarg, &tmpnet)) {
616 exit( 0 ); 735 usage(argv[0]);
736 exit(1);
617 } 737 }
618 default: 738 accesslist_bless_net(&tmpnet, 0xffff); /* Allow everything for now */
619 case '?': usage( argv[0] ); exit( 1 ); 739 break;
740 case 'f':
741 bound += parse_configfile(optarg);
742 break;
743 case 'h':
744 help(argv[0]);
745 exit(0);
746 case 'v': {
747 char buffer[8192];
748 stats_return_tracker_version(buffer);
749 fputs(buffer, stderr);
750 exit(0);
751 }
752 default:
753 case '?':
754 usage(argv[0]);
755 exit(1);
620 } 756 }
621 } 757 }
622 758
623 /* Bind to our default tcp/udp ports */ 759 /* Bind to our default tcp/udp ports */
624 if( !bound) { 760 if (!bound) {
625 ot_try_bind( serverip, 6969, FLAG_TCP ); 761 ot_try_bind(serverip, 6969, FLAG_TCP);
626 ot_try_bind( serverip, 6969, FLAG_UDP ); 762 ot_try_bind(serverip, 6969, FLAG_UDP);
627 } 763 }
628 764
765 defaul_signal_handlers();
766
629#ifdef WANT_SYSLOGS 767#ifdef WANT_SYSLOGS
630 openlog( "opentracker", 0, LOG_USER ); 768 openlog("opentracker", 0, LOG_USER);
631 setlogmask(LOG_UPTO(LOG_INFO)); 769 setlogmask(LOG_UPTO(LOG_INFO));
632#endif 770#endif
633 771
634 if( drop_privileges( g_serveruser ? g_serveruser : "nobody", g_serverdir ) == -1 ) 772 if (drop_privileges(g_serveruser ? g_serveruser : "nobody", g_serverdir) == -1)
635 panic( "drop_privileges failed, exiting. Last error"); 773 panic("drop_privileges failed, exiting. Last error");
636 774
637 g_now_seconds = time( NULL ); 775 g_now_seconds = time(NULL);
776 pthread_create(&thread_id, NULL, time_caching_worker, NULL);
638 777
639 /* Create our self pipe which allows us to interrupt mainloops 778 /* Create our self pipe which allows us to interrupt mainloops
640 io_wait in case some data is available to send out */ 779 io_wait in case some data is available to send out */
641 if( pipe( g_self_pipe ) == -1 ) 780 if (pipe(g_self_pipe) == -1)
642 panic( "selfpipe failed: " ); 781 panic("selfpipe failed: ");
643 if( !io_fd( g_self_pipe[0] ) ) 782 if (!io_fd(g_self_pipe[0]))
644 panic( "selfpipe io_fd failed: " ); 783 panic("selfpipe io_fd failed: ");
645 if( !io_fd( g_self_pipe[1] ) ) 784 if (!io_fd(g_self_pipe[1]))
646 panic( "selfpipe io_fd failed: " ); 785 panic("selfpipe io_fd failed: ");
647 io_setcookie( g_self_pipe[0], (void*)FLAG_SELFPIPE ); 786 io_setcookie(g_self_pipe[0], (void *)FLAG_SELFPIPE);
648 io_wantread( g_self_pipe[0] ); 787 io_wantread(g_self_pipe[0]);
649 788
650 defaul_signal_handlers( );
651 /* Init all sub systems. This call may fail with an exit() */ 789 /* Init all sub systems. This call may fail with an exit() */
652 trackerlogic_init( ); 790 trackerlogic_init();
653 791
654 if( statefile ) 792#ifdef _DEBUG_RANDOMTORRENTS
655 load_state( statefile ); 793 fprintf(stderr, "DEBUG: Generating %d random peers on random torrents. This may take a while. (Setting RANDOMTORRENTS in trackerlogic.h)\n", RANDOMTORRENTS);
794 trackerlogic_add_random_torrents(RANDOMTORRENTS);
795 fprintf(stderr, "... done.\n");
796#endif
656 797
657 install_signal_handlers( ); 798 if (statefile)
799 load_state(statefile);
658 800
659 if( !g_udp_workers ) 801 install_signal_handlers();
660 udp_init( -1, 0 );
661 802
662 /* Kick off our initial clock setting alarm */ 803 if (!g_udp_workers)
663 alarm(5); 804 udp_init(-1, 0);
664 805
665 server_mainloop( 0 ); 806 server_mainloop(0);
666 807
667 return 0; 808 return 0;
668} 809}
669
670const char *g_version_opentracker_c = "$Source$: $Revision$\n";