1 // L2TPNS Command Line Interface
4 char const *cvs_name
= "$Name: $";
5 char const *cvs_id_cli
= "$Id: cli.c,v 1.19 2004-10-30 07:35:31 bodea Exp $";
18 #include <arpa/inet.h>
20 #include <sys/socket.h>
21 #include <sys/types.h>
35 extern tunnelt
*tunnel
;
36 extern sessiont
*session
;
37 extern radiust
*radius
;
38 extern ippoolt
*ip_address_pool
;
39 extern struct Tstats
*_statistics
;
40 struct cli_def
*cli
= NULL
;
42 extern int clifd
, udpfd
, tunfd
, snoopfd
, ifrfd
, cluster_sockfd
;
44 extern struct configt
*config
;
45 extern struct config_descriptt config_values
[];
47 extern struct Tringbuffer
*ringbuffer
;
49 extern struct cli_session_actions
*cli_session_actions
;
50 extern struct cli_tunnel_actions
*cli_tunnel_actions
;
51 extern tbft
*filter_list
;
53 char *debug_levels
[] = {
77 int cmd_show_session(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
78 int cmd_show_tunnels(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
79 int cmd_show_users(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
80 int cmd_show_radius(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
81 int cmd_show_counters(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
82 int cmd_show_version(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
83 int cmd_show_pool(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
84 int cmd_show_run(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
85 int cmd_show_banana(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
86 int cmd_show_plugins(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
87 int cmd_show_throttle(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
88 int cmd_show_cluster(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
89 int cmd_write_memory(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
90 int cmd_clear_counters(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
91 int cmd_drop_user(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
92 int cmd_drop_tunnel(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
93 int cmd_drop_session(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
94 int cmd_snoop(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
95 int cmd_no_snoop(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
96 int cmd_throttle(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
97 int cmd_no_throttle(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
98 int cmd_debug(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
99 int cmd_no_debug(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
100 int cmd_set(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
101 int cmd_load_plugin(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
102 int cmd_remove_plugin(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
103 int cmd_uptime(struct cli_def
*cli
, char *command
, char **argv
, int argc
);
104 int regular_stuff(struct cli_def
*cli
);
105 void parsemac(char *string
, char mac
[6]);
107 void init_cli(char *hostname
)
111 struct cli_command
*c
;
112 struct cli_command
*c2
;
114 struct sockaddr_in addr
;
117 if (hostname
&& *hostname
)
118 cli_set_hostname(cli
, hostname
);
120 cli_set_hostname(cli
, "l2tpns");
122 c
= cli_register_command(cli
, NULL
, "show", NULL
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, NULL
);
123 cli_register_command(cli
, c
, "banana", cmd_show_banana
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show a banana");
125 cli_register_command(cli
, c
, "bgp", cmd_show_bgp
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show BGP status");
127 cli_register_command(cli
, c
, "cluster", cmd_show_cluster
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show cluster information");
128 cli_register_command(cli
, c
, "ipcache", cmd_show_ipcache
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show contents of the IP cache");
129 cli_register_command(cli
, c
, "plugins", cmd_show_plugins
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "List all installed plugins");
130 cli_register_command(cli
, c
, "pool", cmd_show_pool
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show the IP address allocation pool");
131 cli_register_command(cli
, c
, "radius", cmd_show_radius
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show active radius queries");
132 cli_register_command(cli
, c
, "running-config", cmd_show_run
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show the currently running configuration");
133 cli_register_command(cli
, c
, "session", cmd_show_session
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show a list of sessions or details for a single session");
134 cli_register_command(cli
, c
, "tbf", cmd_show_tbf
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "List all token bucket filters in use");
135 cli_register_command(cli
, c
, "throttle", cmd_show_throttle
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "List all throttled sessions and associated TBFs");
136 cli_register_command(cli
, c
, "tunnels", cmd_show_tunnels
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show a list of tunnels or details for a single tunnel");
137 cli_register_command(cli
, c
, "users", cmd_show_users
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show a list of all connected users or details of selected user");
138 cli_register_command(cli
, c
, "version", cmd_show_version
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show currently running software version");
140 c2
= cli_register_command(cli
, c
, "histogram", NULL
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, NULL
);
141 cli_register_command(cli
, c2
, "idle", cmd_show_hist_idle
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show histogram of session idle times");
142 cli_register_command(cli
, c2
, "open", cmd_show_hist_open
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show histogram of session durations");
145 cli_register_command(cli
, c
, "counters", cmd_show_counters
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Display all the internal counters and running totals");
147 c
= cli_register_command(cli
, NULL
, "clear", NULL
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, NULL
);
148 cli_register_command(cli
, c
, "counters", cmd_clear_counters
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Clear internal counters");
151 cli_register_command(cli
, NULL
, "uptime", cmd_uptime
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show uptime and bandwidth utilisation");
153 c
= cli_register_command(cli
, NULL
, "write", NULL
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, NULL
);
154 cli_register_command(cli
, c
, "memory", cmd_write_memory
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Save the running config to flash");
155 cli_register_command(cli
, c
, "terminal", cmd_show_run
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Show the running config");
157 cli_register_command(cli
, NULL
, "snoop", cmd_snoop
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Temporarily enable interception for a user");
158 cli_register_command(cli
, NULL
, "throttle", cmd_throttle
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Temporarily enable throttling for a user");
159 cli_register_command(cli
, NULL
, "debug", cmd_debug
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Set the level of logging that is shown on the console");
161 c
= cli_register_command(cli
, NULL
, "suspend", NULL
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, NULL
);
162 cli_register_command(cli
, c
, "bgp", cmd_suspend_bgp
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Withdraw routes from BGP peer");
164 c
= cli_register_command(cli
, NULL
, "no", NULL
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, NULL
);
165 cli_register_command(cli
, c
, "snoop", cmd_no_snoop
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Temporarily disable interception for a user");
166 cli_register_command(cli
, c
, "throttle", cmd_no_throttle
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Temporarily disable throttling for a user");
167 cli_register_command(cli
, c
, "debug", cmd_no_debug
, PRIVILEGE_UNPRIVILEGED
, MODE_EXEC
, "Turn off logging of a certain level of debugging");
168 c2
= cli_register_command(cli
, c
, "suspend", NULL
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, NULL
);
169 cli_register_command(cli
, c2
, "bgp", cmd_no_suspend_bgp
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Advertise routes to BGP peer");
171 c
= cli_register_command(cli
, NULL
, "drop", NULL
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, NULL
);
172 cli_register_command(cli
, c
, "user", cmd_drop_user
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Disconnect a user");
173 cli_register_command(cli
, c
, "tunnel", cmd_drop_tunnel
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Disconnect a tunnel and all sessions on that tunnel");
174 cli_register_command(cli
, c
, "session", cmd_drop_session
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Disconnect a session");
176 c
= cli_register_command(cli
, NULL
, "restart", NULL
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, NULL
);
177 cli_register_command(cli
, c
, "bgp", cmd_restart_bgp
, PRIVILEGE_PRIVILEGED
, MODE_EXEC
, "Restart BGP");
179 c
= cli_register_command(cli
, NULL
, "load", NULL
, PRIVILEGE_PRIVILEGED
, MODE_CONFIG
, NULL
);
180 cli_register_command(cli
, c
, "plugin", cmd_load_plugin
, PRIVILEGE_PRIVILEGED
, MODE_CONFIG
, "Load a plugin");
182 c
= cli_register_command(cli
, NULL
, "remove", NULL
, PRIVILEGE_PRIVILEGED
, MODE_CONFIG
, NULL
);
183 cli_register_command(cli
, c
, "plugin", cmd_remove_plugin
, PRIVILEGE_PRIVILEGED
, MODE_CONFIG
, "Remove a plugin");
185 cli_register_command(cli
, NULL
, "set", cmd_set
, PRIVILEGE_PRIVILEGED
, MODE_CONFIG
, "Set a configuration variable");
187 // Enable regular processing
188 cli_regular(cli
, regular_stuff
);
190 if (!(f
= fopen(CLIUSERS
, "r")))
192 log(0, 0, 0, 0, "WARNING! No users specified. Command-line access is open to all\n");
196 while (fgets(buf
, 4096, f
))
199 if (*buf
== '#') continue;
200 if ((p
= strchr(buf
, '\r'))) *p
= 0;
201 if ((p
= strchr(buf
, '\n'))) *p
= 0;
203 if (!(p
= strchr((char *)buf
, ':'))) continue;
205 if (!strcmp(buf
, "enable"))
207 cli_allow_enable(cli
, p
);
208 log(3, 0, 0, 0, "Setting enable password\n");
212 cli_allow_user(cli
, buf
, p
);
213 log(3, 0, 0, 0, "Allowing user %s to connect to the CLI\n", buf
);
219 memset(&addr
, 0, sizeof(addr
));
220 clifd
= socket(PF_INET
, SOCK_STREAM
, 6);
221 setsockopt(clifd
, SOL_SOCKET
, SO_REUSEADDR
, &on
, sizeof(on
));
224 // Set cli fd as non-blocking
225 flags
= fcntl(clifd
, F_GETFL
, 0);
226 fcntl(clifd
, F_SETFL
, flags
| O_NONBLOCK
);
228 addr
.sin_family
= AF_INET
;
229 addr
.sin_port
= htons(23);
230 if (bind(clifd
, (void *) &addr
, sizeof(addr
)) < 0)
232 log(0, 0, 0, 0, "Error listening on cli port 23: %s\n", strerror(errno
));
238 void cli_do(int sockfd
)
241 int require_auth
= 1;
242 struct sockaddr_in addr
;
243 int l
= sizeof(addr
);
246 if (config
->scheduler_fifo
)
249 struct sched_param params
= {0};
250 params
.sched_priority
= 0;
251 if ((ret
= sched_setscheduler(0, SCHED_OTHER
, ¶ms
)) == 0)
253 log(3, 0, 0, 0, "Dropped FIFO scheduler\n");
257 log(0, 0, 0, 0, "Error setting scheduler to OTHER: %s\n", strerror(errno
));
258 log(0, 0, 0, 0, "This is probably really really bad.\n");
262 signal(SIGPIPE
, SIG_DFL
);
263 signal(SIGCHLD
, SIG_DFL
);
264 signal(SIGHUP
, SIG_DFL
);
265 signal(SIGUSR1
, SIG_DFL
);
266 signal(SIGQUIT
, SIG_DFL
);
267 signal(SIGKILL
, SIG_DFL
);
268 signal(SIGALRM
, SIG_DFL
);
269 signal(SIGTERM
, SIG_DFL
);
272 if (udpfd
) close(udpfd
); udpfd
= 0;
273 if (tunfd
) close(tunfd
); tunfd
= 0;
274 if (snoopfd
) close(snoopfd
); snoopfd
= 0;
275 for (i
= 0; i
< config
->num_radfds
; i
++)
276 if (radfds
[i
]) close(radfds
[i
]);
277 if (ifrfd
) close(ifrfd
); ifrfd
= 0;
278 if (cluster_sockfd
) close(cluster_sockfd
); cluster_sockfd
= 0;
279 if (clifd
) close(clifd
); clifd
= 0;
281 for (i
= 0; i
< BGP_NUM_PEERS
; i
++)
282 if (bgp_peers
[i
].sock
!= -1)
283 close(bgp_peers
[i
].sock
);
286 if (getpeername(sockfd
, (struct sockaddr
*)&addr
, &l
) == 0)
288 log(3, 0, 0, 0, "Accepted connection to CLI from %s\n", inet_toa(addr
.sin_addr
.s_addr
));
289 require_auth
= addr
.sin_addr
.s_addr
!= inet_addr("127.0.0.1");
292 log(0, 0, 0, 0, "getpeername() failed on cli socket. Requiring authentication: %s\n", strerror(errno
));
296 log(3, 0, 0, 0, "CLI is remote, requiring authentication\n");
297 if (!cli
->users
) /* paranoia */
299 log(0, 0, 0, 0, "No users for remote authentication! Exiting CLI\n");
305 /* no username/pass required */
312 debug_rb_tail
= ringbuffer
->tail
;
314 memset(&debug_flags
, 0, sizeof(debug_flags
));
315 debug_flags
.critical
= 1;
317 cli_loop(cli
, sockfd
);
320 log(3, 0, 0, 0, "Closed CLI connection from %s\n", inet_toa(addr
.sin_addr
.s_addr
));
324 void cli_print_log(struct cli_def
*cli
, char *string
)
326 log(3, 0, 0, 0, "%s\n", string
);
329 void cli_do_file(FILE *fh
)
331 log(3, 0, 0, 0, "Reading configuration file\n");
332 cli_print_callback(cli
, cli_print_log
);
333 cli_file(cli
, fh
, PRIVILEGE_PRIVILEGED
, MODE_CONFIG
);
334 cli_print_callback(cli
, NULL
);
337 int cli_arg_help(struct cli_def
*cli
, int cr_ok
, char *entry
, ...)
348 if ((p
= strchr(entry
, '%')) && !strchr(p
+1, '%') && p
[1] == 'd')
350 int v
= va_arg(ap
, int);
351 snprintf(buf
, sizeof(buf
), entry
, v
);
357 desc
= va_arg(ap
, char *);
359 cli_print(cli
, " %-20s %s", p
, desc
);
361 cli_print(cli
, " %s", p
);
363 entry
= desc
? va_arg(ap
, char *) : 0;
368 cli_print(cli
, " <cr>");
373 int cmd_show_session(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
377 if (CLI_HELP_REQUESTED
)
378 return cli_arg_help(cli
, 1,
379 "<1-%d>", MAXSESSION
-1, "Show specific session by id",
385 // Show individual session
386 for (i
= 0; i
< argc
; i
++)
388 unsigned int s
, b_in
, b_out
;
390 if (s
<= 0 || s
>= MAXSESSION
)
392 cli_print(cli
, "Invalid session id \"%s\"", argv
[i
]);
395 cli_print(cli
, "\r\nSession %d:", s
);
396 cli_print(cli
, " User: %s", session
[s
].user
[0] ? session
[s
].user
: "none");
397 cli_print(cli
, " Calling Num: %s", session
[s
].calling
);
398 cli_print(cli
, " Called Num: %s", session
[s
].called
);
399 cli_print(cli
, " Tunnel ID: %d", session
[s
].tunnel
);
400 cli_print(cli
, " IP address: %s", inet_toa(htonl(session
[s
].ip
)));
401 cli_print(cli
, " Unique SID: %lu", session
[s
].unique_id
);
402 cli_print(cli
, " Idle time: %u seconds", abs(time_now
- session
[s
].last_packet
));
403 cli_print(cli
, " Next Recv: %u", session
[s
].nr
);
404 cli_print(cli
, " Next Send: %u", session
[s
].ns
);
405 cli_print(cli
, " Bytes In/Out: %lu/%lu", (unsigned long)session
[s
].total_cout
, (unsigned long)session
[s
].total_cin
);
406 cli_print(cli
, " Pkts In/Out: %lu/%lu", (unsigned long)session
[s
].pout
, (unsigned long)session
[s
].pin
);
407 cli_print(cli
, " MRU: %d", session
[s
].mru
);
408 cli_print(cli
, " Radius Session: %u", session
[s
].radius
);
409 cli_print(cli
, " Rx Speed: %lu", session
[s
].rx_connect_speed
);
410 cli_print(cli
, " Tx Speed: %lu", session
[s
].tx_connect_speed
);
411 if (session
[s
].snoop_ip
&& session
[s
].snoop_port
)
412 cli_print(cli
, " Intercepted: %s:%d", inet_toa(session
[s
].snoop_ip
), session
[s
] .snoop_port
);
414 cli_print(cli
, " Intercepted: no");
415 cli_print(cli
, " Throttled: %s", session
[s
].throttle
? "YES" : "no");
416 cli_print(cli
, " Walled Garden: %s", session
[s
].walled_garden
? "YES" : "no");
417 b_in
= session
[s
].tbf_in
;
418 b_out
= session
[s
].tbf_out
;
420 cli_print(cli
, " %5s %6s %6s | %7s %7s %8s %8s %8s %8s",
421 "Rate", "Credit", "Queued", "ByteIn", "PackIn",
422 "ByteSent", "PackSent", "PackDrop", "PackDelay");
425 cli_print(cli
, " TBFI#%d%1s %5d %6d %6d | %7d %7d %8d %8d %8d %8d",
427 (filter_list
[b_in
].next
? "*" : " "),
428 filter_list
[b_in
].rate
* 8,
429 filter_list
[b_in
].credit
,
430 filter_list
[b_in
].queued
,
431 filter_list
[b_in
].b_queued
,
432 filter_list
[b_in
].p_queued
,
433 filter_list
[b_in
].b_sent
,
434 filter_list
[b_in
].p_sent
,
435 filter_list
[b_in
].p_dropped
,
436 filter_list
[b_in
].p_delayed
);
439 cli_print(cli
, " TBFO#%d%1s %5d %6d %6d | %7d %7d %8d %8d %8d %8d",
441 (filter_list
[b_out
].next
? "*" : " "),
442 filter_list
[b_out
].rate
* 8,
443 filter_list
[b_out
].credit
,
444 filter_list
[b_out
].queued
,
445 filter_list
[b_out
].b_queued
,
446 filter_list
[b_out
].p_queued
,
447 filter_list
[b_out
].b_sent
,
448 filter_list
[b_out
].p_sent
,
449 filter_list
[b_out
].p_dropped
,
450 filter_list
[b_out
].p_delayed
);
457 cli_print(cli
, " %s %4s %-32s %-15s %s %s %s %10s %10s %10s %4s %-15s %s",
472 for (i
= 1; i
< MAXSESSION
; i
++)
474 char *userip
, *tunnelip
;
475 if (!session
[i
].opened
) continue;
476 userip
= strdup(inet_toa(htonl(session
[i
].ip
)));
477 tunnelip
= strdup(inet_toa(htonl(tunnel
[ session
[i
].tunnel
].ip
)));
478 cli_print(cli
, "%5d %4d %-32s %-15s %s %s %s %10u %10lu %10lu %4u %-15s %s",
481 session
[i
].user
[0] ? session
[i
].user
: "*",
483 (session
[i
].snoop_ip
&& session
[i
].snoop_port
) ? "Y" : "N",
484 (session
[i
].throttle
) ? "Y" : "N",
485 (session
[i
].walled_garden
) ? "Y" : "N",
486 abs(time_now
- (unsigned long)session
[i
].opened
),
487 (unsigned long)session
[i
].total_cout
,
488 (unsigned long)session
[i
].total_cin
,
489 abs(time_now
- (session
[i
].last_packet
? session
[i
].last_packet
: time_now
)),
491 session
[i
].calling
[0] ? session
[i
].calling
: "*");
492 if (userip
) free(userip
);
493 if (tunnelip
) free(tunnelip
);
498 int cmd_show_tunnels(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
500 int i
, x
, show_all
= 0;
508 if (CLI_HELP_REQUESTED
)
511 return cli_arg_help(cli
, 1,
512 "<1-%d>", MAXTUNNEL
-1, "Show specific tunnel by id",
515 return cli_arg_help(cli
, 1,
516 "all", "Show all tunnels, including unused",
517 "<1-%d>", MAXTUNNEL
-1, "Show specific tunnel by id",
524 if (strcmp(argv
[0], "all") == 0)
530 // Show individual tunnel
531 for (i
= 0; i
< argc
; i
++)
536 if (t
<= 0 || t
>= MAXTUNNEL
)
538 cli_print(cli
, "Invalid tunnel id \"%s\"", argv
[i
]);
541 cli_print(cli
, "\r\nTunnel %d:", t
);
542 cli_print(cli
, " State: %s", states
[tunnel
[t
].state
]);
543 cli_print(cli
, " Hostname: %s", tunnel
[t
].hostname
[0] ? tunnel
[t
].hostname
: "(none)");
544 cli_print(cli
, " Remote IP: %s", inet_toa(htonl(tunnel
[t
].ip
)));
545 cli_print(cli
, " Remote Port: %d", tunnel
[t
].port
);
546 cli_print(cli
, " Rx Window: %u", tunnel
[t
].window
);
547 cli_print(cli
, " Next Recv: %u", tunnel
[t
].nr
);
548 cli_print(cli
, " Next Send: %u", tunnel
[t
].ns
);
549 cli_print(cli
, " Queue Len: %u", tunnel
[t
].controlc
);
550 cli_print(cli
, " Last Packet Age:%u", (unsigned)(time_now
- tunnel
[t
].last
));
552 for (x
= 0; x
< MAXSESSION
; x
++)
553 if (session
[x
].tunnel
== t
&& session
[x
].opened
&& !session
[x
].die
)
554 sprintf(s
, "%s%u ", s
, x
);
556 cli_print(cli
, " Sessions: %s", s
);
562 // Show tunnel summary
563 cli_print(cli
, "%4s %20s %20s %6s %s",
570 for (i
= 1; i
< MAXTUNNEL
; i
++)
573 if (!show_all
&& (!tunnel
[i
].ip
|| tunnel
[i
].die
|| !tunnel
[i
].hostname
[0])) continue;
575 for (x
= 0; x
< MAXSESSION
; x
++) if (session
[x
].tunnel
== i
&& session
[x
].opened
&& !session
[x
].die
) sessions
++;
576 cli_print(cli
, "%4d %20s %20s %6s %6d",
578 *tunnel
[i
].hostname
? tunnel
[i
].hostname
: "(null)",
579 inet_toa(htonl(tunnel
[i
].ip
)),
580 states
[tunnel
[i
].state
],
587 int cmd_show_users(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
594 if (CLI_HELP_REQUESTED
)
595 return cli_arg_help(cli
, 1,
596 "USER", "Show details for specific username",
599 for (i
= 0; i
< MAXSESSION
; i
++)
601 if (!session
[i
].opened
) continue;
602 if (!session
[i
].user
[0]) continue;
606 for (j
= 0; j
< argc
&& sargc
< 32; j
++)
608 if (strcmp(argv
[j
], session
[i
].user
) == 0)
610 snprintf(sid
[sargc
], sizeof(sid
[0]), "%d", i
);
611 sargv
[sargc
] = sid
[sargc
];
619 cli_print(cli
, "%s", session
[i
].user
);
623 return cmd_show_session(cli
, "users", sargv
, sargc
);
628 int cmd_show_counters(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
630 if (CLI_HELP_REQUESTED
)
631 return CLI_HELP_NO_ARGS
;
633 cli_print(cli
, "%-10s %-8s %-10s %-8s", "Ethernet", "Bytes", "Packets", "Errors");
634 cli_print(cli
, "%-10s %8lu %8lu %8lu", "RX",
635 GET_STAT(tun_rx_bytes
),
636 GET_STAT(tun_rx_packets
),
637 GET_STAT(tun_rx_errors
));
638 cli_print(cli
, "%-10s %8lu %8lu %8lu", "TX",
639 GET_STAT(tun_tx_bytes
),
640 GET_STAT(tun_tx_packets
),
641 GET_STAT(tun_tx_errors
));
644 cli_print(cli
, "%-10s %-8s %-10s %-8s %-8s", "Tunnel", "Bytes", "Packets", "Errors", "Retries");
645 cli_print(cli
, "%-10s %8lu %8lu %8lu %8lu", "RX",
646 GET_STAT(tunnel_rx_bytes
),
647 GET_STAT(tunnel_rx_packets
),
648 GET_STAT(tunnel_rx_errors
),
650 cli_print(cli
, "%-10s %8lu %8lu %8lu %8lu", "TX",
651 GET_STAT(tunnel_tx_bytes
),
652 GET_STAT(tunnel_tx_packets
),
653 GET_STAT(tunnel_tx_errors
),
654 GET_STAT(tunnel_retries
));
657 cli_print(cli
, "%-30s%-10s", "Counter", "Value");
658 cli_print(cli
, "-----------------------------------------");
659 cli_print(cli
, "%-30s%lu", "radius_retries", GET_STAT(radius_retries
));
660 cli_print(cli
, "%-30s%lu", "arp_sent", GET_STAT(arp_sent
));
661 cli_print(cli
, "%-30s%lu", "packets_snooped", GET_STAT(packets_snooped
));
662 cli_print(cli
, "%-30s%lu", "tunnel_created", GET_STAT(tunnel_created
));
663 cli_print(cli
, "%-30s%lu", "session_created", GET_STAT(session_created
));
664 cli_print(cli
, "%-30s%lu", "tunnel_timeout", GET_STAT(tunnel_timeout
));
665 cli_print(cli
, "%-30s%lu", "session_timeout", GET_STAT(session_timeout
));
666 cli_print(cli
, "%-30s%lu", "radius_timeout", GET_STAT(radius_timeout
));
667 cli_print(cli
, "%-30s%lu", "radius_overflow", GET_STAT(radius_overflow
));
668 cli_print(cli
, "%-30s%lu", "tunnel_overflow", GET_STAT(tunnel_overflow
));
669 cli_print(cli
, "%-30s%lu", "session_overflow", GET_STAT(session_overflow
));
670 cli_print(cli
, "%-30s%lu", "ip_allocated", GET_STAT(ip_allocated
));
671 cli_print(cli
, "%-30s%lu", "ip_freed", GET_STAT(ip_freed
));
672 cli_print(cli
, "%-30s%lu", "cluster_forwarded", GET_STAT(c_forwarded
));
673 cli_print(cli
, "%-30s%lu", "recv_forward", GET_STAT(recv_forward
));
677 cli_print(cli
, "\n%-30s%-10s", "Counter", "Value");
678 cli_print(cli
, "-----------------------------------------");
679 cli_print(cli
, "%-30s%lu", "call_processtun", GET_STAT(call_processtun
));
680 cli_print(cli
, "%-30s%lu", "call_processipout", GET_STAT(call_processipout
));
681 cli_print(cli
, "%-30s%lu", "call_processudp", GET_STAT(call_processudp
));
682 cli_print(cli
, "%-30s%lu", "call_processpap", GET_STAT(call_processpap
));
683 cli_print(cli
, "%-30s%lu", "call_processchap", GET_STAT(call_processchap
));
684 cli_print(cli
, "%-30s%lu", "call_processlcp", GET_STAT(call_processlcp
));
685 cli_print(cli
, "%-30s%lu", "call_processipcp", GET_STAT(call_processipcp
));
686 cli_print(cli
, "%-30s%lu", "call_processipin", GET_STAT(call_processipin
));
687 cli_print(cli
, "%-30s%lu", "call_processccp", GET_STAT(call_processccp
));
688 cli_print(cli
, "%-30s%lu", "call_processrad", GET_STAT(call_processrad
));
689 cli_print(cli
, "%-30s%lu", "call_sendarp", GET_STAT(call_sendarp
));
690 cli_print(cli
, "%-30s%lu", "call_sendipcp", GET_STAT(call_sendipcp
));
691 cli_print(cli
, "%-30s%lu", "call_sendchap", GET_STAT(call_sendchap
));
692 cli_print(cli
, "%-30s%lu", "call_sessionbyip", GET_STAT(call_sessionbyip
));
693 cli_print(cli
, "%-30s%lu", "call_sessionbyuser", GET_STAT(call_sessionbyuser
));
694 cli_print(cli
, "%-30s%lu", "call_tunnelsend", GET_STAT(call_tunnelsend
));
695 cli_print(cli
, "%-30s%lu", "call_tunnelkill", GET_STAT(call_tunnelkill
));
696 cli_print(cli
, "%-30s%lu", "call_tunnelshutdown", GET_STAT(call_tunnelshutdown
));
697 cli_print(cli
, "%-30s%lu", "call_sessionkill", GET_STAT(call_sessionkill
));
698 cli_print(cli
, "%-30s%lu", "call_sessionshutdown", GET_STAT(call_sessionshutdown
));
699 cli_print(cli
, "%-30s%lu", "call_sessionsetup", GET_STAT(call_sessionsetup
));
700 cli_print(cli
, "%-30s%lu", "call_assign_ip_address",GET_STAT(call_assign_ip_address
));
701 cli_print(cli
, "%-30s%lu", "call_free_ip_address", GET_STAT(call_free_ip_address
));
702 cli_print(cli
, "%-30s%lu", "call_dump_acct_info", GET_STAT(call_dump_acct_info
));
703 cli_print(cli
, "%-30s%lu", "call_radiussend", GET_STAT(call_radiussend
));
704 cli_print(cli
, "%-30s%lu", "call_radiusretry", GET_STAT(call_radiusretry
));
709 int cmd_show_version(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
715 if (CLI_HELP_REQUESTED
)
716 return cli_arg_help(cli
, 1,
717 "tag", "Include CVS release tag",
718 "file", "Include file versions",
721 for (i
= 0; i
< argc
; i
++)
722 if (!strcmp(argv
[i
], "tag"))
724 else if (!strcmp(argv
[i
], "file"))
727 cli_print(cli
, "L2TPNS %s", VERSION
);
730 char const *p
= strchr(cvs_name
, ':');
742 e
= strpbrk(p
, " \t$");
743 cli_print(cli
, "Tag: %.*s", e
? e
- p
+ 1 : strlen(p
), p
);
748 extern linked_list
*loaded_plugins
;
751 cli_print(cli
, "Files:");
752 cli_print(cli
, " %s", cvs_id_arp
);
754 cli_print(cli
, " %s", cvs_id_bgp
);
756 cli_print(cli
, " %s", cvs_id_cli
);
757 cli_print(cli
, " %s", cvs_id_cluster
);
758 cli_print(cli
, " %s", cvs_id_constants
);
759 cli_print(cli
, " %s", cvs_id_control
);
760 cli_print(cli
, " %s", cvs_id_icmp
);
761 cli_print(cli
, " %s", cvs_id_l2tpns
);
762 cli_print(cli
, " %s", cvs_id_ll
);
763 cli_print(cli
, " %s", cvs_id_md5
);
764 cli_print(cli
, " %s", cvs_id_ppp
);
765 cli_print(cli
, " %s", cvs_id_radius
);
766 cli_print(cli
, " %s", cvs_id_tbf
);
767 cli_print(cli
, " %s", cvs_id_util
);
769 ll_reset(loaded_plugins
);
770 while ((p
= ll_next(loaded_plugins
)))
772 char const **id
= dlsym(p
, "cvs_id");
774 cli_print(cli
, " %s", *id
);
781 int cmd_show_pool(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
784 int used
= 0, free
= 0, show_all
= 0;
786 if (!config
->cluster_iam_master
)
788 cli_print(cli
, "Can't do this on a slave. Do it on %s", inet_toa(config
->cluster_master_address
));
792 if (CLI_HELP_REQUESTED
)
795 return cli_arg_help(cli
, 1, NULL
);
797 return cli_arg_help(cli
, 1,
798 "all", "Show all pool addresses, including unused",
802 if (argc
> 0 && strcmp(argv
[0], "all") == 0)
806 cli_print(cli
, "%-15s %4s %8s %s", "IP Address", "Used", "Session", "User");
807 for (i
= 0; i
< MAXIPPOOL
; i
++)
809 if (!ip_address_pool
[i
].address
) continue;
810 if (ip_address_pool
[i
].assigned
)
812 cli_print(cli
, "%-15s Y %8d %s",
813 inet_toa(htonl(ip_address_pool
[i
].address
)), ip_address_pool
[i
].session
, session
[ip_address_pool
[i
].session
].user
);
819 if (ip_address_pool
[i
].last
)
820 cli_print(cli
, "%-15s N %8s [%s] %ds",
821 inet_toa(htonl(ip_address_pool
[i
].address
)), "",
822 ip_address_pool
[i
].user
, time_now
- ip_address_pool
[i
].last
);
824 cli_print(cli
, "%-15s N", inet_toa(htonl(ip_address_pool
[i
].address
)));
831 cli_print(cli
, "(Not displaying unused addresses)");
833 cli_print(cli
, "\r\nFree: %d\r\nUsed: %d", free
, used
);
837 void print_save_config(struct cli_def
*cli
, char *string
)
840 fprintf(save_config_fh
, "%s\n", string
);
843 int cmd_write_memory(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
845 if (CLI_HELP_REQUESTED
)
846 return CLI_HELP_NO_ARGS
;
848 if ((save_config_fh
= fopen(config
->config_file
, "w")))
850 cli_print(cli
, "Writing configuration");
851 cli_print_callback(cli
, print_save_config
);
852 cmd_show_run(cli
, command
, argv
, argc
);
853 cli_print_callback(cli
, NULL
);
854 fclose(save_config_fh
);
858 cli_print(cli
, "Error writing configuration: %s", strerror(errno
));
863 int cmd_show_run(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
867 if (CLI_HELP_REQUESTED
)
868 return CLI_HELP_NO_ARGS
;
870 cli_print(cli
, "# Current configuration:");
872 for (i
= 0; config_values
[i
].key
; i
++)
874 void *value
= ((void *)config
) + config_values
[i
].offset
;
875 if (config_values
[i
].type
== STRING
)
876 cli_print(cli
, "set %s \"%.*s\"", config_values
[i
].key
, config_values
[i
].size
, (char *)value
);
877 else if (config_values
[i
].type
== IP
)
878 cli_print(cli
, "set %s %s", config_values
[i
].key
, inet_toa(*(unsigned *)value
));
879 else if (config_values
[i
].type
== SHORT
)
880 cli_print(cli
, "set %s %hu", config_values
[i
].key
, *(short *)value
);
881 else if (config_values
[i
].type
== BOOL
)
882 cli_print(cli
, "set %s %s", config_values
[i
].key
, (*(int *)value
) ? "yes" : "no");
883 else if (config_values
[i
].type
== INT
)
884 cli_print(cli
, "set %s %d", config_values
[i
].key
, *(int *)value
);
885 else if (config_values
[i
].type
== UNSIGNED_LONG
)
886 cli_print(cli
, "set %s %lu", config_values
[i
].key
, *(unsigned long *)value
);
887 else if (config_values
[i
].type
== MAC
)
888 cli_print(cli
, "set %s %02x%02x.%02x%02x.%02x%02x", config_values
[i
].key
,
889 *(unsigned short *)(value
+ 0),
890 *(unsigned short *)(value
+ 1),
891 *(unsigned short *)(value
+ 2),
892 *(unsigned short *)(value
+ 3),
893 *(unsigned short *)(value
+ 4),
894 *(unsigned short *)(value
+ 5));
897 cli_print(cli
, "# Plugins");
898 for (i
= 0; i
< MAXPLUGINS
; i
++)
900 if (*config
->plugins
[i
])
902 cli_print(cli
, "load plugin \"%s\"", config
->plugins
[i
]);
906 cli_print(cli
, "# end");
910 int cmd_show_radius(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
912 int i
, free
= 0, used
= 0, show_all
= 0;
923 if (CLI_HELP_REQUESTED
)
926 return cli_arg_help(cli
, 1, NULL
);
928 return cli_arg_help(cli
, 1,
929 "all", "Show all RADIUS sessions, including unused",
933 cli_print(cli
, "%6s%6s%5s%6s%9s%9s%4s", "ID", "Radius", "Sock", "State", "Session", "Retry", "Try");
937 if (argc
> 0 && strcmp(argv
[0], "all") == 0)
940 for (i
= 1; i
< MAXRADIUS
; i
++)
942 if (radius
[i
].state
== RADIUSNULL
)
947 if (!show_all
&& radius
[i
].state
== RADIUSNULL
) continue;
949 cli_print(cli
, "%6d%6d%5d%6s%9d%9u%4d",
953 states
[radius
[i
].state
],
959 cli_print(cli
, "\r\nFree: %d\r\nUsed: %d", free
, used
);
964 int cmd_show_plugins(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
968 if (CLI_HELP_REQUESTED
)
969 return CLI_HELP_NO_ARGS
;
971 cli_print(cli
, "Plugins currently loaded:");
972 for (i
= 0; i
< MAXPLUGINS
; i
++)
973 if (*config
->plugins
[i
])
974 cli_print(cli
, " %s", config
->plugins
[i
]);
979 int cmd_show_throttle(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
983 if (CLI_HELP_REQUESTED
)
984 return CLI_HELP_NO_ARGS
;
986 cli_print(cli
, "Token bucket filters:");
987 cli_print(cli
, "%-6s %8s %-4s", "ID", "Handle", "Used");
988 for (i
= 0; i
< MAXSESSION
; i
++)
990 if (!session
[i
].throttle
)
993 cli_print(cli
, "%-6d %8d %8d",
1002 int cmd_show_banana(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1004 if (CLI_HELP_REQUESTED
)
1005 return CLI_HELP_NO_ARGS
;
1007 cli_print(cli
, " _\n"
1013 " ( \\ `. `-. _,.-:\\\n"
1014 " \\ \\ `. `-._ __..--' ,-';/\n"
1015 " \\ `. `-. `-..___..---' _.--' ,'/\n"
1016 " `. `. `-._ __..--' ,' /\n"
1017 " `. `-_ ``--..'' _.-' ,'\n"
1018 " `-_ `-.___ __,--' ,'\n"
1019 " `-.__ `----\"\"\" __.-'\n"
1020 "hh `--..____..--'");
1025 int cmd_clear_counters(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1027 if (CLI_HELP_REQUESTED
)
1028 return CLI_HELP_NO_ARGS
;
1030 cli_print(cli
, "Counters cleared");
1031 SET_STAT(last_reset
, time(NULL
));
1035 int cmd_drop_user(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1040 if (CLI_HELP_REQUESTED
)
1041 return cli_arg_help(cli
, argc
> 1,
1042 "USER", "Username of session to drop", NULL
);
1044 if (!config
->cluster_iam_master
)
1046 cli_print(cli
, "Can't do this on a slave. Do it on %s", inet_toa(config
->cluster_master_address
));
1052 cli_print(cli
, "Specify a user to drop");
1056 for (i
= 0; i
< argc
; i
++)
1058 if (!(s
= sessionbyuser(argv
[i
])))
1060 cli_print(cli
, "User %s is not connected", argv
[i
]);
1064 if (session
[s
].ip
&& session
[s
].opened
&& !session
[s
].die
)
1066 cli_print(cli
, "Dropping user %s", session
[s
].user
);
1067 cli_session_actions
[s
].action
|= CLI_SESS_KILL
;
1074 int cmd_drop_tunnel(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1079 if (CLI_HELP_REQUESTED
)
1080 return cli_arg_help(cli
, argc
> 1,
1081 "<1-%d>", MAXTUNNEL
-1, "Tunnel id to drop", NULL
);
1083 if (!config
->cluster_iam_master
)
1085 cli_print(cli
, "Can't do this on a slave. Do it on %s", inet_toa(config
->cluster_master_address
));
1091 cli_print(cli
, "Specify a tunnel to drop");
1095 for (i
= 0; i
< argc
; i
++)
1097 if ((t
= atol(argv
[i
])) <= 0 || (t
>= MAXTUNNEL
))
1099 cli_print(cli
, "Invalid tunnel ID (1-%d)", MAXTUNNEL
-1);
1105 cli_print(cli
, "Tunnel %d is not connected", t
);
1111 cli_print(cli
, "Tunnel %d is already being shut down", t
);
1115 cli_print(cli
, "Tunnel %d shut down (%s)", t
, tunnel
[t
].hostname
);
1116 cli_tunnel_actions
[t
].action
|= CLI_TUN_KILL
;
1122 int cmd_drop_session(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1127 if (CLI_HELP_REQUESTED
)
1128 return cli_arg_help(cli
, argc
> 1,
1129 "<1-%d>", MAXSESSION
-1, "Session id to drop", NULL
);
1131 if (!config
->cluster_iam_master
)
1133 cli_print(cli
, "Can't do this on a slave. Do it on %s", inet_toa(config
->cluster_master_address
));
1139 cli_print(cli
, "Specify a session id to drop");
1143 for (i
= 0; i
< argc
; i
++)
1145 if ((s
= atol(argv
[i
])) <= 0 || (s
> MAXSESSION
))
1147 cli_print(cli
, "Invalid session ID (1-%d)", MAXSESSION
-1);
1151 if (session
[s
].ip
&& session
[s
].opened
&& !session
[s
].die
)
1153 cli_print(cli
, "Dropping session %d", s
);
1154 cli_session_actions
[s
].action
|= CLI_SESS_KILL
;
1158 cli_print(cli
, "Session %d is not active.", s
);
1165 int cmd_snoop(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1171 if (CLI_HELP_REQUESTED
)
1176 return cli_arg_help(cli
, 0,
1177 "USER", "Username of session to snoop", NULL
);
1180 return cli_arg_help(cli
, 0,
1181 "A.B.C.D", "IP address of snoop destination", NULL
);
1184 return cli_arg_help(cli
, 0,
1185 "N", "Port of snoop destination", NULL
);
1189 return cli_arg_help(cli
, 1, NULL
);
1196 if (!config
->cluster_iam_master
)
1198 cli_print(cli
, "Can't do this on a slave. Do it on %s", inet_toa(config
->cluster_master_address
));
1204 cli_print(cli
, "Specify username, ip and port");
1208 if (!(s
= sessionbyuser(argv
[0])))
1210 cli_print(cli
, "User %s is not connected", argv
[0]);
1214 ip
= inet_addr(argv
[1]);
1215 if (!ip
|| ip
== INADDR_NONE
)
1217 cli_print(cli
, "Cannot parse IP \"%s\"", argv
[1]);
1221 port
= atoi(argv
[2]);
1224 cli_print(cli
, "Invalid port %s", argv
[2]);
1228 cli_print(cli
, "Snooping user %s to %s:%d", argv
[0], inet_toa(session
[s
].snoop_ip
), session
[s
].snoop_port
);
1229 cli_session_actions
[s
].snoop_ip
= ip
;
1230 cli_session_actions
[s
].snoop_port
= port
;
1231 cli_session_actions
[s
].action
|= CLI_SESS_SNOOP
;
1236 int cmd_no_snoop(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1241 if (CLI_HELP_REQUESTED
)
1242 return cli_arg_help(cli
, argc
> 1,
1243 "USER", "Username of session to unsnoop", NULL
);
1245 if (!config
->cluster_iam_master
)
1247 cli_print(cli
, "Can't do this on a slave. Do it on %s", inet_toa(config
->cluster_master_address
));
1253 cli_print(cli
, "Specify a user to unsnoop");
1257 for (i
= 0; i
< argc
; i
++)
1259 if (!(s
= sessionbyuser(argv
[i
])))
1261 cli_print(cli
, "User %s is not connected", argv
[i
]);
1265 cli_print(cli
, "Not snooping user %s", argv
[i
]);
1266 cli_session_actions
[s
].action
|= CLI_SESS_NOSNOOP
;
1272 int cmd_throttle(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1278 if (CLI_HELP_REQUESTED
)
1283 return cli_arg_help(cli
, 0, "user", "Username of session to throttle", NULL
);
1286 return cli_arg_help(cli
, 1, "rate", "Incoming rate in kb/s", NULL
);
1289 return cli_arg_help(cli
, 1, "rate", "Outgoing rate in kb/s", NULL
);
1292 return cli_arg_help(cli
, argc
> 1, "user", "Username of session to throttle", NULL
);
1296 if (!config
->cluster_iam_master
)
1298 cli_print(cli
, "Can't do this on a slave. Do it on %s", inet_toa(config
->cluster_master_address
));
1304 cli_print(cli
, "Specify a user to throttle");
1308 rate_in
= rate_out
= config
->rl_rate
;
1309 if (argc
>= 2) rate_in
= atoi(argv
[1]);
1310 if (argc
>= 3) rate_out
= atoi(argv
[2]);
1312 if (!(s
= sessionbyuser(argv
[0])))
1314 cli_print(cli
, "User %s is not connected", argv
[0]);
1318 if (session
[s
].throttle
)
1320 cli_print(cli
, "User %s already throttled, unthrottle first", argv
[0]);
1324 cli_print(cli
, "Throttling user %s", argv
[0]);
1325 cli_session_actions
[s
].throttle
= rate_in
<< 16 | rate_out
;
1326 cli_session_actions
[s
].action
|= CLI_SESS_THROTTLE
;
1331 int cmd_no_throttle(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1336 if (CLI_HELP_REQUESTED
)
1337 return cli_arg_help(cli
, argc
> 1,
1338 "USER", "Username of session to unthrottle", NULL
);
1340 if (!config
->cluster_iam_master
)
1342 cli_print(cli
, "Can't do this on a slave. Do it on %s", inet_toa(config
->cluster_master_address
));
1348 cli_print(cli
, "Specify a user to unthrottle");
1352 for (i
= 0; i
< argc
; i
++)
1354 if (!(s
= sessionbyuser(argv
[i
])))
1356 cli_print(cli
, "User %s is not connected", argv
[i
]);
1360 if (!session
[s
].throttle
)
1362 cli_print(cli
, "User %s not throttled", argv
[i
]);
1366 cli_print(cli
, "Unthrottling user %s", argv
[i
]);
1367 cli_session_actions
[s
].action
|= CLI_SESS_NOTHROTTLE
;
1373 int cmd_debug(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1377 if (CLI_HELP_REQUESTED
)
1378 return cli_arg_help(cli
, 1,
1379 "all", "Enable debugging for all except \"data\"",
1380 "critical", "", // FIXME: add descriptions
1390 char *p
= (char *) &debug_flags
;
1391 for (i
= 0; i
< sizeof(debug_flags
); i
++)
1395 cli_print(cli
, "Currently debugging:%s%s%s%s%s%s",
1396 (debug_flags
.critical
) ? " critical" : "",
1397 (debug_flags
.error
) ? " error" : "",
1398 (debug_flags
.warning
) ? " warning" : "",
1399 (debug_flags
.info
) ? " info" : "",
1400 (debug_flags
.calls
) ? " calls" : "",
1401 (debug_flags
.data
) ? " data" : "");
1407 cli_print(cli
, "Debugging off");
1411 for (i
= 0; i
< argc
; i
++)
1413 int len
= strlen(argv
[i
]);
1415 if (argv
[i
][0] == 'c' && len
< 2)
1416 len
= 2; /* distinguish [cr]itical from [ca]lls */
1418 if (!strncasecmp(argv
[i
], "critical", len
)) { debug_flags
.critical
= 1; continue; }
1419 if (!strncasecmp(argv
[i
], "error", len
)) { debug_flags
.error
= 1; continue; }
1420 if (!strncasecmp(argv
[i
], "warning", len
)) { debug_flags
.warning
= 1; continue; }
1421 if (!strncasecmp(argv
[i
], "info", len
)) { debug_flags
.info
= 1; continue; }
1422 if (!strncasecmp(argv
[i
], "calls", len
)) { debug_flags
.calls
= 1; continue; }
1423 if (!strncasecmp(argv
[i
], "data", len
)) { debug_flags
.data
= 1; continue; }
1424 if (!strncasecmp(argv
[i
], "all", len
))
1426 memset(&debug_flags
, 1, sizeof(debug_flags
));
1427 debug_flags
.data
= 0;
1431 cli_print(cli
, "Invalid debugging flag \"%s\"", argv
[i
]);
1437 int cmd_no_debug(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1441 if (CLI_HELP_REQUESTED
)
1442 return cli_arg_help(cli
, 1,
1443 "all", "Disable all debugging",
1444 "critical", "", // FIXME: add descriptions
1454 memset(&debug_flags
, 0, sizeof(debug_flags
));
1458 for (i
= 0; i
< argc
; i
++)
1460 int len
= strlen(argv
[i
]);
1462 if (argv
[i
][0] == 'c' && len
< 2)
1463 len
= 2; /* distinguish [cr]itical from [ca]lls */
1465 if (!strncasecmp(argv
[i
], "critical", len
)) { debug_flags
.critical
= 0; continue; }
1466 if (!strncasecmp(argv
[i
], "error", len
)) { debug_flags
.error
= 0; continue; }
1467 if (!strncasecmp(argv
[i
], "warning", len
)) { debug_flags
.warning
= 0; continue; }
1468 if (!strncasecmp(argv
[i
], "info", len
)) { debug_flags
.info
= 0; continue; }
1469 if (!strncasecmp(argv
[i
], "calls", len
)) { debug_flags
.calls
= 0; continue; }
1470 if (!strncasecmp(argv
[i
], "data", len
)) { debug_flags
.data
= 0; continue; }
1471 if (!strncasecmp(argv
[i
], "all", len
))
1473 memset(&debug_flags
, 0, sizeof(debug_flags
));
1477 cli_print(cli
, "Invalid debugging flag \"%s\"", argv
[i
]);
1483 int cmd_load_plugin(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1485 int i
, firstfree
= 0;
1487 if (CLI_HELP_REQUESTED
)
1488 return cli_arg_help(cli
, argc
> 1,
1489 "PLUGIN", "Name of plugin to load", NULL
);
1493 cli_print(cli
, "Specify a plugin to load");
1497 for (i
= 0; i
< MAXPLUGINS
; i
++)
1499 if (!*config
->plugins
[i
] && !firstfree
)
1501 if (strcmp(config
->plugins
[i
], argv
[0]) == 0)
1503 cli_print(cli
, "Plugin is already loaded");
1510 strncpy(config
->plugins
[firstfree
], argv
[0], sizeof(config
->plugins
[firstfree
]) - 1);
1511 config
->reload_config
= 1;
1512 cli_print(cli
, "Loading plugin %s", argv
[0]);
1518 int cmd_remove_plugin(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1522 if (CLI_HELP_REQUESTED
)
1523 return cli_arg_help(cli
, argc
> 1,
1524 "PLUGIN", "Name of plugin to unload", NULL
);
1528 cli_print(cli
, "Specify a plugin to remove");
1532 for (i
= 0; i
< MAXPLUGINS
; i
++)
1534 if (strcmp(config
->plugins
[i
], argv
[0]) == 0)
1536 config
->reload_config
= 1;
1537 memset(config
->plugins
[i
], 0, sizeof(config
->plugins
[i
]));
1542 cli_print(cli
, "Plugin is not loaded");
1546 char *duration(time_t secs
)
1548 static char *buf
= NULL
;
1551 if (!buf
) buf
= calloc(64, 1);
1555 int days
= secs
/ 86400;
1556 p
= sprintf(buf
, "%d day%s, ", days
, days
> 1 ? "s" : "");
1562 int mins
= secs
/ 60;
1563 int hrs
= mins
/ 60;
1566 sprintf(buf
+ p
, "%d:%02d", hrs
, mins
);
1568 else if (secs
>= 60)
1570 int mins
= secs
/ 60;
1571 sprintf(buf
+ p
, "%d min%s", mins
, mins
> 1 ? "s" : "");
1574 sprintf(buf
, "%ld sec%s", secs
, secs
> 1 ? "s" : "");
1579 int cmd_uptime(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1582 char buf
[100], *p
= buf
, *loads
[3];
1583 int i
, num_sessions
= 0;
1585 if (CLI_HELP_REQUESTED
)
1586 return CLI_HELP_NO_ARGS
;
1588 fh
= fopen("/proc/loadavg", "r");
1589 fgets(buf
, 100, fh
);
1592 for (i
= 0; i
< 3; i
++)
1593 loads
[i
] = strdup(strsep(&p
, " "));
1596 strftime(buf
, 99, "%H:%M:%S", localtime(&time_now
));
1598 for (i
= 1; i
< MAXSESSION
; i
++)
1599 if (session
[i
].opened
) num_sessions
++;
1601 cli_print(cli
, "%s up %s, %d users, load average: %s, %s, %s",
1603 duration(time_now
- config
->start_time
),
1605 loads
[0], loads
[1], loads
[2]
1607 for (i
= 0; i
< 3; i
++)
1608 if (loads
[i
]) free(loads
[i
]);
1610 cli_print(cli
, "Bandwidth: %s", config
->bandwidth
);
1615 int cmd_set(struct cli_def
*cli
, char *command
, char **argv
, int argc
)
1619 if (CLI_HELP_REQUESTED
)
1625 int len
= strlen(argv
[0])-1;
1626 for (i
= 0; config_values
[i
].key
; i
++)
1627 if (!len
|| !strncmp(argv
[0], config_values
[i
].key
, len
))
1628 cli_print(cli
, " %s", config_values
[i
].key
);
1634 return cli_arg_help(cli
, 0,
1635 "VALUE", "Value for variable", NULL
);
1639 return cli_arg_help(cli
, 1, NULL
);
1648 cli_print(cli
, "Specify variable and value");
1652 for (i
= 0; config_values
[i
].key
; i
++)
1654 void *value
= ((void *)config
) + config_values
[i
].offset
;
1655 if (strcmp(config_values
[i
].key
, argv
[0]) == 0)
1657 // Found a value to set
1658 cli_print(cli
, "Setting \"%s\" to \"%s\"", argv
[0], argv
[1]);
1659 switch (config_values
[i
].type
)
1662 strncpy((char *)value
, argv
[1], config_values
[i
].size
- 1);
1665 *(int *)value
= atoi(argv
[1]);
1668 *(unsigned long *)value
= atol(argv
[1]);
1671 *(short *)value
= atoi(argv
[1]);
1674 *(unsigned *)value
= inet_addr(argv
[1]);
1677 parsemac(argv
[1], (char *)value
);
1680 if (strcasecmp(argv
[1], "yes") == 0 || strcasecmp(argv
[1], "true") == 0 || strcasecmp(argv
[1], "1") == 0)
1686 cli_print(cli
, "Unknown variable type");
1689 config
->reload_config
= 1;
1694 cli_print(cli
, "Unknown variable \"%s\"", argv
[0]);
1698 int regular_stuff(struct cli_def
*cli
)
1700 int i
= debug_rb_tail
;
1704 while (i
!= ringbuffer
->tail
)
1706 int show_message
= 0;
1708 if (*ringbuffer
->buffer
[i
].message
)
1710 // Always show messages if we are doing general debug
1711 if (ringbuffer
->buffer
[i
].level
== 0 && debug_flags
.critical
) show_message
= 1;
1712 if (ringbuffer
->buffer
[i
].level
== 1 && debug_flags
.error
) show_message
= 1;
1713 if (ringbuffer
->buffer
[i
].level
== 2 && debug_flags
.warning
) show_message
= 1;
1714 if (ringbuffer
->buffer
[i
].level
== 3 && debug_flags
.info
) show_message
= 1;
1715 if (ringbuffer
->buffer
[i
].level
== 4 && debug_flags
.calls
) show_message
= 1;
1716 if (ringbuffer
->buffer
[i
].level
== 5 && debug_flags
.data
) show_message
= 1;
1721 ipt address
= htonl(ringbuffer
->buffer
[i
].address
);
1723 struct in_addr addr
;
1725 memcpy(&addr
, &address
, sizeof(ringbuffer
->buffer
[i
].address
));
1726 ipaddr
= inet_ntoa(addr
);
1728 cli_print(cli
, "\r%s-%s-%u-%u %s",
1729 debug_levels
[(int)ringbuffer
->buffer
[i
].level
],
1731 ringbuffer
->buffer
[i
].tunnel
,
1732 ringbuffer
->buffer
[i
].session
,
1733 ringbuffer
->buffer
[i
].message
);
1738 if (++i
== ringbuffer
->tail
) break;
1739 if (i
== RINGBUFFER_SIZE
) i
= 0;
1742 debug_rb_tail
= ringbuffer
->tail
;
1749 // Convert a string in the form of abcd.ef12.3456 into char[6]
1750 void parsemac(char *string
, char mac
[6])
1752 if (sscanf(string
, "%02x%02x.%02x%02x.%02x%02x", (unsigned int *)&mac
[0], (unsigned int *)&mac
[1], (unsigned int *)&mac
[2], (unsigned int *)&mac
[3], (unsigned int *)&mac
[4], (unsigned int *)&mac
[5]) == 6)
1754 if (sscanf(string
, "%02x%02x:%02x%02x:%02x%02x", (unsigned int *)&mac
[0], (unsigned int *)&mac
[1], (unsigned int *)&mac
[2], (unsigned int *)&mac
[3], (unsigned int *)&mac
[4], (unsigned int *)&mac
[5]) == 6)