2 * System-dependent procedures for pppd under Solaris 2.
4 * Parts re-written by Adi Masputra <adi.masputra@sun.com>, based on
5 * the original sys-svr4.c
7 * Copyright (c) 2000 by Sun Microsystems, Inc.
10 * Permission to use, copy, modify, and distribute this software and its
11 * documentation is hereby granted, provided that the above copyright
12 * notice appears in all copies.
14 * SUN MAKES NO REPRESENTATION OR WARRANTIES ABOUT THE SUITABILITY OF
15 * THE SOFTWARE, EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED
16 * TO THE IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
17 * PARTICULAR PURPOSE, OR NON-INFRINGEMENT. SUN SHALL NOT BE LIABLE FOR
18 * ANY DAMAGES SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING OR
19 * DISTRIBUTING THIS SOFTWARE OR ITS DERIVATIVES
21 * Copyright (c) 1994 The Australian National University.
22 * All rights reserved.
24 * Permission to use, copy, modify, and distribute this software and its
25 * documentation is hereby granted, provided that the above copyright
26 * notice appears in all copies. This software is provided without any
27 * warranty, express or implied. The Australian National University
28 * makes no representations about the suitability of this software for
31 * IN NO EVENT SHALL THE AUSTRALIAN NATIONAL UNIVERSITY BE LIABLE TO ANY
32 * PARTY FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
33 * ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN IF
34 * THE AUSTRALIAN NATIONAL UNIVERSITY HAVE BEEN ADVISED OF THE POSSIBILITY
37 * THE AUSTRALIAN NATIONAL UNIVERSITY SPECIFICALLY DISCLAIMS ANY WARRANTIES,
38 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
39 * AND FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS
40 * ON AN "AS IS" BASIS, AND THE AUSTRALIAN NATIONAL UNIVERSITY HAS NO
41 * OBLIGATION TO PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS,
45 #define RCSID "$Id: sys-solaris.c,v 1.1.1.4 2003/10/14 08:09:53 sparq Exp $"
57 #include <sys/termiox.h>
61 #include <sys/types.h>
62 #include <sys/ioccom.h>
63 #include <sys/stream.h>
64 #include <sys/stropts.h>
65 #include <sys/socket.h>
66 #include <sys/sockio.h>
67 #include <sys/sysmacros.h>
68 #include <sys/systeminfo.h>
71 #include <sys/mkdev.h>
73 #include <net/if_arp.h>
74 #include <net/route.h>
75 #include <net/ppp_defs.h>
76 #include <net/pppio.h>
77 #include <netinet/in.h>
79 #include <sys/tihdr.h>
80 #include <sys/tiuser.h>
81 #include <inet/common.h>
82 #include <inet/mib2.h>
83 #include <sys/ethernet.h>
92 #if !defined(PPP_DRV_NAME)
93 #define PPP_DRV_NAME "ppp"
94 #endif /* !defined(PPP_DRV_NAME) */
96 #if !defined(PPP_DEV_NAME)
97 #define PPP_DEV_NAME "/dev/" PPP_DRV_NAME
98 #endif /* !defined(PPP_DEV_NAME) */
100 #if !defined(AHDLC_MOD_NAME)
101 #define AHDLC_MOD_NAME "ppp_ahdl"
102 #endif /* !defined(AHDLC_MOD_NAME) */
104 #if !defined(COMP_MOD_NAME)
105 #define COMP_MOD_NAME "ppp_comp"
106 #endif /* !defined(COMP_MOD_NAME) */
108 #if !defined(IP_DEV_NAME)
109 #define IP_DEV_NAME "/dev/ip"
110 #endif /* !defined(IP_DEV_NAME) */
112 #if !defined(IP_MOD_NAME)
113 #define IP_MOD_NAME "ip"
114 #endif /* !defined(IP_MOD_NAME) */
116 #if !defined(UDP_DEV_NAME) && defined(SOL2)
117 #define UDP_DEV_NAME "/dev/udp"
118 #endif /* !defined(UDP_DEV_NAME) && defined(SOL2) */
120 #if !defined(UDP6_DEV_NAME) && defined(SOL2)
121 #define UDP6_DEV_NAME "/dev/udp6"
122 #endif /* !defined(UDP6_DEV_NAME) && defined(SOL2) */
124 static const char rcsid
[] = RCSID
;
128 * "/dev/udp" is used as a multiplexor to PLINK the interface stream
129 * under. It is used in place of "/dev/ip" since STREAMS will not let
130 * a driver be PLINK'ed under itself, and "/dev/ip" is typically the
131 * driver at the bottom of the tunneling interfaces stream.
133 static char *mux_dev_name
= UDP_DEV_NAME
;
135 static char *mux_dev_name
= IP_DEV_NAME
;
138 static int fdmuxid
= -1;
140 static int ipmuxid
= -1;
142 #if defined(INET6) && defined(SOL2)
143 static int ip6fd
; /* IP file descriptor */
144 static int ip6muxid
= -1; /* Multiplexer file descriptor */
145 static int if6_is_up
= 0; /* IPv6 interface has been marked up */
147 #define _IN6_LLX_FROM_EUI64(l, s, eui64, as) do { \
148 s->sin6_addr.s6_addr32[0] = htonl(as); \
149 eui64_copy(eui64, s->sin6_addr.s6_addr32[2]); \
150 s->sin6_family = AF_INET6; \
151 l.lifr_addr.ss_family = AF_INET6; \
152 l.lifr_addrlen = 10; \
153 l.lifr_addr = laddr; \
156 #define IN6_LLADDR_FROM_EUI64(l, s, eui64) \
157 _IN6_LLX_FROM_EUI64(l, s, eui64, 0xfe800000)
159 #define IN6_LLTOKEN_FROM_EUI64(l, s, eui64) \
160 _IN6_LLX_FROM_EUI64(l, s, eui64, 0)
162 #endif /* defined(INET6) && defined(SOL2) */
164 #if defined(INET6) && defined(SOL2)
165 static char first_ether_name
[LIFNAMSIZ
]; /* Solaris 8 and above */
167 static char first_ether_name
[IFNAMSIZ
]; /* Before Solaris 8 */
168 #define MAXIFS 256 /* Max # of interfaces */
169 #endif /* defined(INET6) && defined(SOL2) */
171 static int restore_term
;
172 static struct termios inittermios
;
174 static struct termiox inittermiox
;
175 static int termiox_ok
;
177 static struct winsize wsinfo
; /* Initial window size info */
178 static pid_t tty_sid
; /* original session ID for terminal */
180 extern u_char inpacket_buf
[]; /* borrowed from main.c */
182 #define MAX_POLLFDS 32
183 static struct pollfd pollfds
[MAX_POLLFDS
];
184 static int n_pollfds
;
186 static int link_mtu
, link_mru
;
189 static int tty_nmodules
;
190 static char tty_modules
[NMODULES
][FMNAMESZ
+1];
191 static int tty_npushed
;
193 static int if_is_up
; /* Interface has been marked up */
194 static u_int32_t remote_addr
; /* IP address of peer */
195 static u_int32_t default_route_gateway
; /* Gateway for default route added */
196 static u_int32_t proxy_arp_addr
; /* Addr for proxy arp entry added */
198 /* Prototypes for procedures local to this file. */
199 static int translate_speed
__P((int));
200 static int baud_rate_of
__P((int));
201 static int get_ether_addr
__P((u_int32_t
, struct sockaddr
*));
202 static int get_hw_addr
__P((char *, u_int32_t
, struct sockaddr
*));
203 static int get_hw_addr_dlpi
__P((char *, struct sockaddr
*));
204 static int dlpi_attach
__P((int, int));
205 static int dlpi_info_req
__P((int));
206 static int dlpi_get_reply
__P((int, union DL_primitives
*, int, int));
207 static int strioctl
__P((int, int, void *, int, int));
211 * sifppa - Sets interface ppa
213 * without setting the ppa, ip module will return EINVAL upon setting the
214 * interface UP (SIOCSxIFFLAGS). This is because ip module in 2.8 expects
215 * two DLPI_INFO_REQ to be sent down to the driver (below ip) before
216 * IFF_UP can be set. Plumbing the device causes one DLPI_INFO_REQ to
217 * be sent down, and the second DLPI_INFO_REQ is sent upon receiving
218 * IF_UNITSEL (old) or SIOCSLIFNAME (new) ioctls. Such setting of the ppa
219 * is required because the ppp DLPI provider advertises itself as
220 * a DLPI style 2 type, which requires a point of attachment to be
221 * specified. The only way the user can specify a point of attachment
222 * is via SIOCSLIFNAME or IF_UNITSEL.
224 * Such changes in the behavior of ip module was made to meet new or
225 * evolving standards requirements.
233 return (int)ioctl(fd
, IF_UNITSEL
, (char *)&ppa
);
237 #if defined(SOL2) && defined(INET6)
239 * get_first_ethernet - returns the first Ethernet interface name found in
240 * the system, or NULL if none is found
242 * NOTE: This is the lifreq version (Solaris 8 and above)
249 struct lifreq
*plifreq
;
251 int fd
, num_ifs
, i
, found
;
255 fd
= socket(AF_INET
, SOCK_DGRAM
, 0);
261 * Find out how many interfaces are running
263 lifn
.lifn_family
= AF_UNSPEC
;
264 lifn
.lifn_flags
= LIFC_NOXMIT
;
265 if (ioctl(fd
, SIOCGLIFNUM
, &lifn
) < 0) {
267 error("could not determine number of interfaces: %m");
271 num_ifs
= lifn
.lifn_count
;
272 req_size
= num_ifs
* sizeof(struct lifreq
);
273 req
= malloc(req_size
);
276 error("out of memory");
281 * Get interface configuration info for all interfaces
283 lifc
.lifc_family
= AF_UNSPEC
;
284 lifc
.lifc_flags
= LIFC_NOXMIT
;
285 lifc
.lifc_len
= req_size
;
287 if (ioctl(fd
, SIOCGLIFCONF
, &lifc
) < 0) {
290 error("SIOCGLIFCONF: %m");
295 * And traverse each interface to look specifically for the first
296 * occurence of an Ethernet interface which has been marked up
298 plifreq
= lifc
.lifc_req
;
300 for (i
= lifc
.lifc_len
/ sizeof(struct lifreq
); i
> 0; i
--, plifreq
++) {
302 if (strchr(plifreq
->lifr_name
, ':') != NULL
)
305 memset(&lifr
, 0, sizeof(lifr
));
306 strncpy(lifr
.lifr_name
, plifreq
->lifr_name
, sizeof(lifr
.lifr_name
));
307 if (ioctl(fd
, SIOCGLIFFLAGS
, &lifr
) < 0) {
310 error("SIOCGLIFFLAGS: %m");
313 fl
= lifr
.lifr_flags
;
315 if ((fl
& (IFF_UP
|IFF_BROADCAST
|IFF_POINTOPOINT
|IFF_LOOPBACK
|IFF_NOARP
))
316 != (IFF_UP
| IFF_BROADCAST
))
326 strncpy(first_ether_name
, lifr
.lifr_name
, sizeof(first_ether_name
));
327 return (char *)first_ether_name
;
333 * get_first_ethernet - returns the first Ethernet interface name found in
334 * the system, or NULL if none is found
336 * NOTE: This is the ifreq version (before Solaris 8).
342 struct ifreq
*pifreq
;
344 int fd
, num_ifs
, i
, found
;
348 fd
= socket(AF_INET
, SOCK_DGRAM
, 0);
354 * Find out how many interfaces are running
356 if (ioctl(fd
, SIOCGIFNUM
, (char *)&num_ifs
) < 0) {
360 req_size
= num_ifs
* sizeof(struct ifreq
);
361 req
= malloc(req_size
);
364 error("out of memory");
369 * Get interface configuration info for all interfaces
371 ifc
.ifc_len
= req_size
;
373 if (ioctl(fd
, SIOCGIFCONF
, &ifc
) < 0) {
376 error("SIOCGIFCONF: %m");
381 * And traverse each interface to look specifically for the first
382 * occurence of an Ethernet interface which has been marked up
384 pifreq
= ifc
.ifc_req
;
386 for (i
= ifc
.ifc_len
/ sizeof(struct ifreq
); i
> 0; i
--, pifreq
++) {
388 if (strchr(pifreq
->ifr_name
, ':') != NULL
)
391 memset(&ifr
, 0, sizeof(ifr
));
392 strncpy(ifr
.ifr_name
, pifreq
->ifr_name
, sizeof(ifr
.ifr_name
));
393 if (ioctl(fd
, SIOCGIFFLAGS
, &ifr
) < 0) {
396 error("SIOCGIFFLAGS: %m");
401 if ((fl
& (IFF_UP
|IFF_BROADCAST
|IFF_POINTOPOINT
|IFF_LOOPBACK
|IFF_NOARP
))
402 != (IFF_UP
| IFF_BROADCAST
))
412 strncpy(first_ether_name
, ifr
.ifr_name
, sizeof(first_ether_name
));
413 return (char *)first_ether_name
;
417 #endif /* defined(SOL2) && defined(INET6) */
421 * get_if_hwaddr - get the hardware address for the specified
422 * network interface device.
425 get_if_hwaddr(u_char
*addr
, char *if_name
)
427 struct sockaddr s_eth_addr
;
428 struct ether_addr
*eth_addr
= (struct ether_addr
*)&s_eth_addr
.sa_data
;
434 * Send DL_INFO_REQ to the driver to solicit its MAC address
436 if (!get_hw_addr_dlpi(if_name
, &s_eth_addr
)) {
437 error("could not obtain hardware address for %s", if_name
);
441 memcpy(addr
, eth_addr
->ether_addr_octet
, 6);
446 #if defined(SOL2) && defined(INET6)
448 * slifname - Sets interface ppa and flags
450 * in addition to the comments stated in sifppa(), IFF_IPV6 bit must
451 * be set in order to declare this as an IPv6 interface
461 memset(&lifr
, 0, sizeof(lifr
));
462 ret
= ioctl(fd
, SIOCGLIFFLAGS
, &lifr
);
466 lifr
.lifr_flags
|= IFF_IPV6
;
467 lifr
.lifr_flags
&= ~(IFF_BROADCAST
| IFF_IPV4
);
469 strlcpy(lifr
.lifr_name
, ifname
, sizeof(lifr
.lifr_name
));
471 ret
= ioctl(fd
, SIOCSLIFNAME
, &lifr
);
481 * ether_to_eui64 - Convert 48-bit Ethernet address into 64-bit EUI
483 * walks the list of valid ethernet interfaces, and convert the first
484 * found 48-bit MAC address into EUI 64. caller also assumes that
485 * the system has a properly configured Ethernet interface for this
486 * function to return non-zero.
489 ether_to_eui64(eui64_t
*p_eui64
)
491 struct sockaddr s_eth_addr
;
492 struct ether_addr
*eth_addr
= (struct ether_addr
*)&s_eth_addr
.sa_data
;
495 if ((if_name
= get_first_ethernet()) == NULL
) {
496 error("no persistent id can be found");
501 * Send DL_INFO_REQ to the driver to solicit its MAC address
503 if (!get_hw_addr_dlpi(if_name
, &s_eth_addr
)) {
504 error("could not obtain hardware address for %s", if_name
);
509 * And convert the EUI-48 into EUI-64, per RFC 2472 [sec 4.1]
511 p_eui64
->e8
[0] = (eth_addr
->ether_addr_octet
[0] & 0xFF) | 0x02;
512 p_eui64
->e8
[1] = (eth_addr
->ether_addr_octet
[1] & 0xFF);
513 p_eui64
->e8
[2] = (eth_addr
->ether_addr_octet
[2] & 0xFF);
514 p_eui64
->e8
[3] = 0xFF;
515 p_eui64
->e8
[4] = 0xFE;
516 p_eui64
->e8
[5] = (eth_addr
->ether_addr_octet
[3] & 0xFF);
517 p_eui64
->e8
[6] = (eth_addr
->ether_addr_octet
[4] & 0xFF);
518 p_eui64
->e8
[7] = (eth_addr
->ether_addr_octet
[5] & 0xFF);
522 #endif /* defined(SOL2) && defined(INET6) */
525 * sys_init - System-dependent initialization.
532 #if defined(INET6) && defined(SOL2)
535 #endif /* defined(INET6) && defined(SOL2) */
538 union DL_primitives prim
;
541 #endif /* !defined(SOL2) */
543 ipfd
= open(mux_dev_name
, O_RDWR
, 0);
545 fatal("Couldn't open IP device: %m");
547 #if defined(INET6) && defined(SOL2)
548 ip6fd
= open(UDP6_DEV_NAME
, O_RDWR
, 0);
550 fatal("Couldn't open IP device (2): %m");
551 #endif /* defined(INET6) && defined(SOL2) */
553 if (default_device
&& !notty
)
554 tty_sid
= getsid((pid_t
)0);
556 pppfd
= open(PPP_DEV_NAME
, O_RDWR
| O_NONBLOCK
, 0);
558 fatal("Can't open %s: %m", PPP_DEV_NAME
);
559 if (kdebugflag
& 1) {
560 x
= PPPDBG_LOG
+ PPPDBG_DRIVER
;
561 strioctl(pppfd
, PPPIO_DEBUG
, &x
, sizeof(int), 0);
564 /* Assign a new PPA and get its unit number. */
565 if (strioctl(pppfd
, PPPIO_NEWPPA
, &ifunit
, 0, sizeof(int)) < 0)
566 fatal("Can't create new PPP interface: %m");
570 * Since sys_init() is called prior to ifname being set in main(),
571 * we need to get the ifname now, otherwise slifname(), and others,
572 * will fail, or maybe, I should move them to a later point ?
573 * <adi.masputra@sun.com>
575 sprintf(ifname
, PPP_DRV_NAME
"%d", ifunit
);
576 #endif /* defined(SOL2) */
578 * Open the ppp device again and link it under the ip multiplexor.
579 * IP will assign a unit number which hopefully is the same as ifunit.
580 * I don't know any way to be certain they will be the same. :-(
582 ifd
= open(PPP_DEV_NAME
, O_RDWR
, 0);
584 fatal("Can't open %s (2): %m", PPP_DEV_NAME
);
585 if (kdebugflag
& 1) {
586 x
= PPPDBG_LOG
+ PPPDBG_DRIVER
;
587 strioctl(ifd
, PPPIO_DEBUG
, &x
, sizeof(int), 0);
590 #if defined(INET6) && defined(SOL2)
591 i6fd
= open(PPP_DEV_NAME
, O_RDWR
, 0);
594 fatal("Can't open %s (3): %m", PPP_DEV_NAME
);
596 if (kdebugflag
& 1) {
597 x
= PPPDBG_LOG
+ PPPDBG_DRIVER
;
598 strioctl(i6fd
, PPPIO_DEBUG
, &x
, sizeof(int), 0);
600 #endif /* defined(INET6) && defined(SOL2) */
603 if (ioctl(ifd
, I_PUSH
, IP_MOD_NAME
) < 0) {
607 #endif /* defined(INET6) */
608 fatal("Can't push IP module: %m");
612 * Assign ppa according to the unit number returned by ppp device
613 * after plumbing is completed above.
615 if (sifppa(ifd
, ifunit
) < 0) {
619 #endif /* defined(INET6) */
620 fatal("Can't set ppa for unit %d: %m", ifunit
);
625 * An IPv6 interface is created anyway, even when the user does not
626 * explicitly enable it. Note that the interface will be marked
627 * IPv6 during slifname().
629 if (ioctl(i6fd
, I_PUSH
, IP_MOD_NAME
) < 0) {
632 fatal("Can't push IP module (2): %m");
636 * Assign ppa according to the unit number returned by ppp device
637 * after plumbing is completed above. In addition, mark the interface
638 * as an IPv6 interface.
640 if (slifname(i6fd
, ifunit
) < 0) {
643 fatal("Can't set ifname for unit %d: %m", ifunit
);
645 #endif /* defined(INET6) */
647 ipmuxid
= ioctl(ipfd
, I_PLINK
, ifd
);
652 #endif /* defined(INET6) */
653 fatal("Can't I_PLINK PPP device to IP: %m");
656 memset(&ifr
, 0, sizeof(ifr
));
657 sprintf(ifr
.ifr_name
, "%s", ifname
);
658 ifr
.ifr_ip_muxid
= ipmuxid
;
661 * In Sol 8 and later, STREAMS dynamic module plumbing feature exists.
662 * This is so that an arbitrary module can be inserted, or deleted,
663 * between ip module and the device driver without tearing down the
664 * existing stream. Such feature requires the mux ids, which is set
665 * by SIOCSIFMUXID (or SIOCLSIFMUXID).
667 if (ioctl(ipfd
, SIOCSIFMUXID
, &ifr
) < 0) {
668 ioctl(ipfd
, I_PUNLINK
, ipmuxid
);
671 #endif /* defined(INET6) */
672 fatal("SIOCSIFMUXID: %m");
675 #else /* else if !defined(SOL2) */
677 if (dlpi_attach(ifd
, ifunit
) < 0 ||
678 dlpi_get_reply(ifd
, &reply
.prim
, DL_OK_ACK
, sizeof(reply
)) < 0) {
680 fatal("Can't attach to ppp%d: %m", ifunit
);
683 ipmuxid
= ioctl(ipfd
, I_LINK
, ifd
);
686 fatal("Can't link PPP device to IP: %m");
687 #endif /* defined(SOL2) */
689 #if defined(INET6) && defined(SOL2)
690 ip6muxid
= ioctl(ip6fd
, I_PLINK
, i6fd
);
693 ioctl(ipfd
, I_PUNLINK
, ipmuxid
);
694 fatal("Can't I_PLINK PPP device to IP (2): %m");
697 memset(&lifr
, 0, sizeof(lifr
));
698 sprintf(lifr
.lifr_name
, "%s", ifname
);
699 lifr
.lifr_ip_muxid
= ip6muxid
;
702 * Let IP know of the mux id [see comment for SIOCSIFMUXID above]
704 if (ioctl(ip6fd
, SIOCSLIFMUXID
, &lifr
) < 0) {
705 ioctl(ipfd
, I_PUNLINK
, ipmuxid
);
706 ioctl(ip6fd
, I_PUNLINK
, ip6muxid
);
707 fatal("Can't link PPP device to IP (2): %m");
709 #endif /* defined(INET6) && defined(SOL2) */
712 /* Set the interface name for the link. */
713 slprintf(ifr
.ifr_name
, sizeof(ifr
.ifr_name
), PPP_DRV_NAME
"%d", ifunit
);
714 ifr
.ifr_metric
= ipmuxid
;
715 if (strioctl(ipfd
, SIOCSIFNAME
, (char *)&ifr
, sizeof ifr
, 0) < 0)
716 fatal("Can't set interface name %s: %m", ifr
.ifr_name
);
717 #endif /* !defined(SOL2) */
723 * sys_cleanup - restore any system state we modified before exiting:
724 * mark the interface down, delete default route and/or proxy arp entry.
725 * This should call die() because it's called from die().
734 #endif /* defined(INET6) */
735 #endif /* defined(SOL2) */
737 #if defined(SOL2) && defined(INET6)
740 #endif /* defined(SOL2) && defined(INET6) */
743 if (default_route_gateway
)
744 cifdefaultroute(0, default_route_gateway
, default_route_gateway
);
746 cifproxyarp(0, proxy_arp_addr
);
749 * Make sure we ask ip what the muxid, because 'ifconfig modlist' will
750 * unlink and re-link the modules, causing the muxid to change.
752 memset(&ifr
, 0, sizeof(ifr
));
753 sprintf(ifr
.ifr_name
, "%s", ifname
);
754 if (ioctl(ipfd
, SIOCGIFFLAGS
, &ifr
) < 0) {
755 error("SIOCGIFFLAGS: %m");
759 if (ioctl(ipfd
, SIOCGIFMUXID
, &ifr
) < 0) {
760 error("SIOCGIFMUXID: %m");
764 ipmuxid
= ifr
.ifr_ip_muxid
;
766 if (ioctl(ipfd
, I_PUNLINK
, ipmuxid
) < 0) {
767 error("Can't I_PUNLINK PPP from IP: %m");
772 * Make sure we ask ip what the muxid, because 'ifconfig modlist' will
773 * unlink and re-link the modules, causing the muxid to change.
775 memset(&lifr
, 0, sizeof(lifr
));
776 sprintf(lifr
.lifr_name
, "%s", ifname
);
777 if (ioctl(ip6fd
, SIOCGLIFFLAGS
, &lifr
) < 0) {
778 error("SIOCGLIFFLAGS: %m");
782 if (ioctl(ip6fd
, SIOCGLIFMUXID
, &lifr
) < 0) {
783 error("SIOCGLIFMUXID: %m");
787 ip6muxid
= lifr
.lifr_ip_muxid
;
789 if (ioctl(ip6fd
, I_PUNLINK
, ip6muxid
) < 0) {
790 error("Can't I_PUNLINK PPP from IP (2): %m");
792 #endif /* defined(INET6) */
793 #endif /* defined(SOL2) */
797 * sys_close - Clean up in a child process before execing.
803 #if defined(INET6) && defined(SOL2)
805 #endif /* defined(INET6) && defined(SOL2) */
811 * sys_check_options - check the options that the user specified
821 * ppp_available - check whether the system has any ppp interfaces
828 return stat(PPP_DEV_NAME
, &buf
) >= 0;
832 * any_compressions - see if compression is enabled or not
834 * In the STREAMS implementation of kernel-portion pppd,
835 * the comp STREAMS module performs the ACFC, PFC, as well
836 * CCP and VJ compressions. However, if the user has explicitly
837 * declare to not enable them from the command line, there is
838 * no point of having the comp module be pushed on the stream.
843 if ((!lcp_wantoptions
[0].neg_accompression
) &&
844 (!lcp_wantoptions
[0].neg_pcompression
) &&
845 (!ccp_protent
.enabled_flag
) &&
846 (!ipcp_wantoptions
[0].neg_vj
)) {
853 * tty_establish_ppp - Turn the serial port into a ppp interface.
856 tty_establish_ppp(fd
)
861 /* Pop any existing modules off the tty stream. */
863 if (ioctl(fd
, I_LOOK
, tty_modules
[i
]) < 0
864 || strcmp(tty_modules
[i
], "ptem") == 0
865 || ioctl(fd
, I_POP
, 0) < 0)
869 /* Push the async hdlc module and the compressor module. */
873 if (ioctl(fd
, I_PUSH
, AHDLC_MOD_NAME
) < 0) {
874 error("Couldn't push PPP Async HDLC module: %m");
879 if (kdebugflag
& 4) {
880 i
= PPPDBG_LOG
+ PPPDBG_AHDLC
;
881 strioctl(pppfd
, PPPIO_DEBUG
, &i
, sizeof(int), 0);
884 * There's no need to push comp module if we don't intend
885 * to compress anything
887 if (any_compressions()) {
888 if (ioctl(fd
, I_PUSH
, COMP_MOD_NAME
) < 0)
889 error("Couldn't push PPP compression module: %m");
894 if (kdebugflag
& 2) {
896 if (any_compressions())
898 strioctl(pppfd
, PPPIO_DEBUG
, &i
, sizeof(int), 0);
901 /* Link the serial port under the PPP multiplexor. */
902 if ((fdmuxid
= ioctl(pppfd
, I_LINK
, fd
)) < 0) {
903 error("Can't link tty to PPP mux: %m");
911 * tty_disestablish_ppp - Restore the serial port to normal operation.
912 * It attempts to reconstruct the stream with the previously popped
913 * modules. This shouldn't call die() because it's called from die().
916 tty_disestablish_ppp(fd
)
922 if (ioctl(pppfd
, I_UNLINK
, fdmuxid
) < 0) {
924 error("Can't unlink tty from PPP mux: %m");
929 while (tty_npushed
> 0 && ioctl(fd
, I_POP
, 0) >= 0)
931 for (i
= tty_nmodules
- 1; i
>= 0; --i
)
932 if (ioctl(fd
, I_PUSH
, tty_modules
[i
]) < 0)
933 error("Couldn't restore tty module %s: %m",
936 if (hungup
&& default_device
&& tty_sid
> 0) {
938 * If we have received a hangup, we need to send a SIGHUP
939 * to the terminal's controlling process. The reason is
940 * that the original stream head for the terminal hasn't
941 * seen the M_HANGUP message (it went up through the ppp
942 * driver to the stream head for our fd to /dev/ppp).
944 kill(tty_sid
, SIGHUP
);
950 * Check whether the link seems not to be 8-bit clean.
958 if (strioctl(pppfd
, PPPIO_GCLEAN
, &x
, 0, sizeof(x
)) < 0)
963 s
= "bit 7 set to 1";
966 s
= "bit 7 set to 0";
976 warn("Serial link is not 8-bit clean:");
977 warn("All received characters had %s", s
);
982 * List of valid speeds.
985 int speed_int
, speed_val
;
1054 { 115200, B115200
},
1057 { 153600, B153600
},
1060 { 230400, B230400
},
1063 { 307200, B307200
},
1066 { 460800, B460800
},
1072 * Translate from bits/second to a speed_t.
1075 translate_speed(bps
)
1078 struct speed
*speedp
;
1082 for (speedp
= speeds
; speedp
->speed_int
; speedp
++)
1083 if (bps
== speedp
->speed_int
)
1084 return speedp
->speed_val
;
1085 warn("speed %d not supported", bps
);
1090 * Translate from a speed_t to bits/second.
1096 struct speed
*speedp
;
1100 for (speedp
= speeds
; speedp
->speed_int
; speedp
++)
1101 if (speed
== speedp
->speed_val
)
1102 return speedp
->speed_int
;
1107 * set_up_tty: Set up the serial port on `fd' for 8 bits, no parity,
1108 * at the requested speed, etc. If `local' is true, set CLOCAL
1109 * regardless of whether the modem option was specified.
1112 set_up_tty(fd
, local
)
1116 struct termios tios
;
1117 #if !defined(CRTSCTS)
1118 struct termiox tiox
;
1121 if (!sync_serial
&& tcgetattr(fd
, &tios
) < 0)
1122 fatal("tcgetattr: %m");
1126 if (!sync_serial
&& ioctl (fd
, TCGETX
, &tiox
) < 0) {
1128 if (errno
!= ENOTTY
)
1129 error("TCGETX: %m");
1133 if (!restore_term
) {
1139 ioctl(fd
, TIOCGWINSZ
, &wsinfo
);
1142 tios
.c_cflag
&= ~(CSIZE
| CSTOPB
| PARENB
| CLOCAL
);
1145 tios
.c_cflag
|= CRTSCTS
;
1146 else if (crtscts
< 0)
1147 tios
.c_cflag
&= ~CRTSCTS
;
1149 if (crtscts
!= 0 && !termiox_ok
) {
1150 error("Can't set RTS/CTS flow control");
1151 } else if (crtscts
> 0) {
1152 tiox
.x_hflag
|= RTSXOFF
|CTSXON
;
1153 } else if (crtscts
< 0) {
1154 tiox
.x_hflag
&= ~(RTSXOFF
|CTSXON
);
1158 tios
.c_cflag
|= CS8
| CREAD
| HUPCL
;
1159 if (local
|| !modem
)
1160 tios
.c_cflag
|= CLOCAL
;
1161 tios
.c_iflag
= IGNBRK
| IGNPAR
;
1164 tios
.c_cc
[VMIN
] = 1;
1165 tios
.c_cc
[VTIME
] = 0;
1167 if (crtscts
== -2) {
1168 tios
.c_iflag
|= IXON
| IXOFF
;
1169 tios
.c_cc
[VSTOP
] = 0x13; /* DC3 = XOFF = ^S */
1170 tios
.c_cc
[VSTART
] = 0x11; /* DC1 = XON = ^Q */
1173 speed
= translate_speed(inspeed
);
1175 cfsetospeed(&tios
, speed
);
1176 cfsetispeed(&tios
, speed
);
1178 speed
= cfgetospeed(&tios
);
1180 * We can't proceed if the serial port speed is 0,
1181 * since that implies that the serial port is disabled.
1183 if ((speed
== B0
) && !sync_serial
)
1184 fatal("Baud rate for %s is 0; need explicit baud rate", devnam
);
1187 if (!sync_serial
&& tcsetattr(fd
, TCSAFLUSH
, &tios
) < 0)
1188 fatal("tcsetattr: %m");
1191 if (!sync_serial
&& termiox_ok
&& ioctl (fd
, TCSETXF
, &tiox
) < 0){
1192 error("TCSETXF: %m");
1196 baud_rate
= inspeed
= baud_rate_of(speed
);
1202 * restore_tty - restore the terminal to the saved settings.
1209 if (!default_device
) {
1211 * Turn off echoing, because otherwise we can get into
1212 * a loop with the tty and the modem echoing to each other.
1213 * We presume we are the sole user of this tty device, so
1214 * when we close it, it will revert to its defaults anyway.
1216 inittermios
.c_lflag
&= ~(ECHO
| ECHONL
);
1218 if (!sync_serial
&& tcsetattr(fd
, TCSAFLUSH
, &inittermios
) < 0)
1219 if (!hungup
&& errno
!= ENXIO
)
1220 warn("tcsetattr: %m");
1222 if (!sync_serial
&& ioctl (fd
, TCSETXF
, &inittermiox
) < 0){
1223 if (!hungup
&& errno
!= ENXIO
)
1224 error("TCSETXF: %m");
1228 ioctl(fd
, TIOCSWINSZ
, &wsinfo
);
1234 * setdtr - control the DTR line on the serial port.
1235 * This is called from die(), so it shouldn't call die().
1241 int modembits
= TIOCM_DTR
;
1243 ioctl(fd
, (on
? TIOCMBIS
: TIOCMBIC
), &modembits
);
1247 * open_loopback - open the device we use for getting packets
1248 * in demand mode. Under Solaris 2, we use our existing fd
1249 * to the ppp driver.
1258 * output - Output PPP packet.
1261 output(unit
, p
, len
)
1271 dbglog("sent %P", p
, len
);
1274 data
.buf
= (caddr_t
) p
;
1276 while (putmsg(pppfd
, NULL
, &data
, 0) < 0) {
1277 if (--retries
< 0 || (errno
!= EWOULDBLOCK
&& errno
!= EAGAIN
)) {
1279 error("Couldn't send packet: %m");
1283 pfd
.events
= POLLOUT
;
1284 poll(&pfd
, 1, 250); /* wait for up to 0.25 seconds */
1290 * wait_input - wait until there is data available,
1291 * for the length of time specified by *timo (indefinite
1296 struct timeval
*timo
;
1300 t
= timo
== NULL
? -1: timo
->tv_sec
* 1000 + timo
->tv_usec
/ 1000;
1301 if (poll(pollfds
, n_pollfds
, t
) < 0 && errno
!= EINTR
)
1306 * add_fd - add an fd to the set that wait_input waits for.
1313 for (n
= 0; n
< n_pollfds
; ++n
)
1314 if (pollfds
[n
].fd
== fd
)
1316 if (n_pollfds
< MAX_POLLFDS
) {
1317 pollfds
[n_pollfds
].fd
= fd
;
1318 pollfds
[n_pollfds
].events
= POLLIN
| POLLPRI
| POLLHUP
;
1321 error("Too many inputs!");
1325 * remove_fd - remove an fd from the set that wait_input waits for.
1332 for (n
= 0; n
< n_pollfds
; ++n
) {
1333 if (pollfds
[n
].fd
== fd
) {
1334 while (++n
< n_pollfds
)
1335 pollfds
[n
-1] = pollfds
[n
];
1345 * read_packet - get a PPP packet from the serial device.
1351 struct strbuf ctrl
, data
;
1353 unsigned char ctrlbuf
[sizeof(union DL_primitives
) + 64];
1356 data
.maxlen
= PPP_MRU
+ PPP_HDRLEN
;
1357 data
.buf
= (caddr_t
) buf
;
1358 ctrl
.maxlen
= sizeof(ctrlbuf
);
1359 ctrl
.buf
= (caddr_t
) ctrlbuf
;
1361 len
= getmsg(pppfd
, &ctrl
, &data
, &flags
);
1363 if (errno
== EAGAIN
|| errno
== EINTR
)
1365 fatal("Error reading packet: %m");
1372 * Got a M_PROTO or M_PCPROTO message. Interpret it
1373 * as a DLPI primitive??
1376 dbglog("got dlpi prim 0x%x, len=%d",
1377 ((union DL_primitives
*)ctrlbuf
)->dl_primitive
, ctrl
.len
);
1383 * get_loop_output - get outgoing packets from the ppp device,
1384 * and detect when we want to bring the real link up.
1385 * Return value is 1 if we need to bring up the link, 0 otherwise.
1393 while ((len
= read_packet(inpacket_buf
)) > 0) {
1394 if (loop_frame(inpacket_buf
, len
))
1401 * netif_set_mtu - set the MTU on the PPP network interface.
1404 netif_set_mtu(unit
, mtu
)
1408 #if defined(INET6) && defined(SOL2)
1411 #endif /* defined(INET6) && defined(SOL2) */
1413 memset(&ifr
, 0, sizeof(ifr
));
1414 strlcpy(ifr
.ifr_name
, ifname
, sizeof(ifr
.ifr_name
));
1415 ifr
.ifr_metric
= link_mtu
;
1416 if (ioctl(ipfd
, SIOCSIFMTU
, &ifr
) < 0) {
1417 error("Couldn't set IP MTU (%s): %m", ifr
.ifr_name
);
1420 #if defined(INET6) && defined(SOL2)
1421 fd
= socket(AF_INET6
, SOCK_DGRAM
, 0);
1423 error("Couldn't open IPv6 socket: %m");
1425 memset(&lifr
, 0, sizeof(lifr
));
1426 strlcpy(lifr
.lifr_name
, ifname
, sizeof(lifr
.lifr_name
));
1427 lifr
.lifr_mtu
= link_mtu
;
1428 if (ioctl(fd
, SIOCSLIFMTU
, &lifr
) < 0) {
1430 error("Couldn't set IPv6 MTU (%s): %m", ifr
.ifr_name
);
1433 #endif /* defined(INET6) && defined(SOL2) */
1437 * tty_send_config - configure the transmit characteristics of
1438 * the ppp interface.
1441 tty_send_config(mtu
, asyncmap
, pcomp
, accomp
)
1449 if (strioctl(pppfd
, PPPIO_MTU
, &mtu
, sizeof(mtu
), 0) < 0) {
1450 if (hungup
&& errno
== ENXIO
)
1452 error("Couldn't set MTU: %m");
1456 if (strioctl(pppfd
, PPPIO_XACCM
, &asyncmap
, sizeof(asyncmap
), 0) < 0) {
1457 error("Couldn't set transmit ACCM: %m");
1460 cf
[0] = (pcomp
? COMP_PROT
: 0) + (accomp
? COMP_AC
: 0);
1461 cf
[1] = COMP_PROT
| COMP_AC
;
1462 if (any_compressions() &&
1463 strioctl(pppfd
, PPPIO_CFLAGS
, cf
, sizeof(cf
), sizeof(int)) < 0) {
1464 error("Couldn't set prot/AC compression: %m");
1470 * ppp_set_xaccm - set the extended transmit ACCM for the interface.
1480 && strioctl(pppfd
, PPPIO_XACCM
, accm
, sizeof(ext_accm
), 0) < 0) {
1481 if (!hungup
|| errno
!= ENXIO
)
1482 warn("Couldn't set extended ACCM: %m");
1487 * ppp_recv_config - configure the receive-side characteristics of
1488 * the ppp interface.
1491 tty_recv_config(mru
, asyncmap
, pcomp
, accomp
)
1499 if (strioctl(pppfd
, PPPIO_MRU
, &mru
, sizeof(mru
), 0) < 0) {
1500 if (hungup
&& errno
== ENXIO
)
1502 error("Couldn't set MRU: %m");
1506 if (strioctl(pppfd
, PPPIO_RACCM
, &asyncmap
, sizeof(asyncmap
), 0) < 0) {
1507 error("Couldn't set receive ACCM: %m");
1510 cf
[0] = (pcomp
? DECOMP_PROT
: 0) + (accomp
? DECOMP_AC
: 0);
1511 cf
[1] = DECOMP_PROT
| DECOMP_AC
;
1512 if (any_compressions() &&
1513 strioctl(pppfd
, PPPIO_CFLAGS
, cf
, sizeof(cf
), sizeof(int)) < 0) {
1514 error("Couldn't set prot/AC decompression: %m");
1520 * ccp_test - ask kernel whether a given compression method
1521 * is acceptable for use.
1524 ccp_test(unit
, opt_ptr
, opt_len
, for_transmit
)
1525 int unit
, opt_len
, for_transmit
;
1528 if (strioctl(pppfd
, (for_transmit
? PPPIO_XCOMP
: PPPIO_RCOMP
),
1529 opt_ptr
, opt_len
, 0) >= 0)
1531 return (errno
== ENOSR
)? 0: -1;
1535 * ccp_flags_set - inform kernel about the current state of CCP.
1538 ccp_flags_set(unit
, isopen
, isup
)
1539 int unit
, isopen
, isup
;
1543 cf
[0] = (isopen
? CCP_ISOPEN
: 0) + (isup
? CCP_ISUP
: 0);
1544 cf
[1] = CCP_ISOPEN
| CCP_ISUP
| CCP_ERROR
| CCP_FATALERROR
;
1545 if (strioctl(pppfd
, PPPIO_CFLAGS
, cf
, sizeof(cf
), sizeof(int)) < 0) {
1546 if (!hungup
|| errno
!= ENXIO
)
1547 error("Couldn't set kernel CCP state: %m");
1552 * get_idle_time - return how long the link has been idle.
1555 get_idle_time(u
, ip
)
1557 struct ppp_idle
*ip
;
1559 return strioctl(pppfd
, PPPIO_GIDLE
, ip
, 0, sizeof(struct ppp_idle
)) >= 0;
1563 * get_ppp_stats - return statistics for the link.
1566 get_ppp_stats(u
, stats
)
1568 struct pppd_stats
*stats
;
1573 strioctl(pppfd
, PPPIO_GETSTAT
, &s
, 0, sizeof(s
)) < 0) {
1574 error("Couldn't get link statistics: %m");
1577 stats
->bytes_in
= s
.p
.ppp_ibytes
;
1578 stats
->bytes_out
= s
.p
.ppp_obytes
;
1584 * ccp_fatal_error - returns 1 if decompression was disabled as a
1585 * result of an error detected after decompression of a packet,
1586 * 0 otherwise. This is necessary because of patent nonsense.
1589 ccp_fatal_error(unit
)
1595 if (strioctl(pppfd
, PPPIO_CFLAGS
, cf
, sizeof(cf
), sizeof(int)) < 0) {
1596 if (errno
!= ENXIO
&& errno
!= EINVAL
)
1597 error("Couldn't get compression flags: %m");
1600 return cf
[0] & CCP_FATALERROR
;
1604 * sifvjcomp - config tcp header compression
1607 sifvjcomp(u
, vjcomp
, xcidcomp
, xmaxcid
)
1608 int u
, vjcomp
, xcidcomp
, xmaxcid
;
1614 maxcid
[0] = xcidcomp
;
1616 if (strioctl(pppfd
, PPPIO_VJINIT
, maxcid
, sizeof(maxcid
), 0) < 0) {
1617 error("Couldn't initialize VJ compression: %m");
1621 cf
[0] = (vjcomp
? COMP_VJC
+ DECOMP_VJC
: 0)
1622 + (xcidcomp
? COMP_VJCCID
+ DECOMP_VJCCID
: 0);
1623 cf
[1] = COMP_VJC
+ DECOMP_VJC
+ COMP_VJCCID
+ DECOMP_VJCCID
;
1624 if (strioctl(pppfd
, PPPIO_CFLAGS
, cf
, sizeof(cf
), sizeof(int)) < 0) {
1626 error("Couldn't enable VJ compression: %m");
1633 * sifup - Config the interface up and enable IP packets to pass.
1641 strlcpy(ifr
.ifr_name
, ifname
, sizeof(ifr
.ifr_name
));
1642 if (ioctl(ipfd
, SIOCGIFFLAGS
, &ifr
) < 0) {
1643 error("Couldn't mark interface up (get): %m");
1646 ifr
.ifr_flags
|= IFF_UP
;
1647 if (ioctl(ipfd
, SIOCSIFFLAGS
, &ifr
) < 0) {
1648 error("Couldn't mark interface up (set): %m");
1656 * sifdown - Config the interface down and disable IP.
1666 strlcpy(ifr
.ifr_name
, ifname
, sizeof(ifr
.ifr_name
));
1667 if (ioctl(ipfd
, SIOCGIFFLAGS
, &ifr
) < 0) {
1668 error("Couldn't mark interface down (get): %m");
1671 ifr
.ifr_flags
&= ~IFF_UP
;
1672 if (ioctl(ipfd
, SIOCSIFFLAGS
, &ifr
) < 0) {
1673 error("Couldn't mark interface down (set): %m");
1681 * sifnpmode - Set the mode for handling packets for a given NP.
1684 sifnpmode(u
, proto
, mode
)
1692 npi
[1] = (int) mode
;
1693 if (strioctl(pppfd
, PPPIO_NPMODE
, &npi
, 2 * sizeof(int), 0) < 0) {
1694 error("ioctl(set NP %d mode to %d): %m", proto
, mode
);
1700 #if defined(SOL2) && defined(INET6)
1702 * sif6up - Config the IPv6 interface up and enable IPv6 packets to pass.
1711 fd
= socket(AF_INET6
, SOCK_DGRAM
, 0);
1716 memset(&lifr
, 0, sizeof(lifr
));
1717 strlcpy(lifr
.lifr_name
, ifname
, sizeof(lifr
.lifr_name
));
1718 if (ioctl(fd
, SIOCGLIFFLAGS
, &lifr
) < 0) {
1723 lifr
.lifr_flags
|= IFF_UP
;
1724 strlcpy(lifr
.lifr_name
, ifname
, sizeof(lifr
.lifr_name
));
1725 if (ioctl(fd
, SIOCSLIFFLAGS
, &lifr
) < 0) {
1736 * sifdown - Config the IPv6 interface down and disable IPv6.
1745 fd
= socket(AF_INET6
, SOCK_DGRAM
, 0);
1749 memset(&lifr
, 0, sizeof(lifr
));
1750 strlcpy(lifr
.lifr_name
, ifname
, sizeof(lifr
.lifr_name
));
1751 if (ioctl(fd
, SIOCGLIFFLAGS
, &lifr
) < 0) {
1756 lifr
.lifr_flags
&= ~IFF_UP
;
1757 strlcpy(lifr
.lifr_name
, ifname
, sizeof(lifr
.lifr_name
));
1758 if (ioctl(fd
, SIOCGLIFFLAGS
, &lifr
) < 0) {
1769 * sif6addr - Config the interface with an IPv6 link-local address
1777 struct sockaddr_storage laddr
;
1778 struct sockaddr_in6
*sin6
= (struct sockaddr_in6
*)&laddr
;
1781 fd
= socket(AF_INET6
, SOCK_DGRAM
, 0);
1785 memset(&lifr
, 0, sizeof(lifr
));
1786 strlcpy(lifr
.lifr_name
, ifname
, sizeof(lifr
.lifr_name
));
1789 * Do this because /dev/ppp responds to DL_PHYS_ADDR_REQ with
1790 * zero values, hence the interface token came to be zero too,
1791 * and without this, in.ndpd will complain
1793 IN6_LLTOKEN_FROM_EUI64(lifr
, sin6
, o
);
1794 if (ioctl(fd
, SIOCSLIFTOKEN
, &lifr
) < 0) {
1800 * Set the interface address and destination address
1802 IN6_LLADDR_FROM_EUI64(lifr
, sin6
, o
);
1803 if (ioctl(fd
, SIOCSLIFADDR
, &lifr
) < 0) {
1808 memset(&lifr
, 0, sizeof(lifr
));
1809 strlcpy(lifr
.lifr_name
, ifname
, sizeof(lifr
.lifr_name
));
1810 IN6_LLADDR_FROM_EUI64(lifr
, sin6
, h
);
1811 if (ioctl(fd
, SIOCSLIFDSTADDR
, &lifr
) < 0) {
1820 * cif6addr - Remove the IPv6 address from interface
1830 #endif /* defined(SOL2) && defined(INET6) */
1833 #define INET_ADDR(x) (((struct sockaddr_in *) &(x))->sin_addr.s_addr)
1836 * sifaddr - Config the interface IP addresses and netmask.
1846 memset(&ifr
, 0, sizeof(ifr
));
1847 strlcpy(ifr
.ifr_name
, ifname
, sizeof(ifr
.ifr_name
));
1848 ifr
.ifr_addr
.sa_family
= AF_INET
;
1849 INET_ADDR(ifr
.ifr_addr
) = m
;
1850 if (ioctl(ipfd
, SIOCSIFNETMASK
, &ifr
) < 0) {
1851 error("Couldn't set IP netmask: %m");
1854 ifr
.ifr_addr
.sa_family
= AF_INET
;
1855 INET_ADDR(ifr
.ifr_addr
) = o
;
1856 if (ioctl(ipfd
, SIOCSIFADDR
, &ifr
) < 0) {
1857 error("Couldn't set local IP address: %m");
1862 * On some systems, we have to explicitly set the point-to-point
1863 * flag bit before we can set a destination address.
1865 if (ioctl(ipfd
, SIOCGIFFLAGS
, &ifr
) >= 0
1866 && (ifr
.ifr_flags
& IFF_POINTOPOINT
) == 0) {
1867 ifr
.ifr_flags
|= IFF_POINTOPOINT
;
1868 if (ioctl(ipfd
, SIOCSIFFLAGS
, &ifr
) < 0) {
1869 error("Couldn't mark interface pt-to-pt: %m");
1873 ifr
.ifr_dstaddr
.sa_family
= AF_INET
;
1874 INET_ADDR(ifr
.ifr_dstaddr
) = h
;
1875 if (ioctl(ipfd
, SIOCSIFDSTADDR
, &ifr
) < 0) {
1876 error("Couldn't set remote IP address: %m");
1885 * cifaddr - Clear the interface IP addresses, and delete routes
1886 * through the interface if possible.
1893 #if defined(__USLC__) /* was: #if 0 */
1894 cifroute(unit
, ouraddr
, hisaddr
);
1896 notice("Removing ppp interface unit");
1897 if (ioctl(ipfd
, I_UNLINK
, ipmuxid
) < 0) {
1898 error("Can't remove ppp interface unit: %m");
1909 * sifdefaultroute - assign a default route through the address given.
1912 sifdefaultroute(u
, l
, g
)
1918 #if defined(__USLC__)
1919 g
= l
; /* use the local address as gateway */
1921 memset(&rt
, 0, sizeof(rt
));
1922 rt
.rt_dst
.sa_family
= AF_INET
;
1923 INET_ADDR(rt
.rt_dst
) = 0;
1924 rt
.rt_gateway
.sa_family
= AF_INET
;
1925 INET_ADDR(rt
.rt_gateway
) = g
;
1926 rt
.rt_flags
= RTF_GATEWAY
;
1928 if (ioctl(ipfd
, SIOCADDRT
, &rt
) < 0) {
1929 error("Can't add default route: %m");
1933 default_route_gateway
= g
;
1938 * cifdefaultroute - delete a default route through the address given.
1941 cifdefaultroute(u
, l
, g
)
1947 #if defined(__USLC__)
1948 g
= l
; /* use the local address as gateway */
1950 memset(&rt
, 0, sizeof(rt
));
1951 rt
.rt_dst
.sa_family
= AF_INET
;
1952 INET_ADDR(rt
.rt_dst
) = 0;
1953 rt
.rt_gateway
.sa_family
= AF_INET
;
1954 INET_ADDR(rt
.rt_gateway
) = g
;
1955 rt
.rt_flags
= RTF_GATEWAY
;
1957 if (ioctl(ipfd
, SIOCDELRT
, &rt
) < 0) {
1958 error("Can't delete default route: %m");
1962 default_route_gateway
= 0;
1967 * sifproxyarp - Make a proxy ARP entry for the peer.
1970 sifproxyarp(unit
, hisaddr
)
1974 struct arpreq arpreq
;
1976 memset(&arpreq
, 0, sizeof(arpreq
));
1977 if (!get_ether_addr(hisaddr
, &arpreq
.arp_ha
))
1980 arpreq
.arp_pa
.sa_family
= AF_INET
;
1981 INET_ADDR(arpreq
.arp_pa
) = hisaddr
;
1982 arpreq
.arp_flags
= ATF_PERM
| ATF_PUBL
;
1983 if (ioctl(ipfd
, SIOCSARP
, (caddr_t
) &arpreq
) < 0) {
1984 error("Couldn't set proxy ARP entry: %m");
1988 proxy_arp_addr
= hisaddr
;
1993 * cifproxyarp - Delete the proxy ARP entry for the peer.
1996 cifproxyarp(unit
, hisaddr
)
2000 struct arpreq arpreq
;
2002 memset(&arpreq
, 0, sizeof(arpreq
));
2003 arpreq
.arp_pa
.sa_family
= AF_INET
;
2004 INET_ADDR(arpreq
.arp_pa
) = hisaddr
;
2005 if (ioctl(ipfd
, SIOCDARP
, (caddr_t
)&arpreq
) < 0) {
2006 error("Couldn't delete proxy ARP entry: %m");
2015 * get_ether_addr - get the hardware address of an interface on the
2016 * the same subnet as ipaddr.
2021 get_ether_addr(ipaddr
, hwaddr
)
2023 struct sockaddr
*hwaddr
;
2025 struct ifreq
*ifr
, *ifend
, ifreq
;
2028 u_int32_t ina
, mask
;
2031 * Scan through the system's network interfaces.
2034 if (ioctl(ipfd
, SIOCGIFNUM
, &nif
) < 0)
2037 ifc
.ifc_len
= nif
* sizeof(struct ifreq
);
2038 ifc
.ifc_buf
= (caddr_t
) malloc(ifc
.ifc_len
);
2039 if (ifc
.ifc_buf
== 0)
2041 if (ioctl(ipfd
, SIOCGIFCONF
, &ifc
) < 0) {
2042 warn("Couldn't get system interface list: %m");
2046 ifend
= (struct ifreq
*) (ifc
.ifc_buf
+ ifc
.ifc_len
);
2047 for (ifr
= ifc
.ifc_req
; ifr
< ifend
; ++ifr
) {
2048 if (ifr
->ifr_addr
.sa_family
!= AF_INET
)
2051 * Check that the interface is up, and not point-to-point or loopback.
2053 strlcpy(ifreq
.ifr_name
, ifr
->ifr_name
, sizeof(ifreq
.ifr_name
));
2054 if (ioctl(ipfd
, SIOCGIFFLAGS
, &ifreq
) < 0)
2056 if ((ifreq
.ifr_flags
&
2057 (IFF_UP
|IFF_BROADCAST
|IFF_POINTOPOINT
|IFF_LOOPBACK
|IFF_NOARP
))
2058 != (IFF_UP
|IFF_BROADCAST
))
2061 * Get its netmask and check that it's on the right subnet.
2063 if (ioctl(ipfd
, SIOCGIFNETMASK
, &ifreq
) < 0)
2065 ina
= INET_ADDR(ifr
->ifr_addr
);
2066 mask
= INET_ADDR(ifreq
.ifr_addr
);
2067 if ((ipaddr
& mask
) == (ina
& mask
))
2072 warn("No suitable interface found for proxy ARP");
2077 info("found interface %s for proxy ARP", ifr
->ifr_name
);
2078 if (!get_hw_addr(ifr
->ifr_name
, ina
, hwaddr
)) {
2079 error("Couldn't get hardware address for %s", ifr
->ifr_name
);
2089 * get_hw_addr_dlpi - obtain the hardware address using DLPI
2092 get_hw_addr_dlpi(name
, hwaddr
)
2094 struct sockaddr
*hwaddr
;
2097 int unit
, iffd
, adrlen
;
2098 unsigned char *adrp
;
2101 union DL_primitives prim
;
2106 * We have to open the device and ask it for its hardware address.
2107 * First split apart the device name and unit.
2109 slprintf(ifdev
, sizeof(ifdev
), "/dev/%s", name
);
2110 for (q
= ifdev
+ strlen(ifdev
); --q
>= ifdev
; )
2117 * Open the device and do a DLPI attach and phys_addr_req.
2119 iffd
= open(ifdev
, O_RDWR
);
2121 error("Can't open %s: %m", ifdev
);
2124 if (dlpi_attach(iffd
, unit
) < 0
2125 || dlpi_get_reply(iffd
, &reply
.prim
, DL_OK_ACK
, sizeof(reply
)) < 0
2126 || dlpi_info_req(iffd
) < 0
2127 || dlpi_get_reply(iffd
, &reply
.prim
, DL_INFO_ACK
, sizeof(reply
)) < 0) {
2132 adrlen
= reply
.prim
.info_ack
.dl_addr_length
;
2133 adrp
= (unsigned char *)&reply
+ reply
.prim
.info_ack
.dl_addr_offset
;
2135 #if DL_CURRENT_VERSION >= 2
2136 if (reply
.prim
.info_ack
.dl_sap_length
< 0)
2137 adrlen
+= reply
.prim
.info_ack
.dl_sap_length
;
2139 adrp
+= reply
.prim
.info_ack
.dl_sap_length
;
2142 hwaddr
->sa_family
= AF_UNSPEC
;
2143 memcpy(hwaddr
->sa_data
, adrp
, adrlen
);
2148 * get_hw_addr - obtain the hardware address for a named interface.
2151 get_hw_addr(name
, ina
, hwaddr
)
2154 struct sockaddr
*hwaddr
;
2156 /* New way - get the address by doing an arp request. */
2160 s
= socket(AF_INET
, SOCK_DGRAM
, 0);
2163 memset(&req
, 0, sizeof(req
));
2164 req
.arp_pa
.sa_family
= AF_INET
;
2165 INET_ADDR(req
.arp_pa
) = ina
;
2166 if (ioctl(s
, SIOCGARP
, &req
) < 0) {
2167 error("Couldn't get ARP entry for %s: %m", ip_ntoa(ina
));
2170 *hwaddr
= req
.arp_ha
;
2171 hwaddr
->sa_family
= AF_UNSPEC
;
2177 dlpi_attach(fd
, ppa
)
2180 dl_attach_req_t req
;
2183 req
.dl_primitive
= DL_ATTACH_REQ
;
2185 buf
.len
= sizeof(req
);
2186 buf
.buf
= (void *) &req
;
2187 return putmsg(fd
, &buf
, NULL
, RS_HIPRI
);
2197 req
.dl_primitive
= DL_INFO_REQ
;
2198 buf
.len
= sizeof(req
);
2199 buf
.buf
= (void *) &req
;
2200 return putmsg(fd
, &buf
, NULL
, RS_HIPRI
);
2204 dlpi_get_reply(fd
, reply
, expected_prim
, maxlen
)
2205 union DL_primitives
*reply
;
2206 int fd
, expected_prim
, maxlen
;
2213 * Use poll to wait for a message with a timeout.
2216 pfd
.events
= POLLIN
| POLLPRI
;
2218 n
= poll(&pfd
, 1, 1000);
2219 } while (n
== -1 && errno
== EINTR
);
2226 buf
.maxlen
= maxlen
;
2227 buf
.buf
= (void *) reply
;
2229 if (getmsg(fd
, &buf
, NULL
, &flags
) < 0)
2232 if (buf
.len
< sizeof(ulong
)) {
2234 dbglog("dlpi response short (len=%d)\n", buf
.len
);
2238 if (reply
->dl_primitive
== expected_prim
)
2242 if (reply
->dl_primitive
== DL_ERROR_ACK
) {
2243 dbglog("dlpi error %d (unix errno %d) for prim %x\n",
2244 reply
->error_ack
.dl_errno
, reply
->error_ack
.dl_unix_errno
,
2245 reply
->error_ack
.dl_error_primitive
);
2247 dbglog("dlpi unexpected response prim %x\n",
2248 reply
->dl_primitive
);
2256 * Return user specified netmask, modified by any mask we might determine
2257 * for address `addr' (in network byte order).
2258 * Here we scan through the system's list of interfaces, looking for
2259 * any non-point-to-point interfaces which might appear to be on the same
2260 * network as `addr'. If we find any, we OR in their netmask to the
2261 * user-specified netmask.
2267 u_int32_t mask
, nmask
, ina
;
2268 struct ifreq
*ifr
, *ifend
, ifreq
;
2273 if (IN_CLASSA(addr
)) /* determine network mask for address class */
2274 nmask
= IN_CLASSA_NET
;
2275 else if (IN_CLASSB(addr
))
2276 nmask
= IN_CLASSB_NET
;
2278 nmask
= IN_CLASSC_NET
;
2279 /* class D nets are disallowed by bad_ip_adrs */
2280 mask
= netmask
| htonl(nmask
);
2283 * Scan through the system's network interfaces.
2286 if (ioctl(ipfd
, SIOCGIFNUM
, &nif
) < 0)
2289 ifc
.ifc_len
= nif
* sizeof(struct ifreq
);
2290 ifc
.ifc_buf
= (caddr_t
) malloc(ifc
.ifc_len
);
2291 if (ifc
.ifc_buf
== 0)
2293 if (ioctl(ipfd
, SIOCGIFCONF
, &ifc
) < 0) {
2294 warn("Couldn't get system interface list: %m");
2298 ifend
= (struct ifreq
*) (ifc
.ifc_buf
+ ifc
.ifc_len
);
2299 for (ifr
= ifc
.ifc_req
; ifr
< ifend
; ++ifr
) {
2301 * Check the interface's internet address.
2303 if (ifr
->ifr_addr
.sa_family
!= AF_INET
)
2305 ina
= INET_ADDR(ifr
->ifr_addr
);
2306 if ((ntohl(ina
) & nmask
) != (addr
& nmask
))
2309 * Check that the interface is up, and not point-to-point or loopback.
2311 strlcpy(ifreq
.ifr_name
, ifr
->ifr_name
, sizeof(ifreq
.ifr_name
));
2312 if (ioctl(ipfd
, SIOCGIFFLAGS
, &ifreq
) < 0)
2314 if ((ifreq
.ifr_flags
& (IFF_UP
|IFF_POINTOPOINT
|IFF_LOOPBACK
))
2318 * Get its netmask and OR it into our mask.
2320 if (ioctl(ipfd
, SIOCGIFNETMASK
, &ifreq
) < 0)
2322 mask
|= INET_ADDR(ifreq
.ifr_addr
);
2330 * logwtmp - write an accounting record to the /var/adm/wtmp file.
2333 logwtmp(line
, name
, host
)
2334 const char *line
, *name
, *host
;
2336 static struct utmpx utmpx
;
2340 strncpy(utmpx
.ut_user
, name
, sizeof(utmpx
.ut_user
));
2341 strncpy(utmpx
.ut_id
, ifname
, sizeof(utmpx
.ut_id
));
2342 strncpy(utmpx
.ut_line
, line
, sizeof(utmpx
.ut_line
));
2343 utmpx
.ut_pid
= getpid();
2344 utmpx
.ut_type
= USER_PROCESS
;
2346 utmpx
.ut_type
= DEAD_PROCESS
;
2348 gettimeofday(&utmpx
.ut_tv
, NULL
);
2349 updwtmpx("/var/adm/wtmpx", &utmpx
);
2353 * get_host_seed - return the serial number of this machine.
2360 if (sysinfo(SI_HW_SERIAL
, buf
, sizeof(buf
)) < 0) {
2361 error("sysinfo: %m");
2364 return (int) strtoul(buf
, NULL
, 16);
2368 strioctl(fd
, cmd
, ptr
, ilen
, olen
)
2369 int fd
, cmd
, ilen
, olen
;
2372 struct strioctl str
;
2378 if (ioctl(fd
, I_STR
, &str
) == -1)
2380 if (str
.ic_len
!= olen
)
2381 dbglog("strioctl: expected %d bytes, got %d for cmd %x\n",
2382 olen
, str
.ic_len
, cmd
);
2388 * cifroute - delete a route through the addresses given.
2391 cifroute(u
, our
, his
)
2397 memset(&rt
, 0, sizeof(rt
));
2398 rt
.rt_dst
.sa_family
= AF_INET
;
2399 INET_ADDR(rt
.rt_dst
) = his
;
2400 rt
.rt_gateway
.sa_family
= AF_INET
;
2401 INET_ADDR(rt
.rt_gateway
) = our
;
2402 rt
.rt_flags
= RTF_HOST
;
2404 if (ioctl(ipfd
, SIOCDELRT
, &rt
) < 0) {
2405 error("Can't delete route: %m");
2413 * have_route_to - determine if the system has a route to the specified
2414 * IP address. Returns 0 if not, 1 if so, -1 if we can't tell.
2415 * `addr' is in network byte order.
2416 * For demand mode to work properly, we have to ignore routes
2417 * through our own interface.
2419 #ifndef T_CURRENT /* needed for Solaris 2.5 */
2420 #define T_CURRENT MI_T_CURRENT
2428 int fd
, r
, flags
, i
;
2430 struct T_optmgmt_req req
;
2434 struct T_optmgmt_ack ack
;
2435 unsigned char space
[64];
2438 struct strbuf cbuf
, dbuf
;
2440 mib2_ipRouteEntry_t routes
[8];
2441 mib2_ipRouteEntry_t
*rp
;
2443 fd
= open(mux_dev_name
, O_RDWR
);
2445 warn("have_route_to: couldn't open %s: %m", mux_dev_name
);
2449 req
.req
.PRIM_type
= T_OPTMGMT_REQ
;
2450 req
.req
.OPT_offset
= (char *) &req
.hdr
- (char *) &req
;
2451 req
.req
.OPT_length
= sizeof(req
.hdr
);
2452 req
.req
.MGMT_flags
= T_CURRENT
;
2454 req
.hdr
.level
= MIB2_IP
;
2458 cbuf
.buf
= (char *) &req
;
2459 cbuf
.len
= sizeof(req
);
2461 if (putmsg(fd
, &cbuf
, NULL
, 0) == -1) {
2462 warn("have_route_to: putmsg: %m");
2468 cbuf
.buf
= (char *) &ack
;
2469 cbuf
.maxlen
= sizeof(ack
);
2470 dbuf
.buf
= (char *) routes
;
2471 dbuf
.maxlen
= sizeof(routes
);
2473 r
= getmsg(fd
, &cbuf
, &dbuf
, &flags
);
2475 warn("have_route_to: getmsg: %m");
2480 if (cbuf
.len
< sizeof(struct T_optmgmt_ack
)
2481 || ack
.ack
.PRIM_type
!= T_OPTMGMT_ACK
2482 || ack
.ack
.MGMT_flags
!= T_SUCCESS
2483 || ack
.ack
.OPT_length
< sizeof(struct opthdr
)) {
2484 dbglog("have_route_to: bad message len=%d prim=%d",
2485 cbuf
.len
, ack
.ack
.PRIM_type
);
2490 rh
= (struct opthdr
*) ((char *)&ack
+ ack
.ack
.OPT_offset
);
2491 if (rh
->level
== 0 && rh
->name
== 0)
2493 if (rh
->level
!= MIB2_IP
|| rh
->name
!= MIB2_IP_21
) {
2494 while (r
== MOREDATA
)
2495 r
= getmsg(fd
, NULL
, &dbuf
, &flags
);
2500 nroutes
= dbuf
.len
/ sizeof(mib2_ipRouteEntry_t
);
2501 for (rp
= routes
, i
= 0; i
< nroutes
; ++i
, ++rp
) {
2502 if (rp
->ipRouteMask
!= ~0) {
2503 dbglog("have_route_to: dest=%x gw=%x mask=%x\n",
2504 rp
->ipRouteDest
, rp
->ipRouteNextHop
,
2506 if (((addr
^ rp
->ipRouteDest
) & rp
->ipRouteMask
) == 0
2507 && rp
->ipRouteNextHop
!= remote_addr
)
2513 r
= getmsg(fd
, NULL
, &dbuf
, &flags
);
2524 * get_pty - get a pty master/slave pair and chown the slave side to
2525 * the uid given. Assumes slave_name points to MAXPATHLEN bytes of space.
2528 get_pty(master_fdp
, slave_fdp
, slave_name
, uid
)
2536 struct termios tios
;
2538 mfd
= open("/dev/ptmx", O_RDWR
);
2540 error("Couldn't open pty master: %m");
2544 pty_name
= ptsname(mfd
);
2545 if (pty_name
== NULL
) {
2546 error("Couldn't get name of pty slave");
2550 if (chown(pty_name
, uid
, -1) < 0)
2551 warn("Couldn't change owner of pty slave: %m");
2552 if (chmod(pty_name
, S_IRUSR
| S_IWUSR
) < 0)
2553 warn("Couldn't change permissions on pty slave: %m");
2554 if (unlockpt(mfd
) < 0)
2555 warn("Couldn't unlock pty slave: %m");
2557 sfd
= open(pty_name
, O_RDWR
);
2559 error("Couldn't open pty slave %s: %m", pty_name
);
2563 if (ioctl(sfd
, I_PUSH
, "ptem") < 0)
2564 warn("Couldn't push ptem module on pty slave: %m");
2566 dbglog("Using %s", pty_name
);
2567 strlcpy(slave_name
, pty_name
, MAXPATHLEN
);