2 // $Id: l2tpns.h,v 1.24 2004-10-29 04:01:11 bodea Exp $
7 #include <netinet/in.h>
12 #include <netinet/in.h>
13 #include <sys/socket.h>
14 #include <arpa/inet.h>
15 #include <sys/types.h>
18 #define VERSION "2.0.2"
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.
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)
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.
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_TIMEOUT 3000 // 5 minutes in 1/10th seconds to wait for radius to cleanup on shutdown
47 #define ETCDIR "/etc/l2tpns"
51 #define LIBDIR "/usr/lib/l2tpns"
55 #define STATEDIR "/var/lib/l2tpns"
59 #define PLUGINDIR LIBDIR // Plugins
63 #define PLUGINCONF ETCDIR // Plugin config dir
67 #define FLASHDIR ETCDIR
71 #define DATADIR STATEDIR
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)
86 #define PPPCHAP 0xC223
88 #define PPPIPCP 0x8021
92 #define MIN_IP_SIZE 0x19
110 typedef unsigned short u16
;
111 typedef unsigned int u32
;
112 typedef unsigned char u8
;
115 typedef u16 sessionidt
;
116 typedef u16 tunnelidt
;
118 typedef u8 hasht
[16];
121 struct cli_session_actions
{
128 #define CLI_SESS_KILL 0x01
129 #define CLI_SESS_SNOOP 0x02
130 #define CLI_SESS_NOSNOOP 0x04
131 #define CLI_SESS_THROTTLE 0x08
132 #define CLI_SESS_NOTHROTTLE 0x10
134 struct cli_tunnel_actions
{
138 #define CLI_TUN_KILL 0x01
140 // dump header: update number if internal format changes
141 #define DUMP_MAGIC "L2TPNS#" VERSION "#"
144 typedef struct routes
// route
151 typedef struct controls
// control message
153 struct controls
*next
; // next in queue
154 u16 length
; // length
159 typedef struct sessions
161 sessionidt next
; // next session in linked list
162 sessionidt far
; // far end session ID
163 tunnelidt tunnel
; // near end tunnel ID
164 ipt ip
; // IP of session set by RADIUS response (host byte order).
165 int ip_pool_index
; // index to IP pool
166 unsigned long unique_id
; // unique session id
167 u16 nr
; // next receive
169 u32 magic
; // ppp magic number
170 u32 cin
, cout
; // byte counts
171 u32 pin
, pout
; // packet counts
172 u32 total_cin
; // This counter is never reset while a session is open
173 u32 total_cout
; // This counter is never reset while a session is open
174 u32 id
; // session id
175 u32 throttle
; // non-zero if this session is throttled.
176 clockt opened
; // when started
177 clockt die
; // being closed, when to finally free
178 time_t last_packet
; // Last packet from the user (used for idle timeouts)
179 ipt dns1
, dns2
; // DNS servers
180 routet route
[MAXROUTE
]; // static routes
181 u16 radius
; // which radius session is being used (0 for not waiting on authentication)
182 u16 mru
; // maximum receive unit
183 u16 tbf_in
; // filter bucket for throttling in from the user.
184 u16 tbf_out
; // filter bucket for throttling out to the user.
185 u8 l2tp_flags
; // various bit flags from the ICCN on the l2tp tunnel.
186 u8 reserved_old_snoop
; // No longer used - remove at some time
187 u8 walled_garden
; // is this session gardened?
188 u8 flags1
; // additional flags (currently unused);
189 char random_vector
[MAXTEL
];
190 int random_vector_length
;
191 char user
[129]; // user (needed in seesion for radius stop messages) (can we reduce this? --mo)
192 char called
[MAXTEL
]; // called number
193 char calling
[MAXTEL
]; // calling number
194 u32 tx_connect_speed
;
195 u32 rx_connect_speed
;
196 u32 flags
; // Various session flags.
197 ipt snoop_ip
; // Interception destination IP
198 u16 snoop_port
; // Interception destination port
199 u16 sid
; // near end session id.
200 char reserved
[20]; // Space to expand structure without changing HB_VERSION
204 #define SF_IPCP_ACKED (1<<0) // Has this session seen an IPCP Ack?
211 #define SESSIONPFC 1 // PFC negotiated flags
212 #define SESSIONACFC 2 // ACFC negotiated flags
213 #define SESSIONLCPACK 4 // LCP negotiated
215 // 168 bytes per tunnel
216 typedef struct tunnels
218 tunnelidt far
; // far end tunnel ID
219 ipt ip
; // Ip for far end
220 portt port
; // port for far end
221 u16 window
; // Rx window
222 u16 nr
; // next receive
224 int state
; // current state (tunnelstate enum)
225 clockt last
; // when last control message sent (used for resend timeout)
226 clockt retry
; // when to try resenting pending control
227 clockt die
; // being closed, when to finally free
228 clockt lastrec
; // when the last control message was received
229 char hostname
[128]; // tunnel hostname
230 char vendor
[128]; // LAC vendor
231 u8
try; // number of retrys on a control message
232 u16 controlc
; // outstaind messages in queue
233 controlt
*controls
; // oldest message
234 controlt
*controle
; // newest message
238 // 180 bytes per radius session
239 typedef struct radiuss
// outstanding RADIUS requests
241 sessionidt session
; // which session this applies to
242 hasht auth
; // request authenticator
243 clockt retry
; // when to try next
244 char calling
[MAXTEL
]; // calling number
245 char pass
[129]; // password
246 u8 id
; // ID for PPP response
247 u8
try; // which try we are on
248 u8 state
; // state of radius requests
249 u8 chap
; // set if CHAP used (is CHAP identifier)
255 ipt address
; // Host byte order..
256 char assigned
; // 1 if assigned, 0 if free
258 clockt last
; // last used
259 char user
[129]; // user (try to have ip addresses persistent)
271 char message
[MAX_LOG_LENGTH
];
272 } buffer
[RINGBUFFER_SIZE
];
279 * Possible tunnel states
280 * TUNNELFREE -> TUNNELOPEN -> TUNNELDIE -> TUNNELFREE
284 TUNNELFREE
, // Not in use
285 TUNNELOPEN
, // Active tunnel
286 TUNNELDIE
, // Currently closing
287 TUNNELOPENING
, // Busy opening
288 TUNNELUNDEF
, // Undefined
293 RADIUSNULL
, // Not in use
294 RADIUSCHAP
, // sending CHAP down PPP
295 RADIUSAUTH
, // sending auth to RADIUS server
296 RADIUSIPCP
, // sending IPCP to end user
297 RADIUSSTART
, // sending start accounting to RADIUS server
298 RADIUSSTOP
, // sending stop accounting to RADIUS server
299 RADIUSWAIT
, // waiting timeout before available, in case delayed replies
300 RADIUSDEAD
, // errored while talking to radius server.
308 unsigned long tun_rx_packets
;
309 unsigned long tun_tx_packets
;
310 unsigned long tun_rx_bytes
;
311 unsigned long tun_tx_bytes
;
312 unsigned long tun_rx_errors
;
313 unsigned long tun_tx_errors
;
315 unsigned long tunnel_rx_packets
;
316 unsigned long tunnel_tx_packets
;
317 unsigned long tunnel_rx_bytes
;
318 unsigned long tunnel_tx_bytes
;
319 unsigned long tunnel_rx_errors
;
320 unsigned long tunnel_tx_errors
;
322 unsigned long tunnel_retries
;
323 unsigned long radius_retries
;
325 unsigned long arp_sent
;
327 unsigned long packets_snooped
;
329 unsigned long tunnel_created
;
330 unsigned long session_created
;
331 unsigned long tunnel_timeout
;
332 unsigned long session_timeout
;
333 unsigned long radius_timeout
;
334 unsigned long radius_overflow
;
335 unsigned long tunnel_overflow
;
336 unsigned long session_overflow
;
338 unsigned long ip_allocated
;
339 unsigned long ip_freed
;
341 unsigned long c_forwarded
;
342 unsigned long recv_forward
;
344 unsigned long call_processtun
;
345 unsigned long call_processipout
;
346 unsigned long call_processudp
;
347 unsigned long call_sessionbyip
;
348 unsigned long call_sessionbyuser
;
349 unsigned long call_sendarp
;
350 unsigned long call_sendipcp
;
351 unsigned long call_tunnelsend
;
352 unsigned long call_sessionkill
;
353 unsigned long call_sessionshutdown
;
354 unsigned long call_tunnelkill
;
355 unsigned long call_tunnelshutdown
;
356 unsigned long call_assign_ip_address
;
357 unsigned long call_free_ip_address
;
358 unsigned long call_dump_acct_info
;
359 unsigned long call_sessionsetup
;
360 unsigned long call_processpap
;
361 unsigned long call_processchap
;
362 unsigned long call_processlcp
;
363 unsigned long call_processipcp
;
364 unsigned long call_processipin
;
365 unsigned long call_processccp
;
366 unsigned long call_sendchap
;
367 unsigned long call_processrad
;
368 unsigned long call_radiussend
;
369 unsigned long call_radiusretry
;
376 #define CSTAT(x) STAT(x)
381 #define STAT(x) (_statistics->x++)
382 #define INC_STAT(x,y) (_statistics->x += (y))
383 #define GET_STAT(x) (_statistics->x)
384 #define SET_STAT(x, y) (_statistics->x = (y))
388 #define INC_STAT(x,y)
389 #define GET_STAT(x) 0
390 #define SET_STAT(x, y)
395 int debug
; // debugging level
396 time_t start_time
; // time when l2tpns was started
397 char bandwidth
[256]; // current bandwidth
398 char pid_file
[256]; // file to write PID to on startup
400 clockt current_time
; // 1/10ths of a second since the process started.
401 // means that we can only run a given process
402 // for 13 years without re-starting!
404 char config_file
[128];
405 int reload_config
; // flag to re-read config (set by cli)
406 int cleanup_interval
; // interval between regular cleanups (in seconds)
407 int multi_read_count
; // amount of packets to read per fd in processing loop
409 char tundevice
[10]; // tun device name
410 char log_filename
[128];
413 char radiussecret
[64];
414 int radius_accounting
;
415 ipt radiusserver
[MAXRADSERVER
]; // radius servers
416 u16 radiusport
[MAXRADSERVER
]; // radius base ports
417 u8 numradiusservers
; // radius server count
418 short num_radfds
; // Number of radius filehandles allocated
420 ipt default_dns1
, default_dns2
;
422 unsigned long rl_rate
; // throttle rate
423 int num_tbfs
; // number of throttle buckets
426 char accounting_dir
[128];
428 int send_garp
; // Set to true to garp for vip address on startup
432 char plugins
[64][MAXPLUGINS
];
433 char old_plugins
[64][MAXPLUGINS
];
435 int next_tbf
; // Next HTB id available to use
436 int scheduler_fifo
; // If the system has multiple CPUs, use FIFO scheduling policy for this process.
437 int lock_pages
; // Lock pages into memory.
438 int icmp_rate
; // Max number of ICMP unreachable per second to send>
440 u32 cluster_address
; // Multicast address of cluster.
441 // Send to this address to have everyone hear.
442 char cluster_interface
[64]; // Which interface to listen for multicast on.
443 int cluster_iam_master
; // Are we the cluster master???
444 int cluster_iam_uptodate
; // Set if we've got a full set of state from the master.
445 u32 cluster_master_address
; // The network address of the cluster master.
446 // Zero if i am the cluster master.
447 int cluster_seq_number
; // Sequence number of the next heartbeat we'll send out
448 // (or the seq number we're next expecting if we're a slave).
449 int cluster_undefined_sessions
; // How many sessions we're yet to receive from the master.
450 int cluster_undefined_tunnels
; // How many tunnels we're yet to receive from the master.
451 int cluster_highest_sessionid
;
452 int cluster_highest_tunnelid
;
453 clockt cluster_last_hb
; // Last time we saw a heartbeat from the master.
454 int cluster_num_changes
; // Number of changes queued.
456 int cluster_hb_interval
; // How often to send a heartbeat.
457 int cluster_hb_timeout
; // How many missed heartbeats trigger an election.
461 char bgp_peer
[2][64];
466 struct config_descriptt
471 enum { INT
, STRING
, UNSIGNED_LONG
, SHORT
, BOOL
, IP
, MAC
} type
;
475 void sendarp(int ifr_idx
, const unsigned char* mac
, ipt ip
);
479 void processpap(tunnelidt t
, sessionidt s
, u8
* p
, u16 l
);
480 void processchap(tunnelidt t
, sessionidt s
, u8
* p
, u16 l
);
481 void processlcp(tunnelidt t
, sessionidt s
, u8
* p
, u16 l
);
482 void processipcp(tunnelidt t
, sessionidt s
, u8
* p
, u16 l
);
483 void processipin(tunnelidt t
, sessionidt s
, u8
* p
, u16 l
);
484 void processccp(tunnelidt t
, sessionidt s
, u8
* p
, u16 l
);
485 void sendchap(tunnelidt t
, sessionidt s
);
486 u8
*makeppp(u8
* b
, int size
, u8
* p
, int l
, tunnelidt t
, sessionidt s
, u16 mtype
);
487 u8
*findppp(u8
* b
, u8 mtype
);
488 void initlcp(tunnelidt t
, sessionidt s
);
489 void dumplcp(u8
*p
, int l
);
494 void radiussend(u16 r
, u8 state
);
495 void processrad(u8
*buf
, int len
, char socket_index
);
496 void radiusretry(u16 r
);
497 u16
radiusnew(sessionidt s
);
498 void radiusclear(u16 r
, sessionidt s
);
501 int throttle_session(sessionidt s
, int throttle
);
508 void rl_done_tbf(u16 t
);
509 void rl_destroy_tbf(u16 t
);
514 clockt
backoff(u8
try);
515 void routeset(sessionidt
, ipt ip
, ipt mask
, ipt gw
, u8 add
);
518 void initdata(int optdebug
, char *optconfig
);
520 sessionidt
sessionbyip(ipt ip
);
521 sessionidt
sessionbyuser(char *username
);
522 void sessionshutdown(sessionidt s
, char *reason
);
523 void sessionsendarp(sessionidt s
);
524 void send_garp(ipt ip
);
525 void sessionkill(sessionidt s
, char *reason
);
526 void control16(controlt
* c
, u16 avp
, u16 val
, u8 m
);
527 void control32(controlt
* c
, u16 avp
, u32 val
, u8 m
);
528 void controls(controlt
* c
, u16 avp
, char *val
, u8 m
);
529 void controlb(controlt
* c
, u16 avp
, char *val
, unsigned int len
, u8 m
);
530 controlt
*controlnew(u16 mtype
);
531 void controlnull(tunnelidt t
);
532 void controladd(controlt
* c
, tunnelidt t
, sessionidt s
);
533 void tunnelsend(u8
* buf
, u16 l
, tunnelidt t
);
534 void tunnelkill(tunnelidt t
, char *reason
);
535 void tunnelshutdown(tunnelidt t
, char *reason
);
536 void sendipcp(tunnelidt t
, sessionidt s
);
537 void processipout(u8
* buf
, int len
);
538 void processarp(u8
* buf
, int len
);
539 void processudp(u8
* buf
, int len
, struct sockaddr_in
*addr
);
540 void processtun(u8
* buf
, int len
);
541 void processcontrol(u8
* buf
, int len
, struct sockaddr_in
*addr
);
542 int assign_ip_address(sessionidt s
);
543 void free_ip_address(sessionidt s
);
544 void snoop_send_packet(char *packet
, u16 size
, ipt destination
, u16 port
);
545 void dump_acct_info();
547 int cmd_show_ipcache(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
548 int cmd_show_hist_idle(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
549 int cmd_show_hist_open(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
553 #define log_hex(a,b,c,d) do{if (a <= config->debug) _log_hex(a,0,0,0,b,c,d);}while (0)
555 void _log(int level
, ipt address
, sessionidt s
, tunnelidt t
, const char *format
, ...) __attribute__((format (printf
, 5, 6)));
556 void _log_hex(int level
, ipt address
, sessionidt s
, tunnelidt t
, const char *title
, const char *data
, int maxsize
);
557 void build_chap_response(char *challenge
, u8 id
, u16 challenge_length
, char **challenge_response
);
558 int sessionsetup(tunnelidt t
, sessionidt s
);
559 int cluster_send_session(int s
);
560 int cluster_send_tunnel(int t
);
561 int cluster_send_goodbye();
562 void init_cli(char *hostname
);
563 void cli_do_file(FILE *fh
);
564 void cli_do(int sockfd
);
565 int cli_arg_help(struct cli_def
*cli
, int cr_ok
, char *entry
, ...);
567 void ringbuffer_dump(FILE *stream
);
569 void initplugins(void);
570 int run_plugins(int plugin_type
, void *data
);
571 void add_plugin(char *plugin_name
);
572 void remove_plugin(char *plugin_name
);
573 void plugins_done(void);
574 void tunnelclear(tunnelidt t
);
575 void host_unreachable(ipt destination
, u16 id
, ipt source
, char *packet
, int packet_len
);
576 void fix_address_pool(int sid
);
577 void rebuild_address_pool(void);
578 void send_ipin(sessionidt s
, u8
* buf
, int len
);
579 int throttle_session(sessionidt s
, int throttle
);
580 int load_session(sessionidt
, sessiont
*);
581 void become_master(void); // We're the master; kick off any required master initializations.
582 extern tunnelt
*tunnel
;
583 extern sessiont
*session
;
584 extern sessioncountt
*sess_count
;
585 extern ippoolt
*ip_address_pool
;
586 #define sessionfree (session[0].next)
588 #define log_backtrace(count, max) \
589 if (count++ < max) { \
593 log(0, 0, 0, t, "Backtrace follows"); \
594 size = backtrace(array, 10); \
595 strings = backtrace_symbols(array, size); \
596 if (strings) for (i = 0; i < size; i++) \
598 log(0, 0, 0, t, "%s\n", strings[i]); \
604 extern struct configt
*config
;
605 extern time_t basetime
; // Time when this process started.
606 extern time_t time_now
; // Seconds since EPOCH.
608 extern struct Tstats
*_statistics
;
609 extern ipt my_address
;
610 extern int tun_write(u8
*data
, int size
);
613 #define TIME (config->current_time)
615 // macros for handling help in cli commands
616 #define CLI_HELP_REQUESTED (argc > 0 && argv[argc-1][strlen(argv[argc-1])-1] == '?')
617 #define CLI_HELP_NO_ARGS (argc > 1 || argv[0][1]) ? CLI_OK : cli_arg_help(cli, 1, NULL)
619 // CVS identifiers (for "show version file")
620 extern char const *cvs_id_arp
;
621 extern char const *cvs_id_cli
;
622 extern char const *cvs_id_cluster
;
623 extern char const *cvs_id_constants
;
624 extern char const *cvs_id_control
;
625 extern char const *cvs_id_icmp
;
626 extern char const *cvs_id_l2tpns
;
627 extern char const *cvs_id_ll
;
628 extern char const *cvs_id_md5
;
629 extern char const *cvs_id_ppp
;
630 extern char const *cvs_id_radius
;
631 extern char const *cvs_id_tbf
;
632 extern char const *cvs_id_util
;
634 #endif /* __L2TPNS_H__ */