// L2TPNS Rate Limiting Stuff
-// $Id: rl.c,v 1.3 2004/04/05 05:29:13 fred_nerk Exp $
+// $Id: rl.c,v 1.4 2004/05/24 04:28:41 fred_nerk Exp $
+#include <arpa/inet.h>
+#include <errno.h>
+#include <malloc.h>
#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
#include <sys/file.h>
#include <sys/stat.h>
-#include <errno.h>
-#include <string.h>
+#include <sys/types.h>
+#include <sys/wait.h>
+#include <time.h>
#include <unistd.h>
-#include <stdlib.h>
-#include <malloc.h>
#include "l2tpns.h"
extern radiust *radius;
extern sessiont *session;
extern u32 sessionid;
-extern int radfd;
extern tbft *filter_buckets;
extern struct configt *config;
#define DEVICE "tun0"
-int next_tbf = 1;
-
void init_rl()
{
char *commands[] = {
"tc qdisc add dev " DEVICE " root handle 1: htb",
- "tc class add dev " DEVICE " parent 1: classid 1:1 htb rate 100mbit burst 300k",
"tc filter del dev " DEVICE " protocol ip pref 1 fw",
"iptables -t mangle -N throttle 2>&1 >/dev/null",
"iptables -t mangle -F throttle 2>&1 >/dev/null",
char cmd[2048];
if (!config->rl_rate) return 0;
- if (next_tbf >= MAXSESSION) return 0;
- t = next_tbf++;
+ t = ++config->next_tbf;
+ if (config->next_tbf >= MAXSESSION) return 0;
snprintf(filter_buckets[t].handle, 9, "1:%d0", t);
log(2, 0, 0, 0, "Creating new htb %s\n", filter_buckets[t].handle);
snprintf(cmd, 2048, "tc class add dev " DEVICE " parent 1: classid %s htb rate %lukbit burst 15k",
filter_buckets[t].handle, config->rl_rate);
log(3, 0, 0, 0, "%s\n", cmd);
- system(cmd);
+ if (WEXITSTATUS(system(cmd)) != 0)
+ {
+ memset(filter_buckets[t].handle, 0, sizeof(filter_buckets[t].handle));
+ log(0, 0, 0, 0, "tc returned an error creating a token bucket\n");
+ return 0;
+ }
snprintf(cmd, 2048, "tc filter add dev " DEVICE " protocol ip parent 1:0 prio 1 handle %d fw flowid %s",
t, filter_buckets[t].handle);
log(3, 0, 0, 0, "%s\n", cmd);
- system(cmd);
+ if (WEXITSTATUS(system(cmd)) != 0)
+ {
+ memset(filter_buckets[t].handle, 0, sizeof(filter_buckets[t].handle));
+ log(0, 0, 0, 0, "tc returned an error creating a filter\n");
+ return 0;
+ }
- next_tbf++;
return t;
}
for (i = 1; i < MAXSESSION; i++)
{
- if (!filter_buckets[i].in_use && *filter_buckets[i].handle)
- {
- filter_buckets[i].in_use = 1;
- log(2, 0, 0, 0, "Returning tbf %s\n", filter_buckets[i].handle);
- return i;
- }
+ if (!*filter_buckets[i].handle) continue;
+ if (filter_buckets[i].in_use) continue;
+
+ filter_buckets[i].in_use = 1;
+ log(2, 0, 0, 0, "Returning tbf %s\n", filter_buckets[i].handle);
+ return i;
}
i = rl_create_tbf();
if (i) filter_buckets[i].in_use = 1;
void rl_done_tbf(u16 t)
{
if (!t) return;
- if (!config->rl_rate) return;
log(2, 0, 0, 0, "Freeing up HTB %s\n", filter_buckets[t].handle);
filter_buckets[t].in_use = 0;
}
return;
}
snprintf(cmd, 2048, "tc qdisc del dev " DEVICE " handle %s", filter_buckets[t].handle);
- system(cmd);
- system("iptables -t mangle -D l2tpns -j throttle 2>&1 >/dev/null");
- system("iptables -t mangle -X throttle 2>&1 >/dev/null");
+ if (WEXITSTATUS(system(cmd)) != 0)
+ log(0, 0, 0, 0, "tc returned an error deleting a token bucket\n");
memset(filter_buckets[t].handle, 0, sizeof(filter_buckets[t].handle));
}