Home | History | Annotate | Line # | Download | only in pppoectl
pppoectl.c revision 1.2
      1 /* $NetBSD: pppoectl.c,v 1.2 2002/01/04 12:23:00 martin Exp $ */
      2 
      3 /*
      4  * Copyright (c) 1997 Joerg Wunsch
      5  *
      6  * All rights reserved.
      7  *
      8  * Redistribution and use in source and binary forms, with or without
      9  * modification, are permitted provided that the following conditions
     10  * are met:
     11  * 1. Redistributions of source code must retain the above copyright
     12  *    notice, this list of conditions and the following disclaimer.
     13  * 2. Redistributions in binary form must reproduce the above copyright
     14  *    notice, this list of conditions and the following disclaimer in the
     15  *    documentation and/or other materials provided with the distribution.
     16  *
     17  * THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR
     18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     20  * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT,
     21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     27  *
     28  * From: spppcontrol.c,v 1.3 1998/01/07 07:55:26 charnier Exp
     29  * From: ispppcontrol
     30  */
     31 
     32 #include <sys/param.h>
     33 #include <sys/callout.h>
     34 #include <sys/ioctl.h>
     35 #include <sys/mbuf.h>
     36 #include <sys/socket.h>
     37 #include <sys/time.h>
     38 #include <sys/sysctl.h>
     39 #include <net/if.h>
     40 #include <net/if_sppp.h>
     41 #include <net/if_pppoe.h>
     42 #include <err.h>
     43 #include <stdio.h>
     44 #include <stdlib.h>
     45 #include <string.h>
     46 #include <sysexits.h>
     47 #include <unistd.h>
     48 
     49 static void usage(void);
     50 static void print_error(const char *ifname, int error, const char * str);
     51 static void print_vals(const char *ifname, int phase, struct spppauthcfg *sp, int lcp_timeout);
     52 const char *phase_name(int phase);
     53 const char *proto_name(int proto);
     54 const char *authflags(int flags);
     55 
     56 int hz = 0;
     57 
     58 int
     59 main(int argc, char **argv)
     60 {
     61 	int s, c;
     62 	int errs = 0, verbose = 0, dump = 0;
     63 	size_t off, len;
     64 	const char *ifname, *cp;
     65 	const char *eth_if_name, *access_concentrator, *service;
     66 	struct spppauthcfg spr;
     67 	struct sppplcpcfg lcp;
     68 	struct spppstatus status;
     69 	int mib[2];
     70 	int set_lcp = 0;
     71 	struct clockinfo clockinfo;
     72 
     73 	eth_if_name = NULL;
     74 	access_concentrator = NULL;
     75 	service = NULL;
     76 	while ((c = getopt(argc, argv, "vde:s:a:")) != -1)
     77 		switch (c) {
     78 		case 'v':
     79 			verbose++;
     80 			break;
     81 
     82 		case 'd':
     83 			dump++;
     84 			break;
     85 
     86 		case 'e':
     87 			eth_if_name = optarg;
     88 			break;
     89 
     90 		case 's':
     91 			service = optarg;
     92 			break;
     93 
     94 		case 'a':
     95 			access_concentrator = optarg;
     96 			break;
     97 
     98 		default:
     99 			errs++;
    100 			break;
    101 		}
    102 	argv += optind;
    103 	argc -= optind;
    104 
    105 	if (errs || argc < 1)
    106 		usage();
    107 
    108 	ifname = argv[0];
    109 
    110 	/* use a random AF to create the socket */
    111 	if ((s = socket(AF_INET, SOCK_DGRAM, 0)) < 0)
    112 		err(EX_UNAVAILABLE, "ifconfig: socket");
    113 
    114 	argc--;
    115 	argv++;
    116 
    117 	if (eth_if_name) {
    118 		struct pppoediscparms parms;
    119 		int e;
    120 
    121 		memset(&parms, 0, sizeof parms);
    122 		strncpy(parms.ifname, ifname, sizeof(parms.ifname));
    123 		strncpy(parms.eth_ifname, eth_if_name, sizeof(parms.eth_ifname));
    124 		if (access_concentrator) {
    125 			parms.ac_name = (char*)access_concentrator;
    126 			parms.ac_name_len = strlen(access_concentrator);
    127 		}
    128 		if (service) {
    129 			parms.service_name = (char*)service;
    130 			parms.service_name_len = strlen(service);
    131 		}
    132 
    133 		e = ioctl(s, PPPOESETPARMS, &parms);
    134 		if (e)
    135 			print_error(ifname, e, "PPPOESETPARMS");
    136 		return 0;
    137 	}
    138 
    139 	if (dump) {
    140 		/* dump PPPoE session state */
    141 		struct pppoeconnectionstate state;
    142 		int e;
    143 
    144 		memset(&state, 0, sizeof state);
    145 		strncpy(state.ifname, ifname, sizeof state.ifname);
    146 		e = ioctl(s, PPPOEGETSESSION, &state);
    147 		if (e)
    148 			print_error(ifname, e, "PPPOEGETSESSION,");
    149 
    150 		printf("%s:\tstate = ", ifname);
    151 		switch(state.state) {
    152 		case PPPOE_STATE_INITIAL:
    153 			printf("initial\n"); break;
    154 		case PPPOE_STATE_PADI_SENT:
    155 			printf("PADI sent\n"); break;
    156 		case PPPOE_STATE_PADR_SENT:
    157 			printf("PADR sent\n"); break;
    158 		case PPPOE_STATE_SESSION:
    159 			printf("session\n"); break;
    160 		case PPPOE_STATE_CLOSING:
    161 			printf("closing\n"); break;
    162 		}
    163 		printf("\tSession ID: 0x%x\n", state.session_id);
    164 		printf("\tPADI retries: %d\n", state.padi_retry_no);
    165 		printf("\tPADR retries: %d\n", state.padr_retry_no);
    166 
    167 		return 0;
    168 	}
    169 
    170 
    171 	memset(&spr, 0, sizeof spr);
    172 	strncpy(spr.ifname, ifname, sizeof spr.ifname);
    173 	memset(&lcp, 0, sizeof lcp);
    174 	strncpy(lcp.ifname, ifname, sizeof lcp.ifname);
    175 	memset(&status, 0, sizeof status);
    176 	strncpy(status.ifname, ifname, sizeof status.ifname);
    177 
    178 	mib[0] = CTL_KERN;
    179 	mib[1] = KERN_CLOCKRATE;
    180 	len = sizeof(clockinfo);
    181 	if(sysctl(mib, 2, &clockinfo, &len, NULL, 0) == -1)
    182 	{
    183 		fprintf(stderr, "error, cannot sysctl kern.clockrate!\n");
    184 		exit(1);
    185 	}
    186 
    187 	hz = clockinfo.hz;
    188 
    189 	if (argc == 0) {
    190 		/* list only mode */
    191 
    192 		/* first pass, get name lenghts */
    193 		if (ioctl(s, SPPPGETAUTHCFG, &spr) == -1)
    194 			err(EX_OSERR, "SPPPGETAUTHCFG");
    195 		/* now allocate buffers for strings */
    196 		if (spr.myname_length)
    197 			spr.myname = malloc(spr.myname_length);
    198 		if (spr.hisname_length)
    199 			spr.hisname = malloc(spr.hisname_length);
    200 		/* second pass: get names too */
    201 		if (ioctl(s, SPPPGETAUTHCFG, &spr) == -1)
    202 			err(EX_OSERR, "SPPPGETAUTHCFG");
    203 
    204 		if (ioctl(s, SPPPGETLCPCFG, &lcp) == -1)
    205 			err(EX_OSERR, "SPPPGETLCPCFG");
    206 		if (ioctl(s, SPPPGETSTATUS, &status) == -1)
    207 			err(EX_OSERR, "SPPPGETSTATUS");
    208 
    209 		print_vals(ifname, status.phase, &spr, lcp.lcp_timeout);
    210 
    211 		if (spr.hisname) free(spr.hisname);
    212 		if (spr.myname) free(spr.myname);
    213 		return 0;
    214 	}
    215 
    216 #define startswith(s) strncmp(argv[0], s, (off = strlen(s))) == 0
    217 
    218 	while (argc > 0) {
    219 		if (startswith("authproto=")) {
    220 			cp = argv[0] + off;
    221 			if (strcmp(cp, "pap") == 0)
    222 				spr.myauth =
    223 					spr.hisauth = SPPP_AUTHPROTO_PAP;
    224 			else if (strcmp(cp, "chap") == 0)
    225 				spr.myauth = spr.hisauth = SPPP_AUTHPROTO_CHAP;
    226 			else if (strcmp(cp, "none") == 0)
    227 				spr.myauth = spr.hisauth = SPPP_AUTHPROTO_NONE;
    228 			else
    229 				errx(EX_DATAERR, "bad auth proto: %s", cp);
    230 		} else if (startswith("myauthproto=")) {
    231 			cp = argv[0] + off;
    232 			if (strcmp(cp, "pap") == 0)
    233 				spr.myauth = SPPP_AUTHPROTO_PAP;
    234 			else if (strcmp(cp, "chap") == 0)
    235 				spr.myauth = SPPP_AUTHPROTO_CHAP;
    236 			else if (strcmp(cp, "none") == 0)
    237 				spr.myauth = SPPP_AUTHPROTO_NONE;
    238 			else
    239 				errx(EX_DATAERR, "bad auth proto: %s", cp);
    240 		} else if (startswith("myauthname=")) {
    241 			spr.myname = argv[0] + off;
    242 			spr.myname_length = strlen(spr.myname)+1;
    243 		} else if (startswith("myauthsecret=") || startswith("myauthkey=")) {
    244 			spr.mysecret = argv[0] + off;
    245 			spr.mysecret_length = strlen(spr.mysecret)+1;
    246 		} else if (startswith("hisauthproto=")) {
    247 			cp = argv[0] + off;
    248 			if (strcmp(cp, "pap") == 0)
    249 				spr.hisauth = SPPP_AUTHPROTO_PAP;
    250 			else if (strcmp(cp, "chap") == 0)
    251 				spr.hisauth = SPPP_AUTHPROTO_CHAP;
    252 			else if (strcmp(cp, "none") == 0)
    253 				spr.hisauth = SPPP_AUTHPROTO_NONE;
    254 			else
    255 				errx(EX_DATAERR, "bad auth proto: %s", cp);
    256 		} else if (startswith("hisauthname=")) {
    257 			spr.hisname = argv[0] + off;
    258 			spr.hisname_length = strlen(spr.hisname)+1;
    259 		} else if (startswith("hisauthsecret=") || startswith("hisauthkey=")) {
    260 			spr.hissecret = argv[0] + off;
    261 			spr.hissecret_length = strlen(spr.hissecret)+1;
    262 		} else if (strcmp(argv[0], "callin") == 0)
    263 			spr.hisauthflags |= SPPP_AUTHFLAG_NOCALLOUT;
    264 		else if (strcmp(argv[0], "always") == 0)
    265 			spr.hisauthflags &= ~SPPP_AUTHFLAG_NOCALLOUT;
    266 		else if (strcmp(argv[0], "norechallenge") == 0)
    267 			spr.hisauthflags |= SPPP_AUTHFLAG_NORECHALLENGE;
    268 		else if (strcmp(argv[0], "rechallenge") == 0)
    269 			spr.hisauthflags &= ~SPPP_AUTHFLAG_NORECHALLENGE;
    270 #ifndef __NetBSD__
    271 		else if (strcmp(argv[0], "enable-vj") == 0)
    272 			spr.defs.enable_vj = 1;
    273 		else if (strcmp(argv[0], "disable-vj") == 0)
    274 			spr.defs.enable_vj = 0;
    275 #endif
    276 		else if (startswith("lcp-timeout=")) {
    277 			int timeout_arg = atoi(argv[0]+off);
    278 			if ((timeout_arg > 20000) || (timeout_arg <= 0))
    279 				errx(EX_DATAERR, "bad lcp timeout value: %s",
    280 				     argv[0]+off);
    281 			lcp.lcp_timeout = timeout_arg * hz / 1000;
    282 			set_lcp = 1;
    283 		} else
    284 			errx(EX_DATAERR, "bad parameter: \"%s\"", argv[0]);
    285 
    286 		argv++;
    287 		argc--;
    288 	}
    289 
    290 	if (ioctl(s, SPPPSETAUTHCFG, &spr) == -1)
    291 		err(EX_OSERR, "SPPPSETAUTHCFG");
    292 	if (set_lcp) {
    293 		if (ioctl(s, SPPPSETLCPCFG, &lcp) == -1)
    294 			err(EX_OSERR, "SPPPSETLCPCFG");
    295 	}
    296 
    297 	if (verbose)
    298 		print_vals(ifname, status.phase, &spr, lcp.lcp_timeout);
    299 
    300 	return 0;
    301 }
    302 
    303 static void
    304 usage(void)
    305 {
    306 	fprintf(stderr, "%s\n%s\n",
    307 	"usage: ispppcontrol [-v] ifname [{my|his}auth{proto|name|secret}=...]",
    308 	"       ispppcontrol [-v] ifname callin|always");
    309 	exit(EX_USAGE);
    310 }
    311 
    312 static void
    313 print_vals(const char *ifname, int phase, struct spppauthcfg *sp, int lcp_timeout)
    314 {
    315 #ifndef __NetBSD__
    316 	time_t send, recv;
    317 #endif
    318 
    319 	printf("%s:\tphase=%s\n", ifname, phase_name(phase));
    320 	if (sp->myauth) {
    321 		printf("\tmyauthproto=%s myauthname=\"%s\"\n",
    322 		       proto_name(sp->myauth),
    323 		       sp->myname);
    324 	}
    325 	if (sp->hisauth) {
    326 		printf("\thisauthproto=%s hisauthname=\"%s\"%s\n",
    327 		       proto_name(sp->hisauth),
    328 		       sp->hisname,
    329 		       authflags(sp->hisauthflags));
    330 	}
    331 #ifndef __NetBSD__
    332 	if (sp->defs.pp_phase > PHASE_DEAD) {
    333 		send = time(NULL) - sp->defs.pp_last_sent;
    334 		recv = time(NULL) - sp->defs.pp_last_recv;
    335 		printf("\tidle_time=%ld\n", (send<recv)? send : recv);
    336 	}
    337 #endif
    338 
    339 	printf("\tlcp timeout: %.3f s\n",
    340 	       (double)lcp_timeout / hz);
    341 
    342 #ifndef __NetBSD__
    343 	printf("\tenable_vj: %s\n",
    344 	       sp->defs.enable_vj ? "on" : "off");
    345 #endif
    346 }
    347 
    348 const char *
    349 phase_name(int phase)
    350 {
    351 	switch (phase) {
    352 	case SPPP_PHASE_DEAD:		return "dead";
    353 	case SPPP_PHASE_ESTABLISH:	return "establish";
    354 	case SPPP_PHASE_TERMINATE:	return "terminate";
    355 	case SPPP_PHASE_AUTHENTICATE:	return "authenticate";
    356 	case SPPP_PHASE_NETWORK:	return "network";
    357 	}
    358 	return "illegal";
    359 }
    360 
    361 const char *
    362 proto_name(int proto)
    363 {
    364 	static char buf[12];
    365 	switch (proto) {
    366 	case SPPP_AUTHPROTO_PAP:	return "pap";
    367 	case SPPP_AUTHPROTO_CHAP:	return "chap";
    368 	case SPPP_AUTHPROTO_NONE:	return "none";
    369 	}
    370 	sprintf(buf, "0x%x", (unsigned)proto);
    371 	return buf;
    372 }
    373 
    374 const char *
    375 authflags(int flags)
    376 {
    377 	static char buf[32];
    378 	buf[0] = '\0';
    379 	if (flags & SPPP_AUTHFLAG_NOCALLOUT)
    380 		strcat(buf, " callin");
    381 	if (flags & SPPP_AUTHFLAG_NORECHALLENGE)
    382 		strcat(buf, " norechallenge");
    383 	return buf;
    384 }
    385 
    386 static void
    387 print_error(const char *ifname, int error, const char * str)
    388 {
    389 	if (error == -1)
    390 		fprintf(stderr, "%s: interface not found\n", ifname);
    391 	else
    392 		fprintf(stderr, "%s: %s: %s\n", ifname, str, strerror(error));
    393 	exit(EX_DATAERR);
    394 }
    395 
    396 
    397