retain subdomain of hostname if any
[l2tpns.git] / l2tpns.h
1 // L2TPNS Global Stuff
2 // $Id: l2tpns.h,v 1.28 2004/11/03 13:23:59 bodea Exp $
3
4 #ifndef __L2TPNS_H__
5 #define __L2TPNS_H__
6
7 #include <netinet/in.h>
8 #include <execinfo.h>
9 #include <stdio.h>
10 #include <signal.h>
11 #include <stdlib.h>
12 #include <netinet/in.h>
13 #include <sys/socket.h>
14 #include <arpa/inet.h>
15 #include <sys/types.h>
16 #include <libcli.h>
17
18 #define VERSION "2.0.3"
19
20 // Limits
21 #define MAXTUNNEL 500 // could be up to 65535
22 #define MAXSESSION 50000 // could be up to 65535
23 #define MAXTBFS 6000 // Maximum token bucket filters. Might need up to 2 * session.
24
25 #define RADIUS_SHIFT 5
26 #define RADIUS_MASK ((unsigned short)(((unsigned short)~0) >> (16 - RADIUS_SHIFT)))
27 #define MAXRADIUS ((unsigned long)(1L << RADIUS_SHIFT) * 255)
28
29 #define T_UNDEF (0xffff) // A tunnel ID that won't ever be used. Mark session as undefined.
30 #define T_FREE (0) // A tunnel ID that won't ever be used. Mark session as free.
31
32 #define MAXCONTROL 1000 // max length control message we ever send...
33 #define MAXETHER (1500+18) // max packet we try sending to tun
34 #define MAXTEL 96 // telephone number
35 #define MAXPLUGINS 20 // maximum number of plugins to load
36 #define MAXRADSERVER 10 // max radius servers
37 #define MAXROUTE 10 // max static routes per session
38 #define MAXIPPOOL 131072 // max number of ip addresses in pool
39 #define RINGBUFFER_SIZE 10000 // Number of ringbuffer entries to allocate
40 #define MAX_LOG_LENGTH 512 // Maximum size of log message
41 #define ECHO_TIMEOUT 60 // Time between last packet sent and LCP ECHO generation
42 #define IDLE_TIMEOUT 240 // Time between last packet sent and LCP ECHO generation
43 #define BUSY_WAIT_TIME 3000 // 5 minutes in 1/10th seconds to wait for radius to cleanup on shutdown
44
45 // Constants
46 #ifndef ETCDIR
47 #define ETCDIR "/etc/l2tpns"
48 #endif
49
50 #ifndef LIBDIR
51 #define LIBDIR "/usr/lib/l2tpns"
52 #endif
53
54 #ifndef STATEDIR
55 #define STATEDIR "/var/lib/l2tpns"
56 #endif
57
58 #ifndef PLUGINDIR
59 #define PLUGINDIR LIBDIR // Plugins
60 #endif
61
62 #ifndef PLUGINCONF
63 #define PLUGINCONF ETCDIR // Plugin config dir
64 #endif
65
66 #ifndef FLASHDIR
67 #define FLASHDIR ETCDIR
68 #endif
69
70 #ifndef DATADIR
71 #define DATADIR STATEDIR
72 #endif
73
74 #define TUNDEVICE "/dev/net/tun"
75 #define STATEFILE DATADIR "/state.dump" // State dump file
76 #define CONFIGFILE FLASHDIR "/startup-config" // Configuration file
77 #define CLIUSERS FLASHDIR "/users" // CLI Users file
78 #define IPPOOLFILE FLASHDIR "/ip_pool" // Address pool configuration
79 #define ACCT_TIME 3000 // 5 minute accounting interval
80 #define L2TPPORT 1701 // L2TP port
81 #define RADPORT 1645 // old radius port...
82 #define PKTARP 0x0806 // ARP packet type
83 #define PKTIP 0x0800 // IP packet type
84 #define PSEUDOMAC 0x0200 // pseudo MAC prefix (local significant MAC)
85 #define PPPPAP 0xC023
86 #define PPPCHAP 0xC223
87 #define PPPLCP 0xC021
88 #define PPPIPCP 0x8021
89 #define PPPCCP 0x80FD
90 #define PPPIP 0x0021
91 #define PPPMP 0x003D
92 #define MIN_IP_SIZE 0x19
93 enum
94 {
95 ConfigReq = 1,
96 ConfigAck,
97 ConfigNak,
98 ConfigRej,
99 TerminateReq,
100 TerminateAck,
101 CodeRej,
102 ProtocolRej,
103 EchoReq,
104 EchoReply,
105 DiscardRequest,
106 IdentRequest
107 };
108
109 // Types
110 typedef unsigned short u16;
111 typedef unsigned int u32;
112 typedef unsigned char u8;
113 typedef u32 ipt;
114 typedef u16 portt;
115 typedef u16 sessionidt;
116 typedef u16 tunnelidt;
117 typedef u32 clockt;
118 typedef u8 hasht[16];
119
120 // CLI actions
121 struct cli_session_actions {
122 char action;
123 ipt snoop_ip;
124 u16 snoop_port;
125 int throttle_in;
126 int throttle_out;
127 };
128
129 #define CLI_SESS_KILL 0x01
130 #define CLI_SESS_SNOOP 0x02
131 #define CLI_SESS_NOSNOOP 0x04
132 #define CLI_SESS_THROTTLE 0x08
133 #define CLI_SESS_NOTHROTTLE 0x10
134
135 struct cli_tunnel_actions {
136 char action;
137 };
138
139 #define CLI_TUN_KILL 0x01
140
141 // dump header: update number if internal format changes
142 #define DUMP_MAGIC "L2TPNS#" VERSION "#"
143
144 // structures
145 typedef struct routes // route
146 {
147 ipt ip;
148 ipt mask;
149 }
150 routet;
151
152 typedef struct controls // control message
153 {
154 struct controls *next; // next in queue
155 u16 length; // length
156 u8 buf[MAXCONTROL];
157 }
158 controlt;
159
160 typedef struct sessions
161 {
162 sessionidt next; // next session in linked list
163 sessionidt far; // far end session ID
164 tunnelidt tunnel; // near end tunnel ID
165 ipt ip; // IP of session set by RADIUS response (host byte order).
166 int ip_pool_index; // index to IP pool
167 unsigned long unique_id; // unique session id
168 u16 nr; // next receive
169 u16 ns; // next send
170 u32 magic; // ppp magic number
171 u32 cin, cout; // byte counts
172 u32 pin, pout; // packet counts
173 u32 total_cin; // This counter is never reset while a session is open
174 u32 total_cout; // This counter is never reset while a session is open
175 u32 id; // session id
176 u16 throttle_in; // upstream throttle rate (kbps)
177 u16 throttle_out; // downstream throttle rate
178 clockt opened; // when started
179 clockt die; // being closed, when to finally free
180 time_t last_packet; // Last packet from the user (used for idle timeouts)
181 ipt dns1, dns2; // DNS servers
182 routet route[MAXROUTE]; // static routes
183 u16 radius; // which radius session is being used (0 for not waiting on authentication)
184 u16 mru; // maximum receive unit
185 u16 tbf_in; // filter bucket for throttling in from the user.
186 u16 tbf_out; // filter bucket for throttling out to the user.
187 u8 l2tp_flags; // various bit flags from the ICCN on the l2tp tunnel.
188 u8 reserved_old_snoop; // No longer used - remove at some time
189 u8 walled_garden; // is this session gardened?
190 u8 flags1; // additional flags (currently unused);
191 char random_vector[MAXTEL];
192 int random_vector_length;
193 char user[129]; // user (needed in seesion for radius stop messages) (can we reduce this? --mo)
194 char called[MAXTEL]; // called number
195 char calling[MAXTEL]; // calling number
196 u32 tx_connect_speed;
197 u32 rx_connect_speed;
198 u32 flags; // Various session flags.
199 ipt snoop_ip; // Interception destination IP
200 u16 snoop_port; // Interception destination port
201 u16 sid; // near end session id.
202 char reserved[20]; // Space to expand structure without changing HB_VERSION
203 }
204 sessiont;
205
206 #define SF_IPCP_ACKED (1<<0) // Has this session seen an IPCP Ack?
207
208 typedef struct {
209 u32 cin;
210 u32 cout;
211 } sessioncountt;
212
213 #define SESSIONPFC 1 // PFC negotiated flags
214 #define SESSIONACFC 2 // ACFC negotiated flags
215 #define SESSIONLCPACK 4 // LCP negotiated
216
217 // 168 bytes per tunnel
218 typedef struct tunnels
219 {
220 tunnelidt far; // far end tunnel ID
221 ipt ip; // Ip for far end
222 portt port; // port for far end
223 u16 window; // Rx window
224 u16 nr; // next receive
225 u16 ns; // next send
226 int state; // current state (tunnelstate enum)
227 clockt last; // when last control message sent (used for resend timeout)
228 clockt retry; // when to try resenting pending control
229 clockt die; // being closed, when to finally free
230 clockt lastrec; // when the last control message was received
231 char hostname[128]; // tunnel hostname
232 char vendor[128]; // LAC vendor
233 u8 try; // number of retrys on a control message
234 u16 controlc; // outstaind messages in queue
235 controlt *controls; // oldest message
236 controlt *controle; // newest message
237 }
238 tunnelt;
239
240 // 180 bytes per radius session
241 typedef struct radiuss // outstanding RADIUS requests
242 {
243 sessionidt session; // which session this applies to
244 hasht auth; // request authenticator
245 clockt retry; // when to try next
246 char calling[MAXTEL]; // calling number
247 char pass[129]; // password
248 u8 id; // ID for PPP response
249 u8 try; // which try we are on
250 u8 state; // state of radius requests
251 u8 chap; // set if CHAP used (is CHAP identifier)
252 }
253 radiust;
254
255 typedef struct
256 {
257 ipt address; // Host byte order..
258 char assigned; // 1 if assigned, 0 if free
259 sessionidt session;
260 clockt last; // last used
261 char user[129]; // user (try to have ip addresses persistent)
262 }
263 ippoolt;
264
265 #ifdef RINGBUFFER
266 struct Tringbuffer
267 {
268 struct {
269 char level;
270 sessionidt session;
271 tunnelidt tunnel;
272 ipt address;
273 char message[MAX_LOG_LENGTH];
274 } buffer[RINGBUFFER_SIZE];
275 int head;
276 int tail;
277 };
278 #endif
279
280 /*
281 * Possible tunnel states
282 * TUNNELFREE -> TUNNELOPEN -> TUNNELDIE -> TUNNELFREE
283 */
284 enum
285 {
286 TUNNELFREE, // Not in use
287 TUNNELOPEN, // Active tunnel
288 TUNNELDIE, // Currently closing
289 TUNNELOPENING, // Busy opening
290 TUNNELUNDEF, // Undefined
291 };
292
293 enum
294 {
295 RADIUSNULL, // Not in use
296 RADIUSCHAP, // sending CHAP down PPP
297 RADIUSAUTH, // sending auth to RADIUS server
298 RADIUSIPCP, // sending IPCP to end user
299 RADIUSSTART, // sending start accounting to RADIUS server
300 RADIUSSTOP, // sending stop accounting to RADIUS server
301 RADIUSWAIT, // waiting timeout before available, in case delayed replies
302 RADIUSDEAD, // errored while talking to radius server.
303 };
304
305 struct Tstats
306 {
307 time_t start_time;
308 time_t last_reset;
309
310 unsigned long tun_rx_packets;
311 unsigned long tun_tx_packets;
312 unsigned long tun_rx_bytes;
313 unsigned long tun_tx_bytes;
314 unsigned long tun_rx_errors;
315 unsigned long tun_tx_errors;
316
317 unsigned long tunnel_rx_packets;
318 unsigned long tunnel_tx_packets;
319 unsigned long tunnel_rx_bytes;
320 unsigned long tunnel_tx_bytes;
321 unsigned long tunnel_rx_errors;
322 unsigned long tunnel_tx_errors;
323
324 unsigned long tunnel_retries;
325 unsigned long radius_retries;
326
327 unsigned long arp_sent;
328
329 unsigned long packets_snooped;
330
331 unsigned long tunnel_created;
332 unsigned long session_created;
333 unsigned long tunnel_timeout;
334 unsigned long session_timeout;
335 unsigned long radius_timeout;
336 unsigned long radius_overflow;
337 unsigned long tunnel_overflow;
338 unsigned long session_overflow;
339
340 unsigned long ip_allocated;
341 unsigned long ip_freed;
342
343 unsigned long c_forwarded;
344 unsigned long recv_forward;
345 #ifdef STATISTICS
346 unsigned long call_processtun;
347 unsigned long call_processipout;
348 unsigned long call_processudp;
349 unsigned long call_sessionbyip;
350 unsigned long call_sessionbyuser;
351 unsigned long call_sendarp;
352 unsigned long call_sendipcp;
353 unsigned long call_tunnelsend;
354 unsigned long call_sessionkill;
355 unsigned long call_sessionshutdown;
356 unsigned long call_tunnelkill;
357 unsigned long call_tunnelshutdown;
358 unsigned long call_assign_ip_address;
359 unsigned long call_free_ip_address;
360 unsigned long call_dump_acct_info;
361 unsigned long call_sessionsetup;
362 unsigned long call_processpap;
363 unsigned long call_processchap;
364 unsigned long call_processlcp;
365 unsigned long call_processipcp;
366 unsigned long call_processipin;
367 unsigned long call_processccp;
368 unsigned long call_sendchap;
369 unsigned long call_processrad;
370 unsigned long call_radiussend;
371 unsigned long call_radiusretry;
372 #endif
373 };
374
375 #ifdef STATISTICS
376
377 #ifdef STAT_CALLS
378 #define CSTAT(x) STAT(x)
379 #else
380 #define CSTAT(x)
381 #endif
382
383 #define STAT(x) (_statistics->x++)
384 #define INC_STAT(x,y) (_statistics->x += (y))
385 #define GET_STAT(x) (_statistics->x)
386 #define SET_STAT(x, y) (_statistics->x = (y))
387 #else
388 #define CSTAT(x)
389 #define STAT(x)
390 #define INC_STAT(x,y)
391 #define GET_STAT(x) 0
392 #define SET_STAT(x, y)
393 #endif
394
395 struct configt
396 {
397 int debug; // debugging level
398 time_t start_time; // time when l2tpns was started
399 char bandwidth[256]; // current bandwidth
400 char pid_file[256]; // file to write PID to on startup
401 int wrote_pid;
402 clockt current_time; // 1/10ths of a second since the process started.
403 // means that we can only run a given process
404 // for 13 years without re-starting!
405
406 char config_file[128];
407 int reload_config; // flag to re-read config (set by cli)
408 int cleanup_interval; // interval between regular cleanups (in seconds)
409 int multi_read_count; // amount of packets to read per fd in processing loop
410
411 char tundevice[10]; // tun device name
412 char log_filename[128];
413 char l2tpsecret[64];
414
415 char radiussecret[64];
416 int radius_accounting;
417 ipt radiusserver[MAXRADSERVER]; // radius servers
418 u16 radiusport[MAXRADSERVER]; // radius base ports
419 u8 numradiusservers; // radius server count
420 short num_radfds; // Number of radius filehandles allocated
421
422 ipt default_dns1, default_dns2;
423
424 unsigned long rl_rate; // default throttle rate
425 int num_tbfs; // number of throttle buckets
426
427 int save_state;
428 char accounting_dir[128];
429 ipt bind_address;
430 int send_garp; // Set to true to garp for vip address on startup
431
432 int target_uid;
433 int dump_speed;
434 char plugins[64][MAXPLUGINS];
435 char old_plugins[64][MAXPLUGINS];
436
437 int next_tbf; // Next HTB id available to use
438 int scheduler_fifo; // If the system has multiple CPUs, use FIFO scheduling policy for this process.
439 int lock_pages; // Lock pages into memory.
440 int icmp_rate; // Max number of ICMP unreachable per second to send>
441
442 u32 cluster_address; // Multicast address of cluster.
443 // Send to this address to have everyone hear.
444 char cluster_interface[64]; // Which interface to listen for multicast on.
445 int cluster_iam_master; // Are we the cluster master???
446 int cluster_iam_uptodate; // Set if we've got a full set of state from the master.
447 u32 cluster_master_address; // The network address of the cluster master.
448 // Zero if i am the cluster master.
449 int cluster_seq_number; // Sequence number of the next heartbeat we'll send out
450 // (or the seq number we're next expecting if we're a slave).
451 int cluster_undefined_sessions; // How many sessions we're yet to receive from the master.
452 int cluster_undefined_tunnels; // How many tunnels we're yet to receive from the master.
453 int cluster_highest_sessionid;
454 int cluster_highest_tunnelid;
455 clockt cluster_last_hb; // Last time we saw a heartbeat from the master.
456 int cluster_num_changes; // Number of changes queued.
457
458 int cluster_hb_interval; // How often to send a heartbeat.
459 int cluster_hb_timeout; // How many missed heartbeats trigger an election.
460
461 #ifdef BGP
462 u16 as_number;
463 char bgp_peer[2][64];
464 u16 bgp_peer_as[2];
465 #endif
466 };
467
468 struct config_descriptt
469 {
470 char *key;
471 int offset;
472 int size;
473 enum { INT, STRING, UNSIGNED_LONG, SHORT, BOOL, IP, MAC } type;
474 };
475
476 // arp.c
477 void sendarp(int ifr_idx, const unsigned char* mac, ipt ip);
478
479
480 // ppp.c
481 void processpap(tunnelidt t, sessionidt s, u8 * p, u16 l);
482 void processchap(tunnelidt t, sessionidt s, u8 * p, u16 l);
483 void processlcp(tunnelidt t, sessionidt s, u8 * p, u16 l);
484 void processipcp(tunnelidt t, sessionidt s, u8 * p, u16 l);
485 void processipin(tunnelidt t, sessionidt s, u8 * p, u16 l);
486 void processccp(tunnelidt t, sessionidt s, u8 * p, u16 l);
487 void sendchap(tunnelidt t, sessionidt s);
488 u8 *makeppp(u8 * b, int size, u8 * p, int l, tunnelidt t, sessionidt s, u16 mtype);
489 u8 *findppp(u8 * b, u8 mtype);
490 void initlcp(tunnelidt t, sessionidt s);
491 void dumplcp(u8 *p, int l);
492
493
494 // radius.c
495 void initrad(void);
496 void radiussend(u16 r, u8 state);
497 void processrad(u8 *buf, int len, char socket_index);
498 void radiusretry(u16 r);
499 u16 radiusnew(sessionidt s);
500 void radiusclear(u16 r, sessionidt s);
501
502
503 // l2tpns.c
504 clockt now(void);
505 clockt backoff(u8 try);
506 void routeset(sessionidt, ipt ip, ipt mask, ipt gw, u8 add);
507 void inittun(void);
508 void initudp(void);
509 void initdata(int optdebug, char *optconfig);
510 void initippool();
511 sessionidt sessionbyip(ipt ip);
512 sessionidt sessionbyuser(char *username);
513 void sessionshutdown(sessionidt s, char *reason);
514 void sessionsendarp(sessionidt s);
515 void send_garp(ipt ip);
516 void sessionkill(sessionidt s, char *reason);
517 void control16(controlt * c, u16 avp, u16 val, u8 m);
518 void control32(controlt * c, u16 avp, u32 val, u8 m);
519 void controls(controlt * c, u16 avp, char *val, u8 m);
520 void controlb(controlt * c, u16 avp, char *val, unsigned int len, u8 m);
521 controlt *controlnew(u16 mtype);
522 void controlnull(tunnelidt t);
523 void controladd(controlt * c, tunnelidt t, sessionidt s);
524 void tunnelsend(u8 * buf, u16 l, tunnelidt t);
525 void tunnelkill(tunnelidt t, char *reason);
526 void tunnelshutdown(tunnelidt t, char *reason);
527 void sendipcp(tunnelidt t, sessionidt s);
528 void processipout(u8 * buf, int len);
529 void processarp(u8 * buf, int len);
530 void processudp(u8 * buf, int len, struct sockaddr_in *addr);
531 void processtun(u8 * buf, int len);
532 void processcontrol(u8 * buf, int len, struct sockaddr_in *addr);
533 int assign_ip_address(sessionidt s);
534 void free_ip_address(sessionidt s);
535 void snoop_send_packet(char *packet, u16 size, ipt destination, u16 port);
536 void dump_acct_info();
537 void mainloop(void);
538 int cmd_show_ipcache(struct cli_def *cli, char *command, char **argv, int argc);
539 int cmd_show_hist_idle(struct cli_def *cli, char *command, char **argv, int argc);
540 int cmd_show_hist_open(struct cli_def *cli, char *command, char **argv, int argc);
541
542 #undef log
543 #undef log_hex
544 #define log(D, a, s, t, f, ...) ({ if (D <= config->debug) _log(D, a, s, t, f, ## __VA_ARGS__); })
545 #define log_hex(D, t, d, s) ({ if (D <= config->debug) _log_hex(D, t, d, s); })
546
547 void _log(int level, ipt address, sessionidt s, tunnelidt t, const char *format, ...) __attribute__((format (printf, 5, 6)));
548 void _log_hex(int level, const char *title, const char *data, int maxsize);
549
550 void build_chap_response(char *challenge, u8 id, u16 challenge_length, char **challenge_response);
551 int sessionsetup(tunnelidt t, sessionidt s);
552 int cluster_send_session(int s);
553 int cluster_send_tunnel(int t);
554 int cluster_send_goodbye();
555 void init_cli(char *hostname);
556 void cli_do_file(FILE *fh);
557 void cli_do(int sockfd);
558 int cli_arg_help(struct cli_def *cli, int cr_ok, char *entry, ...);
559 #ifdef RINGBUFFER
560 void ringbuffer_dump(FILE *stream);
561 #endif
562 void initplugins(void);
563 int run_plugins(int plugin_type, void *data);
564 void add_plugin(char *plugin_name);
565 void remove_plugin(char *plugin_name);
566 void plugins_done(void);
567 void tunnelclear(tunnelidt t);
568 void host_unreachable(ipt destination, u16 id, ipt source, char *packet, int packet_len);
569 void fix_address_pool(int sid);
570 void rebuild_address_pool(void);
571 void send_ipin(sessionidt s, u8 * buf, int len);
572 void throttle_session(sessionidt s, int rate_in, int rate_out);
573 int load_session(sessionidt, sessiont *);
574 void become_master(void); // We're the master; kick off any required master initializations.
575 extern tunnelt *tunnel;
576 extern sessiont *session;
577 extern sessioncountt *sess_count;
578 extern ippoolt *ip_address_pool;
579 #define sessionfree (session[0].next)
580
581 #define log_backtrace(count, max) \
582 if (count++ < max) { \
583 void *array[20]; \
584 char **strings; \
585 int size, i; \
586 log(0, 0, 0, t, "Backtrace follows"); \
587 size = backtrace(array, 10); \
588 strings = backtrace_symbols(array, size); \
589 if (strings) for (i = 0; i < size; i++) \
590 { \
591 log(0, 0, 0, t, "%s\n", strings[i]); \
592 } \
593 free(strings); \
594 }
595
596
597 extern struct configt *config;
598 extern time_t basetime; // Time when this process started.
599 extern time_t time_now; // Seconds since EPOCH.
600 extern u32 last_id;
601 extern struct Tstats *_statistics;
602 extern ipt my_address;
603 extern int tun_write(u8 *data, int size);
604 extern int clifd;
605
606
607 #define TIME (config->current_time)
608
609 // macros for handling help in cli commands
610 #define CLI_HELP_REQUESTED (argc > 0 && argv[argc-1][strlen(argv[argc-1])-1] == '?')
611 #define CLI_HELP_NO_ARGS (argc > 1 || argv[0][1]) ? CLI_OK : cli_arg_help(cli, 1, NULL)
612
613 // CVS identifiers (for "show version file")
614 extern char const *cvs_id_arp;
615 extern char const *cvs_id_cli;
616 extern char const *cvs_id_cluster;
617 extern char const *cvs_id_constants;
618 extern char const *cvs_id_control;
619 extern char const *cvs_id_icmp;
620 extern char const *cvs_id_l2tpns;
621 extern char const *cvs_id_ll;
622 extern char const *cvs_id_md5;
623 extern char const *cvs_id_ppp;
624 extern char const *cvs_id_radius;
625 extern char const *cvs_id_tbf;
626 extern char const *cvs_id_util;
627
628 #endif /* __L2TPNS_H__ */