4 Copyright (C) 2006-2009 Jonathan Zarate
15 #include <sys/ioctl.h>
17 #include <netinet/in.h>
18 #include <sys/socket.h>
19 #include <arpa/inet.h>
21 #include <sys/sysinfo.h>
22 #include <sys/types.h>
33 int get_wan_proto(void)
35 const char *names
[] = { // order must be synced with def at shared.h
46 p
= nvram_safe_get("wan_proto");
47 for (i
= 0; names
[i
] != NULL
; ++i
) {
48 if (strcmp(p
, names
[i
]) == 0) return i
+ 1;
54 int get_ipv6_service(void)
56 const char *names
[] = { // order must be synced with def at shared.h
57 "native", // IPV6_NATIVE
58 "native-pd", // IPV6_NATIVE_DHCP
59 "6to4", // IPV6_ANYCAST_6TO4
61 "other", // IPV6_MANUAL
67 p
= nvram_safe_get("ipv6_service");
68 for (i
= 0; names
[i
] != NULL
; ++i
) {
69 if (strcmp(p
, names
[i
]) == 0) return i
+ 1;
74 const char *ipv6_router_address(struct in6_addr
*in6addr
)
78 static char addr6
[INET6_ADDRSTRLEN
];
82 if ((p
= nvram_get("ipv6_rtr_addr")) && *p
) {
83 inet_pton(AF_INET6
, p
, &addr
);
85 else if ((p
= nvram_get("ipv6_prefix")) && *p
) {
86 inet_pton(AF_INET6
, p
, &addr
);
87 addr
.s6_addr16
[7] = htons(0x0001);
93 inet_ntop(AF_INET6
, &addr
, addr6
, sizeof(addr6
));
95 memcpy(in6addr
, &addr
, sizeof(addr
));
101 int using_dhcpc(void)
103 switch (get_wan_proto()) {
108 return nvram_get_int("pptp_dhcp");
113 int wl_client(int unit
, int subunit
)
115 char *mode
= nvram_safe_get(wl_nvname("mode", unit
, subunit
));
117 return ((strcmp(mode
, "sta") == 0) || (strcmp(mode
, "wet") == 0));
120 int foreach_wif(int include_vifs
, void *param
,
121 int (*func
)(int idx
, int unit
, int subunit
, void *param
))
124 char name
[64], ifname
[64], *next
= NULL
;
125 int unit
= -1, subunit
= -1;
129 snprintf(ifnames
, sizeof(ifnames
), "%s %s %s %s %s %s %s %s %s %s",
130 nvram_safe_get("lan_ifnames"),
131 nvram_safe_get("lan1_ifnames"),
132 nvram_safe_get("lan2_ifnames"),
133 nvram_safe_get("lan3_ifnames"),
134 nvram_safe_get("wan_ifnames"),
135 nvram_safe_get("wl_ifname"),
136 nvram_safe_get("wl0_ifname"),
137 nvram_safe_get("wl0_vifs"),
138 nvram_safe_get("wl1_ifname"),
139 nvram_safe_get("wl1_vifs"));
140 remove_dups(ifnames
, sizeof(ifnames
));
143 foreach(name
, ifnames
, next
) {
144 if (nvifname_to_osifname(name
, ifname
, sizeof(ifname
)) != 0)
147 if (wl_probe(ifname
) || wl_ioctl(ifname
, WLC_GET_INSTANCE
, &unit
, sizeof(unit
)))
150 // Convert eth name to wl name
151 if (osifname_to_nvifname(name
, ifname
, sizeof(ifname
)) != 0)
154 // Slave intefaces have a '.' in the name
155 if (strchr(ifname
, '.') && !include_vifs
)
158 if (get_ifname_unit(ifname
, &unit
, &subunit
) < 0)
161 ret
|= func(i
++, unit
, subunit
, param
);
166 void notice_set(const char *path
, const char *format
, ...)
172 va_start(args
, format
);
173 vsnprintf(buf
, sizeof(buf
), format
, args
);
176 mkdir("/var/notice", 0755);
177 snprintf(p
, sizeof(p
), "/var/notice/%s", path
);
178 f_write_string(p
, buf
, 0, 0);
179 if (buf
[0]) syslog(LOG_INFO
, "notice[%s]: %s", path
, buf
);
183 // #define _x_dprintf(args...) syslog(LOG_DEBUG, args);
184 #define _x_dprintf(args...) do { } while (0);
186 int check_wanup(void)
196 proto
= get_wan_proto();
197 if (proto
== WP_DISABLED
) return 0;
199 if ((proto
== WP_PPTP
) || (proto
== WP_L2TP
) || (proto
== WP_PPPOE
)) {
200 if (f_read_string("/tmp/ppp/link", buf1
, sizeof(buf1
)) > 0) {
201 // contains the base name of a file in /var/run/ containing pid of a daemon
202 snprintf(buf2
, sizeof(buf2
), "/var/run/%s.pid", buf1
);
203 if (f_read_string(buf2
, buf1
, sizeof(buf1
)) > 0) {
204 name
= psname(atoi(buf1
), buf2
, sizeof(buf2
));
205 if (strcmp(name
, "pppd") == 0) up
= 1;
208 _dprintf("%s: error reading %s\n", __FUNCTION__
, buf2
);
211 unlink("/tmp/ppp/link");
212 _x_dprintf("required daemon not found, assuming link is dead\n");
216 _x_dprintf("%s: error reading %s\n", __FUNCTION__
, "/tmp/ppp/link");
219 else if (!nvram_match("wan_ipaddr", "0.0.0.0")) {
223 _x_dprintf("%s: default !up\n", __FUNCTION__
);
226 if ((up
) && ((f
= socket(AF_INET
, SOCK_DGRAM
, 0)) >= 0)) {
227 strlcpy(ifr
.ifr_name
, nvram_safe_get("wan_iface"), sizeof(ifr
.ifr_name
));
228 if (ioctl(f
, SIOCGIFFLAGS
, &ifr
) < 0) {
230 _x_dprintf("%s: SIOCGIFFLAGS\n", __FUNCTION__
);
233 if ((ifr
.ifr_flags
& IFF_UP
) == 0) {
235 _x_dprintf("%s: !IFF_UP\n", __FUNCTION__
);
243 const dns_list_t
*get_dns(void)
245 static dns_list_t dns
;
256 strlcpy(s
, nvram_safe_get("wan_dns"), sizeof(s
));
257 if ((nvram_get_int("dns_addget")) || (s
[0] == 0)) {
259 snprintf(s
+ n
, sizeof(s
) - n
, " %s", nvram_safe_get("wan_get_dns"));
262 n
= sscanf(s
, "%21s %21s %21s %21s %21s %21s %21s", d
[0], d
[1], d
[2], d
[3], d
[4], d
[5], d
[6]);
263 for (i
= 0; i
< n
; ++i
) {
266 if ((c
= strchr(d
[i
], ':')) != NULL
) {
268 if (((j
= atoi(c
)) < 1) || (j
> 0xFFFF)) continue;
272 if (inet_pton(AF_INET
, d
[i
], &ia
) > 0) {
273 for (j
= dns
.count
- 1; j
>= 0; --j
) {
274 if ((dns
.dns
[j
].addr
.s_addr
== ia
.s_addr
) && (dns
.dns
[j
].port
== port
)) break;
277 dns
.dns
[dns
.count
].port
= port
;
278 dns
.dns
[dns
.count
++].addr
.s_addr
= ia
.s_addr
;
279 if (dns
.count
== 6) break;
287 // -----------------------------------------------------------------------------
289 void set_action(int a
)
292 while (f_write("/var/lock/action", &a
, sizeof(a
), 0, 0) != sizeof(a
)) {
294 if (--r
== 0) return;
296 if (a
!= ACT_IDLE
) sleep(2);
299 int check_action(void)
304 while (f_read("/var/lock/action", &a
, sizeof(a
)) != sizeof(a
)) {
306 if (--r
== 0) return ACT_UNKNOWN
;
311 int wait_action_idle(int n
)
314 if (check_action() == ACT_IDLE
) return 1;
320 // -----------------------------------------------------------------------------
322 const wanface_list_t
*get_wanfaces(void)
324 static wanface_list_t wanfaces
;
330 switch ((proto
= get_wan_proto())) {
333 while (wanfaces
.count
< 2) {
334 if (wanfaces
.count
== 0) {
335 ip
= nvram_safe_get("ppp_get_ip");
336 iface
= nvram_safe_get("wan_iface");
337 if (!(*iface
)) iface
= "ppp+";
339 else /* if (wanfaces.count == 1) */ {
340 ip
= nvram_safe_get("wan_ipaddr");
341 if ((!(*ip
) || strcmp(ip
, "0.0.0.0") == 0) && (wanfaces
.count
> 0))
344 iface
= nvram_safe_get("wan_ifname");
346 strlcpy(wanfaces
.iface
[wanfaces
.count
].ip
, ip
, sizeof(wanfaces
.iface
[0].ip
));
347 strlcpy(wanfaces
.iface
[wanfaces
.count
].name
, iface
, IFNAMSIZ
);
352 ip
= (proto
== WP_DISABLED
) ? "0.0.0.0" : nvram_safe_get("wan_ipaddr");
353 if (proto
== WP_PPPOE
) {
354 iface
= nvram_safe_get("wan_iface");
355 if (!(*iface
)) iface
= "ppp+";
358 iface
= nvram_safe_get("wan_ifname");
360 strlcpy(wanfaces
.iface
[wanfaces
.count
].ip
, ip
, sizeof(wanfaces
.iface
[0].ip
));
361 strlcpy(wanfaces
.iface
[wanfaces
.count
++].name
, iface
, IFNAMSIZ
);
368 const char *get_wanface(void)
370 return (*get_wanfaces()).iface
[0].name
;
374 const char *get_wan6face(void)
376 switch (get_ipv6_service()) {
378 case IPV6_NATIVE_DHCP
:
379 return get_wanface();
380 case IPV6_ANYCAST_6TO4
:
385 return nvram_safe_get("ipv6_ifname");
389 const char *get_wanip(void)
391 if (!check_wanup()) return "0.0.0.0";
393 return (*get_wanfaces()).iface
[0].ip
;
396 const char *getifaddr(char *ifname
, int family
, int linklocal
)
398 static char buf
[INET6_ADDRSTRLEN
];
400 struct ifaddrs
*ifap
, *ifa
;
402 if (getifaddrs(&ifap
) != 0) {
403 _dprintf("getifaddrs failed: %s\n", strerror(errno
));
407 for (ifa
= ifap
; ifa
; ifa
= ifa
->ifa_next
) {
408 if ((ifa
->ifa_addr
== NULL
) ||
409 (strncmp(ifa
->ifa_name
, ifname
, IFNAMSIZ
) != 0) ||
410 (ifa
->ifa_addr
->sa_family
!= family
))
414 if (ifa
->ifa_addr
->sa_family
== AF_INET6
) {
415 struct sockaddr_in6
*s6
= (struct sockaddr_in6
*)(ifa
->ifa_addr
);
416 if (IN6_IS_ADDR_LINKLOCAL(&s6
->sin6_addr
) ^ linklocal
)
418 addr
= (void *)&(s6
->sin6_addr
);
423 struct sockaddr_in
*s
= (struct sockaddr_in
*)(ifa
->ifa_addr
);
424 addr
= (void *)&(s
->sin_addr
);
427 if ((addr
) && inet_ntop(ifa
->ifa_addr
->sa_family
, addr
, buf
, sizeof(buf
)) != NULL
) {
437 // -----------------------------------------------------------------------------
439 long get_uptime(void)
446 char *wl_nvname(const char *nv
, int unit
, int subunit
)
448 static char tmp
[128];
449 char prefix
[] = "wlXXXXXXXXXX_";
452 strcpy(prefix
, "wl_");
453 else if (subunit
> 0)
454 snprintf(prefix
, sizeof(prefix
), "wl%d.%d_", unit
, subunit
);
456 snprintf(prefix
, sizeof(prefix
), "wl%d_", unit
);
457 return strcat_r(prefix
, nv
, tmp
);
460 int get_radio(int unit
)
464 return (wl_ioctl(nvram_safe_get(wl_nvname("ifname", unit
, 0)), WLC_GET_RADIO
, &n
, sizeof(n
)) == 0) &&
465 ((n
& WL_RADIO_SW_DISABLE
) == 0);
468 void set_radio(int on
, int unit
)
472 #ifndef WL_BSS_INFO_VERSION
473 #error WL_BSS_INFO_VERSION
476 #if WL_BSS_INFO_VERSION >= 108
477 n
= on
? (WL_RADIO_SW_DISABLE
<< 16) : ((WL_RADIO_SW_DISABLE
<< 16) | 1);
478 wl_ioctl(nvram_safe_get(wl_nvname("ifname", unit
, 0)), WLC_SET_RADIO
, &n
, sizeof(n
));
484 n
= on
? 0 : WL_RADIO_SW_DISABLE
;
485 wl_ioctl(nvram_safe_get(wl_nvname("ifname", unit
, 0)), WLC_SET_RADIO
, &n
, sizeof(n
));
492 // -----------------------------------------------------------------------------
494 int mtd_getinfo(const char *mtdname
, int *part
, int *size
)
502 if ((strlen(mtdname
) < 128) && (strcmp(mtdname
, "pmon") != 0)) {
503 sprintf(t
, "\"%s\"", mtdname
);
504 if ((f
= fopen("/proc/mtd", "r")) != NULL
) {
505 while (fgets(s
, sizeof(s
), f
) != NULL
) {
506 if ((sscanf(s
, "mtd%d: %x", part
, size
) == 2) && (strstr(s
, t
) != NULL
)) {
507 // don't accidentally mess with bl (0)
508 if (*part
> 0) r
= 1;
522 // -----------------------------------------------------------------------------
524 int nvram_get_int(const char *key
)
526 return atoi(nvram_safe_get(key
));
530 long nvram_xget_long(const char *name, long min, long max, long def)
537 if ((p != NULL) && (*p != 0)) {
538 n = strtol(p, &e, 0);
539 if ((e != p) && ((*e == 0) || (*e == ' ')) && (n > min) && (n < max)) {
547 int nvram_get_file(const char *key
, const char *fname
, int max
)
555 p
= nvram_safe_get(key
);
558 if ((b
= malloc(base64_decoded_len(n
) + 128)) != NULL
) {
559 n
= base64_decode(p
, b
, n
);
560 if (n
> 0) r
= (f_write(fname
, b
, n
, 0, 0644) == n
);
570 p = nvram_safe_get(key);
573 n = base64_decode(p, b, n);
574 if (n > 0) return (f_write(fname, b, n, 0, 0700) == n);
580 int nvram_set_file(const char *key
, const char *fname
, int max
)
588 if ((len
= f_size(fname
)) > max
) return 0;
591 if (f_read_alloc(fname
, &in
, max
) == max
) {
592 if ((out
= malloc(base64_encoded_len(max
) + 128)) != NULL
) {
593 n
= base64_encode(in
, out
, max
);
607 if (((n = f_read(fname, &a, sizeof(a))) > 0) && (n <= max)) {
608 n = base64_encode(a, b, n);
617 int nvram_contains_word(const char *key
, const char *word
)
619 return (find_word(nvram_safe_get(key
), word
) != NULL
);
622 int nvram_is_empty(const char *key
)
625 return (((p
= nvram_get(key
)) == NULL
) || (*p
== 0));
628 void nvram_commit_x(void)
630 if (!nvram_get_int("debug_nocommit")) nvram_commit();
633 int connect_timeout(int fd
, const struct sockaddr
*addr
, socklen_t len
, int timeout
)
641 if (((flags
= fcntl(fd
, F_GETFL
, 0)) < 0) ||
642 (fcntl(fd
, F_SETFL
, flags
| O_NONBLOCK
) < 0)) {
643 _dprintf("%s: error in F_*ETFL %d\n", __FUNCTION__
, fd
);
647 if (connect(fd
, addr
, len
) < 0) {
648 // _dprintf("%s: connect %d = <0\n", __FUNCTION__, fd);
650 if (errno
!= EINPROGRESS
) {
651 _dprintf("%s: error in connect %d errno=%d\n", __FUNCTION__
, fd
, errno
);
660 r
= select(fd
+ 1, NULL
, &fds
, NULL
, &tv
);
662 _dprintf("%s: timeout in select %d\n", __FUNCTION__
, fd
);
666 if (errno
!= EINTR
) {
667 _dprintf("%s: error in select %d\n", __FUNCTION__
, fd
);
675 if ((getsockopt(fd
, SOL_SOCKET
, SO_ERROR
, &r
, &n
) < 0) || (r
!= 0)) {
676 _dprintf("%s: error in SO_ERROR %d\n", __FUNCTION__
, fd
);
684 if (fcntl(fd
, F_SETFL
, flags
) < 0) {
685 _dprintf("%s: error in F_*ETFL %d\n", __FUNCTION__
, fd
);
689 // _dprintf("%s: OK %d\n", __FUNCTION__, fd);
693 void chld_reap(int sig
)
695 while (waitpid(-1, NULL
, WNOHANG
) > 0) {}
701 return time(0) > Y2K;