2 * Copyright (c) 1999 Brian Somers <brian@Awfulhak.org>
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 #include <sys/param.h>
30 #include <sys/socket.h>
32 #include <netinet/in.h>
33 #include <arpa/inet.h>
36 #include <net/ethernet.h>
38 #include <net/route.h>
39 #include <netinet/in_systm.h>
40 #include <netinet/ip.h>
41 #include <netgraph/ng_ether.h>
42 #include <netgraph/ng_message.h>
43 #include <netgraph/ng_pppoe.h>
44 #include <netgraph/ng_socket.h>
51 #include <sys/fcntl.h>
66 #include "throughput.h"
72 #include "descriptor.h"
81 #include "slcompress.h"
99 #define PPPOE_NODE_TYPE_LEN (sizeof NG_PPPOE_NODE_TYPE - 1) /* "PPPoE" */
102 struct device dev; /* What struct physical knows about */
103 int cs; /* Control socket */
104 int connected; /* Are we connected yet ? */
105 int timeout; /* Seconds attempting to connect */
106 char hook[sizeof TUN_NAME + 11]; /* Our socket node hook */
107 u_int32_t slot; /* ifindex << 24 | unit */
110 #define device2ether(d) \
111 ((d)->type == ETHER_DEVICE ? (struct etherdevice *)d : NULL)
114 ether_DeviceSize(void)
116 return sizeof(struct etherdevice);
120 ether_Write(struct physical *p, const void *v, size_t n)
122 struct etherdevice *dev = device2ether(p->handler);
124 return NgSendData(p->fd, dev->hook, v, n) == -1 ? -1 : (ssize_t)n;
128 ether_Read(struct physical *p, void *v, size_t n)
130 char hook[sizeof TUN_NAME + 11];
132 return NgRecvData(p->fd, v, n, hook);
136 ether_RemoveFromSet(struct physical *p, fd_set *r, fd_set *w, fd_set *e)
138 struct etherdevice *dev = device2ether(p->handler);
141 if (r && dev->cs >= 0 && FD_ISSET(dev->cs, r)) {
143 log_Printf(LogTIMER, "%s: fdunset(ctrl) %d\n", p->link.name, dev->cs);
148 /* Careful... physical_RemoveFromSet() called us ! */
150 p->handler->removefromset = NULL;
151 result += physical_RemoveFromSet(p, r, w, e);
152 p->handler->removefromset = ether_RemoveFromSet;
158 ether_Free(struct physical *p)
160 struct etherdevice *dev = device2ether(p->handler);
162 physical_SetDescriptor(p);
169 ether_OpenInfo(struct physical *p)
171 struct etherdevice *dev = device2ether(p->handler);
173 switch (dev->connected) {
174 case CARRIER_PENDING:
175 return "negotiating";
177 return "established";
180 return "disconnected";
184 ether_Slot(struct physical *p)
186 struct etherdevice *dev = device2ether(p->handler);
193 ether_device2iov(struct device *d, struct iovec *iov, int *niov,
194 int maxiov __unused, int *auxfd, int *nauxfd)
196 struct etherdevice *dev;
197 int sz = physical_MaxDeviceSize();
199 iov[*niov].iov_base = d = realloc(d, sz);
201 log_Printf(LogALERT, "Failed to allocate memory: %d\n", sz);
202 AbortProgram(EX_OSERR);
204 iov[*niov].iov_len = sz;
207 dev = device2ether(d);
215 ether_MessageIn(struct etherdevice *dev)
217 char msgbuf[sizeof(struct ng_mesg) + sizeof(struct ngpppoe_sts)];
218 struct ng_mesg *rep = (struct ng_mesg *)msgbuf;
219 struct ngpppoe_sts *sts = (struct ngpppoe_sts *)(msgbuf + sizeof *rep);
220 char *end, unknown[14], sessionid[5];
230 if ((r = mkfdset()) == NULL) {
231 log_Printf(LogERROR, "DoLoop: Cannot create fd_set\n");
238 t.tv_sec = t.tv_usec = 0;
239 ret = select(dev->cs + 1, r, NULL, NULL, &t);
244 if (NgRecvMsg(dev->cs, rep, sizeof msgbuf, NULL) <= 0)
247 if (rep->header.version != NG_VERSION) {
248 log_Printf(LogWARN, "%ld: Unexpected netgraph version, expected %ld\n",
249 (long)rep->header.version, (long)NG_VERSION);
253 if (rep->header.typecookie != NGM_PPPOE_COOKIE) {
254 log_Printf(LogWARN, "%ld: Unexpected netgraph cookie, expected %ld\n",
255 (long)rep->header.typecookie, (long)NGM_PPPOE_COOKIE);
260 switch (rep->header.cmd) {
261 case NGM_PPPOE_SET_FLAG: msg = "SET_FLAG"; break;
262 case NGM_PPPOE_CONNECT: msg = "CONNECT"; break;
263 case NGM_PPPOE_LISTEN: msg = "LISTEN"; break;
264 case NGM_PPPOE_OFFER: msg = "OFFER"; break;
265 case NGM_PPPOE_SUCCESS: msg = "SUCCESS"; break;
266 case NGM_PPPOE_FAIL: msg = "FAIL"; break;
267 case NGM_PPPOE_CLOSE: msg = "CLOSE"; break;
268 case NGM_PPPOE_GET_STATUS: msg = "GET_STATUS"; break;
269 case NGM_PPPOE_ACNAME:
271 if (setenv("ACNAME", sts->hook, 1) != 0)
272 log_Printf(LogWARN, "setenv: cannot set ACNAME=%s: %m", sts->hook);
273 asciilen = rep->header.arglen;
275 case NGM_PPPOE_SESSIONID:
277 snprintf(sessionid, sizeof sessionid, "%04x", *(u_int16_t *)sts);
278 if (setenv("SESSIONID", sessionid, 1) != 0)
279 syslog(LOG_WARNING, "setenv: cannot set SESSIONID=%s: %m",
281 /* Use this in preference to our interface index */
282 slot = strtoul(sessionid, &end, 16);
283 if (end != sessionid && *end == '\0')
287 snprintf(unknown, sizeof unknown, "<%d>", (int)rep->header.cmd);
293 log_Printf(LogPHASE, "Received NGM_PPPOE_%s (hook \"%.*s\")\n",
294 msg, asciilen, sts->hook);
296 log_Printf(LogPHASE, "Received NGM_PPPOE_%s\n", msg);
298 switch (rep->header.cmd) {
299 case NGM_PPPOE_SUCCESS:
300 dev->connected = CARRIER_OK;
303 case NGM_PPPOE_CLOSE:
304 dev->connected = CARRIER_LOST;
312 ether_AwaitCarrier(struct physical *p)
314 struct etherdevice *dev = device2ether(p->handler);
316 if (dev->connected != CARRIER_OK && !dev->timeout--)
317 dev->connected = CARRIER_LOST;
318 else if (dev->connected == CARRIER_PENDING)
319 ether_MessageIn(dev);
321 return dev->connected;
324 static const struct device baseetherdevice = {
328 { CD_REQUIRED, DEF_ETHERCDDELAY },
346 ether_iov2device(int type, struct physical *p, struct iovec *iov, int *niov,
347 int maxiov __unused, int *auxfd, int *nauxfd)
349 if (type == ETHER_DEVICE) {
350 struct etherdevice *dev = (struct etherdevice *)iov[(*niov)++].iov_base;
352 dev = realloc(dev, sizeof *dev); /* Reduce to the correct size */
354 log_Printf(LogALERT, "Failed to allocate memory: %d\n",
356 AbortProgram(EX_OSERR);
365 /* Refresh function pointers etc */
366 memcpy(&dev->dev, &baseetherdevice, sizeof dev->dev);
368 physical_SetupStack(p, dev->dev.name, PHYSICAL_FORCE_SYNCNOACF);
376 ether_UpdateSet(struct fdescriptor *d, fd_set *r, fd_set *w, fd_set *e, int *n)
378 struct physical *p = descriptor2physical(d);
379 struct etherdevice *dev = device2ether(p->handler);
382 if (r && dev->cs >= 0) {
384 log_Printf(LogTIMER, "%s(ctrl): fdset(r) %d\n", p->link.name, dev->cs);
389 result += physical_doUpdateSet(d, r, w, e, n, 0);
395 ether_IsSet(struct fdescriptor *d, const fd_set *fdset)
397 struct physical *p = descriptor2physical(d);
398 struct etherdevice *dev = device2ether(p->handler);
401 result = dev->cs >= 0 && FD_ISSET(dev->cs, fdset);
402 result += physical_IsSet(d, fdset);
408 ether_DescriptorRead(struct fdescriptor *d, struct bundle *bundle,
411 struct physical *p = descriptor2physical(d);
412 struct etherdevice *dev = device2ether(p->handler);
414 if (dev->cs >= 0 && FD_ISSET(dev->cs, fdset)) {
415 ether_MessageIn(dev);
416 if (dev->connected == CARRIER_LOST) {
417 log_Printf(LogPHASE, "%s: Device disconnected\n", p->link.name);
418 datalink_Down(p->dl, CLOSE_NORMAL);
423 if (physical_IsSet(d, fdset))
424 physical_DescriptorRead(d, bundle, fdset);
427 static struct device *
428 ether_Abandon(struct etherdevice *dev, struct physical *p)
430 /* Abandon our node construction */
433 p->fd = -2; /* Nobody else need try.. */
440 ether_Create(struct physical *p)
443 struct etherdevice *dev;
444 struct ng_mesg *resp;
445 const struct hooklist *hlist;
446 const struct nodeinfo *ninfo;
447 char *path, *sessionid;
455 if (p->fd < 0 && !strncasecmp(p->name.full, NG_PPPOE_NODE_TYPE,
456 PPPOE_NODE_TYPE_LEN) &&
457 p->name.full[PPPOE_NODE_TYPE_LEN] == ':') {
458 const struct linkinfo *nlink;
459 struct ngpppoe_init_data *data;
460 struct ngm_mkpeer mkp;
461 struct ngm_connect ngc;
462 const char *iface, *provider;
465 char connectpath[sizeof dev->hook + 2]; /* .:<hook> */
467 p->fd--; /* We own the device - change fd */
469 loadmodules(LOAD_VERBOSLY, "netgraph", "ng_ether", "ng_pppoe", "ng_socket",
472 if ((dev = malloc(sizeof *dev)) == NULL)
475 iface = p->name.full + PPPOE_NODE_TYPE_LEN + 1;
477 provider = strchr(iface, ':');
479 ifacelen = provider - iface;
481 providerlen = strlen(provider);
483 ifacelen = strlen(iface);
489 * We're going to do this (where tunN is our tunnel device):
493 * | <iface> | dev->cs
499 * .---------. .-----------.
500 * | pppoe | | socket |
501 * | <iface> |(tunN)<---->(tunN)| <unnamed> |
502 * `--------- `-----------'
509 /* Create a socket node */
510 if (ID0NgMkSockNode(NULL, &dev->cs, &p->fd) == -1) {
511 log_Printf(LogWARN, "Cannot create netgraph socket node: %s\n",
519 * Ask for a list of hooks attached to the "ether" node. This node should
520 * magically exist as a way of hooking stuff onto an ethernet device
522 path = (char *)alloca(ifacelen + 2);
523 sprintf(path, "%.*s:", (int)ifacelen, iface);
524 if (NgSendMsg(dev->cs, path, NGM_GENERIC_COOKIE, NGM_LISTHOOKS,
526 log_Printf(LogWARN, "%s Cannot send a netgraph message: %s\n",
527 path, strerror(errno));
528 return ether_Abandon(dev, p);
531 /* Get our list back */
532 resp = (struct ng_mesg *)rbuf;
533 if (NgRecvMsg(dev->cs, resp, sizeof rbuf, NULL) <= 0) {
534 log_Printf(LogWARN, "Cannot get netgraph response: %s\n",
536 return ether_Abandon(dev, p);
539 hlist = (const struct hooklist *)resp->data;
540 ninfo = &hlist->nodeinfo;
542 /* Make sure we've got the right type of node */
543 if (strncmp(ninfo->type, NG_ETHER_NODE_TYPE,
544 sizeof NG_ETHER_NODE_TYPE - 1)) {
545 log_Printf(LogWARN, "%s Unexpected node type ``%s'' (wanted ``"
546 NG_ETHER_NODE_TYPE "'')\n", path, ninfo->type);
547 return ether_Abandon(dev, p);
550 log_Printf(LogDEBUG, "List of netgraph node ``%s'' (id %x) hooks:\n",
553 /* look for a hook already attached. */
554 for (f = 0; f < ninfo->hooks; f++) {
555 nlink = &hlist->link[f];
557 log_Printf(LogDEBUG, " Found %s -> %s\n", nlink->ourhook,
560 if (!strcmp(nlink->ourhook, NG_ETHER_HOOK_ORPHAN) ||
561 !strcmp(nlink->ourhook, NG_ETHER_HOOK_DIVERT)) {
563 * Something is using the data coming out of this ``ether'' node.
564 * If it's a PPPoE node, we use that node, otherwise we complain that
565 * someone else is using the node.
567 if (!strcmp(nlink->nodeinfo.type, NG_PPPOE_NODE_TYPE))
568 /* Use this PPPoE node ! */
569 snprintf(ngc.path, sizeof ngc.path, "[%x]:", nlink->nodeinfo.id);
571 log_Printf(LogWARN, "%s Node type ``%s'' is currently active\n",
572 path, nlink->nodeinfo.type);
573 return ether_Abandon(dev, p);
579 if (f == ninfo->hooks) {
581 * Create a new ``PPPoE'' node connected to the ``ether'' node using
582 * the ``orphan'' and ``ethernet'' hooks
584 snprintf(mkp.type, sizeof mkp.type, "%s", NG_PPPOE_NODE_TYPE);
585 snprintf(mkp.ourhook, sizeof mkp.ourhook, "%s", NG_ETHER_HOOK_ORPHAN);
586 snprintf(mkp.peerhook, sizeof mkp.peerhook, "%s", NG_PPPOE_HOOK_ETHERNET);
587 snprintf(etherid, sizeof etherid, "[%x]:", ninfo->id);
589 log_Printf(LogDEBUG, "Creating PPPoE netgraph node %s%s -> %s\n",
590 etherid, mkp.ourhook, mkp.peerhook);
592 if (NgSendMsg(dev->cs, etherid, NGM_GENERIC_COOKIE,
593 NGM_MKPEER, &mkp, sizeof mkp) < 0) {
594 log_Printf(LogWARN, "%s Cannot create PPPoE netgraph node: %s\n",
595 etherid, strerror(errno));
596 return ether_Abandon(dev, p);
599 snprintf(ngc.path, sizeof ngc.path, "%s%s", path, NG_ETHER_HOOK_ORPHAN);
602 snprintf(dev->hook, sizeof dev->hook, "%s%d",
603 TUN_NAME, p->dl->bundle->unit);
606 * Connect the PPPoE node to our socket node.
607 * ngc.path has already been set up
609 snprintf(ngc.ourhook, sizeof ngc.ourhook, "%s", dev->hook);
610 memcpy(ngc.peerhook, ngc.ourhook, sizeof ngc.peerhook);
612 log_Printf(LogDEBUG, "Connecting netgraph socket .:%s -> %s:%s\n",
613 ngc.ourhook, ngc.path, ngc.peerhook);
614 if (NgSendMsg(dev->cs, ".:", NGM_GENERIC_COOKIE,
615 NGM_CONNECT, &ngc, sizeof ngc) < 0) {
616 log_Printf(LogWARN, "Cannot connect PPPoE and socket netgraph "
617 "nodes: %s\n", strerror(errno));
618 return ether_Abandon(dev, p);
621 /* Bring the Ethernet interface up */
622 path[ifacelen] = '\0'; /* Remove the trailing ':' */
623 if (!iface_SetFlags(path, IFF_UP))
624 log_Printf(LogWARN, "%s: Failed to set the IFF_UP flag on %s\n",
627 snprintf(connectpath, sizeof connectpath, ".:%s", dev->hook);
629 /* Configure node to 3Com mode if needed */
630 if (p->cfg.pppoe_configured) {
631 mode = p->cfg.nonstandard_pppoe ? NG_PPPOE_NONSTANDARD : NG_PPPOE_STANDARD;
632 if (NgSendMsg(dev->cs, connectpath, NGM_PPPOE_COOKIE,
633 NGM_PPPOE_SETMODE, mode, strlen(mode) + 1) == -1) {
634 log_Printf(LogWARN, "``%s'': Cannot configure netgraph node: %s\n",
635 connectpath, strerror(errno));
636 return ether_Abandon(dev, p);
640 /* And finally, request a connection to the given provider */
642 data = (struct ngpppoe_init_data *)alloca(sizeof *data + providerlen);
643 snprintf(data->hook, sizeof data->hook, "%s", dev->hook);
644 memcpy(data->data, provider, providerlen);
645 data->data_len = providerlen;
647 log_Printf(LogDEBUG, "Sending PPPOE_CONNECT to %s\n", connectpath);
648 if (NgSendMsg(dev->cs, connectpath, NGM_PPPOE_COOKIE,
649 NGM_PPPOE_CONNECT, data, sizeof *data + providerlen) == -1) {
650 log_Printf(LogWARN, "``%s'': Cannot start netgraph node: %s\n",
651 connectpath, strerror(errno));
652 return ether_Abandon(dev, p);
655 /* Hook things up so that we monitor dev->cs */
656 p->desc.UpdateSet = ether_UpdateSet;
657 p->desc.IsSet = ether_IsSet;
658 p->desc.Read = ether_DescriptorRead;
660 memcpy(&dev->dev, &baseetherdevice, sizeof dev->dev);
661 switch (p->cfg.cd.necessity) {
663 dev->dev.cd.delay = p->cfg.cd.delay;
666 dev->dev.cd = p->cfg.cd;
669 log_Printf(LogWARN, "%s: Carrier must be set, using ``set cd %d!''\n",
670 p->link.name, dev->dev.cd.delay);
675 dev->timeout = dev->dev.cd.delay;
676 dev->connected = CARRIER_PENDING;
677 /* This will be overridden by our session id - if provided by netgraph */
678 dev->slot = GetIfIndex(path);
680 /* See if we're a netgraph socket */
683 if (fstat(p->fd, &st) != -1 && (st.st_mode & S_IFSOCK)) {
684 struct sockaddr_storage ssock;
685 struct sockaddr *sock = (struct sockaddr *)&ssock;
689 if (getsockname(p->fd, sock, &sz) == -1) {
690 log_Printf(LogPHASE, "%s: Link is a closed socket !\n", p->link.name);
696 if (sock->sa_family == AF_NETGRAPH) {
698 * It's a netgraph node... We can't determine hook names etc, so we
699 * stay pretty impartial....
701 log_Printf(LogPHASE, "%s: Link is a netgraph node\n", p->link.name);
703 if ((dev = malloc(sizeof *dev)) == NULL) {
704 log_Printf(LogWARN, "%s: Cannot allocate an ether device: %s\n",
705 p->link.name, strerror(errno));
709 memcpy(&dev->dev, &baseetherdevice, sizeof dev->dev);
712 dev->connected = CARRIER_OK;
716 * If we're being envoked from pppoed(8), we may have a SESSIONID
717 * set in the environment. If so, use it as the slot
719 if ((sessionid = getenv("SESSIONID")) != NULL) {
723 slot = strtoul(sessionid, &end, 16);
724 dev->slot = end != sessionid && *end == '\0' ? slot : 0;
732 physical_SetupStack(p, dev->dev.name, PHYSICAL_FORCE_SYNCNOACF);