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",
130 nvram_safe_get("lan_ifnames"), nvram_safe_get("lan1_ifnames"), nvram_safe_get("lan2_ifnames"), nvram_safe_get("lan3_ifnames"), nvram_safe_get("wan_ifnames"));
131 remove_dups(ifnames
, sizeof(ifnames
));
134 foreach(name
, ifnames
, next
) {
135 if (nvifname_to_osifname(name
, ifname
, sizeof(ifname
)) != 0)
138 if (wl_probe(ifname
) || wl_ioctl(ifname
, WLC_GET_INSTANCE
, &unit
, sizeof(unit
)))
141 // Convert eth name to wl name
142 if (osifname_to_nvifname(name
, ifname
, sizeof(ifname
)) != 0)
145 // Slave intefaces have a '.' in the name
146 if (strchr(ifname
, '.') && !include_vifs
)
149 if (get_ifname_unit(ifname
, &unit
, &subunit
) < 0)
152 ret
|= func(i
++, unit
, subunit
, param
);
157 void notice_set(const char *path
, const char *format
, ...)
163 va_start(args
, format
);
164 vsnprintf(buf
, sizeof(buf
), format
, args
);
167 mkdir("/var/notice", 0755);
168 snprintf(p
, sizeof(p
), "/var/notice/%s", path
);
169 f_write_string(p
, buf
, 0, 0);
170 if (buf
[0]) syslog(LOG_INFO
, "notice[%s]: %s", path
, buf
);
174 // #define _x_dprintf(args...) syslog(LOG_DEBUG, args);
175 #define _x_dprintf(args...) do { } while (0);
177 int check_wanup(void)
187 proto
= get_wan_proto();
188 if (proto
== WP_DISABLED
) return 0;
190 if ((proto
== WP_PPTP
) || (proto
== WP_L2TP
) || (proto
== WP_PPPOE
)) {
191 if (f_read_string("/tmp/ppp/link", buf1
, sizeof(buf1
)) > 0) {
192 // contains the base name of a file in /var/run/ containing pid of a daemon
193 snprintf(buf2
, sizeof(buf2
), "/var/run/%s.pid", buf1
);
194 if (f_read_string(buf2
, buf1
, sizeof(buf1
)) > 0) {
195 name
= psname(atoi(buf1
), buf2
, sizeof(buf2
));
196 if (strcmp(name
, "pppd") == 0) up
= 1;
199 _dprintf("%s: error reading %s\n", __FUNCTION__
, buf2
);
202 unlink("/tmp/ppp/link");
203 _x_dprintf("required daemon not found, assuming link is dead\n");
207 _x_dprintf("%s: error reading %s\n", __FUNCTION__
, "/tmp/ppp/link");
210 else if (!nvram_match("wan_ipaddr", "0.0.0.0")) {
214 _x_dprintf("%s: default !up\n", __FUNCTION__
);
217 if ((up
) && ((f
= socket(AF_INET
, SOCK_DGRAM
, 0)) >= 0)) {
218 strlcpy(ifr
.ifr_name
, nvram_safe_get("wan_iface"), sizeof(ifr
.ifr_name
));
219 if (ioctl(f
, SIOCGIFFLAGS
, &ifr
) < 0) {
221 _x_dprintf("%s: SIOCGIFFLAGS\n", __FUNCTION__
);
224 if ((ifr
.ifr_flags
& IFF_UP
) == 0) {
226 _x_dprintf("%s: !IFF_UP\n", __FUNCTION__
);
234 const dns_list_t
*get_dns(void)
236 static dns_list_t dns
;
247 strlcpy(s
, nvram_safe_get("wan_dns"), sizeof(s
));
248 if ((nvram_get_int("dns_addget")) || (s
[0] == 0)) {
250 snprintf(s
+ n
, sizeof(s
) - n
, " %s", nvram_safe_get("wan_get_dns"));
253 n
= sscanf(s
, "%21s %21s %21s %21s %21s %21s %21s", d
[0], d
[1], d
[2], d
[3], d
[4], d
[5], d
[6]);
254 for (i
= 0; i
< n
; ++i
) {
257 if ((c
= strchr(d
[i
], ':')) != NULL
) {
259 if (((j
= atoi(c
)) < 1) || (j
> 0xFFFF)) continue;
263 if (inet_pton(AF_INET
, d
[i
], &ia
) > 0) {
264 for (j
= dns
.count
- 1; j
>= 0; --j
) {
265 if ((dns
.dns
[j
].addr
.s_addr
== ia
.s_addr
) && (dns
.dns
[j
].port
== port
)) break;
268 dns
.dns
[dns
.count
].port
= port
;
269 dns
.dns
[dns
.count
++].addr
.s_addr
= ia
.s_addr
;
270 if (dns
.count
== 6) break;
278 // -----------------------------------------------------------------------------
280 void set_action(int a
)
283 while (f_write("/var/lock/action", &a
, sizeof(a
), 0, 0) != sizeof(a
)) {
285 if (--r
== 0) return;
287 if (a
!= ACT_IDLE
) sleep(2);
290 int check_action(void)
295 while (f_read("/var/lock/action", &a
, sizeof(a
)) != sizeof(a
)) {
297 if (--r
== 0) return ACT_UNKNOWN
;
302 int wait_action_idle(int n
)
305 if (check_action() == ACT_IDLE
) return 1;
311 // -----------------------------------------------------------------------------
313 const wanface_list_t
*get_wanfaces(void)
315 static wanface_list_t wanfaces
;
321 switch ((proto
= get_wan_proto())) {
324 while (wanfaces
.count
< 2) {
325 if (wanfaces
.count
== 0) {
326 ip
= nvram_safe_get("ppp_get_ip");
327 iface
= nvram_safe_get("wan_iface");
328 if (!(*iface
)) iface
= "ppp+";
330 else /* if (wanfaces.count == 1) */ {
331 ip
= nvram_safe_get("wan_ipaddr");
332 if ((!(*ip
) || strcmp(ip
, "0.0.0.0") == 0) && (wanfaces
.count
> 0))
335 iface
= nvram_safe_get("wan_ifname");
337 strlcpy(wanfaces
.iface
[wanfaces
.count
].ip
, ip
, sizeof(wanfaces
.iface
[0].ip
));
338 strlcpy(wanfaces
.iface
[wanfaces
.count
].name
, iface
, IFNAMSIZ
);
343 ip
= (proto
== WP_DISABLED
) ? "0.0.0.0" : nvram_safe_get("wan_ipaddr");
344 if (proto
== WP_PPPOE
) {
345 iface
= nvram_safe_get("wan_iface");
346 if (!(*iface
)) iface
= "ppp+";
349 iface
= nvram_safe_get("wan_ifname");
351 strlcpy(wanfaces
.iface
[wanfaces
.count
].ip
, ip
, sizeof(wanfaces
.iface
[0].ip
));
352 strlcpy(wanfaces
.iface
[wanfaces
.count
++].name
, iface
, IFNAMSIZ
);
359 const char *get_wanface(void)
361 return (*get_wanfaces()).iface
[0].name
;
365 const char *get_wan6face(void)
367 switch (get_ipv6_service()) {
369 case IPV6_NATIVE_DHCP
:
370 return get_wanface();
371 case IPV6_ANYCAST_6TO4
:
376 return nvram_safe_get("ipv6_ifname");
380 const char *get_wanip(void)
382 if (!check_wanup()) return "0.0.0.0";
384 return (*get_wanfaces()).iface
[0].ip
;
387 const char *getifaddr(char *ifname
, int family
, int linklocal
)
389 static char buf
[INET6_ADDRSTRLEN
];
391 struct ifaddrs
*ifap
, *ifa
;
393 if (getifaddrs(&ifap
) != 0) {
394 _dprintf("getifaddrs failed: %s\n", strerror(errno
));
398 for (ifa
= ifap
; ifa
; ifa
= ifa
->ifa_next
) {
399 if ((ifa
->ifa_addr
== NULL
) ||
400 (strncmp(ifa
->ifa_name
, ifname
, IFNAMSIZ
) != 0) ||
401 (ifa
->ifa_addr
->sa_family
!= family
))
405 if (ifa
->ifa_addr
->sa_family
== AF_INET6
) {
406 struct sockaddr_in6
*s6
= (struct sockaddr_in6
*)(ifa
->ifa_addr
);
407 if (IN6_IS_ADDR_LINKLOCAL(&s6
->sin6_addr
) ^ linklocal
)
409 addr
= (void *)&(s6
->sin6_addr
);
414 struct sockaddr_in
*s
= (struct sockaddr_in
*)(ifa
->ifa_addr
);
415 addr
= (void *)&(s
->sin_addr
);
418 if ((addr
) && inet_ntop(ifa
->ifa_addr
->sa_family
, addr
, buf
, sizeof(buf
)) != NULL
) {
428 // -----------------------------------------------------------------------------
430 long get_uptime(void)
437 char *wl_nvname(const char *nv
, int unit
, int subunit
)
439 static char tmp
[128];
440 char prefix
[] = "wlXXXXXXXXXX_";
443 strcpy(prefix
, "wl_");
444 else if (subunit
> 0)
445 snprintf(prefix
, sizeof(prefix
), "wl%d.%d_", unit
, subunit
);
447 snprintf(prefix
, sizeof(prefix
), "wl%d_", unit
);
448 return strcat_r(prefix
, nv
, tmp
);
451 int get_radio(int unit
)
455 return (wl_ioctl(nvram_safe_get(wl_nvname("ifname", unit
, 0)), WLC_GET_RADIO
, &n
, sizeof(n
)) == 0) &&
456 ((n
& WL_RADIO_SW_DISABLE
) == 0);
459 void set_radio(int on
, int unit
)
463 #ifndef WL_BSS_INFO_VERSION
464 #error WL_BSS_INFO_VERSION
467 #if WL_BSS_INFO_VERSION >= 108
468 n
= on
? (WL_RADIO_SW_DISABLE
<< 16) : ((WL_RADIO_SW_DISABLE
<< 16) | 1);
469 wl_ioctl(nvram_safe_get(wl_nvname("ifname", unit
, 0)), WLC_SET_RADIO
, &n
, sizeof(n
));
475 n
= on
? 0 : WL_RADIO_SW_DISABLE
;
476 wl_ioctl(nvram_safe_get(wl_nvname("ifname", unit
, 0)), WLC_SET_RADIO
, &n
, sizeof(n
));
483 // -----------------------------------------------------------------------------
485 int mtd_getinfo(const char *mtdname
, int *part
, int *size
)
493 if ((strlen(mtdname
) < 128) && (strcmp(mtdname
, "pmon") != 0)) {
494 sprintf(t
, "\"%s\"", mtdname
);
495 if ((f
= fopen("/proc/mtd", "r")) != NULL
) {
496 while (fgets(s
, sizeof(s
), f
) != NULL
) {
497 if ((sscanf(s
, "mtd%d: %x", part
, size
) == 2) && (strstr(s
, t
) != NULL
)) {
498 // don't accidentally mess with bl (0)
499 if (*part
> 0) r
= 1;
513 // -----------------------------------------------------------------------------
515 int nvram_get_int(const char *key
)
517 return atoi(nvram_safe_get(key
));
521 long nvram_xget_long(const char *name, long min, long max, long def)
528 if ((p != NULL) && (*p != 0)) {
529 n = strtol(p, &e, 0);
530 if ((e != p) && ((*e == 0) || (*e == ' ')) && (n > min) && (n < max)) {
538 int nvram_get_file(const char *key
, const char *fname
, int max
)
546 p
= nvram_safe_get(key
);
549 if ((b
= malloc(base64_decoded_len(n
) + 128)) != NULL
) {
550 n
= base64_decode(p
, b
, n
);
551 if (n
> 0) r
= (f_write(fname
, b
, n
, 0, 0644) == n
);
561 p = nvram_safe_get(key);
564 n = base64_decode(p, b, n);
565 if (n > 0) return (f_write(fname, b, n, 0, 0700) == n);
571 int nvram_set_file(const char *key
, const char *fname
, int max
)
579 if ((len
= f_size(fname
)) > max
) return 0;
582 if (f_read_alloc(fname
, &in
, max
) == max
) {
583 if ((out
= malloc(base64_encoded_len(max
) + 128)) != NULL
) {
584 n
= base64_encode(in
, out
, max
);
598 if (((n = f_read(fname, &a, sizeof(a))) > 0) && (n <= max)) {
599 n = base64_encode(a, b, n);
608 int nvram_contains_word(const char *key
, const char *word
)
610 return (find_word(nvram_safe_get(key
), word
) != NULL
);
613 int nvram_is_empty(const char *key
)
616 return (((p
= nvram_get(key
)) == NULL
) || (*p
== 0));
619 void nvram_commit_x(void)
621 if (!nvram_get_int("debug_nocommit")) nvram_commit();
624 int connect_timeout(int fd
, const struct sockaddr
*addr
, socklen_t len
, int timeout
)
632 if (((flags
= fcntl(fd
, F_GETFL
, 0)) < 0) ||
633 (fcntl(fd
, F_SETFL
, flags
| O_NONBLOCK
) < 0)) {
634 _dprintf("%s: error in F_*ETFL %d\n", __FUNCTION__
, fd
);
638 if (connect(fd
, addr
, len
) < 0) {
639 // _dprintf("%s: connect %d = <0\n", __FUNCTION__, fd);
641 if (errno
!= EINPROGRESS
) {
642 _dprintf("%s: error in connect %d errno=%d\n", __FUNCTION__
, fd
, errno
);
651 r
= select(fd
+ 1, NULL
, &fds
, NULL
, &tv
);
653 _dprintf("%s: timeout in select %d\n", __FUNCTION__
, fd
);
657 if (errno
!= EINTR
) {
658 _dprintf("%s: error in select %d\n", __FUNCTION__
, fd
);
666 if ((getsockopt(fd
, SOL_SOCKET
, SO_ERROR
, &r
, &n
) < 0) || (r
!= 0)) {
667 _dprintf("%s: error in SO_ERROR %d\n", __FUNCTION__
, fd
);
675 if (fcntl(fd
, F_SETFL
, flags
) < 0) {
676 _dprintf("%s: error in F_*ETFL %d\n", __FUNCTION__
, fd
);
680 // _dprintf("%s: OK %d\n", __FUNCTION__, fd);
684 void chld_reap(int sig
)
686 while (waitpid(-1, NULL
, WNOHANG
) > 0) {}
692 return time(0) > Y2K;