?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Merge Toastman-RT into Toastman-RT-N
[tomato.git] / release / src / router / rc / services.c
blobb685b60baef27d5c7ee846fc092fd8af0da80d08
1 /*
2
3 Copyright 2003, CyberTAN Inc. All Rights Reserved
4
5 This is UNPUBLISHED PROPRIETARY SOURCE CODE of CyberTAN Inc.
6 the contents of this file may not be disclosed to third parties,
7 copied or duplicated in any form without the prior written
8 permission of CyberTAN Inc.
9
10 This software should be used as a reference only, and it not
11 intended for production use!
12
13 THIS SOFTWARE IS OFFERED "AS IS", AND CYBERTAN GRANTS NO WARRANTIES OF ANY
14 KIND, EXPRESS OR IMPLIED, BY STATUTE, COMMUNICATION OR OTHERWISE. CYBERTAN
15 SPECIFICALLY DISCLAIMS ANY IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS
16 FOR A SPECIFIC PURPOSE OR NONINFRINGEMENT CONCERNING THIS SOFTWARE
17
18 */
19 /*
20
21 Copyright 2005, Broadcom Corporation
22 All Rights Reserved.
23
24 THIS SOFTWARE IS OFFERED "AS IS", AND BROADCOM GRANTS NO WARRANTIES OF ANY
25 KIND, EXPRESS OR IMPLIED, BY STATUTE, COMMUNICATION OR OTHERWISE. BROADCOM
26 SPECIFICALLY DISCLAIMS ANY IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS
27 FOR A SPECIFIC PURPOSE OR NONINFRINGEMENT CONCERNING THIS SOFTWARE.
28
29 */
30 /*
31
32 Modified for Tomato Firmware
33 Portions, Copyright (C) 2006-2009 Jonathan Zarate
34
35 */
36 #include "rc.h"
37
38 #include <arpa/inet.h>
39 #include <time.h>
40 #include <sys/time.h>
41 #include <errno.h>
42
43 // !!TB
44 #include <sys/mount.h>
45 #include <mntent.h>
46 #include <dirent.h>
47
48 // Pop an alarm to recheck pids in 500 msec.
49 static const struct itimerval pop_tv = { {0,0}, {0, 500 * 1000} };
50
51 // Pop an alarm to reap zombies.
52 static const struct itimerval zombie_tv = { {0,0}, {307, 0} };
53
54 // -----------------------------------------------------------------------------
55
56 static const char dmhosts[] = "/etc/dnsmasq/hosts";
57 static const char dmdhcp[] = "/etc/dnsmasq/dhcp";
58 static const char dmresolv[] = "/etc/resolv.dnsmasq";
59
60 static pid_t pid_dnsmasq = -1;
61
62 static int is_wet(int idx, int unit, int subunit, void *param)
63 {
64 return nvram_match(wl_nvname("mode", unit, subunit), "wet");
65 }
66
67 void start_dnsmasq()
68 {
69 FILE *f;
70 const char *nv;
71 char buf[512];
72 char lan[24];
73 const char *router_ip;
74 char sdhcp_lease[32];
75 char *e;
76 int n;
77 char *mac, *ip, *name;
78 char *p;
79 int ipn;
80 char ipbuf[32];
81 FILE *hf, *df;
82 int dhcp_start;
83 int dhcp_count;
84 int dhcp_lease;
85 int do_dhcpd;
86 int do_dns;
87 int do_dhcpd_hosts;
88
89 TRACE_PT("begin\n");
90
91 if (getpid() != 1) {
92 start_service("dnsmasq");
93 return;
94 }
95
96 stop_dnsmasq();
97
98 if (foreach_wif(1, NULL, is_wet)) return;
99
100 if ((f = fopen("/etc/dnsmasq.conf", "w")) == NULL) return;
101
102 router_ip = nvram_safe_get("lan_ipaddr");
103
104 fprintf(f,
105 "pid-file=/var/run/dnsmasq.pid\n");
106 if (((nv = nvram_get("wan_domain")) != NULL) || ((nv = nvram_get("wan_get_domain")) != NULL)) {
107 if (*nv) fprintf(f, "domain=%s\n", nv);
108 }
109
110 // dns
111 const dns_list_t *dns = get_dns(); // this always points to a static buffer
112
113 if (((nv = nvram_get("dns_minport")) != NULL) && (*nv)) n = atoi(nv);
114 else n = 4096;
115 fprintf(f,
116 "resolv-file=%s\n" // the real stuff is here
117 "addn-hosts=%s\n" // directory with additional hosts files
118 "dhcp-hostsfile=%s\n" // directory with dhcp hosts files
119 "expand-hosts\n" // expand hostnames in hosts file
120 "min-port=%u\n", // min port used for random src port
121 dmresolv, dmhosts, dmdhcp, n);
122 do_dns = nvram_match("dhcpd_dmdns", "1");
123
124 // DNS rebinding protection, will discard upstream RFC1918 responses
125 if (nvram_get_int("dns_norebind")) {
126 fprintf(f,
127 "stop-dns-rebind\n"
128 "rebind-localhost-ok\n");
129 // allow RFC1918 responses for server domain
130 switch (get_wan_proto()) {
131 case WP_PPTP:
132 nv = nvram_get("pptp_server_ip");
133 break;
134 case WP_L2TP:
135 nv = nvram_get("l2tp_server_ip");
136 break;
137 default:
138 nv = NULL;
139 break;
140 }
141 if (nv && *nv) fprintf(f, "rebind-domain-ok=%s\n", nv);
142 }
143
144 for (n = 0 ; n < dns->count; ++n) {
145 if (dns->dns[n].port != 53) {
146 fprintf(f, "server=%s#%u\n", inet_ntoa(dns->dns[n].addr), dns->dns[n].port);
147 }
148 }
149
150 if (nvram_get_int("dhcpd_static_only")) {
151 fprintf(f, "dhcp-ignore=tag:!known\n");
152 }
153
154 // dhcp
155 do_dhcpd_hosts=0;
156 char lanN_proto[] = "lanXX_proto";
157 char lanN_ifname[] = "lanXX_ifname";
158 char lanN_ipaddr[] = "lanXX_ipaddr";
159 char lanN_netmask[] = "lanXX_netmask";
160 char dhcpdN_startip[] = "dhcpdXX_startip";
161 char dhcpdN_endip[] = "dhcpdXX_endip";
162 char dhcpN_start[] = "dhcpXX_start";
163 char dhcpN_num[] = "dhcpXX_num";
164 char dhcpN_lease[] = "dhcpXX_lease";
165 char br;
166 for(br=0 ; br<=3 ; br++) {
167 char bridge[2] = "0";
168 if (br!=0)
169 bridge[0]+=br;
170 else
171 strcpy(bridge, "");
172
173 sprintf(lanN_proto, "lan%s_proto", bridge);
174 sprintf(lanN_ifname, "lan%s_ifname", bridge);
175 sprintf(lanN_ipaddr, "lan%s_ipaddr", bridge);
176 do_dhcpd = nvram_match(lanN_proto, "dhcp");
177 if (do_dhcpd) {
178 do_dhcpd_hosts++;
179
180 router_ip = nvram_safe_get(lanN_ipaddr);
181 strlcpy(lan, router_ip, sizeof(lan));
182 if ((p = strrchr(lan, '.')) != NULL) *(p + 1) = 0;
183
184 fprintf(f,
185 "interface=%s\n",
186 nvram_safe_get(lanN_ifname));
187
188 sprintf(dhcpN_lease, "dhcp%s_lease", bridge);
189 dhcp_lease = nvram_get_int(dhcpN_lease);
190
191 if (dhcp_lease <= 0) dhcp_lease = 1440;
192
193 if ((e = nvram_get("dhcpd_slt")) != NULL) n = atoi(e); else n = 0;
194 if (n < 0) strcpy(sdhcp_lease, "infinite");
195 else sprintf(sdhcp_lease, "%dm", (n > 0) ? n : dhcp_lease);
196
197 if (!do_dns) {
198 // if not using dnsmasq for dns
199
200 if ((dns->count == 0) && (nvram_get_int("dhcpd_llndns"))) {
201 // no DNS might be temporary. use a low lease time to force clients to update.
202 dhcp_lease = 2;
203 strcpy(sdhcp_lease, "2m");
204 do_dns = 1;
205 }
206 else {
207 // pass the dns directly
208 buf[0] = 0;
209 for (n = 0 ; n < dns->count; ++n) {
210 if (dns->dns[n].port == 53) { // check: option 6 doesn't seem to support other ports
211 sprintf(buf + strlen(buf), ",%s", inet_ntoa(dns->dns[n].addr));
212 }
213 }
214 fprintf(f, "dhcp-option=%s,6%s\n", nvram_safe_get(lanN_ifname), buf);
215 }
216 }
217
218 sprintf(dhcpdN_startip, "dhcpd%s_startip", bridge);
219 sprintf(dhcpdN_endip, "dhcpd%s_endip", bridge);
220 sprintf(lanN_netmask, "lan%s_netmask", bridge);
221
222 if ((p = nvram_get(dhcpdN_startip)) && (*p) && (e = nvram_get(dhcpdN_endip)) && (*e)) {
223 fprintf(f, "dhcp-range=%s,%s,%s,%s,%dm\n", nvram_safe_get(lanN_ifname), p, e, nvram_safe_get(lanN_netmask), dhcp_lease);
224 }
225 else {
226 // for compatibility
227 sprintf(dhcpN_start, "dhcp%s_start", bridge);
228 sprintf(dhcpN_num, "dhcp%s_num", bridge);
229 sprintf(lanN_netmask, "lan%s_netmask", bridge);
230 dhcp_start = nvram_get_int(dhcpN_start);
231 dhcp_count = nvram_get_int(dhcpN_num);
232 fprintf(f, "dhcp-range=%s,%s%d,%s%d,%s,%dm\n",
233 nvram_safe_get(lanN_ifname), lan, dhcp_start, lan, dhcp_start + dhcp_count - 1, nvram_safe_get(lanN_netmask), dhcp_lease);
234 }
235
236 nv = nvram_safe_get(lanN_ipaddr);
237 if ((nvram_get_int("dhcpd_gwmode") == 1) && (get_wan_proto() == WP_DISABLED)) {
238 p = nvram_safe_get("lan_gateway");
239 if ((*p) && (strcmp(p, "0.0.0.0") != 0)) nv = p;
240 }
241
242 fprintf(f,
243 "dhcp-option=%s,3,%s\n", // gateway
244 nvram_safe_get(lanN_ifname), nv);
245
246 if (((nv = nvram_get("wan_wins")) != NULL) && (*nv) && (strcmp(nv, "0.0.0.0") != 0)) {
247 fprintf(f, "dhcp-option=%s,44,%s\n", nvram_safe_get(lanN_ifname), nv);
248 }
249 #ifdef TCONFIG_SAMBASRV
250 else if (nvram_get_int("smbd_enable") && nvram_invmatch("lan_hostname", "") && nvram_get_int("smbd_wins")) {
251 if ((nv == NULL) || (*nv == 0) || (strcmp(nv, "0.0.0.0") == 0)) {
252 // Samba will serve as a WINS server
253 fprintf(f, "dhcp-option=%s,44,0.0.0.0\n", nvram_safe_get(lanN_ifname));
254 }
255 }
256 #endif
257 } else {
258 if (strcmp(nvram_safe_get(lanN_ifname),"")!=0)
259 fprintf(f, "no-dhcp-interface=%s\n", nvram_safe_get(lanN_ifname));
260 }
261 }
262 // write static lease entries & create hosts file
263
264 mkdir_if_none(dmhosts);
265 snprintf(buf, sizeof(buf), "%s/hosts", dmhosts);
266 if ((hf = fopen(buf, "w")) != NULL) {
267 if (((nv = nvram_get("wan_hostname")) != NULL) && (*nv))
268 fprintf(hf, "%s %s\n", router_ip, nv);
269 #ifdef TCONFIG_SAMBASRV
270 else if (((nv = nvram_get("lan_hostname")) != NULL) && (*nv))
271 fprintf(hf, "%s %s\n", router_ip, nv);
272 #endif
273 p = (char *)get_wanip();
274 if ((*p == 0) || strcmp(p, "0.0.0.0") == 0)
275 p = "127.0.0.1";
276 fprintf(hf, "%s wan-ip\n", p);
277 if (nv && (*nv))
278 fprintf(hf, "%s %s-wan\n", p, nv);
279 }
280
281
282 mkdir_if_none(dmdhcp);
283 snprintf(buf, sizeof(buf), "%s/dhcp-hosts", dmdhcp);
284 df = fopen(buf, "w");
285
286
287 // PREVIOUS/OLD FORMAT:
288
289 // 00:aa:bb:cc:dd:ee<123<xxxxxxxxxxxxxxxxxxxxxxxxxx.xyz> = 53 w/ delim
290 // 00:aa:bb:cc:dd:ee<123.123.123.123<xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xyz> = 85 w/ delim
291 // 00:aa:bb:cc:dd:ee,00:aa:bb:cc:dd:ee<123.123.123.123<xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xyz> = 106 w/ delim
292
293 // NEW FORMAT (+static ARP binding after hostname):
294 // 00:aa:bb:cc:dd:ee<123<xxxxxxxxxxxxxxxxxxxxxxxxxx.xyz<a> = 55 w/ delim
295 // 00:aa:bb:cc:dd:ee<123.123.123.123<xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xyz<a> = 87 w/ delim
296 // 00:aa:bb:cc:dd:ee,00:aa:bb:cc:dd:ee<123.123.123.123<xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xyz<a> = 108 w/ delim
297
298 p = nvram_safe_get("dhcpd_static");
299 while ((e = strchr(p, '>')) != NULL) {
300 n = (e - p);
301 if (n > 107) {
302 p = e + 1;
303 continue;
304 }
305
306 strncpy(buf, p, n);
307 buf[n] = 0;
308 p = e + 1;
309
310 if ((e = strchr(buf, '<')) == NULL) continue;
311 *e = 0;
312 mac = buf;
313
314 ip = e + 1;
315 if ((e = strchr(ip, '<')) == NULL) continue;
316 *e = 0;
317 if (strchr(ip, '.') == NULL) {
318 ipn = atoi(ip);
319 if ((ipn <= 0) || (ipn > 255)) continue;
320 sprintf(ipbuf, "%s%d", lan, ipn);
321 ip = ipbuf;
322 }
323 else {
324 if (inet_addr(ip) == INADDR_NONE) continue;
325 }
326
327 name = e + 1;
328
329 if ((e = strchr(name, '<')) != NULL) {
330 *e = 0;
331 }
332
333 if ((hf) && (*name != 0)) {
334 fprintf(hf, "%s %s\n", ip, name);
335 }
336
337 if ((do_dhcpd_hosts > 0) && (*mac != 0) && (strcmp(mac, "00:00:00:00:00:00") != 0)) {
338 if (df)
339 fprintf(df, "%s,%s,%s\n", mac, ip, sdhcp_lease);
340 else
341 fprintf(f, "dhcp-host=%s,%s,%s\n", mac, ip, sdhcp_lease);
342 }
343 }
344
345 if (df) fclose(df);
346 if (hf) fclose(hf);
347
348 n = nvram_get_int("dhcpd_lmax");
349 fprintf(f,
350 "dhcp-lease-max=%d\n",
351 (n > 0) ? n : 255);
352 if (nvram_get_int("dhcpd_auth") >= 0) {
353 fprintf(f, "dhcp-authoritative\n");
354 }
355
356 //
357
358 #ifdef TCONFIG_OPENVPN
359 write_vpn_dnsmasq_config(f);
360 #endif
361
362 fprintf(f, "%s\n\n", nvram_safe_get("dnsmasq_custom"));
363
364 fappend(f, "/etc/dnsmasq.custom");
365
366 //
367
368 fclose(f);
369
370 if (do_dns) {
371 unlink("/etc/resolv.conf");
372 symlink("/rom/etc/resolv.conf", "/etc/resolv.conf"); // nameserver 127.0.0.1
373 }
374
375 TRACE_PT("run dnsmasq\n");
376
377 // Default to some values we like, but allow the user to override them.
378 eval("dnsmasq", "-c", "1500", "--log-async");
379
380 if (!nvram_contains_word("debug_norestart", "dnsmasq")) {
381 pid_dnsmasq = -2;
382 }
383
384 TRACE_PT("end\n");
385 }
386
387 void stop_dnsmasq(void)
388 {
389 TRACE_PT("begin\n");
390
391 if (getpid() != 1) {
392 stop_service("dnsmasq");
393 return;
394 }
395
396 pid_dnsmasq = -1;
397
398 unlink("/etc/resolv.conf");
399 symlink(dmresolv, "/etc/resolv.conf");
400
401 killall_tk("dnsmasq");
402
403 TRACE_PT("end\n");
404 }
405
406 void clear_resolv(void)
407 {
408 f_write(dmresolv, NULL, 0, 0, 0); // blank
409 }
410
411 #ifdef TCONFIG_IPV6
412 static int write_ipv6_dns_servers(FILE *f, const char *prefix, char *dns, const char *suffix, int once)
413 {
414 char p[INET6_ADDRSTRLEN + 1], *next = NULL;
415 struct in6_addr addr;
416 int cnt = 0;
417
418 foreach(p, dns, next) {
419 // verify that this is a valid IPv6 address
420 if (inet_pton(AF_INET6, p, &addr) == 1) {
421 fprintf(f, "%s%s%s", (once && cnt) ? "" : prefix, p, suffix);
422 ++cnt;
423 }
424 }
425
426 return cnt;
427 }
428 #endif
429
430 void dns_to_resolv(void)
431 {
432 FILE *f;
433 const dns_list_t *dns;
434 int i;
435 mode_t m;
436
437 m = umask(022); // 077 from pppoecd
438 if ((f = fopen(dmresolv, "w")) != NULL) {
439 // Check for VPN DNS entries
440 if (!write_vpn_resolv(f)) {
441 #ifdef TCONFIG_IPV6
442 if (write_ipv6_dns_servers(f, "nameserver ", nvram_safe_get("ipv6_dns"), "\n", 0) == 0 || nvram_get_int("dns_addget"))
443 write_ipv6_dns_servers(f, "nameserver ", nvram_safe_get("ipv6_get_dns"), "\n", 0);
444 #endif
445 dns = get_dns(); // static buffer
446 if (dns->count == 0) {
447 // Put a pseudo DNS IP to trigger Connect On Demand
448 if (nvram_match("ppp_demand", "1")) {
449 switch (get_wan_proto()) {
450 case WP_PPPOE:
451 case WP_PPTP:
452 case WP_L2TP:
453 fprintf(f, "nameserver 1.1.1.1\n");
454 break;
455 }
456 }
457 }
458 else {
459 for (i = 0; i < dns->count; i++) {
460 if (dns->dns[i].port == 53) { // resolv.conf doesn't allow for an alternate port
461 fprintf(f, "nameserver %s\n", inet_ntoa(dns->dns[i].addr));
462 }
463 }
464 }
465 }
466 fclose(f);
467 }
468 umask(m);
469 }
470
471 // -----------------------------------------------------------------------------
472
473 void start_httpd(void)
474 {
475 if (getpid() != 1) {
476 start_service("httpd");
477 return;
478 }
479
480 stop_httpd();
481 chdir("/www");
482 eval("httpd");
483 chdir("/");
484 }
485
486 void stop_httpd(void)
487 {
488 if (getpid() != 1) {
489 stop_service("httpd");
490 return;
491 }
492
493 killall_tk("httpd");
494 }
495
496 // -----------------------------------------------------------------------------
497 #ifdef TCONFIG_IPV6
498
499 static void add_ip6_lanaddr(void)
500 {
501 char ip[INET6_ADDRSTRLEN + 4];
502 const char *p;
503
504 p = ipv6_router_address(NULL);
505 if (*p) {
506 snprintf(ip, sizeof(ip), "%s/%d", p, nvram_get_int("ipv6_prefix_length") ? : 64);
507 eval("ip", "-6", "addr", "add", ip, "dev", nvram_safe_get("lan_ifname"));
508 }
509 }
510
511 void start_ipv6_tunnel(void)
512 {
513 char ip[INET6_ADDRSTRLEN + 4];
514 struct in_addr addr4;
515 struct in6_addr addr;
516 const char *wanip, *mtu, *tun_dev;
517 int service;
518
519 service = get_ipv6_service();
520 tun_dev = get_wan6face();
521 wanip = get_wanip();
522 mtu = (nvram_get_int("ipv6_tun_mtu") > 0) ? nvram_safe_get("ipv6_tun_mtu") : "1480";
523 modprobe("sit");
524
525 if (service == IPV6_ANYCAST_6TO4)
526 snprintf(ip, sizeof(ip), "192.88.99.%d", nvram_get_int("ipv6_relay"));
527 else
528 strlcpy(ip, (char *)nvram_safe_get("ipv6_tun_v4end"), sizeof(ip));
529 eval("ip", "tunnel", "add", (char *)tun_dev, "mode", "sit",
530 "remote", ip,
531 "local", (char *)wanip,
532 "ttl", nvram_safe_get("ipv6_tun_ttl"));
533
534 eval("ip", "link", "set", (char *)tun_dev, "mtu", (char *)mtu, "up");
535 nvram_set("ipv6_ifname", (char *)tun_dev);
536
537 if (service == IPV6_ANYCAST_6TO4) {
538 add_ip6_lanaddr();
539 addr4.s_addr = 0;
540 memset(&addr, 0, sizeof(addr));
541 inet_aton(wanip, &addr4);
542 addr.s6_addr16[0] = htons(0x2002);
543 ipv6_mapaddr4(&addr, 16, &addr4, 0);
544 addr.s6_addr16[7] = htons(0x0001);
545 inet_ntop(AF_INET6, &addr, ip, sizeof(ip));
546 strncat(ip, "/16", sizeof(ip));
547 }
548 else {
549 snprintf(ip, sizeof(ip), "%s/%d",
550 nvram_safe_get("ipv6_tun_addr"),
551 nvram_get_int("ipv6_tun_addrlen") ? : 64);
552 }
553 eval("ip", "addr", "add", ip, "dev", (char *)tun_dev);
554 eval("ip", "route", "add", "::/0", "dev", (char *)tun_dev);
555
556 // (re)start radvd
557 if (service == IPV6_ANYCAST_6TO4)
558 start_radvd();
559 }
560
561 void stop_ipv6_tunnel(void)
562 {
563 eval("ip", "tunnel", "del", (char *)get_wan6face());
564 if (get_ipv6_service() == IPV6_ANYCAST_6TO4) {
565 // get rid of old IPv6 address from lan iface
566 eval("ip", "-6", "addr", "flush", "dev", nvram_safe_get("lan_ifname"), "scope", "global");
567 }
568 modprobe_r("sit");
569 }
570
571 static pid_t pid_radvd = -1;
572
573 void start_radvd(void)
574 {
575 FILE *f;
576 char *prefix, *ip, *mtu;
577 int do_dns, do_6to4;
578 char *argv[] = { "radvd", NULL, NULL, NULL };
579 int pid, argc, service, cnt;
580
581 if (getpid() != 1) {
582 start_service("radvd");
583 return;
584 }
585
586 stop_radvd();
587
588 if (ipv6_enabled() && nvram_get_int("ipv6_radvd")) {
589 service = get_ipv6_service();
590 do_6to4 = (service == IPV6_ANYCAST_6TO4);
591 mtu = NULL;
592
593 switch (service) {
594 case IPV6_NATIVE_DHCP:
595 prefix = "::";
596 break;
597 case IPV6_ANYCAST_6TO4:
598 case IPV6_6IN4:
599 mtu = (nvram_get_int("ipv6_tun_mtu") > 0) ? nvram_safe_get("ipv6_tun_mtu") : "1480";
600 // fall through
601 default:
602 prefix = do_6to4 ? "0:0:0:1::" : nvram_safe_get("ipv6_prefix");
603 break;
604 }
605 if (!(*prefix)) prefix = "::";
606
607 // Create radvd.conf
608 if ((f = fopen("/etc/radvd.conf", "w")) == NULL) return;
609
610 ip = (char *)ipv6_router_address(NULL);
611 do_dns = (*ip) && nvram_match("dhcpd_dmdns", "1");
612
613 fprintf(f,
614 "interface %s\n"
615 "{\n"
616 " IgnoreIfMissing on;\n"
617 " AdvSendAdvert on;\n"
618 " MaxRtrAdvInterval 60;\n"
619 " AdvHomeAgentFlag off;\n"
620 " AdvManagedFlag off;\n"
621 "%s%s%s"
622 " prefix %s/64 \n"
623 " {\n"
624 " AdvOnLink on;\n"
625 " AdvAutonomous on;\n"
626 "%s"
627 "%s%s%s"
628 " };\n",
629 nvram_safe_get("lan_ifname"),
630 mtu ? " AdvLinkMTU " : "", mtu ? : "", mtu ? ";\n" : "",
631 prefix,
632 do_6to4 ? " AdvValidLifetime 300;\n AdvPreferredLifetime 120;\n" : "",
633 do_6to4 ? " Base6to4Interface " : "",
634 do_6to4 ? get_wanface() : "",
635 do_6to4 ? ";\n" : "");
636
637 if (do_dns) {
638 fprintf(f, " RDNSS %s {};\n", ip);
639 }
640 else {
641 cnt = write_ipv6_dns_servers(f, " RDNSS ", nvram_safe_get("ipv6_dns"), " ", 1);
642 if (cnt == 0 || nvram_get_int("dns_addget"))
643 cnt += write_ipv6_dns_servers(f, (cnt) ? "" : " RDNSS ", nvram_safe_get("ipv6_get_dns"), " ", 1);
644 if (cnt) fprintf(f, "{};\n");
645 }
646
647 fprintf(f,
648 "};\n"); // close "interface" section
649 fclose(f);
650
651 // Start radvd
652 argc = 1;
653 if (nvram_get_int("debug_ipv6")) {
654 argv[argc++] = "-d";
655 argv[argc++] = "10";
656 }
657 argv[argc] = NULL;
658 _eval(argv, NULL, 0, &pid);
659
660 if (!nvram_contains_word("debug_norestart", "radvd")) {
661 pid_radvd = -2;
662 }
663 }
664 }
665
666 void stop_radvd(void)
667 {
668 if (getpid() != 1) {
669 stop_service("radvd");
670 return;
671 }
672
673 pid_radvd = -1;
674 killall_tk("radvd");
675 }
676
677 void start_ipv6(void)
678 {
679 int service;
680
681 service = get_ipv6_service();
682 enable_ip_forward();
683
684 // Check if turned on
685 switch (service) {
686 case IPV6_NATIVE:
687 case IPV6_6IN4:
688 case IPV6_MANUAL:
689 add_ip6_lanaddr();
690 break;
691 case IPV6_NATIVE_DHCP:
692 case IPV6_ANYCAST_6TO4:
693 nvram_set("ipv6_rtr_addr", "");
694 nvram_set("ipv6_prefix", "");
695 break;
696 }
697
698 if (service != IPV6_DISABLED) {
699 if ((nvram_get_int("ipv6_accept_ra") & 2) != 0 && !nvram_get_int("ipv6_radvd"))
700 accept_ra(nvram_safe_get("lan_ifname"));
701 }
702 }
703
704 void stop_ipv6(void)
705 {
706 stop_ipv6_tunnel();
707 stop_dhcp6c();
708 eval("ip", "-6", "addr", "flush", "scope", "global");
709 }
710
711 #endif
712
713 // -----------------------------------------------------------------------------
714
715 void start_upnp(void)
716 {
717 if (getpid() != 1) {
718 start_service("upnp");
719 return;
720 }
721
722 if (get_wan_proto() == WP_DISABLED) return;
723
724 int enable;
725 FILE *f;
726 int upnp_port;
727
728 if (((enable = nvram_get_int("upnp_enable")) & 3) != 0) {
729 mkdir("/etc/upnp", 0777);
730 if (f_exists("/etc/upnp/config.alt")) {
731 xstart("miniupnpd", "-f", "/etc/upnp/config.alt");
732 }
733 else {
734 if ((f = fopen("/etc/upnp/config", "w")) != NULL) {
735 upnp_port = nvram_get_int("upnp_port");
736 if ((upnp_port < 0) || (upnp_port >= 0xFFFF)) upnp_port = 0;
737
738
739 fprintf(f,
740 "ext_ifname=%s\n"
741 "port=%d\n"
742 "enable_upnp=%s\n"
743 "enable_natpmp=%s\n"
744 "secure_mode=%s\n"
745 "upnp_forward_chain=upnp\n"
746 "upnp_nat_chain=upnp\n"
747 "notify_interval=%d\n"
748 "system_uptime=yes\n"
749 "\n"
750 ,
751 get_wanface(),
752 upnp_port,
753 (enable & 1) ? "yes" : "no", // upnp enable
754 (enable & 2) ? "yes" : "no", // natpmp enable
755 nvram_get_int("upnp_secure") ? "yes" : "no", // secure_mode (only forward to self)
756 nvram_get_int("upnp_ssdp_interval")
757 );
758
759 if (nvram_get_int("upnp_clean")) {
760 int interval = nvram_get_int("upnp_clean_interval");
761 if (interval < 60) interval = 60;
762 fprintf(f,
763 "clean_ruleset_interval=%d\n"
764 "clean_ruleset_threshold=%d\n",
765 interval,
766 nvram_get_int("upnp_clean_threshold")
767 );
768 }
769 else
770 fprintf(f,"clean_ruleset_interval=0\n");
771
772 if (nvram_match("upnp_mnp", "1")) {
773 int https = nvram_get_int("https_enable");
774 fprintf(f, "presentation_url=http%s://%s:%s/forward-upnp.asp\n",
775 https ? "s" : "", nvram_safe_get("lan_ipaddr"),
776 nvram_safe_get(https ? "https_lanport" : "http_lanport"));
777 }
778 else {
779 // Empty parameters are not included into XML service description
780 fprintf(f, "presentation_url=\n");
781 }
782
783 char uuid[45];
784 f_read_string("/proc/sys/kernel/random/uuid", uuid, sizeof(uuid));
785 fprintf(f, "uuid=%s\n", uuid);
786
787 #ifdef TCONFIG_VLAN
788 char lanN_ipaddr[] = "lanXX_ipaddr";
789 char lanN_netmask[] = "lanXX_netmask";
790 char upnp_lanN[] = "upnp_lanXX";
791 char br;
792
793 for(br=0 ; br<4 ; br++) {
794 char bridge[2] = "0";
795 if (br!=0)
796 bridge[0]+=br;
797 else
798 strcpy(bridge, "");
799
800 sprintf(lanN_ipaddr, "lan%s_ipaddr", bridge);
801 sprintf(lanN_netmask, "lan%s_netmask", bridge);
802 sprintf(upnp_lanN, "upnp_lan%s", bridge);
803
804 char *lanip = nvram_safe_get(lanN_ipaddr);
805 char *lanmask = nvram_safe_get(lanN_netmask);
806 char *lanlisten = nvram_safe_get(upnp_lanN);
807 if((strcmp(lanlisten,"1")==0) && (strcmp(lanip,"")!=0) && (strcmp(lanip,"0.0.0.0")!=0)) {
808 #else
809 char *lanip = nvram_safe_get("lan_ipaddr");
810 char *lanmask = nvram_safe_get("lan_netmask");
811 #endif
812 fprintf(f,
813 "listening_ip=%s/%s\n",
814 lanip, lanmask);
815 int ports[4];
816 if ((ports[0] = nvram_get_int("upnp_min_port_int")) > 0 &&
817 (ports[1] = nvram_get_int("upnp_max_port_int")) > 0 &&
818 (ports[2] = nvram_get_int("upnp_min_port_ext")) > 0 &&
819 (ports[3] = nvram_get_int("upnp_max_port_ext")) > 0) {
820 fprintf(f,
821 "allow %d-%d %s/%s %d-%d\n",
822 ports[0], ports[1],
823 lanip, lanmask,
824 ports[2], ports[3]
825 );
826 }
827 else {
828 // by default allow only redirection of ports above 1024
829 fprintf(f, "allow 1024-65535 %s/%s 1024-65535\n", lanip, lanmask);
830 }
831 #ifdef TCONFIG_VLAN
832 }
833 }
834 #endif
835
836 fappend(f, "/jffs/upnpconfig.custom");
837 fappend(f, "/etc/upnp/config.custom");
838 fprintf(f, "\ndeny 0-65535 0.0.0.0/0 0-65535\n");
839 fclose(f);
840
841 xstart("miniupnpd", "-f", "/etc/upnp/config");
842 }
843 }
844 }
845 }
846
847 void stop_upnp(void)
848 {
849 if (getpid() != 1) {
850 stop_service("upnp");
851 return;
852 }
853
854 killall_tk("miniupnpd");
855 }
856
857 // -----------------------------------------------------------------------------
858
859 static pid_t pid_crond = -1;
860
861 void start_cron(void)
862 {
863 stop_cron();
864
865 eval("crond", nvram_contains_word("log_events", "crond") ? NULL : "-l", "9");
866 if (!nvram_contains_word("debug_norestart", "crond")) {
867 pid_crond = -2;
868 }
869 }
870
871 void stop_cron(void)
872 {
873 pid_crond = -1;
874 killall_tk("crond");
875 }
876
877 // -----------------------------------------------------------------------------
878 #ifdef LINUX26
879
880 static pid_t pid_hotplug2 = -1;
881
882 void start_hotplug2()
883 {
884 stop_hotplug2();
885
886 f_write_string("/proc/sys/kernel/hotplug", "", FW_NEWLINE, 0);
887 xstart("hotplug2", "--persistent", "--no-coldplug");
888 // FIXME: Don't remember exactly why I put "sleep" here -
889 // but it was not for a race with check_services()... - TB
890 sleep(1);
891
892 if (!nvram_contains_word("debug_norestart", "hotplug2")) {
893 pid_hotplug2 = -2;
894 }
895 }
896
897 void stop_hotplug2(void)
898 {
899 pid_hotplug2 = -1;
900 killall_tk("hotplug2");
901 }
902
903 #endif /* LINUX26 */
904 // -----------------------------------------------------------------------------
905
906 // Written by Sparq in 2002/07/16
907 void start_zebra(void)
908 {
909 #ifdef TCONFIG_ZEBRA
910 if (getpid() != 1) {
911 start_service("zebra");
912 return;
913 }
914
915 FILE *fp;
916
917 char *lan_tx = nvram_safe_get("dr_lan_tx");
918 char *lan_rx = nvram_safe_get("dr_lan_rx");
919 #ifdef TCONFIG_VLAN
920 char *lan1_tx = nvram_safe_get("dr_lan1_tx");
921 char *lan1_rx = nvram_safe_get("dr_lan1_rx");
922 char *lan2_tx = nvram_safe_get("dr_lan2_tx");
923 char *lan2_rx = nvram_safe_get("dr_lan2_rx");
924 char *lan3_tx = nvram_safe_get("dr_lan3_tx");
925 char *lan3_rx = nvram_safe_get("dr_lan3_rx");
926 #endif
927 char *wan_tx = nvram_safe_get("dr_wan_tx");
928 char *wan_rx = nvram_safe_get("dr_wan_rx");
929
930 #ifdef TCONFIG_VLAN
931 if ((*lan_tx == '0') && (*lan_rx == '0') &&
932 (*lan1_tx == '0') && (*lan1_rx == '0') &&
933 (*lan2_tx == '0') && (*lan2_rx == '0') &&
934 (*lan3_tx == '0') && (*lan3_rx == '0') &&
935 (*wan_tx == '0') && (*wan_rx == '0')) {
936 #else
937 if ((*lan_tx == '0') && (*lan_rx == '0') && (*wan_tx == '0') && (*wan_rx == '0')) {
938 #endif
939 return;
940 }
941
942 // empty
943 if ((fp = fopen("/etc/zebra.conf", "w")) != NULL) {
944 fclose(fp);
945 }
946
947 //
948 if ((fp = fopen("/etc/ripd.conf", "w")) != NULL) {
949 char *lan_ifname = nvram_safe_get("lan_ifname");
950 #ifdef TCONFIG_VLAN
951 char *lan1_ifname = nvram_safe_get("lan1_ifname");
952 char *lan2_ifname = nvram_safe_get("lan2_ifname");
953 char *lan3_ifname = nvram_safe_get("lan3_ifname");
954 #endif
955 char *wan_ifname = nvram_safe_get("wan_ifname");
956
957 fprintf(fp, "router rip\n");
958 if(strcmp(lan_ifname,"")!=0)
959 fprintf(fp, "network %s\n", lan_ifname);
960 #ifdef TCONFIG_VLAN
961 if(strcmp(lan1_ifname,"")!=0)
962 fprintf(fp, "network %s\n", lan1_ifname);
963 if(strcmp(lan2_ifname,"")!=0)
964 fprintf(fp, "network %s\n", lan2_ifname);
965 if(strcmp(lan3_ifname,"")!=0)
966 fprintf(fp, "network %s\n", lan3_ifname);
967 #endif
968 fprintf(fp, "network %s\n", wan_ifname);
969 fprintf(fp, "redistribute connected\n");
970 //fprintf(fp, "redistribute static\n");
971
972 // 43011: modify by zg 2006.10.18 for cdrouter3.3 item 173(cdrouter_rip_30) bug
973 // fprintf(fp, "redistribute kernel\n"); // 1.11: removed, redistributes indirect -- zzz
974
975 if(strcmp(lan_ifname,"")!=0) {
976 fprintf(fp, "interface %s\n", lan_ifname);
977 if (*lan_tx != '0') fprintf(fp, "ip rip send version %s\n", lan_tx);
978 if (*lan_rx != '0') fprintf(fp, "ip rip receive version %s\n", lan_rx);
979 }
980 #ifdef TCONFIG_VLAN
981 if(strcmp(lan1_ifname,"")!=0) {
982 fprintf(fp, "interface %s\n", lan1_ifname);
983 if (*lan1_tx != '0') fprintf(fp, "ip rip send version %s\n", lan1_tx);
984 if (*lan1_rx != '0') fprintf(fp, "ip rip receive version %s\n", lan1_rx);
985 }
986 if(strcmp(lan2_ifname,"")!=0) {
987 fprintf(fp, "interface %s\n", lan2_ifname);
988 if (*lan2_tx != '0') fprintf(fp, "ip rip send version %s\n", lan2_tx);
989 if (*lan2_rx != '0') fprintf(fp, "ip rip receive version %s\n", lan2_rx);
990 }
991 if(strcmp(lan3_ifname,"")!=0) {
992 fprintf(fp, "interface %s\n", lan3_ifname);
993 if (*lan3_tx != '0') fprintf(fp, "ip rip send version %s\n", lan3_tx);
994 if (*lan3_rx != '0') fprintf(fp, "ip rip receive version %s\n", lan3_rx);
995 }
996 #endif
997 fprintf(fp, "interface %s\n", wan_ifname);
998 if (*wan_tx != '0') fprintf(fp, "ip rip send version %s\n", wan_tx);
999 if (*wan_rx != '0') fprintf(fp, "ip rip receive version %s\n", wan_rx);
1000
1001 fprintf(fp, "router rip\n");
1002 if(strcmp(lan_ifname,"")!=0) {
1003 if (*lan_tx == '0') fprintf(fp, "distribute-list private out %s\n", lan_ifname);
1004 if (*lan_rx == '0') fprintf(fp, "distribute-list private in %s\n", lan_ifname);
1005 }
1006 #ifdef TCONFIG_VLAN
1007 if(strcmp(lan1_ifname,"")!=0) {
1008 if (*lan1_tx == '0') fprintf(fp, "distribute-list private out %s\n", lan1_ifname);
1009 if (*lan1_rx == '0') fprintf(fp, "distribute-list private in %s\n", lan1_ifname);
1010 }
1011 if(strcmp(lan2_ifname,"")!=0) {
1012 if (*lan2_tx == '0') fprintf(fp, "distribute-list private out %s\n", lan2_ifname);
1013 if (*lan2_rx == '0') fprintf(fp, "distribute-list private in %s\n", lan2_ifname);
1014 }
1015 if(strcmp(lan3_ifname,"")!=0) {
1016 if (*lan3_tx == '0') fprintf(fp, "distribute-list private out %s\n", lan3_ifname);
1017 if (*lan3_rx == '0') fprintf(fp, "distribute-list private in %s\n", lan3_ifname);
1018 }
1019 #endif
1020 if (*wan_tx == '0') fprintf(fp, "distribute-list private out %s\n", wan_ifname);
1021 if (*wan_rx == '0') fprintf(fp, "distribute-list private in %s\n", wan_ifname);
1022 fprintf(fp, "access-list private deny any\n");
1023
1024 //fprintf(fp, "debug rip events\n");
1025 //fprintf(fp, "log file /etc/ripd.log\n");
1026 fclose(fp);
1027 }
1028
1029 xstart("zebra", "-d");
1030 xstart("ripd", "-d");
1031 #endif
1032 }
1033
1034 void stop_zebra(void)
1035 {
1036 #ifdef TCONFIG_ZEBRA
1037 if (getpid() != 1) {
1038 stop_service("zebra");
1039 return;
1040 }
1041
1042 killall("zebra", SIGTERM);
1043 killall("ripd", SIGTERM);
1044
1045 unlink("/etc/zebra.conf");
1046 unlink("/etc/ripd.conf");
1047 #endif
1048 }
1049
1050 // -----------------------------------------------------------------------------
1051
1052 void start_syslog(void)
1053 {
1054 char *argv[16];
1055 int argc;
1056 char *nv;
1057 char *b_opt = "";
1058 char rem[256];
1059 int n;
1060 char s[64];
1061 char cfg[256];
1062 char *rot_siz = "50";
1063 char *log_file_path;
1064
1065 argv[0] = "syslogd";
1066 argc = 1;
1067
1068 if (nvram_match("log_remote", "1")) {
1069 nv = nvram_safe_get("log_remoteip");
1070 if (*nv) {
1071 snprintf(rem, sizeof(rem), "%s:%s", nv, nvram_safe_get("log_remoteport"));
1072 argv[argc++] = "-R";
1073 argv[argc++] = rem;
1074 }
1075 }
1076
1077 if (nvram_match("log_file", "1")) {
1078 argv[argc++] = "-L";
1079
1080 // log to custom path - shibby
1081 if (nvram_match("log_file_custom", "1")) {
1082 log_file_path = nvram_safe_get("log_file_path");
1083 argv[argc++] = "-s";
1084 argv[argc++] = "5000";
1085 argv[argc++] = "-b";
1086 argv[argc++] = "5";
1087 argv[argc++] = "-O";
1088 argv[argc++] = log_file_path;
1089 remove("/var/log/messages");
1090 symlink(log_file_path, "/var/log/messages");
1091 }
1092 else
1093
1094 /* Read options: rotate_size(kb) num_backups logfilename.
1095 * Ignore these settings and use defaults if the logfile cannot be written to.
1096 */
1097 if (f_read_string("/etc/syslogd.cfg", cfg, sizeof(cfg)) > 0) {
1098 if ((nv = strchr(cfg, '\n')))
1099 *nv = 0;
1100
1101 if ((nv = strtok(cfg, " \t"))) {
1102 if (isdigit(*nv))
1103 rot_siz = nv;
1104 }
1105
1106 if ((nv = strtok(NULL, " \t")))
1107 b_opt = nv;
1108
1109 if ((nv = strtok(NULL, " \t")) && *nv == '/') {
1110 if (f_write(nv, cfg, 0, FW_APPEND, 0) >= 0) {
1111 argv[argc++] = "-O";
1112 argv[argc++] = nv;
1113 }
1114 else {
1115 rot_siz = "50";
1116 b_opt = "";
1117 }
1118 }
1119 }
1120
1121 if (nvram_match("log_file_custom", "0")) {
1122 argv[argc++] = "-s";
1123 argv[argc++] = rot_siz;
1124 remove("/var/log/messages");
1125 }
1126
1127
1128 if (isdigit(*b_opt)) {
1129 argv[argc++] = "-b";
1130 argv[argc++] = b_opt;
1131 }
1132 }
1133
1134 if (argc > 1) {
1135 argv[argc] = NULL;
1136 _eval(argv, NULL, 0, NULL);
1137
1138 argv[0] = "klogd";
1139 argv[1] = NULL;
1140 _eval(argv, NULL, 0, NULL);
1141
1142 // used to be available in syslogd -m
1143 n = nvram_get_int("log_mark");
1144 if (n > 0) {
1145 // n is in minutes
1146 if (n < 60)
1147 sprintf(rem, "*/%d * * * *", n);
1148 else if (n < 60 * 24)
1149 sprintf(rem, "0 */%d * * *", n / 60);
1150 else
1151 sprintf(rem, "0 0 */%d * *", n / (60 * 24));
1152 sprintf(s, "%s logger -p syslog.info -- -- MARK --", rem);
1153 eval("cru", "a", "syslogdmark", s);
1154 }
1155 else {
1156 eval("cru", "d", "syslogdmark");
1157 }
1158 }
1159 }
1160
1161 void stop_syslog(void)
1162 {
1163 killall("klogd", SIGTERM);
1164 killall("syslogd", SIGTERM);
1165 }
1166
1167 // -----------------------------------------------------------------------------
1168
1169 static pid_t pid_igmp = -1;
1170
1171 void start_igmp_proxy(void)
1172 {
1173 FILE *fp;
1174
1175 pid_igmp = -1;
1176 if (nvram_match("multicast_pass", "1")) {
1177 if (get_wan_proto() == WP_DISABLED)
1178 return;
1179
1180 if (f_exists("/etc/igmp.alt")) {
1181 eval("igmpproxy", "/etc/igmp.alt");
1182 }
1183 else if ((fp = fopen("/etc/igmp.conf", "w")) != NULL) {
1184 fprintf(fp,
1185 "quickleave\n"
1186 "phyint %s upstream\n"
1187 "\taltnet %s\n",
1188 // "phyint %s downstream ratelimit 0\n",
1189 get_wanface(),
1190 nvram_get("multicast_altnet") ? : "0.0.0.0/0");
1191 // nvram_safe_get("lan_ifname"));
1192
1193 #ifdef TCONFIG_VLAN
1194 char lanN_ifname[] = "lanXX_ifname";
1195 char multicast_lanN[] = "multicast_lanXX";
1196 char br;
1197
1198 for(br=0 ; br<4 ; br++) {
1199 char bridge[2] = "0";
1200 if (br!=0)
1201 bridge[0]+=br;
1202 else
1203 strcpy(bridge, "");
1204
1205 sprintf(lanN_ifname, "lan%s_ifname", bridge);
1206 sprintf(multicast_lanN, "multicast_lan%s", bridge);
1207
1208 if((strcmp(nvram_safe_get(multicast_lanN),"1")==0) && (strcmp(nvram_safe_get(lanN_ifname),"")!=0)) {
1209 fprintf(fp,
1210 "phyint %s downstream ratelimit 0\n",
1211 nvram_safe_get(lanN_ifname));
1212 }
1213 }
1214 #else
1215 fprintf(fp,
1216 "phyint %s downstream ratelimit 0\n",
1217 nvram_safe_get("lan_ifname"));
1218 #endif
1219 fclose(fp);
1220 eval("igmpproxy", "/etc/igmp.conf");
1221 }
1222 else {
1223 return;
1224 }
1225 if (!nvram_contains_word("debug_norestart", "igmprt")) {
1226 pid_igmp = -2;
1227 }
1228 }
1229 }
1230
1231 void stop_igmp_proxy(void)
1232 {
1233 pid_igmp = -1;
1234 killall_tk("igmpproxy");
1235 }
1236
1237 #ifdef TCONFIG_NOCAT
1238
1239 static pid_t pid_splashd = -1;
1240 void start_splashd(void)
1241 {
1242 pid_splashd = -1;
1243 start_nocat();
1244 if (!nvram_contains_word("debug_norestart", "splashd")) {
1245 pid_splashd = -2;
1246 }
1247 }
1248
1249 void stop_splashd(void)
1250 {
1251 pid_splashd = -1;
1252 stop_nocat();
1253 }
1254 #endif
1255
1256 // -----------------------------------------------------------------------------
1257
1258 void set_tz(void)
1259 {
1260 f_write_string("/etc/TZ", nvram_safe_get("tm_tz"), FW_CREATE|FW_NEWLINE, 0644);
1261 }
1262
1263 void start_ntpc(void)
1264 {
1265 set_tz();
1266
1267 stop_ntpc();
1268
1269 if (nvram_get_int("ntp_updates") >= 0) {
1270 xstart("ntpsync", "--init");
1271 }
1272 }
1273
1274 void stop_ntpc(void)
1275 {
1276 killall("ntpsync", SIGTERM);
1277 }
1278
1279 // -----------------------------------------------------------------------------
1280
1281 static void stop_rstats(void)
1282 {
1283 int n;
1284 int pid;
1285
1286 n = 60;
1287 while ((n-- > 0) && ((pid = pidof("rstats")) > 0)) {
1288 if (kill(pid, SIGTERM) != 0) break;
1289 sleep(1);
1290 }
1291 }
1292
1293 static void start_rstats(int new)
1294 {
1295 if (nvram_match("rstats_enable", "1")) {
1296 stop_rstats();
1297 if (new) xstart("rstats", "--new");
1298 else xstart("rstats");
1299 }
1300 }
1301
1302 static void stop_cstats(void)
1303 {
1304 int n;
1305 int pid;
1306
1307 n = 60;
1308 while ((n-- > 0) && ((pid = pidof("cstats")) > 0)) {
1309 if (kill(pid, SIGTERM) != 0) break;
1310 sleep(1);
1311 }
1312 }
1313
1314 static void start_cstats(int new)
1315 {
1316 if (nvram_match("cstats_enable", "1")) {
1317 stop_cstats();
1318 if (new) xstart("cstats", "--new");
1319 else xstart("cstats");
1320 }
1321 }
1322
1323 // -----------------------------------------------------------------------------
1324
1325 // !!TB - FTP Server
1326
1327 #ifdef TCONFIG_FTP
1328 static char *get_full_storage_path(char *val)
1329 {
1330 static char buf[128];
1331 int len;
1332
1333 if (val[0] == '/')
1334 len = sprintf(buf, "%s", val);
1335 else
1336 len = sprintf(buf, "%s/%s", MOUNT_ROOT, val);
1337
1338 if (len > 1 && buf[len - 1] == '/')
1339 buf[len - 1] = 0;
1340
1341 return buf;
1342 }
1343
1344 static char *nvram_storage_path(char *var)
1345 {
1346 char *val = nvram_safe_get(var);
1347 return get_full_storage_path(val);
1348 }
1349
1350 char vsftpd_conf[] = "/etc/vsftpd.conf";
1351 char vsftpd_users[] = "/etc/vsftpd.users";
1352 char vsftpd_passwd[] = "/etc/vsftpd.passwd";
1353
1354 /* VSFTPD code mostly stolen from Oleg's ASUS Custom Firmware GPL sources */
1355
1356 static void start_ftpd(void)
1357 {
1358 char tmp[256];
1359 FILE *fp, *f;
1360 char *buf;
1361 char *p, *q;
1362 char *user, *pass, *rights, *root_dir;
1363 int i;
1364
1365 if (getpid() != 1) {
1366 start_service("ftpd");
1367 return;
1368 }
1369
1370 if (!nvram_get_int("ftp_enable")) return;
1371
1372 mkdir_if_none(vsftpd_users);
1373 mkdir_if_none("/var/run/vsftpd");
1374
1375 if ((fp = fopen(vsftpd_conf, "w")) == NULL)
1376 return;
1377
1378 if (nvram_get_int("ftp_super"))
1379 {
1380 /* rights */
1381 sprintf(tmp, "%s/%s", vsftpd_users, "admin");
1382 if ((f = fopen(tmp, "w")))
1383 {
1384 fprintf(f,
1385 "dirlist_enable=yes\n"
1386 "write_enable=yes\n"
1387 "download_enable=yes\n");
1388 fclose(f);
1389 }
1390 }
1391
1392 #ifdef TCONFIG_SAMBASRV
1393 if (nvram_match("smbd_cset", "utf8"))
1394 fprintf(fp, "utf8=yes\n");
1395 #endif
1396
1397 if (nvram_invmatch("ftp_anonymous", "0"))
1398 {
1399 fprintf(fp,
1400 "anon_allow_writable_root=yes\n"
1401 "anon_world_readable_only=no\n"
1402 "anon_umask=022\n");
1403
1404 /* rights */
1405 sprintf(tmp, "%s/ftp", vsftpd_users);
1406 if ((f = fopen(tmp, "w")))
1407 {
1408 if (nvram_match("ftp_dirlist", "0"))
1409 fprintf(f, "dirlist_enable=yes\n");
1410 if (nvram_match("ftp_anonymous", "1") ||
1411 nvram_match("ftp_anonymous", "3"))
1412 fprintf(f, "write_enable=yes\n");
1413 if (nvram_match("ftp_anonymous", "1") ||
1414 nvram_match("ftp_anonymous", "2"))
1415 fprintf(f, "download_enable=yes\n");
1416 fclose(f);
1417 }
1418 if (nvram_match("ftp_anonymous", "1") ||
1419 nvram_match("ftp_anonymous", "3"))
1420 fprintf(fp,
1421 "anon_upload_enable=yes\n"
1422 "anon_mkdir_write_enable=yes\n"
1423 "anon_other_write_enable=yes\n");
1424 } else {
1425 fprintf(fp, "anonymous_enable=no\n");
1426 }
1427
1428 fprintf(fp,
1429 "dirmessage_enable=yes\n"
1430 "download_enable=no\n"
1431 "dirlist_enable=no\n"
1432 "hide_ids=yes\n"
1433 "syslog_enable=yes\n"
1434 "local_enable=yes\n"
1435 "local_umask=022\n"
1436 "chmod_enable=no\n"
1437 "chroot_local_user=yes\n"
1438 "check_shell=no\n"
1439 "log_ftp_protocol=%s\n"
1440 "user_config_dir=%s\n"
1441 "passwd_file=%s\n"
1442 "listen%s=yes\n"
1443 "listen_port=%s\n"
1444 "background=yes\n"
1445 "isolate=no\n"
1446 "max_clients=%d\n"
1447 "max_per_ip=%d\n"
1448 "max_login_fails=1\n"
1449 "idle_session_timeout=%s\n"
1450 "use_sendfile=no\n"
1451 "anon_max_rate=%d\n"
1452 "local_max_rate=%d\n"
1453 "%s\n",
1454 nvram_get_int("log_ftp") ? "yes" : "no",
1455 vsftpd_users, vsftpd_passwd,
1456 #ifdef TCONFIG_IPV6
1457 ipv6_enabled() ? "_ipv6" : "",
1458 #else
1459 "",
1460 #endif
1461 nvram_get("ftp_port") ? : "21",
1462 nvram_get_int("ftp_max"),
1463 nvram_get_int("ftp_ipmax"),
1464 nvram_get("ftp_staytimeout") ? : "300",
1465 nvram_get_int("ftp_anonrate") * 1024,
1466 nvram_get_int("ftp_rate") * 1024,
1467 nvram_safe_get("ftp_custom"));
1468
1469 fclose(fp);
1470
1471 /* prepare passwd file and default users */
1472 if ((fp = fopen(vsftpd_passwd, "w")) == NULL)
1473 return;
1474
1475 if (((user = nvram_get("http_username")) == NULL) || (*user == 0)) user = "admin";
1476 if (((pass = nvram_get("http_passwd")) == NULL) || (*pass == 0)) pass = "admin";
1477
1478 fprintf(fp, /* anonymous, admin, nobody */
1479 "ftp:x:0:0:ftp:%s:/sbin/nologin\n"
1480 "%s:%s:0:0:root:/:/sbin/nologin\n"
1481 "nobody:x:65534:65534:nobody:%s/:/sbin/nologin\n",
1482 nvram_storage_path("ftp_anonroot"), user,
1483 nvram_get_int("ftp_super") ? crypt(pass, "$1$") : "x",
1484 MOUNT_ROOT);
1485
1486 if ((buf = strdup(nvram_safe_get("ftp_users"))) != NULL)
1487 {
1488 /*
1489 username<password<rights[<root_dir]
1490 rights:
1491 Read/Write
1492 Read Only
1493 View Only
1494 Private
1495 */
1496 p = buf;
1497 while ((q = strsep(&p, ">")) != NULL) {
1498 i = vstrsep(q, "<", &user, &pass, &rights, &root_dir);
1499 if (i < 3 || i > 4) continue;
1500 if (!user || !pass) continue;
1501
1502 if (i == 3 || !root_dir || !(*root_dir))
1503 root_dir = nvram_safe_get("ftp_pubroot");
1504
1505 /* directory */
1506 if (strncmp(rights, "Private", 7) == 0)
1507 {
1508 sprintf(tmp, "%s/%s", nvram_storage_path("ftp_pvtroot"), user);
1509 mkdir_if_none(tmp);
1510 }
1511 else
1512 sprintf(tmp, "%s", get_full_storage_path(root_dir));
1513
1514 fprintf(fp, "%s:%s:0:0:%s:%s:/sbin/nologin\n",
1515 user, crypt(pass, "$1$"), user, tmp);
1516
1517 /* rights */
1518 sprintf(tmp, "%s/%s", vsftpd_users, user);
1519 if ((f = fopen(tmp, "w")))
1520 {
1521 tmp[0] = 0;
1522 if (nvram_invmatch("ftp_dirlist", "1"))
1523 strcat(tmp, "dirlist_enable=yes\n");
1524 if (strstr(rights, "Read") || !strcmp(rights, "Private"))
1525 strcat(tmp, "download_enable=yes\n");
1526 if (strstr(rights, "Write") || !strncmp(rights, "Private", 7))
1527 strcat(tmp, "write_enable=yes\n");
1528
1529 fputs(tmp, f);
1530 fclose(f);
1531 }
1532 }
1533 free(buf);
1534 }
1535
1536 fclose(fp);
1537 killall("vsftpd", SIGHUP);
1538
1539 /* start vsftpd if it's not already running */
1540 if (pidof("vsftpd") <= 0)
1541 xstart("vsftpd");
1542 }
1543
1544 static void stop_ftpd(void)
1545 {
1546 if (getpid() != 1) {
1547 stop_service("ftpd");
1548 return;
1549 }
1550
1551 killall_tk("vsftpd");
1552 unlink(vsftpd_passwd);
1553 unlink(vsftpd_conf);
1554 eval("rm", "-rf", vsftpd_users);
1555 }
1556 #endif // TCONFIG_FTP
1557
1558 // -----------------------------------------------------------------------------
1559
1560 // !!TB - Samba
1561
1562 #ifdef TCONFIG_SAMBASRV
1563 static void kill_samba(int sig)
1564 {
1565 if (sig == SIGTERM) {
1566 killall_tk("smbd");
1567 killall_tk("nmbd");
1568 }
1569 else {
1570 killall("smbd", sig);
1571 killall("nmbd", sig);
1572 }
1573 }
1574
1575 static void start_samba(void)
1576 {
1577 FILE *fp;
1578 DIR *dir = NULL;
1579 struct dirent *dp;
1580 char nlsmod[15];
1581 int mode;
1582 char *nv;
1583
1584 if (getpid() != 1) {
1585 start_service("smbd");
1586 return;
1587 }
1588
1589 mode = nvram_get_int("smbd_enable");
1590 if (!mode || !nvram_invmatch("lan_hostname", ""))
1591 return;
1592
1593 if ((fp = fopen("/etc/smb.conf", "w")) == NULL)
1594 return;
1595
1596 fprintf(fp, "[global]\n"
1597 " interfaces = %s\n"
1598 " bind interfaces only = yes\n"
1599 " workgroup = %s\n"
1600 " netbios name = %s\n"
1601 " server string = %s\n"
1602 " guest account = nobody\n"
1603 " security = user\n"
1604 " %s\n"
1605 " guest ok = %s\n"
1606 " guest only = no\n"
1607 " browseable = yes\n"
1608 " syslog only = yes\n"
1609 " timestamp logs = no\n"
1610 " syslog = 1\n"
1611 " encrypt passwords = yes\n"
1612 " preserve case = yes\n"
1613 " short preserve case = yes\n",
1614 nvram_safe_get("lan_ifname"),
1615 nvram_get("smbd_wgroup") ? : "WORKGROUP",
1616 nvram_safe_get("lan_hostname"),
1617 nvram_get("router_name") ? : "Tomato",
1618 mode == 2 ? "" : "map to guest = Bad User",
1619 mode == 2 ? "no" : "yes" // guest ok
1620 );
1621
1622 if (nvram_get_int("smbd_wins")) {
1623 nv = nvram_safe_get("wan_wins");
1624 if ((*nv == 0) || (strcmp(nv, "0.0.0.0") == 0)) {
1625 fprintf(fp, " wins support = yes\n");
1626 }
1627 }
1628
1629 if (nvram_get_int("smbd_master")) {
1630 fprintf(fp,
1631 " domain master = yes\n"
1632 " local master = yes\n"
1633 " preferred master = yes\n"
1634 " os level = 65\n");
1635 }
1636
1637 nv = nvram_safe_get("smbd_cpage");
1638 if (*nv) {
1639 #ifndef TCONFIG_SAMBA3
1640 fprintf(fp, " client code page = %s\n", nv);
1641 #endif
1642 sprintf(nlsmod, "nls_cp%s", nv);
1643
1644 nv = nvram_safe_get("smbd_nlsmod");
1645 if ((*nv) && (strcmp(nv, nlsmod) != 0))
1646 modprobe_r(nv);
1647
1648 modprobe(nlsmod);
1649 nvram_set("smbd_nlsmod", nlsmod);
1650 }
1651
1652 #ifndef TCONFIG_SAMBA3
1653 if (nvram_match("smbd_cset", "utf8"))
1654 fprintf(fp, " coding system = utf8\n");
1655 else if (nvram_invmatch("smbd_cset", ""))
1656 fprintf(fp, " character set = %s\n", nvram_safe_get("smbd_cset"));
1657 #endif
1658
1659 nv = nvram_safe_get("smbd_custom");
1660 /* add socket options unless overriden by the user */
1661 if (strstr(nv, "socket options") == NULL) {
1662 fprintf(fp, " socket options = TCP_NODELAY SO_KEEPALIVE IPTOS_LOWDELAY SO_RCVBUF=65536 SO_SNDBUF=65536\n");
1663 }
1664 fprintf(fp, "%s\n\n", nv);
1665
1666 /* configure shares */
1667
1668 char *buf;
1669 char *p, *q;
1670 char *name, *path, *comment, *writeable, *hidden;
1671 int cnt = 0;
1672
1673 if ((buf = strdup(nvram_safe_get("smbd_shares"))) != NULL)
1674 {
1675 /* sharename<path<comment<writeable[0|1]<hidden[0|1] */
1676
1677 p = buf;
1678 while ((q = strsep(&p, ">")) != NULL) {
1679 if (vstrsep(q, "<", &name, &path, &comment, &writeable, &hidden) != 5) continue;
1680 if (!path || !name) continue;
1681
1682 /* share name */
1683 fprintf(fp, "\n[%s]\n", name);
1684
1685 /* path */
1686 fprintf(fp, " path = %s\n", path);
1687
1688 /* access level */
1689 if (!strcmp(writeable, "1"))
1690 fprintf(fp, " writable = yes\n delete readonly = yes\n force user = root\n");
1691 if (!strcmp(hidden, "1"))
1692 fprintf(fp, " browseable = no\n");
1693
1694 /* comment */
1695 if (comment)
1696 fprintf(fp, " comment = %s\n", comment);
1697
1698 cnt++;
1699 }
1700 free(buf);
1701 }
1702
1703 /* Share every mountpoint below MOUNT_ROOT */
1704 if (nvram_get_int("smbd_autoshare") && (dir = opendir(MOUNT_ROOT))) {
1705 while ((dp = readdir(dir))) {
1706 if (strcmp(dp->d_name, ".") && strcmp(dp->d_name, "..")) {
1707
1708 /* Only if is a directory and is mounted */
1709 if (!dir_is_mountpoint(MOUNT_ROOT, dp->d_name))
1710 continue;
1711
1712 /* smbd_autoshare: 0 - disable, 1 - read-only, 2 - writable, 3 - hidden writable */
1713 fprintf(fp, "\n[%s]\n path = %s/%s\n comment = %s\n",
1714 dp->d_name, MOUNT_ROOT, dp->d_name, dp->d_name);
1715 if (nvram_match("smbd_autoshare", "3")) // Hidden
1716 fprintf(fp, "\n[%s$]\n path = %s/%s\n browseable = no\n",
1717 dp->d_name, MOUNT_ROOT, dp->d_name);
1718 if (nvram_match("smbd_autoshare", "2") || nvram_match("smbd_autoshare", "3")) // RW
1719 fprintf(fp, " writable = yes\n delete readonly = yes\n force user = root\n");
1720
1721 cnt++;
1722 }
1723 }
1724 }
1725 if (dir) closedir(dir);
1726
1727 if (cnt == 0) {
1728 /* by default share MOUNT_ROOT as read-only */
1729 fprintf(fp, "\n[share]\n"
1730 " path = %s\n"
1731 " writable = no\n",
1732 MOUNT_ROOT);
1733 }
1734
1735 fclose(fp);
1736
1737 mkdir_if_none("/var/run/samba");
1738 mkdir_if_none("/etc/samba");
1739
1740 /* write smbpasswd */
1741 #ifdef TCONFIG_SAMBA3
1742 eval("smbpasswd", "nobody", "\"\"");
1743 #else
1744 eval("smbpasswd", "-a", "nobody", "\"\"");
1745 #endif
1746 if (mode == 2) {
1747 char *smbd_user;
1748 if (((smbd_user = nvram_get("smbd_user")) == NULL) || (*smbd_user == 0) || !strcmp(smbd_user, "root"))
1749 smbd_user = "nas";
1750 #ifdef TCONFIG_SAMBA3
1751 eval("smbpasswd", smbd_user, nvram_safe_get("smbd_passwd"));
1752 #else
1753 eval("smbpasswd", "-a", smbd_user, nvram_safe_get("smbd_passwd"));
1754 #endif
1755 }
1756
1757 kill_samba(SIGHUP);
1758 int ret1 = 0, ret2 = 0;
1759 /* start samba if it's not already running */
1760 if (pidof("nmbd") <= 0)
1761 ret1 = xstart("nmbd", "-D");
1762 if (pidof("smbd") <= 0)
1763 ret2 = xstart("smbd", "-D");
1764
1765 if (ret1 || ret2) kill_samba(SIGTERM);
1766 }
1767
1768 static void stop_samba(void)
1769 {
1770 if (getpid() != 1) {
1771 stop_service("smbd");
1772 return;
1773 }
1774
1775 kill_samba(SIGTERM);
1776 /* clean up */
1777 unlink("/var/log/smb");
1778 unlink("/var/log/nmb");
1779 eval("rm", "-rf", "/var/run/samba");
1780 }
1781 #endif // TCONFIG_SAMBASRV
1782
1783 #ifdef TCONFIG_MEDIA_SERVER
1784 #define MEDIA_SERVER_APP "minidlna"
1785
1786 static void start_media_server(void)
1787 {
1788 FILE *f;
1789 int port, pid, https;
1790 char *dbdir;
1791 char *argv[] = { MEDIA_SERVER_APP, "-f", "/etc/"MEDIA_SERVER_APP".conf", "-R", NULL };
1792 static int once = 1;
1793
1794 if (getpid() != 1) {
1795 start_service("media");
1796 return;
1797 }
1798
1799 if (nvram_get_int("ms_sas") == 0)
1800 once = 0;
1801
1802 if (nvram_get_int("ms_enable") != 0) {
1803 if ((!once) && (nvram_get_int("ms_rescan") == 0)) {
1804 // no forced rescan
1805 argv[3] = NULL;
1806 }
1807 nvram_unset("ms_rescan");
1808
1809 if (f_exists("/etc/"MEDIA_SERVER_APP".alt")) {
1810 argv[2] = "/etc/"MEDIA_SERVER_APP".alt";
1811 }
1812 else {
1813 if ((f = fopen(argv[2], "w")) != NULL) {
1814 port = nvram_get_int("ms_port");
1815 https = nvram_get_int("https_enable");
1816 dbdir = nvram_safe_get("ms_dbdir");
1817 if (!(*dbdir)) dbdir = NULL;
1818 mkdir_if_none(dbdir ? : "/var/run/"MEDIA_SERVER_APP);
1819
1820 fprintf(f,
1821 "network_interface=%s\n"
1822 "port=%d\n"
1823 "friendly_name=%s\n"
1824 "db_dir=%s/.db\n"
1825 "enable_tivo=%s\n"
1826 "strict_dlna=%s\n"
1827 "presentation_url=http%s://%s:%s/nas-media.asp\n"
1828 "inotify=yes\n"
1829 "notify_interval=600\n"
1830 "album_art_names=Cover.jpg/cover.jpg/AlbumArtSmall.jpg/albumartsmall.jpg/AlbumArt.jpg/albumart.jpg/Album.jpg/album.jpg/Folder.jpg/folder.jpg/Thumb.jpg/thumb.jpg\n"
1831 "\n",
1832 nvram_safe_get("lan_ifname"),
1833 (port < 0) || (port >= 0xffff) ? 0 : port,
1834 nvram_get("router_name") ? : "Tomato",
1835 dbdir ? : "/var/run/"MEDIA_SERVER_APP,
1836 nvram_get_int("ms_tivo") ? "yes" : "no",
1837 nvram_get_int("ms_stdlna") ? "yes" : "no",
1838 https ? "s" : "", nvram_safe_get("lan_ipaddr"), nvram_safe_get(https ? "https_lanport" : "http_lanport")
1839 );
1840
1841 // media directories
1842 char *buf, *p, *q;
1843 char *path, *restrict;
1844
1845 if ((buf = strdup(nvram_safe_get("ms_dirs"))) != NULL) {
1846 /* path<restrict[A|V|P|] */
1847
1848 p = buf;
1849 while ((q = strsep(&p, ">")) != NULL) {
1850 if (vstrsep(q, "<", &path, &restrict) < 1 || !path || !(*path))
1851 continue;
1852 fprintf(f, "media_dir=%s%s%s\n",
1853 restrict ? : "", (restrict && *restrict) ? "," : "", path);
1854 }
1855 free(buf);
1856 }
1857
1858 fclose(f);
1859 }
1860 }
1861
1862 /* start media server if it's not already running */
1863 if (pidof(MEDIA_SERVER_APP) <= 0) {
1864 if ((_eval(argv, NULL, 0, &pid) == 0) && (once)) {
1865 /* If we started the media server successfully, wait 1 sec
1866 * to let it die if it can't open the database file.
1867 * If it's still alive after that, assume it's running and
1868 * disable forced once-after-reboot rescan.
1869 */
1870 sleep(1);
1871 if (pidof(MEDIA_SERVER_APP) > 0)
1872 once = 0;
1873 }
1874 }
1875 }
1876 }
1877
1878 static void stop_media_server(void)
1879 {
1880 if (getpid() != 1) {
1881 stop_service("media");
1882 return;
1883 }
1884
1885 killall_tk(MEDIA_SERVER_APP);
1886 }
1887 #endif // TCONFIG_MEDIA_SERVER
1888
1889 #ifdef TCONFIG_USB
1890 static void start_nas_services(void)
1891 {
1892 if (getpid() != 1) {
1893 start_service("usbapps");
1894 return;
1895 }
1896
1897 #ifdef TCONFIG_SAMBASRV
1898 start_samba();
1899 #endif
1900 #ifdef TCONFIG_FTP
1901 start_ftpd();
1902 #endif
1903 #ifdef TCONFIG_MEDIA_SERVER
1904 start_media_server();
1905 #endif
1906 }
1907
1908 static void stop_nas_services(void)
1909 {
1910 if (getpid() != 1) {
1911 stop_service("usbapps");
1912 return;
1913 }
1914
1915 #ifdef TCONFIG_MEDIA_SERVER
1916 stop_media_server();
1917 #endif
1918 #ifdef TCONFIG_FTP
1919 stop_ftpd();
1920 #endif
1921 #ifdef TCONFIG_SAMBASRV
1922 stop_samba();
1923 #endif
1924 }
1925
1926 void restart_nas_services(int stop, int start)
1927 {
1928 int fd = file_lock("usb");
1929 /* restart all NAS applications */
1930 if (stop)
1931 stop_nas_services();
1932 if (start)
1933 start_nas_services();
1934 file_unlock(fd);
1935 }
1936 #endif // TCONFIG_USB
1937
1938 // -----------------------------------------------------------------------------
1939
1940 /* -1 = Don't check for this program, it is not expected to be running.
1941 * Other = This program has been started and should be kept running. If no
1942 * process with the name is running, call func to restart it.
1943 * Note: At startup, dnsmasq forks a short-lived child which forks a
1944 * long-lived (grand)child. The parents terminate.
1945 * Many daemons use this technique.
1946 */
1947 static void _check(pid_t pid, const char *name, void (*func)(void))
1948 {
1949 if (pid == -1) return;
1950
1951 if (pidof(name) > 0) return;
1952
1953 syslog(LOG_DEBUG, "%s terminated unexpectedly, restarting.\n", name);
1954 func();
1955
1956 // Force recheck in 500 msec
1957 setitimer(ITIMER_REAL, &pop_tv, NULL);
1958 }
1959
1960 void check_services(void)
1961 {
1962 TRACE_PT("keep alive\n");
1963
1964 // Periodically reap any zombies
1965 setitimer(ITIMER_REAL, &zombie_tv, NULL);
1966
1967 #ifdef LINUX26
1968 _check(pid_hotplug2, "hotplug2", start_hotplug2);
1969 #endif
1970 _check(pid_dnsmasq, "dnsmasq", start_dnsmasq);
1971 _check(pid_crond, "crond", start_cron);
1972 _check(pid_igmp, "igmpproxy", start_igmp_proxy);
1973 #ifdef TCONFIG_IPV6
1974 _check(pid_radvd, "radvd", start_radvd);
1975 #endif
1976
1977 // #ifdef TCONFIG_NOCAT
1978 // if (nvram_get_int("NC_enable"))
1979 // _check(&pid_splashd, "splashd", start_splashd);
1980 // #endif
1981
1982 }
1983
1984 // -----------------------------------------------------------------------------
1985
1986 void start_services(void)
1987 {
1988 static int once = 1;
1989
1990 if (once) {
1991 once = 0;
1992
1993 if (nvram_get_int("telnetd_eas")) start_telnetd();
1994 if (nvram_get_int("sshd_eas")) start_sshd();
1995 }
1996
1997 // start_syslog();
1998 start_nas();
1999 start_zebra();
2000 start_dnsmasq();
2001 start_cifs();
2002 start_httpd();
2003 start_cron();
2004 // start_upnp();
2005 start_rstats(0);
2006 start_cstats(0);
2007 start_sched();
2008 #ifdef TCONFIG_IPV6
2009 /* note: starting radvd here might be too early in case of
2010 * DHCPv6 or 6to4 because we won't have received a prefix and
2011 * so it will disable advertisements. To restart them, we have
2012 * to send radvd a SIGHUP, or restart it.
2013 */
2014 start_radvd();
2015 #endif
2016 restart_nas_services(1, 1); // !!TB - Samba, FTP and Media Server
2017
2018 #ifdef TCONFIG_SNMP
2019 start_snmp();
2020 #endif
2021
2022 }
2023
2024 void stop_services(void)
2025 {
2026 clear_resolv();
2027 // restart_nas_services(1, 0); // stop Samba, FTP and Media Server
2028
2029
2030
2031 #ifdef TCONFIG_SNMP
2032 stop_snmp();
2033 #endif
2034
2035
2036 #ifdef TCONFIG_IPV6
2037 stop_radvd();
2038 #endif
2039 stop_sched();
2040 stop_rstats();
2041 stop_cstats();
2042 // stop_upnp();
2043 stop_cron();
2044 stop_httpd();
2045 stop_cifs();
2046 stop_dnsmasq();
2047 stop_zebra();
2048 stop_nas();
2049 // stop_syslog();
2050 }
2051
2052 // -----------------------------------------------------------------------------
2053
2054 /* nvram "action_service" is: "service-action[-modifier]"
2055 * action is something like "stop" or "start" or "restart"
2056 * optional modifier is "c" for the "service" command-line command
2057 */
2058 void exec_service(void)
2059 {
2060 const int A_START = 1;
2061 const int A_STOP = 2;
2062 const int A_RESTART = 1|2;
2063 char buffer[128];
2064 char *service;
2065 char *act;
2066 char *next;
2067 char *modifier;
2068 int action, user;
2069 int i;
2070
2071 strlcpy(buffer, nvram_safe_get("action_service"), sizeof(buffer));
2072 next = buffer;
2073
2074 TOP:
2075 act = strsep(&next, ",");
2076 service = strsep(&act, "-");
2077 if (act == NULL) {
2078 next = NULL;
2079 goto CLEAR;
2080 }
2081 modifier = act;
2082 strsep(&modifier, "-");
2083
2084 TRACE_PT("service=%s action=%s modifier=%s\n", service, act, modifier ? : "");
2085
2086 if (strcmp(act, "start") == 0) action = A_START;
2087 else if (strcmp(act, "stop") == 0) action = A_STOP;
2088 else if (strcmp(act, "restart") == 0) action = A_RESTART;
2089 else action = 0;
2090 user = (modifier != NULL && *modifier == 'c');
2091
2092 if (strcmp(service, "dhcpc") == 0) {
2093 if (action & A_STOP) stop_dhcpc();
2094 if (action & A_START) start_dhcpc();
2095 goto CLEAR;
2096 }
2097
2098 if ((strcmp(service, "dhcpd") == 0) || (strcmp(service, "dns") == 0) || (strcmp(service, "dnsmasq") == 0)) {
2099 if (action & A_STOP) stop_dnsmasq();
2100 if (action & A_START) {
2101 dns_to_resolv();
2102 start_dnsmasq();
2103 }
2104 goto CLEAR;
2105 }
2106
2107 if (strcmp(service, "firewall") == 0) {
2108 if (action & A_STOP) {
2109 stop_firewall();
2110 stop_igmp_proxy();
2111 }
2112 if (action & A_START) {
2113 start_firewall();
2114 start_igmp_proxy();
2115 }
2116 goto CLEAR;
2117 }
2118
2119 if (strcmp(service, "bwclimon") == 0) {
2120 if (action & A_STOP) stop_bwclimon();
2121 if (action & A_START) start_bwclimon();
2122 goto CLEAR;
2123 }
2124
2125 if (strcmp(service, "account") == 0) {
2126 if (action & A_STOP) stop_account();
2127 if (action & A_START) start_account();
2128 goto CLEAR;
2129 }
2130
2131 if (strcmp(service, "arpbind") == 0) {
2132 if (action & A_STOP) stop_arpbind();
2133 if (action & A_START) start_arpbind();
2134 goto CLEAR;
2135 }
2136
2137 if (strcmp(service, "restrict") == 0) {
2138 if (action & A_STOP) {
2139 stop_firewall();
2140 }
2141 if (action & A_START) {
2142 i = nvram_get_int("rrules_radio"); // -1 = not used, 0 = enabled by rule, 1 = disabled by rule
2143
2144 start_firewall();
2145
2146 // if radio was disabled by access restriction, but no rule is handling it now, enable it
2147 if (i == 1) {
2148 if (nvram_get_int("rrules_radio") < 0) {
2149 eval("radio", "on");
2150 }
2151 }
2152 }
2153 goto CLEAR;
2154 }
2155
2156 if (strcmp(service, "qos") == 0) {
2157 if (action & A_STOP) {
2158 stop_qos();
2159 }
2160 stop_firewall(); start_firewall(); // always restarted
2161 if (action & A_START) {
2162 start_qos();
2163 if (nvram_match("qos_reset", "1")) f_write_string("/proc/net/clear_marks", "1", 0, 0);
2164 }
2165 goto CLEAR;
2166 }
2167
2168 if (strcmp(service, "qoslimit") == 0) {
2169 if (action & A_STOP) {
2170 stop_qoslimit();
2171 }
2172 stop_firewall(); start_firewall(); // always restarted
2173 if (action & A_START) {
2174 start_qoslimit();
2175 }
2176 goto CLEAR;
2177 }
2178
2179 if (strcmp(service, "arpbind") == 0) {
2180 if (action & A_STOP) stop_arpbind();
2181 if (action & A_START) stop_arpbind();
2182 goto CLEAR;
2183 }
2184
2185 if (strcmp(service, "upnp") == 0) {
2186 if (action & A_STOP) {
2187 stop_upnp();
2188 }
2189 stop_firewall(); start_firewall(); // always restarted
2190 if (action & A_START) {
2191 start_upnp();
2192 }
2193 goto CLEAR;
2194 }
2195
2196 if (strcmp(service, "telnetd") == 0) {
2197 if (action & A_STOP) stop_telnetd();
2198 if (action & A_START) start_telnetd();
2199 goto CLEAR;
2200 }
2201
2202 if (strcmp(service, "sshd") == 0) {
2203 if (action & A_STOP) stop_sshd();
2204 if (action & A_START) start_sshd();
2205 goto CLEAR;
2206 }
2207
2208 if (strcmp(service, "httpd") == 0) {
2209 if (action & A_STOP) stop_httpd();
2210 if (action & A_START) start_httpd();
2211 goto CLEAR;
2212 }
2213
2214 #ifdef TCONFIG_IPV6
2215 if (strcmp(service, "ipv6") == 0) {
2216 if (action & A_STOP) {
2217 stop_radvd();
2218 stop_ipv6();
2219 }
2220 if (action & A_START) {
2221 start_ipv6();
2222 start_radvd();
2223 }
2224 goto CLEAR;
2225 }
2226
2227 if (strcmp(service, "radvd") == 0) {
2228 if (action & A_STOP) {
2229 stop_radvd();
2230 }
2231 if (action & A_START) {
2232 start_radvd();
2233 }
2234 goto CLEAR;
2235 }
2236
2237 if (strncmp(service, "dhcp6", 5) == 0) {
2238 if (action & A_STOP) {
2239 stop_dhcp6c();
2240 }
2241 if (action & A_START) {
2242 start_dhcp6c();
2243 }
2244 goto CLEAR;
2245 }
2246 #endif
2247
2248 if (strcmp(service, "admin") == 0) {
2249 if (action & A_STOP) {
2250 stop_sshd();
2251 stop_telnetd();
2252 stop_httpd();
2253 }
2254 stop_firewall(); start_firewall(); // always restarted
2255 if (action & A_START) {
2256 start_httpd();
2257 create_passwd();
2258 if (nvram_match("telnetd_eas", "1")) start_telnetd();
2259 if (nvram_match("sshd_eas", "1")) start_sshd();
2260 }
2261 goto CLEAR;
2262 }
2263
2264 if (strcmp(service, "ddns") == 0) {
2265 if (action & A_STOP) stop_ddns();
2266 if (action & A_START) start_ddns();
2267 goto CLEAR;
2268 }
2269
2270 if (strcmp(service, "ntpc") == 0) {
2271 if (action & A_STOP) stop_ntpc();
2272 if (action & A_START) start_ntpc();
2273 goto CLEAR;
2274 }
2275
2276 if (strcmp(service, "logging") == 0) {
2277 if (action & A_STOP) {
2278 stop_syslog();
2279 }
2280 if (action & A_START) {
2281 start_syslog();
2282 }
2283 if (!user) {
2284 // always restarted except from "service" command
2285 stop_cron(); start_cron();
2286 stop_firewall(); start_firewall();
2287 }
2288 goto CLEAR;
2289 }
2290
2291 if (strcmp(service, "crond") == 0) {
2292 if (action & A_STOP) {
2293 stop_cron();
2294 }
2295 if (action & A_START) {
2296 start_cron();
2297 }
2298 goto CLEAR;
2299 }
2300
2301 #ifdef LINUX26
2302 if (strncmp(service, "hotplug", 7) == 0) {
2303 if (action & A_STOP) {
2304 stop_hotplug2();
2305 }
2306 if (action & A_START) {
2307 start_hotplug2(1);
2308 }
2309 goto CLEAR;
2310 }
2311 #endif
2312
2313 if (strcmp(service, "upgrade") == 0) {
2314 if (action & A_START) {
2315 #if TOMATO_SL
2316 stop_usbevent();
2317 stop_smbd();
2318 #endif
2319 restart_nas_services(1, 0); // stop Samba, FTP and Media Server
2320 stop_jffs2();
2321 // stop_cifs();
2322 stop_zebra();
2323 stop_cron();
2324 stop_ntpc();
2325 stop_upnp();
2326 // stop_dhcpc();
2327 killall("rstats", SIGTERM);
2328 killall("cstats", SIGTERM);
2329 killall("buttons", SIGTERM);
2330 stop_syslog();
2331 remove_storage_main(1); // !!TB - USB Support
2332 stop_usb(); // !!TB - USB Support
2333 }
2334 goto CLEAR;
2335 }
2336
2337 #ifdef TCONFIG_CIFS
2338 if (strcmp(service, "cifs") == 0) {
2339 if (action & A_STOP) stop_cifs();
2340 if (action & A_START) start_cifs();
2341 goto CLEAR;
2342 }
2343 #endif
2344
2345 #ifdef TCONFIG_JFFS2
2346 if (strncmp(service, "jffs", 4) == 0) {
2347 if (action & A_STOP) stop_jffs2();
2348 if (action & A_START) start_jffs2();
2349 goto CLEAR;
2350 }
2351 #endif
2352
2353 if (strcmp(service, "zebra") == 0) {
2354 if (action & A_STOP) stop_zebra();
2355 if (action & A_START) start_zebra();
2356 goto CLEAR;
2357 }
2358
2359 if (strcmp(service, "routing") == 0) {
2360 if (action & A_STOP) {
2361 stop_zebra();
2362 do_static_routes(0); // remove old '_saved'
2363 eval("brctl", "stp", nvram_safe_get("lan_ifname"), "0");
2364 #ifdef TCONFIG_VLAN
2365 if(strcmp(nvram_safe_get("lan1_ifname"),"")!=0)
2366 eval("brctl", "stp", nvram_safe_get("lan1_ifname"), "0");
2367 if(strcmp(nvram_safe_get("lan2_ifname"),"")!=0)
2368 eval("brctl", "stp", nvram_safe_get("lan2_ifname"), "0");
2369 if(strcmp(nvram_safe_get("lan3_ifname"),"")!=0)
2370 eval("brctl", "stp", nvram_safe_get("lan3_ifname"), "0");
2371 #endif
2372 }
2373 stop_firewall();
2374 start_firewall();
2375 if (action & A_START) {
2376 do_static_routes(1); // add new
2377 start_zebra();
2378 eval("brctl", "stp", nvram_safe_get("lan_ifname"), nvram_safe_get("lan_stp"));
2379 #ifdef TCONFIG_VLAN
2380 if(strcmp(nvram_safe_get("lan1_ifname"),"")!=0)
2381 eval("brctl", "stp", nvram_safe_get("lan1_ifname"), nvram_safe_get("lan1_stp"));
2382 if(strcmp(nvram_safe_get("lan2_ifname"),"")!=0)
2383 eval("brctl", "stp", nvram_safe_get("lan2_ifname"), nvram_safe_get("lan2_stp"));
2384 if(strcmp(nvram_safe_get("lan3_ifname"),"")!=0)
2385 eval("brctl", "stp", nvram_safe_get("lan3_ifname"), nvram_safe_get("lan3_stp"));
2386 #endif
2387 }
2388 goto CLEAR;
2389 }
2390
2391 if (strcmp(service, "ctnf") == 0) {
2392 if (action & A_START) {
2393 setup_conntrack();
2394 stop_firewall();
2395 start_firewall();
2396 }
2397 goto CLEAR;
2398 }
2399
2400 if (strcmp(service, "wan") == 0) {
2401 if (action & A_STOP) {
2402 stop_wan();
2403 }
2404
2405 if (action & A_START) {
2406 rename("/tmp/ppp/log", "/tmp/ppp/log.~");
2407 start_wan(BOOT);
2408 sleep(2);
2409 force_to_dial();
2410 }
2411 goto CLEAR;
2412 }
2413
2414 if (strcmp(service, "net") == 0) {
2415 if (action & A_STOP) {
2416 #ifdef TCONFIG_USB
2417 stop_nas_services();
2418 #endif
2419 #ifdef TCONFIG_IPV6
2420 stop_radvd();
2421 #endif
2422 stop_httpd();
2423 stop_dnsmasq();
2424 stop_nas();
2425 stop_wan();
2426 stop_arpbind();
2427 stop_lan();
2428 stop_vlan();
2429 }
2430 if (action & A_START) {
2431 start_vlan();
2432 start_lan();
2433 start_wan(BOOT);
2434 start_arpbind();
2435 start_nas();
2436 start_dnsmasq();
2437 start_httpd();
2438 #ifdef TCONFIG_IPV6
2439 start_radvd();
2440 #endif
2441 start_wl();
2442 #ifdef TCONFIG_USB
2443 start_nas_services();
2444 #endif
2445 }
2446 goto CLEAR;
2447 }
2448
2449 if (strcmp(service, "nas") == 0) {
2450 if (action & A_STOP) {
2451 stop_nas();
2452 }
2453 if (action & A_START) {
2454 start_nas();
2455 start_wl();
2456 }
2457 goto CLEAR;
2458 }
2459
2460 if (strcmp(service, "rstats") == 0) {
2461 if (action & A_STOP) stop_rstats();
2462 if (action & A_START) start_rstats(0);
2463 goto CLEAR;
2464 }
2465
2466 if (strcmp(service, "rstatsnew") == 0) {
2467 if (action & A_STOP) stop_rstats();
2468 if (action & A_START) start_rstats(1);
2469 goto CLEAR;
2470 }
2471
2472 if (strcmp(service, "cstats") == 0) {
2473 if (action & A_STOP) stop_cstats();
2474 if (action & A_START) start_cstats(0);
2475 goto CLEAR;
2476 }
2477
2478 if (strcmp(service, "cstatsnew") == 0) {
2479 if (action & A_STOP) stop_cstats();
2480 if (action & A_START) start_cstats(1);
2481 goto CLEAR;
2482 }
2483
2484 if (strcmp(service, "sched") == 0) {
2485 if (action & A_STOP) stop_sched();
2486 if (action & A_START) start_sched();
2487 goto CLEAR;
2488 }
2489
2490
2491 #ifdef TCONFIG_SNMP
2492 if (strcmp(service, "snmp") == 0) {
2493 if (action & A_STOP) stop_snmp();
2494 if (action & A_START) start_snmp();
2495 goto CLEAR;
2496 }
2497 #endif
2498
2499
2500 #ifdef TCONFIG_USB
2501 // !!TB - USB Support
2502 if (strcmp(service, "usb") == 0) {
2503 if (action & A_STOP) stop_usb();
2504 if (action & A_START) {
2505 start_usb();
2506 // restart Samba and ftp since they may be killed by stop_usb()
2507 restart_nas_services(0, 1);
2508 // remount all partitions by simulating hotplug event
2509 add_remove_usbhost("-1", 1);
2510 }
2511 goto CLEAR;
2512 }
2513
2514 if (strcmp(service, "usbapps") == 0) {
2515 if (action & A_STOP) stop_nas_services();
2516 if (action & A_START) start_nas_services();
2517 goto CLEAR;
2518 }
2519 #endif
2520
2521 #ifdef TCONFIG_FTP
2522 // !!TB - FTP Server
2523 if (strcmp(service, "ftpd") == 0) {
2524 if (action & A_STOP) stop_ftpd();
2525 setup_conntrack();
2526 stop_firewall();
2527 start_firewall();
2528 if (action & A_START) start_ftpd();
2529 goto CLEAR;
2530 }
2531 #endif
2532
2533 #ifdef TCONFIG_MEDIA_SERVER
2534 if (strcmp(service, "media") == 0 || strcmp(service, "dlna") == 0) {
2535 if (action & A_STOP) stop_media_server();
2536 if (action & A_START) start_media_server();
2537 goto CLEAR;
2538 }
2539 #endif
2540
2541 #ifdef TCONFIG_SAMBASRV
2542 // !!TB - Samba
2543 if (strcmp(service, "samba") == 0 || strcmp(service, "smbd") == 0) {
2544 if (action & A_STOP) stop_samba();
2545 if (action & A_START) {
2546 create_passwd();
2547 stop_dnsmasq();
2548 start_dnsmasq();
2549 start_samba();
2550 }
2551 goto CLEAR;
2552 }
2553 #endif
2554
2555 #ifdef TCONFIG_OPENVPN
2556 if (strncmp(service, "vpnclient", 9) == 0) {
2557 if (action & A_STOP) stop_vpnclient(atoi(&service[9]));
2558 if (action & A_START) start_vpnclient(atoi(&service[9]));
2559 goto CLEAR;
2560 }
2561
2562 if (strncmp(service, "vpnserver", 9) == 0) {
2563 if (action & A_STOP) stop_vpnserver(atoi(&service[9]));
2564 if (action & A_START) start_vpnserver(atoi(&service[9]));
2565 goto CLEAR;
2566 }
2567 #endif
2568
2569 #ifdef TCONFIG_NOCAT
2570 if (strcmp(service, "splashd") == 0) {
2571 if (action & A_STOP) stop_splashd();
2572 if (action & A_START) start_splashd();
2573 goto CLEAR;
2574 }
2575 #endif
2576
2577 CLEAR:
2578 if (next) goto TOP;
2579
2580 // some functions check action_service and must be cleared at end -- zzz
2581 nvram_set("action_service", "");
2582
2583 // Force recheck in 500 msec
2584 setitimer(ITIMER_REAL, &pop_tv, NULL);
2585 }
2586
2587 static void do_service(const char *name, const char *action, int user)
2588 {
2589 int n;
2590 char s[64];
2591
2592 n = 150;
2593 while (!nvram_match("action_service", "")) {
2594 if (user) {
2595 putchar('*');
2596 fflush(stdout);
2597 }
2598 else if (--n < 0) break;
2599 usleep(100 * 1000);
2600 }
2601
2602 snprintf(s, sizeof(s), "%s-%s%s", name, action, (user ? "-c" : ""));
2603 nvram_set("action_service", s);
2604 kill(1, SIGUSR1);
2605
2606 n = 150;
2607 while (nvram_match("action_service", s)) {
2608 if (user) {
2609 putchar('.');
2610 fflush(stdout);
2611 }
2612 else if (--n < 0) {
2613 break;
2614 }
2615 usleep(100 * 1000);
2616 }
2617 }
2618
2619 int service_main(int argc, char *argv[])
2620 {
2621 if (argc != 3) usage_exit(argv[0], "<service> <action>");
2622 do_service(argv[1], argv[2], 1);
2623 printf("\nDone.\n");
2624 return 0;
2625 }
2626
2627 void start_service(const char *name)
2628 {
2629 do_service(name, "start", 0);
2630 }
2631
2632 void stop_service(const char *name)
2633 {
2634 do_service(name, "stop", 0);
2635 }
2636
2637 /*
2638 void restart_service(const char *name)
2639 {
2640 do_service(name, "restart", 0);
2641 }
2642 */
Tomato firmware and modifications.