305 lines
6.4 KiB
C
305 lines
6.4 KiB
C
/* IP-related user commands */
|
|
#include <stdio.h>
|
|
#include "options.h" /* added for SERIALTEST */
|
|
#include "global.h"
|
|
#include "mbuf.h"
|
|
#include "internet.h"
|
|
#include "timer.h"
|
|
#include "netuser.h"
|
|
#include "iface.h"
|
|
#include "ip.h"
|
|
#include "cmdparse.h"
|
|
|
|
#ifdef RTIMER
|
|
int doiprtime();
|
|
long atol();
|
|
#endif
|
|
|
|
int doipaddr(),doipstat(),dottl(),atoi();
|
|
extern char badhost[];
|
|
struct cmds ipcmds[] = {
|
|
"address", doipaddr, 0, NULLCHAR, NULLCHAR,
|
|
#ifdef RTIMER
|
|
"rtimer", doiprtime, 0, NULLCHAR, NULLCHAR,
|
|
#endif
|
|
"status", doipstat, 0, NULLCHAR, NULLCHAR,
|
|
"ttl", dottl, 0, NULLCHAR, NULLCHAR,
|
|
NULLCHAR, NULLFP, 0,
|
|
#ifdef RTIMER
|
|
"ip subcommands: address status rtimer ttl", NULLCHAR
|
|
#else
|
|
"ip subcommands: address status ttl", NULLCHAR
|
|
#endif
|
|
};
|
|
doip(argc,argv)
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
return subcmd(ipcmds,argc,argv);
|
|
}
|
|
|
|
#ifdef RTIMER
|
|
int
|
|
doiprtime(argc,argv)
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
extern int32 rtime;
|
|
if(argc < 2)
|
|
printf("IP reassem timer: %lu sec\n",(rtime * MSPTICK)/1000L);
|
|
else
|
|
rtime = (1000L * atol(argv[1])) / MSPTICK;
|
|
}
|
|
#endif
|
|
|
|
int
|
|
doipaddr(argc,argv)
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
char *inet_ntoa();
|
|
extern int32 gateway;
|
|
int32 n;
|
|
|
|
if(argc < 2) {
|
|
printf("%s\n",inet_ntoa(ip_addr));
|
|
} else if((n = resolve(argv[1])) == 0){
|
|
printf(badhost,argv[1]);
|
|
return -1;
|
|
} else
|
|
gateway = ip_addr = n; /* k34 */
|
|
return 0;
|
|
}
|
|
int
|
|
dottl(argc,argv) /* note that ip_ttl is declared as char but it probably */
|
|
char *argv[]; /* should have been unsigned char - K5JB */
|
|
{
|
|
if(argc < 2)
|
|
printf("%u\n",uchar(ip_ttl));
|
|
else
|
|
ip_ttl = (char)atoi(argv[1]);
|
|
return 0;
|
|
}
|
|
|
|
/* "route" subcommands */
|
|
int doadd(),dodrop();
|
|
static struct cmds rtcmds[] = {
|
|
"add", doadd, 3,
|
|
"route add <dest addr>[/<bits>] <if name> [gateway|*] [metric]",
|
|
"Add failed",
|
|
|
|
"drop", dodrop, 2,
|
|
"route drop <dest addr>[/<bits>]",
|
|
"Not in table",
|
|
|
|
NULLCHAR, NULLFP, 0,
|
|
"route subcommands: add, drop",
|
|
NULLCHAR
|
|
};
|
|
|
|
/* Display and/or manipulate routing table */
|
|
int
|
|
doroute(argc,argv)
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
if(argc < 2){
|
|
dumproute();
|
|
return 0;
|
|
}
|
|
return subcmd(rtcmds,argc,argv);
|
|
}
|
|
/* Add an entry to the routing table
|
|
* E.g., "add 1.2.3.4 ax0 5.6.7.8 3"
|
|
*/
|
|
int
|
|
doadd(argc,argv)
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
struct interface *ifp;
|
|
int32 dest,gateway;
|
|
unsigned bits;
|
|
char *bitp;
|
|
int metric;
|
|
void rt_add();
|
|
|
|
if(strcmp(argv[1],"default") == 0){
|
|
dest = 0;
|
|
bits = 0;
|
|
} else {
|
|
if((dest = resolve(argv[1])) == 0){
|
|
printf(badhost,argv[1]);
|
|
return -1;
|
|
}
|
|
|
|
/* If IP address is followed by an optional slash and
|
|
* a length field, (e.g., 128.96/16) get it;
|
|
* otherwise assume a full 32-bit address
|
|
*/
|
|
if((bitp = index(argv[1],'/')) != NULLCHAR){
|
|
bitp++;
|
|
bits = (unsigned)atoi(bitp);
|
|
} else
|
|
bits = 32;
|
|
}
|
|
for(ifp=ifaces;ifp != NULLIF;ifp = ifp->next){
|
|
if(strcmp(argv[2],ifp->name) == 0)
|
|
break;
|
|
}
|
|
if(ifp == NULLIF){
|
|
printf("Interface \"%s\" unknown\n",argv[2]);
|
|
return -1;
|
|
}
|
|
if(argc > 3){
|
|
if(argv[3][0] == '*')
|
|
gateway = 0;
|
|
else if((gateway = resolve(argv[3])) == 0){
|
|
printf(badhost,argv[3]);
|
|
return -1;
|
|
}
|
|
} else {
|
|
gateway = 0;
|
|
}
|
|
if(argc > 4)
|
|
metric = atoi(argv[4]);
|
|
else
|
|
metric = 0;
|
|
|
|
rt_add(dest,bits,gateway,metric,ifp);
|
|
return 0;
|
|
}
|
|
/* Drop an entry from the routing table
|
|
* E.g., "drop 128.96/16
|
|
*/
|
|
int
|
|
dodrop(argc,argv)
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
char *bitp;
|
|
unsigned bits;
|
|
int32 n;
|
|
|
|
if(strcmp(argv[1],"default") == 0){
|
|
n = 0;
|
|
bits = 0;
|
|
} else {
|
|
/* If IP address is followed by an optional slash and length field,
|
|
* (e.g., 128.96/16) get it; otherwise assume a full 32-bit address
|
|
*/
|
|
if((bitp = index(argv[1],'/')) != NULLCHAR){
|
|
bitp++;
|
|
bits = (unsigned)atoi(bitp);
|
|
} else
|
|
bits = 32;
|
|
|
|
if((n = resolve(argv[1])) == 0){
|
|
printf(badhost,argv[1]);
|
|
return -1;
|
|
}
|
|
}
|
|
return rt_drop(n,bits);
|
|
}
|
|
|
|
/* Dump IP routing table -- Tightened this up a bit - K5JB
|
|
* Dest Len. Iface Gateway Metric
|
|
* 192.001.002.003 32 sl0 192.002.003.004 4
|
|
*/
|
|
int
|
|
dumproute()
|
|
{
|
|
register unsigned int i,bits;
|
|
register struct route *rp;
|
|
|
|
printf("Dest Len. Iface Gateway Metric\n");
|
|
if(r_default.interface != NULLIF){
|
|
printf("default%12d %-8s%-17s%6u\n",0, r_default.interface->name,
|
|
r_default.gateway != 0 ? inet_ntoa(r_default.gateway) : "",
|
|
r_default.metric);
|
|
}
|
|
for(bits=1;bits<=32;bits++){
|
|
for(i=0;i<NROUTE;i++){
|
|
for(rp = routes[bits-1][i];rp != NULLROUTE;rp = rp->next){
|
|
printf("%-17s%2u %-8s",inet_ntoa(rp->target),bits,
|
|
rp->interface->name);
|
|
printf("%-17s%6u\n",
|
|
rp->gateway != 0 ? inet_ntoa(rp->gateway) :"",rp->metric);
|
|
}
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int16 freeps; /* can be removed after test, see various ax_recv() calls */
|
|
|
|
#if defined(MSDOS) && defined(SERIALTEST)
|
|
int16 serial_err;
|
|
int32 tot_rframes;
|
|
#endif
|
|
|
|
|
|
int
|
|
doipstat(argc,argv)
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
extern struct ip_stats ip_stats;
|
|
extern struct reasm *reasmq;
|
|
register struct reasm *rp;
|
|
register struct frag *fp;
|
|
char *inet_ntoa();
|
|
#ifdef SHOWBALKS /* outlived its usefulness */
|
|
extern int16 maxslipq,slipbalks; /* in slip.c */
|
|
extern int16 sliphiwater; /* maybe remove after test */
|
|
#endif
|
|
|
|
if(argc > 1 && strcmp(argv[1],"clear") == 0){
|
|
#ifdef SHOWBALKS
|
|
slipbalks = 0;
|
|
sliphiwater = 0;
|
|
#endif
|
|
freeps = 0;
|
|
#if defined(SERIALTEST) && defined(MSDOS)
|
|
serial_err = 0;
|
|
tot_rframes = 0;
|
|
#endif
|
|
return 0;
|
|
}
|
|
#ifdef SHOWBALKS
|
|
#if defined(SERIALTEST) && defined(MSDOS)
|
|
printf(
|
|
"SLIP: TX balks %u, (hi water %u/%u); Bad KISS hdrs: %u, RX ORuns: %u/%lu\n",
|
|
slipbalks,sliphiwater,maxslipq,freeps,serial_err,tot_rframes);
|
|
#else
|
|
printf("SLIP: TX slip balks %u, (hi water %u/%u); Bad KISS hdrs: %u\n",
|
|
slipbalks,sliphiwater,maxslipq,freeps);
|
|
#endif
|
|
#else /* eliminate the TX balk report */
|
|
#if defined(SERIALTEST) && defined(MSDOS)
|
|
printf("Bad KISS hdrs: %u, RX ORuns: %u/%lu\n",freeps,serial_err,
|
|
tot_rframes);
|
|
#else
|
|
printf("Bad KISS hdrs: %u\n",freeps);
|
|
#endif
|
|
#endif
|
|
printf("IP: total %ld, runt %u, len err %u, vers err %u, chksum err %u, badproto %u\n",
|
|
ip_stats.total,ip_stats.runt,ip_stats.length,ip_stats.version,
|
|
ip_stats.checksum,ip_stats.badproto);
|
|
|
|
if(reasmq != NULLREASM)
|
|
printf("Reassembly fragments:\n");
|
|
for(rp = reasmq;rp != NULLREASM;rp = rp->next){
|
|
printf("src %s, ",inet_ntoa(rp->source));
|
|
printf("dest %s, id %u, pctl %u, time %lu, len %u\n",
|
|
inet_ntoa(rp->dest),rp->id,uchar(rp->protocol),
|
|
rp->timer.count,rp->length);
|
|
for(fp = rp->fraglist;fp != NULLFRAG;fp = fp->next){
|
|
printf(" offset %u, last %u\n",fp->offset,fp->last);
|
|
}
|
|
}
|
|
doicmpstat();
|
|
return 0;
|
|
}
|
|
|