?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
vsftpd 2.3.5
[tomato.git] / release / src-rt-6.x.4708 / router / rc / services.c
blob0d2aea18bd13c8e14b138c725ee113e5a8bd6f11
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 #ifdef TCONFIG_IPV6
90 char *prefix, *ipv6, *mtu;
91 int do_6to4, do_6rd;
92 int service;
93 #endif
94
95 TRACE_PT("begin\n");
96
97 if (getpid() != 1) {
98 start_service("dnsmasq");
99 return;
100 }
101
102 stop_dnsmasq();
103
104 if (foreach_wif(1, NULL, is_wet)) return;
105
106 if ((f = fopen("/etc/dnsmasq.conf", "w")) == NULL) return;
107
108 router_ip = nvram_safe_get("lan_ipaddr");
109
110 fprintf(f,
111 "pid-file=/var/run/dnsmasq.pid\n");
112 if (((nv = nvram_get("wan_domain")) != NULL) || ((nv = nvram_get("wan_get_domain")) != NULL)) {
113 if (*nv) fprintf(f, "domain=%s\n", nv);
114 }
115
116 // dns
117 const dns_list_t *dns = get_dns(); // this always points to a static buffer
118
119 if (((nv = nvram_get("dns_minport")) != NULL) && (*nv)) n = atoi(nv);
120 else n = 4096;
121 fprintf(f,
122 "resolv-file=%s\n" // the real stuff is here
123 "addn-hosts=%s\n" // directory with additional hosts files
124 "dhcp-hostsfile=%s\n" // directory with dhcp hosts files
125 "expand-hosts\n" // expand hostnames in hosts file
126 "min-port=%u\n", // min port used for random src port
127 dmresolv, dmhosts, dmdhcp, n);
128 do_dns = nvram_match("dhcpd_dmdns", "1");
129
130 // DNS rebinding protection, will discard upstream RFC1918 responses
131 if (nvram_get_int("dns_norebind")) {
132 fprintf(f,
133 "stop-dns-rebind\n"
134 "rebind-localhost-ok\n");
135 // allow RFC1918 responses for server domain
136 switch (get_wan_proto()) {
137 case WP_PPTP:
138 nv = nvram_get("pptp_server_ip");
139 break;
140 case WP_L2TP:
141 nv = nvram_get("l2tp_server_ip");
142 break;
143 default:
144 nv = NULL;
145 break;
146 }
147 if (nv && *nv) fprintf(f, "rebind-domain-ok=%s\n", nv);
148 }
149
150 #ifdef TCONFIG_DNSCRYPT
151 if (nvram_match("dnscrypt_proxy", "1")) {
152 fprintf(f, "server=127.0.0.1#%s\n", nvram_safe_get("dnscrypt_port") );
153 }
154 #endif
155
156 for (n = 0 ; n < dns->count; ++n) {
157 if (dns->dns[n].port != 53) {
158 fprintf(f, "server=%s#%u\n", inet_ntoa(dns->dns[n].addr), dns->dns[n].port);
159 }
160 }
161
162 if (nvram_get_int("dhcpd_static_only")) {
163 fprintf(f, "dhcp-ignore=tag:!known\n");
164 }
165
166 if ((n = nvram_get_int("dnsmasq_q"))) { //process quiet flags
167 if (n & 1) fprintf(f, "quiet-dhcp\n");
168 if (n & 2) fprintf(f, "quiet-dhcp6\n");
169 if (n & 4) fprintf(f, "quiet-ra\n");
170 }
171
172 // dhcp
173 do_dhcpd_hosts=0;
174 char lanN_proto[] = "lanXX_proto";
175 char lanN_ifname[] = "lanXX_ifname";
176 char lanN_ipaddr[] = "lanXX_ipaddr";
177 char lanN_netmask[] = "lanXX_netmask";
178 char dhcpdN_startip[] = "dhcpdXX_startip";
179 char dhcpdN_endip[] = "dhcpdXX_endip";
180 char dhcpN_start[] = "dhcpXX_start";
181 char dhcpN_num[] = "dhcpXX_num";
182 char dhcpN_lease[] = "dhcpXX_lease";
183 char br;
184 for(br=0 ; br<=3 ; br++) {
185 char bridge[2] = "0";
186 if (br!=0)
187 bridge[0]+=br;
188 else
189 strcpy(bridge, "");
190
191 sprintf(lanN_proto, "lan%s_proto", bridge);
192 sprintf(lanN_ifname, "lan%s_ifname", bridge);
193 sprintf(lanN_ipaddr, "lan%s_ipaddr", bridge);
194 do_dhcpd = nvram_match(lanN_proto, "dhcp");
195 if (do_dhcpd) {
196 do_dhcpd_hosts++;
197
198 router_ip = nvram_safe_get(lanN_ipaddr);
199 strlcpy(lan, router_ip, sizeof(lan));
200 if ((p = strrchr(lan, '.')) != NULL) *(p + 1) = 0;
201
202 fprintf(f,
203 "interface=%s\n",
204 nvram_safe_get(lanN_ifname));
205
206 sprintf(dhcpN_lease, "dhcp%s_lease", bridge);
207 dhcp_lease = nvram_get_int(dhcpN_lease);
208
209 if (dhcp_lease <= 0) dhcp_lease = 1440;
210
211 if ((e = nvram_get("dhcpd_slt")) != NULL) n = atoi(e); else n = 0;
212 if (n < 0) strcpy(sdhcp_lease, "infinite");
213 else sprintf(sdhcp_lease, "%dm", (n > 0) ? n : dhcp_lease);
214
215 if (!do_dns) {
216 // if not using dnsmasq for dns
217
218 if ((dns->count == 0) && (nvram_get_int("dhcpd_llndns"))) {
219 // no DNS might be temporary. use a low lease time to force clients to update.
220 dhcp_lease = 2;
221 strcpy(sdhcp_lease, "2m");
222 do_dns = 1;
223 }
224 else {
225 // pass the dns directly
226 buf[0] = 0;
227 for (n = 0 ; n < dns->count; ++n) {
228 if (dns->dns[n].port == 53) { // check: option 6 doesn't seem to support other ports
229 sprintf(buf + strlen(buf), ",%s", inet_ntoa(dns->dns[n].addr));
230 }
231 }
232 fprintf(f, "dhcp-option=tag:%s,6%s\n", nvram_safe_get(lanN_ifname), buf);
233 }
234 }
235
236 sprintf(dhcpdN_startip, "dhcpd%s_startip", bridge);
237 sprintf(dhcpdN_endip, "dhcpd%s_endip", bridge);
238 sprintf(lanN_netmask, "lan%s_netmask", bridge);
239
240 if ((p = nvram_get(dhcpdN_startip)) && (*p) && (e = nvram_get(dhcpdN_endip)) && (*e)) {
241 fprintf(f, "dhcp-range=tag:%s,%s,%s,%s,%dm\n", nvram_safe_get(lanN_ifname), p, e, nvram_safe_get(lanN_netmask), dhcp_lease);
242 }
243 else {
244 // for compatibility
245 sprintf(dhcpN_start, "dhcp%s_start", bridge);
246 sprintf(dhcpN_num, "dhcp%s_num", bridge);
247 sprintf(lanN_netmask, "lan%s_netmask", bridge);
248 dhcp_start = nvram_get_int(dhcpN_start);
249 dhcp_count = nvram_get_int(dhcpN_num);
250 fprintf(f, "dhcp-range=tag:%s,%s%d,%s%d,%s,%dm\n",
251 nvram_safe_get(lanN_ifname), lan, dhcp_start, lan, dhcp_start + dhcp_count - 1, nvram_safe_get(lanN_netmask), dhcp_lease);
252 }
253
254 nv = nvram_safe_get(lanN_ipaddr);
255 if ((nvram_get_int("dhcpd_gwmode") == 1) && (get_wan_proto() == WP_DISABLED)) {
256 p = nvram_safe_get("lan_gateway");
257 if ((*p) && (strcmp(p, "0.0.0.0") != 0)) nv = p;
258 }
259
260 fprintf(f,
261 "dhcp-option=tag:%s,3,%s\n", // gateway
262 nvram_safe_get(lanN_ifname), nv);
263
264 if (((nv = nvram_get("wan_wins")) != NULL) && (*nv) && (strcmp(nv, "0.0.0.0") != 0)) {
265 fprintf(f, "dhcp-option=tag:%s,44,%s\n", nvram_safe_get(lanN_ifname), nv);
266 }
267 #ifdef TCONFIG_SAMBASRV
268 else if (nvram_get_int("smbd_enable") && nvram_invmatch("lan_hostname", "") && nvram_get_int("smbd_wins")) {
269 if ((nv == NULL) || (*nv == 0) || (strcmp(nv, "0.0.0.0") == 0)) {
270 // Samba will serve as a WINS server
271 fprintf(f, "dhcp-option=tag:%s,44,%s\n", nvram_safe_get(lanN_ifname), nvram_safe_get(lanN_ipaddr));
272 }
273 }
274 #endif
275 } else {
276 if (strcmp(nvram_safe_get(lanN_ifname),"")!=0) {
277 fprintf(f, "interface=%s\n", nvram_safe_get(lanN_ifname));
278 // if no dhcp range is set then no dhcp service will be offered so following
279 // line is superflous.
280 // fprintf(f, "no-dhcp-interface=%s\n", nvram_safe_get(lanN_ifname));
281 }
282 }
283 }
284 // write static lease entries & create hosts file
285
286 mkdir_if_none(dmhosts);
287 snprintf(buf, sizeof(buf), "%s/hosts", dmhosts);
288 if ((hf = fopen(buf, "w")) != NULL) {
289 if (((nv = nvram_get("wan_hostname")) != NULL) && (*nv))
290 fprintf(hf, "%s %s\n", router_ip, nv);
291 #ifdef TCONFIG_SAMBASRV
292 else if (((nv = nvram_get("lan_hostname")) != NULL) && (*nv))
293 fprintf(hf, "%s %s\n", router_ip, nv);
294 #endif
295 p = (char *)get_wanip();
296 if ((*p == 0) || strcmp(p, "0.0.0.0") == 0)
297 p = "127.0.0.1";
298 fprintf(hf, "%s wan-ip\n", p);
299 if (nv && (*nv))
300 fprintf(hf, "%s %s-wan\n", p, nv);
301 }
302
303 mkdir_if_none(dmdhcp);
304 snprintf(buf, sizeof(buf), "%s/dhcp-hosts", dmdhcp);
305 df = fopen(buf, "w");
306
307 // PREVIOUS/OLD FORMAT:
308 // 00:aa:bb:cc:dd:ee<123<xxxxxxxxxxxxxxxxxxxxxxxxxx.xyz> = 53 w/ delim
309 // 00:aa:bb:cc:dd:ee<123.123.123.123<xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xyz> = 85 w/ delim
310 // 00:aa:bb:cc:dd:ee,00:aa:bb:cc:dd:ee<123.123.123.123<xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xyz> = 106 w/ delim
311
312 // NEW FORMAT (+static ARP binding after hostname):
313 // 00:aa:bb:cc:dd:ee<123<xxxxxxxxxxxxxxxxxxxxxxxxxx.xyz<a> = 55 w/ delim
314 // 00:aa:bb:cc:dd:ee<123.123.123.123<xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xyz<a> = 87 w/ delim
315 // 00:aa:bb:cc:dd:ee,00:aa:bb:cc:dd:ee<123.123.123.123<xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xyz<a> = 108 w/ delim
316
317 p = nvram_safe_get("dhcpd_static");
318 while ((e = strchr(p, '>')) != NULL) {
319 n = (e - p);
320 if (n > 107) {
321 p = e + 1;
322 continue;
323 }
324
325 strncpy(buf, p, n);
326 buf[n] = 0;
327 p = e + 1;
328
329 if ((e = strchr(buf, '<')) == NULL) continue;
330 *e = 0;
331 mac = buf;
332
333 ip = e + 1;
334 if ((e = strchr(ip, '<')) == NULL) continue;
335 *e = 0;
336 if (strchr(ip, '.') == NULL) {
337 ipn = atoi(ip);
338 if ((ipn <= 0) || (ipn > 255)) continue;
339 sprintf(ipbuf, "%s%d", lan, ipn);
340 ip = ipbuf;
341 }
342 else {
343 if (inet_addr(ip) == INADDR_NONE) continue;
344 }
345
346 name = e + 1;
347
348 if ((e = strchr(name, '<')) != NULL) {
349 *e = 0;
350 }
351
352 if ((hf) && (*name != 0)) {
353 fprintf(hf, "%s %s\n", ip, name);
354 }
355
356 if ((do_dhcpd_hosts > 0) && (*mac != 0) && (strcmp(mac, "00:00:00:00:00:00") != 0)) {
357 if (nvram_get_int("dhcpd_slt") == 0) {
358 fprintf(f, "dhcp-host=%s,%s\n", mac, ip);
359 } else {
360 fprintf(f, "dhcp-host=%s,%s,%s\n", mac, ip, sdhcp_lease);
361 }
362 }
363 }
364
365 if (df) fclose(df);
366 if (hf) fclose(hf);
367
368 n = nvram_get_int("dhcpd_lmax");
369 fprintf(f,
370 "dhcp-lease-max=%d\n",
371 (n > 0) ? n : 255);
372 if (nvram_get_int("dhcpd_auth") >= 0) {
373 fprintf(f, "dhcp-authoritative\n");
374 }
375
376 #ifdef TCONFIG_DNSSEC
377 if (nvram_match("dnssec_enable", "1")) {
378 fprintf(f, "conf-file=/etc/trust-anchors.conf\n"
379 "dnssec\n"
380 "dnssec-no-timecheck\n");
381 }
382 #endif
383
384 #ifdef TCONFIG_DNSCRYPT
385 if (nvram_match("dnscrypt_proxy", "1")) {
386 if (nvram_match("dnscrypt_priority", "1"))
387 fprintf(f, "strict-order\n");
388
389 if (nvram_match("dnscrypt_priority", "2"))
390 fprintf(f, "no-resolv\n");
391 }
392 #endif
393
394 //
395
396 #ifdef TCONFIG_OPENVPN
397 write_vpn_dnsmasq_config(f);
398 #endif
399
400 #ifdef TCONFIG_PPTPD
401 write_pptpd_dnsmasq_config(f);
402 #endif
403
404 #ifdef TCONFIG_IPV6
405 if (ipv6_enabled()) {
406 /*
407 service = get_ipv6_service();
408 do_6to4 = (service == IPV6_ANYCAST_6TO4);
409 do_6rd = (service == IPV6_6RD || service == IPV6_6RD_DHCP);
410 mtu = NULL;
411
412 switch (service) {
413 case IPV6_NATIVE_DHCP:
414 case IPV6_ANYCAST_6TO4:
415 case IPV6_6IN4:
416 case IPV6_6RD:
417 case IPV6_6RD_DHCP:
418 mtu = (nvram_get_int("ipv6_tun_mtu") > 0) ? nvram_safe_get("ipv6_tun_mtu") : "1480";
419 // fall through
420 default:
421 prefix = do_6to4 ? "0:0:0:1::" : nvram_safe_get("ipv6_prefix");
422 break;
423 }
424 if (!(*prefix)) prefix = "::";
425 ipv6 = (char *)ipv6_router_address(NULL);
426
427 fprintf(f, "enable-ra\ndhcp-range=tag:br0,%s, slaac, ra-names, 64\n", prefix);
428 */
429
430 // enable-ra should be enabled in both cases
431 if (nvram_get_int("ipv6_radvd") || nvram_get_int("ipv6_dhcpd"))
432 fprintf(f,"enable-ra\n");
433
434 // Only SLAAC and NO DHCPv6
435 if (nvram_get_int("ipv6_radvd") && !nvram_get_int("ipv6_dhcpd"))
436 fprintf(f,"dhcp-range=::, constructor:br*, ra-names, ra-stateless, 64, 12h\n");
437
438 // Only DHCPv6 and NO SLAAC
439 if (nvram_get_int("ipv6_dhcpd") && !nvram_get_int("ipv6_radvd"))
440 fprintf(f,"dhcp-range=::1, ::FFFF:FFFF, constructor:br*, 64, 12h\n");
441
442 // SLAAC and DHCPv6 (2 IPv6 IPs)
443 if (nvram_get_int("ipv6_radvd") && nvram_get_int("ipv6_dhcpd"))
444 fprintf(f,"dhcp-range=::1, ::FFFF:FFFF, constructor:br*, ra-names, 64, 12h\n");
445 }
446 #endif
447
448 fprintf(f, "%s\n\n", nvram_safe_get("dnsmasq_custom"));
449
450 fappend(f, "/etc/dnsmasq.custom");
451 fappend(f, "/etc/dnsmasq.ipset");
452
453 //
454
455 fclose(f);
456
457 if (do_dns) {
458 unlink("/etc/resolv.conf");
459 symlink("/rom/etc/resolv.conf", "/etc/resolv.conf"); // nameserver 127.0.0.1
460 }
461
462 TRACE_PT("run dnsmasq\n");
463
464 // Default to some values we like, but allow the user to override them.
465 eval("dnsmasq", "-c", "1500", "--log-async");
466
467 if (!nvram_contains_word("debug_norestart", "dnsmasq")) {
468 pid_dnsmasq = -2;
469 }
470
471 TRACE_PT("end\n");
472
473 #ifdef TCONFIG_DNSCRYPT
474 //start dnscrypt-proxy
475 if (nvram_match("dnscrypt_proxy", "1")) {
476 char dnscrypt_local[30];
477 sprintf(dnscrypt_local, "127.0.0.1:%s", nvram_safe_get("dnscrypt_port") );
478
479 eval("ntp2ip");
480
481 if (nvram_match("dnscrypt_manual", "1")) {
482 eval("dnscrypt-proxy", "-d",
483 "-a", dnscrypt_local,
484 "-m", nvram_safe_get("dnscrypt_log"),
485 "-N", nvram_safe_get("dnscrypt_provider_name"),
486 "-k", nvram_safe_get("dnscrypt_provider_key"),
487 "-r", nvram_safe_get("dnscrypt_resolver_address") );
488 } else {
489 eval("dnscrypt-proxy", "-d",
490 "-a", dnscrypt_local,
491 "-m", nvram_safe_get("dnscrypt_log"),
492 "-R", nvram_safe_get("dnscrypt_resolver"),
493 "-L", "/etc/dnscrypt-resolvers.csv" );
494 }
495
496 #ifdef TCONFIG_IPV6
497 char dnscrypt_local_ipv6[30];
498 sprintf(dnscrypt_local_ipv6, "::1:%s", nvram_safe_get("dnscrypt_port") );
499
500 if (get_ipv6_service() != *("NULL")) { // when ipv6 enabled
501 if (nvram_match("dnscrypt_manual", "1")) {
502 eval("dnscrypt-proxy", "-d",
503 "-a", dnscrypt_local,
504 "-m", nvram_safe_get("dnscrypt_log"),
505 "-N", nvram_safe_get("dnscrypt_provider_name"),
506 "-k", nvram_safe_get("dnscrypt_provider_key"),
507 "-r", nvram_safe_get("dnscrypt_resolver_address") );
508 } else {
509 eval("dnscrypt-proxy", "-d",
510 "-a", dnscrypt_local,
511 "-m", nvram_safe_get("dnscrypt_log"),
512 "-R", nvram_safe_get("dnscrypt_resolver"),
513 "-L", "/etc/dnscrypt-resolvers.csv" );
514 }
515 }
516 #endif
517 }
518 #endif
519
520 #ifdef TCONFIG_DNSSEC
521 if ((time(0) > Y2K) && nvram_match("dnssec_enable", "1")){
522 killall("dnsmasq", SIGHUP);
523 }
524 #endif
525
526 }
527
528 void stop_dnsmasq(void)
529 {
530 TRACE_PT("begin\n");
531
532 if (getpid() != 1) {
533 stop_service("dnsmasq");
534 return;
535 }
536
537 pid_dnsmasq = -1;
538
539 unlink("/etc/resolv.conf");
540 symlink(dmresolv, "/etc/resolv.conf");
541
542 killall_tk("dnsmasq");
543 #ifdef TCONFIG_DNSCRYPT
544 killall_tk("dnscrypt-proxy");
545 #endif
546
547 TRACE_PT("end\n");
548 }
549
550 void clear_resolv(void)
551 {
552 f_write(dmresolv, NULL, 0, 0, 0); // blank
553 }
554
555 #ifdef TCONFIG_FANCTRL
556 static pid_t pid_phy_tempsense = -1;
557
558 void start_phy_tempsense()
559 {
560 stop_phy_tempsense();
561
562 char *phy_tempsense_argv[] = {"phy_tempsense", NULL};
563 _eval(phy_tempsense_argv, NULL, 0, &pid_phy_tempsense);
564 }
565
566 void stop_phy_tempsense()
567 {
568 pid_phy_tempsense = -1;
569 killall_tk("phy_tempsense");
570 }
571 #endif
572
573
574 #ifdef TCONFIG_IPV6
575 static int write_ipv6_dns_servers(FILE *f, const char *prefix, char *dns, const char *suffix, int once)
576 {
577 char p[INET6_ADDRSTRLEN + 1], *next = NULL;
578 struct in6_addr addr;
579 int cnt = 0;
580
581 foreach(p, dns, next) {
582 // verify that this is a valid IPv6 address
583 if (inet_pton(AF_INET6, p, &addr) == 1) {
584 fprintf(f, "%s%s%s", (once && cnt) ? "" : prefix, p, suffix);
585 ++cnt;
586 }
587 }
588
589 return cnt;
590 }
591 #endif
592
593 void dns_to_resolv(void)
594 {
595 FILE *f;
596 const dns_list_t *dns;
597 int i;
598 mode_t m;
599
600 m = umask(022); // 077 from pppoecd
601 if ((f = fopen(dmresolv, "w")) != NULL) {
602 // Check for VPN DNS entries
603 if (!write_pptpvpn_resolv(f) && !write_vpn_resolv(f)) {
604 #ifdef TCONFIG_IPV6
605 if (write_ipv6_dns_servers(f, "nameserver ", nvram_safe_get("ipv6_dns"), "\n", 0) == 0 || nvram_get_int("dns_addget"))
606 write_ipv6_dns_servers(f, "nameserver ", nvram_safe_get("ipv6_get_dns"), "\n", 0);
607 #endif
608 dns = get_dns(); // static buffer
609 if (dns->count == 0) {
610 // Put a pseudo DNS IP to trigger Connect On Demand
611 if (nvram_match("ppp_demand", "1")) {
612 switch (get_wan_proto()) {
613 case WP_PPPOE:
614 case WP_PPP3G:
615 case WP_PPTP:
616 case WP_L2TP:
617 fprintf(f, "nameserver 1.1.1.1\n");
618 break;
619 }
620 }
621 }
622 else {
623 for (i = 0; i < dns->count; i++) {
624 if (dns->dns[i].port == 53) { // resolv.conf doesn't allow for an alternate port
625 fprintf(f, "nameserver %s\n", inet_ntoa(dns->dns[i].addr));
626 }
627 }
628 }
629 }
630 fclose(f);
631 }
632 umask(m);
633 }
634
635 // -----------------------------------------------------------------------------
636
637 void start_httpd(void)
638 {
639 if (getpid() != 1) {
640 start_service("httpd");
641 return;
642 }
643
644 if( nvram_match( "web_css", "online" ) )
645 xstart( "/usr/sbin/ttb" );
646
647 stop_httpd();
648
649 // set www dir
650 if ( nvram_match( "web_dir", "jffs" ) ) { chdir("/jffs/www"); }
651 else if ( nvram_match( "web_dir", "opt" ) ) { chdir("/opt/www"); }
652 else if ( nvram_match( "web_dir", "tmp" ) ) { chdir("/tmp/www");}
653 else { chdir("/www"); }
654
655 eval("httpd");
656 chdir("/");
657 }
658
659 void stop_httpd(void)
660 {
661 if (getpid() != 1) {
662 stop_service("httpd");
663 return;
664 }
665
666 killall_tk("httpd");
667 }
668
669 // -----------------------------------------------------------------------------
670 #ifdef TCONFIG_IPV6
671
672 static void add_ip6_lanaddr(void)
673 {
674 char ip[INET6_ADDRSTRLEN + 4];
675 const char *p;
676
677 p = ipv6_router_address(NULL);
678 if (*p) {
679 snprintf(ip, sizeof(ip), "%s/%d", p, nvram_get_int("ipv6_prefix_length") ? : 64);
680 eval("ip", "-6", "addr", "add", ip, "dev", nvram_safe_get("lan_ifname"));
681 }
682 }
683
684 void start_ipv6_tunnel(void)
685 {
686 char ip[INET6_ADDRSTRLEN + 4];
687 struct in_addr addr4;
688 struct in6_addr addr;
689 const char *wanip, *mtu, *tun_dev;
690 int service;
691
692 service = get_ipv6_service();
693 tun_dev = get_wan6face();
694 wanip = get_wanip();
695 mtu = (nvram_get_int("ipv6_tun_mtu") > 0) ? nvram_safe_get("ipv6_tun_mtu") : "1480";
696 modprobe("sit");
697
698 if (service == IPV6_ANYCAST_6TO4)
699 snprintf(ip, sizeof(ip), "192.88.99.%d", nvram_get_int("ipv6_relay"));
700 else
701 strlcpy(ip, (char *)nvram_safe_get("ipv6_tun_v4end"), sizeof(ip));
702 eval("ip", "tunnel", "add", (char *)tun_dev, "mode", "sit",
703 "remote", ip,
704 "local", (char *)wanip,
705 "ttl", nvram_safe_get("ipv6_tun_ttl"));
706
707 eval("ip", "link", "set", (char *)tun_dev, "mtu", (char *)mtu, "up");
708 nvram_set("ipv6_ifname", (char *)tun_dev);
709
710 if (service == IPV6_ANYCAST_6TO4) {
711 add_ip6_lanaddr();
712 addr4.s_addr = 0;
713 memset(&addr, 0, sizeof(addr));
714 inet_aton(wanip, &addr4);
715 addr.s6_addr16[0] = htons(0x2002);
716 ipv6_mapaddr4(&addr, 16, &addr4, 0);
717 addr.s6_addr16[7] = htons(0x0001);
718 inet_ntop(AF_INET6, &addr, ip, sizeof(ip));
719 strncat(ip, "/16", sizeof(ip));
720 }
721 else {
722 snprintf(ip, sizeof(ip), "%s/%d",
723 nvram_safe_get("ipv6_tun_addr"),
724 nvram_get_int("ipv6_tun_addrlen") ? : 64);
725 }
726 eval("ip", "addr", "add", ip, "dev", (char *)tun_dev);
727 eval("ip", "route", "add", "::/0", "dev", (char *)tun_dev);
728
729 // (re)start radvd - now dnsmasq provided
730 if (service == IPV6_ANYCAST_6TO4)
731 start_dnsmasq();
732 }
733
734 void stop_ipv6_tunnel(void)
735 {
736 eval("ip", "tunnel", "del", (char *)get_wan6face());
737 if (get_ipv6_service() == IPV6_ANYCAST_6TO4) {
738 // get rid of old IPv6 address from lan iface
739 eval("ip", "-6", "addr", "flush", "dev", nvram_safe_get("lan_ifname"), "scope", "global");
740 }
741 modprobe_r("sit");
742 }
743
744 void start_6rd_tunnel(void)
745 {
746 const char *tun_dev, *wanip;
747 int service, mask_len, prefix_len, local_prefix_len;
748 char mtu[10], prefix[INET6_ADDRSTRLEN], relay[INET_ADDRSTRLEN];
749 struct in_addr netmask_addr, relay_addr, relay_prefix_addr, wanip_addr;
750 struct in6_addr prefix_addr, local_prefix_addr;
751 char local_prefix[INET6_ADDRSTRLEN];
752 char tmp_ipv6[INET6_ADDRSTRLEN + 4], tmp_ipv4[INET_ADDRSTRLEN + 4];
753 char tmp[256];
754 FILE *f;
755
756 service = get_ipv6_service();
757 wanip = get_wanip();
758 tun_dev = get_wan6face();
759 sprintf(mtu, "%d", (nvram_get_int("wan_mtu") > 0) ? (nvram_get_int("wan_mtu") - 20) : 1280);
760
761 // maybe we can merge the ipv6_6rd_* variables into a single ipv_6rd_string (ala wan_6rd)
762 // to save nvram space?
763 if (service == IPV6_6RD) {
764 _dprintf("starting 6rd tunnel using manual settings.\n");
765 mask_len = nvram_get_int("ipv6_6rd_ipv4masklen");
766 prefix_len = nvram_get_int("ipv6_6rd_prefix_length");
767 strcpy(prefix, nvram_safe_get("ipv6_6rd_prefix"));
768 strcpy(relay, nvram_safe_get("ipv6_6rd_borderrelay"));
769 }
770 else {
771 _dprintf("starting 6rd tunnel using automatic settings.\n");
772 char *wan_6rd = nvram_safe_get("wan_6rd");
773 if (sscanf(wan_6rd, "%d %d %s %s", &mask_len, &prefix_len, prefix, relay) < 4) {
774 _dprintf("wan_6rd string is missing or invalid (%s)\n", wan_6rd);
775 return;
776 }
777 }
778
779 // validate values that were passed
780 if (mask_len < 0 || mask_len > 32) {
781 _dprintf("invalid mask_len value (%d)\n", mask_len);
782 return;
783 }
784 if (prefix_len < 0 || prefix_len > 128) {
785 _dprintf("invalid prefix_len value (%d)\n", prefix_len);
786 return;
787 }
788 if ((32 - mask_len) + prefix_len > 128) {
789 _dprintf("invalid combination of mask_len and prefix_len!\n");
790 return;
791 }
792
793 sprintf(tmp, "ping -q -c 2 %s | grep packet", relay);
794 if ((f = popen(tmp, "r")) == NULL) {
795 _dprintf("error obtaining data\n");
796 return;
797 }
798 fgets(tmp, sizeof(tmp), f);
799 pclose(f);
800 if (strstr(tmp, " 0% packet loss") == NULL) {
801 _dprintf("failed to ping border relay\n");
802 return;
803 }
804
805 // get relay prefix from border relay address and mask
806 netmask_addr.s_addr = htonl(0xffffffff << (32 - mask_len));
807 inet_aton(relay, &relay_addr);
808 relay_prefix_addr.s_addr = relay_addr.s_addr & netmask_addr.s_addr;
809
810 // calculate the local prefix
811 inet_pton(AF_INET6, prefix, &prefix_addr);
812 inet_pton(AF_INET, wanip, &wanip_addr);
813 if (calc_6rd_local_prefix(&prefix_addr, prefix_len, mask_len,
814 &wanip_addr, &local_prefix_addr, &local_prefix_len) == 0) {
815 _dprintf("error calculating local prefix.");
816 return;
817 }
818 inet_ntop(AF_INET6, &local_prefix_addr, local_prefix, sizeof(local_prefix));
819
820 snprintf(tmp_ipv6, sizeof(tmp_ipv6), "%s1", local_prefix);
821 nvram_set("ipv6_rtr_addr", tmp_ipv6);
822 nvram_set("ipv6_prefix", local_prefix);
823
824 // load sit module needed for the 6rd tunnel
825 modprobe("sit");
826
827 // creating the 6rd tunnel
828 eval("ip", "tunnel", "add", (char *)tun_dev, "mode", "sit", "local", (char *)wanip, "ttl", nvram_safe_get("ipv6_tun_ttl"));
829
830 snprintf(tmp_ipv6, sizeof(tmp_ipv6), "%s/%d", prefix, prefix_len);
831 snprintf(tmp_ipv4, sizeof(tmp_ipv4), "%s/%d", inet_ntoa(relay_prefix_addr), mask_len);
832 eval("ip", "tunnel" "6rd", "dev", (char *)tun_dev, "6rd-prefix", tmp_ipv6, "6rd-relay_prefix", tmp_ipv4);
833
834 // bringing up the link
835 eval("ip", "link", "set", "dev", (char *)tun_dev, "mtu", (char *)mtu, "up");
836
837 // setting the WAN address Note: IPv6 WAN CIDR should be: ((32 - ip6rd_ipv4masklen) + ip6rd_prefixlen)
838 snprintf(tmp_ipv6, sizeof(tmp_ipv6), "%s1/%d", local_prefix, local_prefix_len);
839 eval("ip", "-6", "addr", "add", tmp_ipv6, "dev", (char *)tun_dev);
840
841 // setting the LAN address Note: IPv6 LAN CIDR should be 64
842 snprintf(tmp_ipv6, sizeof(tmp_ipv6), "%s1/%d", local_prefix, nvram_get_int("ipv6_prefix_length") ? : 64);
843 eval("ip", "-6", "addr", "add", tmp_ipv6, "dev", nvram_safe_get("lan_ifname"));
844
845 // adding default route via the border relay
846 snprintf(tmp_ipv6, sizeof(tmp_ipv6), "::%s", relay);
847 eval("ip", "-6", "route", "add", "default", "via", tmp_ipv6, "dev", (char *)tun_dev);
848
849 nvram_set("ipv6_ifname", (char *)tun_dev);
850
851 // (re)start radvd now dnsmasq
852 start_dnsmasq();
853
854 printf("6rd end\n");
855 }
856
857 void stop_6rd_tunnel(void)
858 {
859 eval("ip", "tunnel", "del", (char *)get_wan6face());
860 eval("ip", "-6", "addr", "flush", "dev", nvram_safe_get("lan_ifname"), "scope", "global");
861 modprobe_r("sit");
862 }
863
864
865 void start_ipv6(void)
866 {
867 int service;
868
869 service = get_ipv6_service();
870 enable_ip6_forward();
871
872 // Check if turned on
873 switch (service) {
874 case IPV6_NATIVE:
875 case IPV6_6IN4:
876 case IPV6_MANUAL:
877 add_ip6_lanaddr();
878 break;
879 case IPV6_NATIVE_DHCP:
880 case IPV6_ANYCAST_6TO4:
881 nvram_set("ipv6_rtr_addr", "");
882 nvram_set("ipv6_prefix", "");
883 break;
884 }
885
886 if (service != IPV6_DISABLED) {
887 if ((nvram_get_int("ipv6_accept_ra") & 2) != 0 && !nvram_get_int("ipv6_radvd"))
888 accept_ra(nvram_safe_get("lan_ifname"));
889 }
890 }
891
892 void stop_ipv6(void)
893 {
894 stop_ipv6_tunnel();
895 stop_dhcp6c();
896 eval("ip", "-6", "addr", "flush", "scope", "global");
897 eval("ip", "-6", "route", "flush", "scope", "global");
898 }
899
900 #endif
901
902 // -----------------------------------------------------------------------------
903
904 void start_upnp(void)
905 {
906 if (getpid() != 1) {
907 start_service("upnp");
908 return;
909 }
910
911 if (get_wan_proto() == WP_DISABLED) return;
912
913 int enable;
914 FILE *f;
915 int upnp_port;
916
917 if (((enable = nvram_get_int("upnp_enable")) & 3) != 0) {
918 mkdir("/etc/upnp", 0777);
919 if (f_exists("/etc/upnp/config.alt")) {
920 xstart("miniupnpd", "-f", "/etc/upnp/config.alt");
921 }
922 else {
923 if ((f = fopen("/etc/upnp/config", "w")) != NULL) {
924 upnp_port = nvram_get_int("upnp_port");
925 if ((upnp_port < 0) || (upnp_port >= 0xFFFF)) upnp_port = 0;
926
927
928 fprintf(f,
929 "ext_ifname=%s\n"
930 "port=%d\n"
931 "enable_upnp=%s\n"
932 "enable_natpmp=%s\n"
933 "secure_mode=%s\n"
934 "upnp_forward_chain=upnp\n"
935 "upnp_nat_chain=upnp\n"
936 "notify_interval=%d\n"
937 "system_uptime=yes\n"
938 "friendly_name=%s"" Router\n"
939 "model_name=%s\n"
940 "model_url=http://linksysinfo.org/index.php?forums/tomato-firmware.33/\n"
941 "manufacturer_name=Tomato Firmware\n"
942 "manufacturer_url=http://linksysinfo.org/index.php?forums/tomato-firmware.33/\n"
943 "\n"
944 ,
945 get_wanface(),
946 upnp_port,
947 (enable & 1) ? "yes" : "no", // upnp enable
948 (enable & 2) ? "yes" : "no", // natpmp enable
949 nvram_get_int("upnp_secure") ? "yes" : "no", // secure_mode (only forward to self)
950 nvram_get_int("upnp_ssdp_interval"),
951 nvram_safe_get("router_name"),
952 nvram_safe_get("t_model_name")
953 );
954
955 if (nvram_get_int("upnp_clean")) {
956 int interval = nvram_get_int("upnp_clean_interval");
957 if (interval < 60) interval = 60;
958 fprintf(f,
959 "clean_ruleset_interval=%d\n"
960 "clean_ruleset_threshold=%d\n",
961 interval,
962 nvram_get_int("upnp_clean_threshold")
963 );
964 }
965 else
966 fprintf(f,"clean_ruleset_interval=0\n");
967
968 if (nvram_match("upnp_mnp", "1")) {
969 int https = nvram_get_int("https_enable");
970 fprintf(f, "presentation_url=http%s://%s:%s/forward-upnp.asp\n",
971 https ? "s" : "", nvram_safe_get("lan_ipaddr"),
972 nvram_safe_get(https ? "https_lanport" : "http_lanport"));
973 }
974 else {
975 // Empty parameters are not included into XML service description
976 fprintf(f, "presentation_url=\n");
977 }
978
979 char uuid[45];
980 f_read_string("/proc/sys/kernel/random/uuid", uuid, sizeof(uuid));
981 fprintf(f, "uuid=%s\n", uuid);
982
983 // shibby - move custom configuration before "allow" statements
984 // discussion: http://www.linksysinfo.org/index.php?threads/miniupnpd-custom-config-syntax.70863/#post-256291
985 fappend(f, "/etc/upnp/config.custom");
986 fprintf(f, "%s\n", nvram_safe_get("upnp_custom"));
987
988 char lanN_ipaddr[] = "lanXX_ipaddr";
989 char lanN_netmask[] = "lanXX_netmask";
990 char upnp_lanN[] = "upnp_lanXX";
991 char br;
992
993 for(br=0 ; br<4 ; br++) {
994 char bridge[2] = "0";
995 if (br!=0)
996 bridge[0]+=br;
997 else
998 strcpy(bridge, "");
999
1000 sprintf(lanN_ipaddr, "lan%s_ipaddr", bridge);
1001 sprintf(lanN_netmask, "lan%s_netmask", bridge);
1002 sprintf(upnp_lanN, "upnp_lan%s", bridge);
1003
1004 char *lanip = nvram_safe_get(lanN_ipaddr);
1005 char *lanmask = nvram_safe_get(lanN_netmask);
1006 char *lanlisten = nvram_safe_get(upnp_lanN);
1007
1008 if((strcmp(lanlisten,"1")==0) && (strcmp(lanip,"")!=0) && (strcmp(lanip,"0.0.0.0")!=0)) {
1009 fprintf(f,
1010 "listening_ip=%s/%s\n",
1011 lanip, lanmask);
1012 int ports[4];
1013 if ((ports[0] = nvram_get_int("upnp_min_port_int")) > 0 &&
1014 (ports[1] = nvram_get_int("upnp_max_port_int")) > 0 &&
1015 (ports[2] = nvram_get_int("upnp_min_port_ext")) > 0 &&
1016 (ports[3] = nvram_get_int("upnp_max_port_ext")) > 0) {
1017 fprintf(f,
1018 "allow %d-%d %s/%s %d-%d\n",
1019 ports[0], ports[1],
1020 lanip, lanmask,
1021 ports[2], ports[3]
1022 );
1023 }
1024 else {
1025 // by default allow only redirection of ports above 1024
1026 fprintf(f, "allow 1024-65535 %s/%s 1024-65535\n", lanip, lanmask);
1027 }
1028 }
1029 }
1030 fprintf(f, "\ndeny 0-65535 0.0.0.0/0 0-65535\n");
1031 fclose(f);
1032
1033 xstart("miniupnpd", "-f", "/etc/upnp/config");
1034 }
1035 }
1036 }
1037 }
1038
1039 void stop_upnp(void)
1040 {
1041 if (getpid() != 1) {
1042 stop_service("upnp");
1043 return;
1044 }
1045
1046 killall_tk("miniupnpd");
1047 }
1048
1049 // -----------------------------------------------------------------------------
1050
1051 static pid_t pid_crond = -1;
1052
1053 void start_cron(void)
1054 {
1055 stop_cron();
1056
1057 eval("crond", nvram_contains_word("log_events", "crond") ? NULL : "-l", "9");
1058 if (!nvram_contains_word("debug_norestart", "crond")) {
1059 pid_crond = -2;
1060 }
1061 }
1062
1063 void stop_cron(void)
1064 {
1065 pid_crond = -1;
1066 killall_tk("crond");
1067 }
1068
1069 // -----------------------------------------------------------------------------
1070 #ifdef LINUX26
1071
1072 static pid_t pid_hotplug2 = -1;
1073
1074 void start_hotplug2()
1075 {
1076 stop_hotplug2();
1077
1078 f_write_string("/proc/sys/kernel/hotplug", "", FW_NEWLINE, 0);
1079 xstart("hotplug2", "--persistent", "--no-coldplug");
1080 // FIXME: Don't remember exactly why I put "sleep" here -
1081 // but it was not for a race with check_services()... - TB
1082 sleep(1);
1083
1084 if (!nvram_contains_word("debug_norestart", "hotplug2")) {
1085 pid_hotplug2 = -2;
1086 }
1087 }
1088
1089 void stop_hotplug2(void)
1090 {
1091 pid_hotplug2 = -1;
1092 killall_tk("hotplug2");
1093 }
1094
1095 #endif /* LINUX26 */
1096 // -----------------------------------------------------------------------------
1097
1098 // Written by Sparq in 2002/07/16
1099 void start_zebra(void)
1100 {
1101 #ifdef TCONFIG_ZEBRA
1102 if (getpid() != 1) {
1103 start_service("zebra");
1104 return;
1105 }
1106
1107 FILE *fp;
1108
1109 char *lan_tx = nvram_safe_get("dr_lan_tx");
1110 char *lan_rx = nvram_safe_get("dr_lan_rx");
1111 char *lan1_tx = nvram_safe_get("dr_lan1_tx");
1112 char *lan1_rx = nvram_safe_get("dr_lan1_rx");
1113 char *lan2_tx = nvram_safe_get("dr_lan2_tx");
1114 char *lan2_rx = nvram_safe_get("dr_lan2_rx");
1115 char *lan3_tx = nvram_safe_get("dr_lan3_tx");
1116 char *lan3_rx = nvram_safe_get("dr_lan3_rx");
1117 char *wan_tx = nvram_safe_get("dr_wan_tx");
1118 char *wan_rx = nvram_safe_get("dr_wan_rx");
1119
1120 if ((*lan_tx == '0') && (*lan_rx == '0') &&
1121 (*lan1_tx == '0') && (*lan1_rx == '0') &&
1122 (*lan2_tx == '0') && (*lan2_rx == '0') &&
1123 (*lan3_tx == '0') && (*lan3_rx == '0') &&
1124 (*wan_tx == '0') && (*wan_rx == '0')) {
1125 return;
1126 }
1127
1128 // empty
1129 if ((fp = fopen("/etc/zebra.conf", "w")) != NULL) {
1130 fclose(fp);
1131 }
1132
1133 //
1134 if ((fp = fopen("/etc/ripd.conf", "w")) != NULL) {
1135 char *lan_ifname = nvram_safe_get("lan_ifname");
1136 char *lan1_ifname = nvram_safe_get("lan1_ifname");
1137 char *lan2_ifname = nvram_safe_get("lan2_ifname");
1138 char *lan3_ifname = nvram_safe_get("lan3_ifname");
1139 char *wan_ifname = nvram_safe_get("wan_ifname");
1140
1141 fprintf(fp, "router rip\n");
1142 if(strcmp(lan_ifname,"")!=0)
1143 fprintf(fp, "network %s\n", lan_ifname);
1144 if(strcmp(lan1_ifname,"")!=0)
1145 fprintf(fp, "network %s\n", lan1_ifname);
1146 if(strcmp(lan2_ifname,"")!=0)
1147 fprintf(fp, "network %s\n", lan2_ifname);
1148 if(strcmp(lan3_ifname,"")!=0)
1149 fprintf(fp, "network %s\n", lan3_ifname);
1150 fprintf(fp, "network %s\n", wan_ifname);
1151 fprintf(fp, "redistribute connected\n");
1152 //fprintf(fp, "redistribute static\n");
1153
1154 // 43011: modify by zg 2006.10.18 for cdrouter3.3 item 173(cdrouter_rip_30) bug
1155 // fprintf(fp, "redistribute kernel\n"); // 1.11: removed, redistributes indirect -- zzz
1156
1157 if(strcmp(lan_ifname,"")!=0) {
1158 fprintf(fp, "interface %s\n", lan_ifname);
1159 if (*lan_tx != '0') fprintf(fp, "ip rip send version %s\n", lan_tx);
1160 if (*lan_rx != '0') fprintf(fp, "ip rip receive version %s\n", lan_rx);
1161 }
1162 if(strcmp(lan1_ifname,"")!=0) {
1163 fprintf(fp, "interface %s\n", lan1_ifname);
1164 if (*lan1_tx != '0') fprintf(fp, "ip rip send version %s\n", lan1_tx);
1165 if (*lan1_rx != '0') fprintf(fp, "ip rip receive version %s\n", lan1_rx);
1166 }
1167 if(strcmp(lan2_ifname,"")!=0) {
1168 fprintf(fp, "interface %s\n", lan2_ifname);
1169 if (*lan2_tx != '0') fprintf(fp, "ip rip send version %s\n", lan2_tx);
1170 if (*lan2_rx != '0') fprintf(fp, "ip rip receive version %s\n", lan2_rx);
1171 }
1172 if(strcmp(lan3_ifname,"")!=0) {
1173 fprintf(fp, "interface %s\n", lan3_ifname);
1174 if (*lan3_tx != '0') fprintf(fp, "ip rip send version %s\n", lan3_tx);
1175 if (*lan3_rx != '0') fprintf(fp, "ip rip receive version %s\n", lan3_rx);
1176 }
1177 fprintf(fp, "interface %s\n", wan_ifname);
1178 if (*wan_tx != '0') fprintf(fp, "ip rip send version %s\n", wan_tx);
1179 if (*wan_rx != '0') fprintf(fp, "ip rip receive version %s\n", wan_rx);
1180
1181 fprintf(fp, "router rip\n");
1182 if(strcmp(lan_ifname,"")!=0) {
1183 if (*lan_tx == '0') fprintf(fp, "distribute-list private out %s\n", lan_ifname);
1184 if (*lan_rx == '0') fprintf(fp, "distribute-list private in %s\n", lan_ifname);
1185 }
1186 if(strcmp(lan1_ifname,"")!=0) {
1187 if (*lan1_tx == '0') fprintf(fp, "distribute-list private out %s\n", lan1_ifname);
1188 if (*lan1_rx == '0') fprintf(fp, "distribute-list private in %s\n", lan1_ifname);
1189 }
1190 if(strcmp(lan2_ifname,"")!=0) {
1191 if (*lan2_tx == '0') fprintf(fp, "distribute-list private out %s\n", lan2_ifname);
1192 if (*lan2_rx == '0') fprintf(fp, "distribute-list private in %s\n", lan2_ifname);
1193 }
1194 if(strcmp(lan3_ifname,"")!=0) {
1195 if (*lan3_tx == '0') fprintf(fp, "distribute-list private out %s\n", lan3_ifname);
1196 if (*lan3_rx == '0') fprintf(fp, "distribute-list private in %s\n", lan3_ifname);
1197 }
1198 if (*wan_tx == '0') fprintf(fp, "distribute-list private out %s\n", wan_ifname);
1199 if (*wan_rx == '0') fprintf(fp, "distribute-list private in %s\n", wan_ifname);
1200 fprintf(fp, "access-list private deny any\n");
1201
1202 //fprintf(fp, "debug rip events\n");
1203 //fprintf(fp, "log file /etc/ripd.log\n");
1204 fclose(fp);
1205 }
1206
1207 xstart("zebra", "-d");
1208 xstart("ripd", "-d");
1209 #endif
1210 }
1211
1212 void stop_zebra(void)
1213 {
1214 #ifdef TCONFIG_ZEBRA
1215 if (getpid() != 1) {
1216 stop_service("zebra");
1217 return;
1218 }
1219
1220 killall("zebra", SIGTERM);
1221 killall("ripd", SIGTERM);
1222
1223 unlink("/etc/zebra.conf");
1224 unlink("/etc/ripd.conf");
1225 #endif
1226 }
1227
1228 // -----------------------------------------------------------------------------
1229
1230 void start_syslog(void)
1231 {
1232 char *argv[16];
1233 int argc;
1234 char *nv;
1235 char *b_opt = "";
1236 char rem[256];
1237 int n;
1238 char s[64];
1239 char cfg[256];
1240 char *rot_siz = "50";
1241 char *rot_keep = "1";
1242 char *log_file_path;
1243
1244 argv[0] = "syslogd";
1245 argc = 1;
1246
1247 if (nvram_match("log_remote", "1")) {
1248 nv = nvram_safe_get("log_remoteip");
1249 if (*nv) {
1250 snprintf(rem, sizeof(rem), "%s:%s", nv, nvram_safe_get("log_remoteport"));
1251 argv[argc++] = "-R";
1252 argv[argc++] = rem;
1253 }
1254 }
1255
1256 if (nvram_match("log_file", "1")) {
1257 argv[argc++] = "-L";
1258
1259 if (strcmp(nvram_safe_get("log_file_size"), "") != 0) {
1260 rot_siz = nvram_safe_get("log_file_size");
1261 }
1262 if (nvram_get_int("log_file_size") > 0) {
1263 rot_keep = nvram_safe_get("log_file_keep");
1264 }
1265
1266 // log to custom path - shibby
1267 if (nvram_match("log_file_custom", "1")) {
1268 log_file_path = nvram_safe_get("log_file_path");
1269 argv[argc++] = "-s";
1270 argv[argc++] = rot_siz;
1271 argv[argc++] = "-O";
1272 argv[argc++] = log_file_path;
1273 if (strcmp(nvram_safe_get("log_file_path"), "/var/log/messages") != 0) {
1274 remove("/var/log/messages");
1275 symlink(log_file_path, "/var/log/messages");
1276 }
1277 }
1278 else
1279
1280 /* Read options: rotate_size(kb) num_backups logfilename.
1281 * Ignore these settings and use defaults if the logfile cannot be written to.
1282 */
1283 if (f_read_string("/etc/syslogd.cfg", cfg, sizeof(cfg)) > 0) {
1284 if ((nv = strchr(cfg, '\n')))
1285 *nv = 0;
1286
1287 if ((nv = strtok(cfg, " \t"))) {
1288 if (isdigit(*nv))
1289 rot_siz = nv;
1290 }
1291
1292 if ((nv = strtok(NULL, " \t")))
1293 b_opt = nv;
1294
1295 if ((nv = strtok(NULL, " \t")) && *nv == '/') {
1296 if (f_write(nv, cfg, 0, FW_APPEND, 0) >= 0) {
1297 argv[argc++] = "-O";
1298 argv[argc++] = nv;
1299 }
1300 else {
1301 rot_siz = "50";
1302 b_opt = "";
1303 }
1304 }
1305 }
1306
1307 if (nvram_match("log_file_custom", "0")) {
1308 argv[argc++] = "-s";
1309 argv[argc++] = rot_siz;
1310 struct stat sb;
1311 if (lstat("/var/log/messages", &sb) != -1)
1312 if (S_ISLNK(sb.st_mode))
1313 remove("/var/log/messages");
1314 }
1315
1316 if (isdigit(*b_opt)) {
1317 argv[argc++] = "-b";
1318 argv[argc++] = b_opt;
1319 } else
1320 if (nvram_get_int("log_file_size") > 0) {
1321 argv[argc++] = "-b";
1322 argv[argc++] = rot_keep;
1323 }
1324 }
1325
1326 if (argc > 1) {
1327 argv[argc] = NULL;
1328 _eval(argv, NULL, 0, NULL);
1329
1330 argv[0] = "klogd";
1331 argv[1] = NULL;
1332 _eval(argv, NULL, 0, NULL);
1333
1334 // used to be available in syslogd -m
1335 n = nvram_get_int("log_mark");
1336 if (n > 0) {
1337 // n is in minutes
1338 if (n < 60)
1339 sprintf(rem, "*/%d * * * *", n);
1340 else if (n < 60 * 24)
1341 sprintf(rem, "0 */%d * * *", n / 60);
1342 else
1343 sprintf(rem, "0 0 */%d * *", n / (60 * 24));
1344 sprintf(s, "%s logger -p syslog.info -- -- MARK --", rem);
1345 eval("cru", "a", "syslogdmark", s);
1346 }
1347 else {
1348 eval("cru", "d", "syslogdmark");
1349 }
1350 }
1351 }
1352
1353 void stop_syslog(void)
1354 {
1355 killall("klogd", SIGTERM);
1356 killall("syslogd", SIGTERM);
1357 }
1358
1359 // -----------------------------------------------------------------------------
1360
1361 static pid_t pid_igmp = -1;
1362
1363 void start_igmp_proxy(void)
1364 {
1365 FILE *fp;
1366
1367 pid_igmp = -1;
1368 if (nvram_match("multicast_pass", "1")) {
1369 if (get_wan_proto() == WP_DISABLED)
1370 return;
1371
1372 if (f_exists("/etc/igmp.alt")) {
1373 eval("igmpproxy", "/etc/igmp.alt");
1374 }
1375 else if ((fp = fopen("/etc/igmp.conf", "w")) != NULL) {
1376 fprintf(fp,
1377 "quickleave\n"
1378 "phyint %s upstream\n"
1379 "\taltnet %s\n",
1380 // "phyint %s downstream ratelimit 0\n",
1381 get_wanface(),
1382 nvram_get("multicast_altnet") ? : "0.0.0.0/0");
1383 // nvram_safe_get("lan_ifname"));
1384
1385 char lanN_ifname[] = "lanXX_ifname";
1386 char multicast_lanN[] = "multicast_lanXX";
1387 char br;
1388
1389 for(br=0 ; br<4 ; br++) {
1390 char bridge[2] = "0";
1391 if (br!=0)
1392 bridge[0]+=br;
1393 else
1394 strcpy(bridge, "");
1395
1396 sprintf(lanN_ifname, "lan%s_ifname", bridge);
1397 sprintf(multicast_lanN, "multicast_lan%s", bridge);
1398
1399 if((strcmp(nvram_safe_get(multicast_lanN),"1")==0) && (strcmp(nvram_safe_get(lanN_ifname),"")!=0)) {
1400 fprintf(fp,
1401 "phyint %s downstream ratelimit 0\n",
1402 nvram_safe_get(lanN_ifname));
1403 }
1404 }
1405 fclose(fp);
1406 eval("igmpproxy", "/etc/igmp.conf");
1407 }
1408 else {
1409 return;
1410 }
1411 if (!nvram_contains_word("debug_norestart", "igmprt")) {
1412 pid_igmp = -2;
1413 }
1414 }
1415 }
1416
1417 void stop_igmp_proxy(void)
1418 {
1419 pid_igmp = -1;
1420 killall_tk("igmpproxy");
1421 }
1422
1423 // -----------------------------------------------------------------------------
1424
1425 void start_udpxy(void)
1426 {
1427 if (nvram_match("udpxy_enable", "1")) {
1428 if (get_wan_proto() == WP_DISABLED)
1429 return;
1430 eval("udpxy", (nvram_get_int("udpxy_stats") ? "-S" : ""), "-p", nvram_safe_get("udpxy_port"), "-c", nvram_safe_get("udpxy_clients"), "-m", nvram_safe_get("wan_ifname") );
1431 }
1432 }
1433
1434 void stop_udpxy(void)
1435 {
1436 killall_tk("udpxy");
1437 }
1438
1439 // -----------------------------------------------------------------------------
1440
1441 #ifdef TCONFIG_NOCAT
1442
1443 static pid_t pid_splashd = -1;
1444 void start_splashd(void)
1445 {
1446 pid_splashd = -1;
1447 start_nocat();
1448 if (!nvram_contains_word("debug_norestart", "splashd")) {
1449 pid_splashd = -2;
1450 }
1451 }
1452
1453 void stop_splashd(void)
1454 {
1455 pid_splashd = -1;
1456 stop_nocat();
1457 start_wan(BOOT);
1458 }
1459 #endif
1460
1461 // -----------------------------------------------------------------------------
1462 #ifdef TCONFIG_NGINX
1463
1464 static pid_t pid_nginx = -1;
1465 void start_enginex(void)
1466 {
1467 pid_nginx =-1;
1468 start_nginx();
1469 if (!nvram_contains_word("debug_norestart","enginex")) {
1470 pid_nginx = -2;
1471 }
1472 }
1473
1474 void stop_enginex(void)
1475 {
1476 pid_nginx = -1;
1477 stop_nginx();
1478 }
1479
1480 void start_nginxfastpath(void)
1481 {
1482 pid_nginx =-1;
1483 start_nginxfp();
1484 if (!nvram_contains_word("debug_norestart","nginxfp")) {
1485 pid_nginx = -2;
1486 }
1487 }
1488 void stop_nginxfastpath(void)
1489 {
1490 pid_nginx = -1;
1491 stop_nginxfp();
1492 }
1493 #endif
1494
1495 // -----------------------------------------------------------------------------
1496
1497 void set_tz(void)
1498 {
1499 f_write_string("/etc/TZ", nvram_safe_get("tm_tz"), FW_CREATE|FW_NEWLINE, 0644);
1500 }
1501
1502 void start_ntpc(void)
1503 {
1504 static char servers[32];
1505
1506 set_tz();
1507
1508 stop_ntpc();
1509
1510 if (nvram_get_int("ntp_updates") >= 0) {
1511 strcpy(servers, nvram_safe_get("ntp_server"));
1512 xstart("ntpclient", "-h", servers, "-i", "3", "-l", "-s");
1513 }
1514 }
1515
1516 void stop_ntpc(void)
1517 {
1518 killall("ntpclient", SIGTERM);
1519 }
1520
1521 // -----------------------------------------------------------------------------
1522
1523 static void stop_rstats(void)
1524 {
1525 int n, m;
1526 int pid;
1527 int pidz;
1528 int ppidz;
1529 int w = 0;
1530
1531 n = 60;
1532 m = 15;
1533 while ((n-- > 0) && ((pid = pidof("rstats")) > 0)) {
1534 w = 1;
1535 pidz = pidof("gzip");
1536 if (pidz < 1) pidz = pidof("cp");
1537 ppidz = ppid(ppid(pidz));
1538 if ((m > 0) && (pidz > 0) && (pid == ppidz)) {
1539 syslog(LOG_DEBUG, "rstats(PID %d) shutting down, waiting for helper process to complete(PID %d, PPID %d).\n", pid, pidz, ppidz);
1540 --m;
1541 } else {
1542 kill(pid, SIGTERM);
1543 }
1544 sleep(1);
1545 }
1546 if ((w == 1) && (n > 0))
1547 syslog(LOG_DEBUG, "rstats stopped.\n");
1548 }
1549
1550 static void start_rstats(int new)
1551 {
1552 if (nvram_match("rstats_enable", "1")) {
1553 stop_rstats();
1554 if (new) {
1555 syslog(LOG_DEBUG, "starting rstats (new datafile).\n");
1556 xstart("rstats", "--new");
1557 } else {
1558 syslog(LOG_DEBUG, "starting rstats.\n");
1559 xstart("rstats");
1560 }
1561 }
1562 }
1563
1564 static void stop_cstats(void)
1565 {
1566 int n, m;
1567 int pid;
1568 int pidz;
1569 int ppidz;
1570 int w = 0;
1571
1572 n = 60;
1573 m = 15;
1574 while ((n-- > 0) && ((pid = pidof("cstats")) > 0)) {
1575 w = 1;
1576 pidz = pidof("gzip");
1577 if (pidz < 1) pidz = pidof("cp");
1578 ppidz = ppid(ppid(pidz));
1579 if ((m > 0) && (pidz > 0) && (pid == ppidz)) {
1580 syslog(LOG_DEBUG, "cstats(PID %d) shutting down, waiting for helper process to complete(PID %d, PPID %d).\n", pid, pidz, ppidz);
1581 --m;
1582 } else {
1583 kill(pid, SIGTERM);
1584 }
1585 sleep(1);
1586 }
1587 if ((w == 1) && (n > 0))
1588 syslog(LOG_DEBUG, "cstats stopped.\n");
1589 }
1590
1591 static void start_cstats(int new)
1592 {
1593 if (nvram_match("cstats_enable", "1")) {
1594 stop_cstats();
1595 if (new) {
1596 syslog(LOG_DEBUG, "starting cstats (new datafile).\n");
1597 xstart("cstats", "--new");
1598 } else {
1599 syslog(LOG_DEBUG, "starting cstats.\n");
1600 xstart("cstats");
1601 }
1602 }
1603 }
1604
1605 // -----------------------------------------------------------------------------
1606
1607 // !!TB - FTP Server
1608
1609 #ifdef TCONFIG_FTP
1610 static char *get_full_storage_path(char *val)
1611 {
1612 static char buf[128];
1613 int len;
1614
1615 if (val[0] == '/')
1616 len = sprintf(buf, "%s", val);
1617 else
1618 len = sprintf(buf, "%s/%s", MOUNT_ROOT, val);
1619
1620 if (len > 1 && buf[len - 1] == '/')
1621 buf[len - 1] = 0;
1622
1623 return buf;
1624 }
1625
1626 static char *nvram_storage_path(char *var)
1627 {
1628 char *val = nvram_safe_get(var);
1629 return get_full_storage_path(val);
1630 }
1631
1632 char vsftpd_conf[] = "/etc/vsftpd.conf";
1633 char vsftpd_users[] = "/etc/vsftpd.users";
1634 char vsftpd_passwd[] = "/etc/vsftpd.passwd";
1635
1636 /* VSFTPD code mostly stolen from Oleg's ASUS Custom Firmware GPL sources */
1637
1638 static void start_ftpd(void)
1639 {
1640 char tmp[256];
1641 FILE *fp, *f;
1642 char *buf;
1643 char *p, *q;
1644 char *user, *pass, *rights, *root_dir;
1645 int i;
1646
1647 if (getpid() != 1) {
1648 start_service("ftpd");
1649 return;
1650 }
1651
1652 if (!nvram_get_int("ftp_enable")) return;
1653
1654 mkdir_if_none(vsftpd_users);
1655 mkdir_if_none("/var/run/vsftpd");
1656
1657 if ((fp = fopen(vsftpd_conf, "w")) == NULL)
1658 return;
1659
1660 if (nvram_get_int("ftp_super"))
1661 {
1662 /* rights */
1663 sprintf(tmp, "%s/%s", vsftpd_users, "admin");
1664 if ((f = fopen(tmp, "w")))
1665 {
1666 fprintf(f,
1667 "dirlist_enable=yes\n"
1668 "write_enable=yes\n"
1669 "download_enable=yes\n");
1670 fclose(f);
1671 }
1672 }
1673
1674 if (nvram_invmatch("ftp_anonymous", "0"))
1675 {
1676 fprintf(fp,
1677 "anon_allow_writable_root=yes\n"
1678 "anon_world_readable_only=no\n"
1679 "anon_umask=022\n");
1680
1681 /* rights */
1682 sprintf(tmp, "%s/ftp", vsftpd_users);
1683 if ((f = fopen(tmp, "w")))
1684 {
1685 if (nvram_match("ftp_dirlist", "0"))
1686 fprintf(f, "dirlist_enable=yes\n");
1687 if (nvram_match("ftp_anonymous", "1") ||
1688 nvram_match("ftp_anonymous", "3"))
1689 fprintf(f, "write_enable=yes\n");
1690 if (nvram_match("ftp_anonymous", "1") ||
1691 nvram_match("ftp_anonymous", "2"))
1692 fprintf(f, "download_enable=yes\n");
1693 fclose(f);
1694 }
1695 if (nvram_match("ftp_anonymous", "1") ||
1696 nvram_match("ftp_anonymous", "3"))
1697 fprintf(fp,
1698 "anon_upload_enable=yes\n"
1699 "anon_mkdir_write_enable=yes\n"
1700 "anon_other_write_enable=yes\n");
1701 } else {
1702 fprintf(fp, "anonymous_enable=no\n");
1703 }
1704
1705 fprintf(fp,
1706 "dirmessage_enable=yes\n"
1707 "download_enable=no\n"
1708 "dirlist_enable=no\n"
1709 "hide_ids=yes\n"
1710 "syslog_enable=yes\n"
1711 "local_enable=yes\n"
1712 "local_umask=022\n"
1713 "chmod_enable=no\n"
1714 "chroot_local_user=yes\n"
1715 "check_shell=no\n"
1716 "log_ftp_protocol=%s\n"
1717 "user_config_dir=%s\n"
1718 "passwd_file=%s\n"
1719 "listen%s=yes\n"
1720 "listen_port=%s\n"
1721 "background=yes\n"
1722 "isolate=no\n"
1723 "max_clients=%d\n"
1724 "max_per_ip=%d\n"
1725 "max_login_fails=1\n"
1726 "idle_session_timeout=%s\n"
1727 "use_sendfile=no\n"
1728 "anon_max_rate=%d\n"
1729 "local_max_rate=%d\n"
1730 "%s\n",
1731 nvram_get_int("log_ftp") ? "yes" : "no",
1732 vsftpd_users, vsftpd_passwd,
1733 #ifdef TCONFIG_IPV6
1734 ipv6_enabled() ? "_ipv6" : "",
1735 #else
1736 "",
1737 #endif
1738 nvram_get("ftp_port") ? : "21",
1739 nvram_get_int("ftp_max"),
1740 nvram_get_int("ftp_ipmax"),
1741 nvram_get("ftp_staytimeout") ? : "300",
1742 nvram_get_int("ftp_anonrate") * 1024,
1743 nvram_get_int("ftp_rate") * 1024,
1744 nvram_safe_get("ftp_custom"));
1745
1746 fclose(fp);
1747
1748 /* prepare passwd file and default users */
1749 if ((fp = fopen(vsftpd_passwd, "w")) == NULL)
1750 return;
1751
1752 if (((user = nvram_get("http_username")) == NULL) || (*user == 0)) user = "admin";
1753 if (((pass = nvram_get("http_passwd")) == NULL) || (*pass == 0)) pass = "admin";
1754
1755 fprintf(fp, /* anonymous, admin, nobody */
1756 "ftp:x:0:0:ftp:%s:/sbin/nologin\n"
1757 "%s:%s:0:0:root:/:/sbin/nologin\n"
1758 "nobody:x:65534:65534:nobody:%s/:/sbin/nologin\n",
1759 nvram_storage_path("ftp_anonroot"), user,
1760 nvram_get_int("ftp_super") ? crypt(pass, "$1$") : "x",
1761 MOUNT_ROOT);
1762
1763 if ((buf = strdup(nvram_safe_get("ftp_users"))) != NULL)
1764 {
1765 /*
1766 username<password<rights[<root_dir>]
1767 rights:
1768 Read/Write
1769 Read Only
1770 View Only
1771 Private
1772 */
1773 p = buf;
1774 while ((q = strsep(&p, ">")) != NULL) {
1775 i = vstrsep(q, "<", &user, &pass, &rights, &root_dir);
1776 if (i < 3 || i > 4) continue;
1777 if (!user || !pass) continue;
1778
1779 if (i == 3 || !root_dir || !(*root_dir))
1780
1781 root_dir = nvram_safe_get("ftp_pubroot");
1782
1783 /* directory */
1784 if (strncmp(rights, "Private", 7) == 0)
1785 {
1786 sprintf(tmp, "%s/%s", nvram_storage_path("ftp_pvtroot"), user);
1787 mkdir_if_none(tmp);
1788 }
1789 else
1790 sprintf(tmp, "%s", get_full_storage_path(root_dir));
1791
1792 fprintf(fp, "%s:%s:0:0:%s:%s:/sbin/nologin\n",
1793 user, crypt(pass, "$1$"), user, tmp);
1794
1795 /* rights */
1796 sprintf(tmp, "%s/%s", vsftpd_users, user);
1797 if ((f = fopen(tmp, "w")))
1798 {
1799 tmp[0] = 0;
1800 if (nvram_invmatch("ftp_dirlist", "1"))
1801 strcat(tmp, "dirlist_enable=yes\n");
1802 if (strstr(rights, "Read") || !strcmp(rights, "Private"))
1803 strcat(tmp, "download_enable=yes\n");
1804 if (strstr(rights, "Write") || !strncmp(rights, "Private", 7))
1805 strcat(tmp, "write_enable=yes\n");
1806
1807 fputs(tmp, f);
1808 fclose(f);
1809 }
1810 }
1811 free(buf);
1812 }
1813
1814 fclose(fp);
1815 killall("vsftpd", SIGHUP);
1816
1817 /* start vsftpd if it's not already running */
1818 if (pidof("vsftpd") <= 0)
1819 xstart("vsftpd");
1820 }
1821
1822 static void stop_ftpd(void)
1823 {
1824 if (getpid() != 1) {
1825 stop_service("ftpd");
1826 return;
1827 }
1828
1829 killall_tk("vsftpd");
1830 unlink(vsftpd_passwd);
1831 unlink(vsftpd_conf);
1832 eval("rm", "-rf", vsftpd_users);
1833 }
1834 #endif // TCONFIG_FTP
1835
1836 // -----------------------------------------------------------------------------
1837
1838 // !!TB - Samba
1839
1840 #ifdef TCONFIG_SAMBASRV
1841 static void kill_samba(int sig)
1842 {
1843 if (sig == SIGTERM) {
1844 killall_tk("smbd");
1845 killall_tk("nmbd");
1846 }
1847 else {
1848 killall("smbd", sig);
1849 killall("nmbd", sig);
1850 }
1851 }
1852
1853 #if 0
1854 #ifdef TCONFIG_BCMARM
1855 extern void del_samba_rules(void);
1856 extern void add_samba_rules(void);
1857 #endif
1858 #endif
1859
1860 static void start_samba(void)
1861 {
1862 FILE *fp;
1863 DIR *dir = NULL;
1864 struct dirent *dp;
1865 char nlsmod[15];
1866 int mode;
1867 char *nv;
1868 #ifdef TCONFIG_BCMARM
1869 int cpu_num = sysconf(_SC_NPROCESSORS_CONF);
1870 int taskset_ret = -1;
1871 #endif
1872
1873 if (getpid() != 1) {
1874 start_service("smbd");
1875 return;
1876 }
1877
1878 mode = nvram_get_int("smbd_enable");
1879 if (!mode || !nvram_invmatch("lan_hostname", ""))
1880 return;
1881
1882 if ((fp = fopen("/etc/smb.conf", "w")) == NULL)
1883 return;
1884
1885 #ifdef TCONFIG_GROCTRL
1886 enable_gro(2);
1887 #endif
1888
1889 fprintf(fp, "[global]\n"
1890 " interfaces = %s\n"
1891 " bind interfaces only = yes\n"
1892 " workgroup = %s\n"
1893 " netbios name = %s\n"
1894 " server string = %s\n"
1895 " guest account = nobody\n"
1896 " security = user\n"
1897 " %s\n"
1898 " guest ok = %s\n"
1899 " guest only = no\n"
1900 " browseable = yes\n"
1901 " syslog only = yes\n"
1902 " timestamp logs = no\n"
1903 " syslog = 1\n"
1904 " encrypt passwords = yes\n"
1905 " preserve case = yes\n"
1906 " short preserve case = yes\n",
1907 nvram_safe_get("lan_ifname"),
1908 nvram_get("smbd_wgroup") ? : "WORKGROUP",
1909 nvram_safe_get("lan_hostname"),
1910 nvram_get("router_name") ? : "Tomato",
1911 mode == 2 ? "" : "map to guest = Bad User",
1912 mode == 2 ? "no" : "yes" // guest ok
1913 );
1914
1915 if (nvram_get_int("smbd_wins")) {
1916 nv = nvram_safe_get("wan_wins");
1917 if ((*nv == 0) || (strcmp(nv, "0.0.0.0") == 0)) {
1918 fprintf(fp, " wins support = yes\n");
1919 }
1920 }
1921
1922 if (nvram_get_int("smbd_master")) {
1923 fprintf(fp,
1924 " domain master = yes\n"
1925 " local master = yes\n"
1926 " preferred master = yes\n"
1927 " os level = 65\n");
1928 }
1929
1930 nv = nvram_safe_get("smbd_cpage");
1931 if (*nv) {
1932 #ifndef TCONFIG_SAMBA3
1933 fprintf(fp, " client code page = %s\n", nv);
1934 #endif
1935 sprintf(nlsmod, "nls_cp%s", nv);
1936
1937 nv = nvram_safe_get("smbd_nlsmod");
1938 if ((*nv) && (strcmp(nv, nlsmod) != 0))
1939 modprobe_r(nv);
1940
1941 modprobe(nlsmod);
1942 nvram_set("smbd_nlsmod", nlsmod);
1943 }
1944
1945 #ifndef TCONFIG_SAMBA3
1946 if (nvram_match("smbd_cset", "utf8"))
1947 fprintf(fp, " coding system = utf8\n");
1948 else if (nvram_invmatch("smbd_cset", ""))
1949 fprintf(fp, " character set = %s\n", nvram_safe_get("smbd_cset"));
1950 #endif
1951
1952 nv = nvram_safe_get("smbd_custom");
1953 /* add socket options unless overriden by the user */
1954 if (strstr(nv, "socket options") == NULL) {
1955 fprintf(fp, " socket options = TCP_NODELAY SO_KEEPALIVE IPTOS_LOWDELAY SO_RCVBUF=65536 SO_SNDBUF=65536\n");
1956 }
1957 fprintf(fp, "%s\n\n", nv);
1958
1959 /* configure shares */
1960
1961 char *buf;
1962 char *p, *q;
1963 char *name, *path, *comment, *writeable, *hidden;
1964 int cnt = 0;
1965
1966 if ((buf = strdup(nvram_safe_get("smbd_shares"))) != NULL)
1967 {
1968 /* sharename<path<comment<writeable[0|1]<hidden[0|1] */
1969
1970 p = buf;
1971 while ((q = strsep(&p, ">")) != NULL) {
1972 if (vstrsep(q, "<", &name, &path, &comment, &writeable, &hidden) != 5) continue;
1973 if (!path || !name) continue;
1974
1975 /* share name */
1976 fprintf(fp, "\n[%s]\n", name);
1977
1978 /* path */
1979 fprintf(fp, " path = %s\n", path);
1980
1981 /* access level */
1982 if (!strcmp(writeable, "1"))
1983 fprintf(fp, " writable = yes\n delete readonly = yes\n force user = root\n");
1984 if (!strcmp(hidden, "1"))
1985 fprintf(fp, " browseable = no\n");
1986
1987 /* comment */
1988 if (comment)
1989 fprintf(fp, " comment = %s\n", comment);
1990
1991 cnt++;
1992 }
1993 free(buf);
1994 }
1995
1996 /* Share every mountpoint below MOUNT_ROOT */
1997 if (nvram_get_int("smbd_autoshare") && (dir = opendir(MOUNT_ROOT))) {
1998 while ((dp = readdir(dir))) {
1999 if (strcmp(dp->d_name, ".") && strcmp(dp->d_name, "..")) {
2000
2001 /* Only if is a directory and is mounted */
2002 if (!dir_is_mountpoint(MOUNT_ROOT, dp->d_name))
2003 continue;
2004
2005 /* smbd_autoshare: 0 - disable, 1 - read-only, 2 - writable, 3 - hidden writable */
2006 fprintf(fp, "\n[%s]\n path = %s/%s\n comment = %s\n",
2007 dp->d_name, MOUNT_ROOT, dp->d_name, dp->d_name);
2008 if (nvram_match("smbd_autoshare", "3")) // Hidden
2009 fprintf(fp, "\n[%s$]\n path = %s/%s\n browseable = no\n",
2010 dp->d_name, MOUNT_ROOT, dp->d_name);
2011 if (nvram_match("smbd_autoshare", "2") || nvram_match("smbd_autoshare", "3")) // RW
2012 fprintf(fp, " writable = yes\n delete readonly = yes\n force user = root\n");
2013
2014 cnt++;
2015 }
2016 }
2017 }
2018 if (dir) closedir(dir);
2019
2020 if (cnt == 0) {
2021 /* by default share MOUNT_ROOT as read-only */
2022 fprintf(fp, "\n[share]\n"
2023 " path = %s\n"
2024 " writable = no\n",
2025 MOUNT_ROOT);
2026 }
2027
2028 fclose(fp);
2029
2030 mkdir_if_none("/var/run/samba");
2031 mkdir_if_none("/etc/samba");
2032
2033 /* write smbpasswd */
2034 #ifdef TCONFIG_SAMBA3
2035 eval("smbpasswd", "nobody", "\"\"");
2036 #else
2037 eval("smbpasswd", "-a", "nobody", "\"\"");
2038 #endif
2039 if (mode == 2) {
2040 char *smbd_user;
2041 if (((smbd_user = nvram_get("smbd_user")) == NULL) || (*smbd_user == 0) || !strcmp(smbd_user, "root"))
2042 smbd_user = "nas";
2043 #ifdef TCONFIG_SAMBA3
2044 eval("smbpasswd", smbd_user, nvram_safe_get("smbd_passwd"));
2045 #else
2046 eval("smbpasswd", "-a", smbd_user, nvram_safe_get("smbd_passwd"));
2047 #endif
2048 }
2049
2050 kill_samba(SIGHUP);
2051 int ret1 = 0, ret2 = 0;
2052 /* start samba if it's not already running */
2053 if (pidof("nmbd") <= 0)
2054 ret1 = xstart("nmbd", "-D");
2055 if (pidof("smbd") <= 0) {
2056 #ifdef TCONFIG_BCMARM
2057 #ifdef TCONFIG_BCMSMP
2058 if (cpu_num > 1)
2059 taskset_ret = cpu_eval(NULL, "1", "ionice", "-c1", "-n0", "smbd", "-D");
2060 else
2061 taskset_ret = eval("ionice", "-c1", "-n0", "smbd", "-D");
2062
2063 if (taskset_ret != 0)
2064 #endif
2065 #endif
2066 ret2 = xstart("smbd", "-D");
2067 }
2068
2069 if (ret1 || ret2) kill_samba(SIGTERM);
2070 }
2071
2072 static void stop_samba(void)
2073 {
2074 if (getpid() != 1) {
2075 stop_service("smbd");
2076 return;
2077 }
2078
2079 kill_samba(SIGTERM);
2080 /* clean up */
2081 unlink("/var/log/smb");
2082 unlink("/var/log/nmb");
2083 eval("rm", "-rf", "/var/run/samba");
2084
2085 #ifdef TCONFIG_GROCTRL
2086 enable_gro(0);
2087 #endif
2088
2089 }
2090 #endif // TCONFIG_SAMBASRV
2091
2092 #ifdef TCONFIG_GROCTRL
2093 void enable_gro(int interval)
2094 {
2095 char *argv[3] = {"echo", "", NULL};
2096 char lan_ifname[32], *lan_ifnames, *next;
2097 char path[64] = {0};
2098 char parm[32] = {0};
2099
2100 if(nvram_get_int("gro_disable"))
2101 return;
2102
2103 /* enabled gso on vlan interface */
2104 lan_ifnames = nvram_safe_get("lan_ifnames");
2105 foreach(lan_ifname, lan_ifnames, next) {
2106 if (!strncmp(lan_ifname, "vlan", 4)) {
2107 sprintf(path, ">>/proc/net/vlan/%s", lan_ifname);
2108 sprintf(parm, "-gro %d", interval);
2109 argv[1] = parm;
2110 _eval(argv, path, 0, NULL);
2111 }
2112 }
2113 }
2114 #endif
2115
2116 #ifdef TCONFIG_MEDIA_SERVER
2117 #define MEDIA_SERVER_APP "minidlna"
2118
2119 static void start_media_server(void)
2120 {
2121 FILE *f;
2122 int port, pid, https;
2123 char *dbdir;
2124 char *argv[] = { MEDIA_SERVER_APP, "-f", "/etc/"MEDIA_SERVER_APP".conf", "-R", NULL };
2125 static int once = 1;
2126
2127 if (getpid() != 1) {
2128 start_service("media");
2129 return;
2130 }
2131
2132 if (nvram_get_int("ms_sas") == 0)
2133 once = 0;
2134
2135 if (nvram_get_int("ms_enable") != 0) {
2136 if ((!once) && (nvram_get_int("ms_rescan") == 0)) {
2137 // no forced rescan
2138 argv[3] = NULL;
2139 }
2140 nvram_unset("ms_rescan");
2141
2142 if (f_exists("/etc/"MEDIA_SERVER_APP".alt")) {
2143 argv[2] = "/etc/"MEDIA_SERVER_APP".alt";
2144 }
2145 else {
2146 if ((f = fopen(argv[2], "w")) != NULL) {
2147 port = nvram_get_int("ms_port");
2148 https = nvram_get_int("https_enable");
2149 dbdir = nvram_safe_get("ms_dbdir");
2150 if (!(*dbdir)) dbdir = NULL;
2151 mkdir_if_none(dbdir ? : "/var/run/"MEDIA_SERVER_APP);
2152
2153 fprintf(f,
2154 "network_interface=%s\n"
2155 "port=%d\n"
2156 "friendly_name=%s\n"
2157 "db_dir=%s/.db\n"
2158 "enable_tivo=%s\n"
2159 "strict_dlna=%s\n"
2160 "presentation_url=http%s://%s:%s/nas-media.asp\n"
2161 "inotify=yes\n"
2162 "notify_interval=600\n"
2163 "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"
2164 "log_dir=/var/log\n"
2165 "log_level=general,artwork,database,inotify,scanner,metadata,http,ssdp,tivo=warn\n"
2166 "\n",
2167 nvram_safe_get("lan_ifname"),
2168 (port < 0) || (port >= 0xffff) ? 0 : port,
2169 nvram_get("router_name") ? : "Tomato",
2170 dbdir ? : "/var/run/"MEDIA_SERVER_APP,
2171 nvram_get_int("ms_tivo") ? "yes" : "no",
2172 nvram_get_int("ms_stdlna") ? "yes" : "no",
2173 https ? "s" : "", nvram_safe_get("lan_ipaddr"), nvram_safe_get(https ? "https_lanport" : "http_lanport")
2174 );
2175
2176 // media directories
2177 char *buf, *p, *q;
2178 char *path, *restrict;
2179
2180 if ((buf = strdup(nvram_safe_get("ms_dirs"))) != NULL) {
2181 /* path<restrict[A|V|P|] */
2182
2183 p = buf;
2184 while ((q = strsep(&p, ">")) != NULL) {
2185 if (vstrsep(q, "<", &path, &restrict) < 1 || !path || !(*path))
2186 continue;
2187 fprintf(f, "media_dir=%s%s%s\n",
2188 restrict ? : "", (restrict && *restrict) ? "," : "", path);
2189 }
2190 free(buf);
2191 }
2192
2193 fclose(f);
2194 }
2195 }
2196
2197 /* start media server if it's not already running */
2198 if (pidof(MEDIA_SERVER_APP) <= 0) {
2199 if ((_eval(argv, NULL, 0, &pid) == 0) && (once)) {
2200 /* If we started the media server successfully, wait 1 sec
2201 * to let it die if it can't open the database file.
2202 * If it's still alive after that, assume it's running and
2203 * disable forced once-after-reboot rescan.
2204 */
2205 sleep(1);
2206 if (pidof(MEDIA_SERVER_APP) > 0)
2207 once = 0;
2208 }
2209 }
2210 }
2211 }
2212
2213 static void stop_media_server(void)
2214 {
2215 if (getpid() != 1) {
2216 stop_service("media");
2217 return;
2218 }
2219
2220 killall_tk(MEDIA_SERVER_APP);
2221 }
2222 #endif // TCONFIG_MEDIA_SERVER
2223
2224 #ifdef TCONFIG_USB
2225 static void start_nas_services(void)
2226 {
2227 if (getpid() != 1) {
2228 start_service("usbapps");
2229 return;
2230 }
2231
2232 #ifdef TCONFIG_SAMBASRV
2233 start_samba();
2234 #endif
2235 #ifdef TCONFIG_FTP
2236 start_ftpd();
2237 #endif
2238 #ifdef TCONFIG_MEDIA_SERVER
2239 start_media_server();
2240 #endif
2241 }
2242
2243 static void stop_nas_services(void)
2244 {
2245 if (getpid() != 1) {
2246 stop_service("usbapps");
2247 return;
2248 }
2249
2250 #ifdef TCONFIG_MEDIA_SERVER
2251 stop_media_server();
2252 #endif
2253 #ifdef TCONFIG_FTP
2254 stop_ftpd();
2255 #endif
2256 #ifdef TCONFIG_SAMBASRV
2257 stop_samba();
2258 #endif
2259 }
2260
2261 void restart_nas_services(int stop, int start)
2262 {
2263 int fd = file_lock("usb");
2264 /* restart all NAS applications */
2265 if (stop)
2266 stop_nas_services();
2267 if (start)
2268 start_nas_services();
2269 file_unlock(fd);
2270 }
2271 #endif // TCONFIG_USB
2272
2273 // -----------------------------------------------------------------------------
2274
2275 /* -1 = Don't check for this program, it is not expected to be running.
2276 * Other = This program has been started and should be kept running. If no
2277 * process with the name is running, call func to restart it.
2278 * Note: At startup, dnsmasq forks a short-lived child which forks a
2279 * long-lived (grand)child. The parents terminate.
2280 * Many daemons use this technique.
2281 */
2282 static void _check(pid_t pid, const char *name, void (*func)(void))
2283 {
2284 if (pid == -1) return;
2285
2286 if (pidof(name) > 0) return;
2287
2288 syslog(LOG_DEBUG, "%s terminated unexpectedly, restarting.\n", name);
2289 func();
2290
2291 // Force recheck in 500 msec
2292 setitimer(ITIMER_REAL, &pop_tv, NULL);
2293 }
2294
2295 void check_services(void)
2296 {
2297 TRACE_PT("keep alive\n");
2298
2299 // Periodically reap any zombies
2300 setitimer(ITIMER_REAL, &zombie_tv, NULL);
2301
2302 #ifdef LINUX26
2303 _check(pid_hotplug2, "hotplug2", start_hotplug2);
2304 #endif
2305 _check(pid_dnsmasq, "dnsmasq", start_dnsmasq);
2306 _check(pid_crond, "crond", start_cron);
2307 _check(pid_igmp, "igmpproxy", start_igmp_proxy);
2308
2309 //#ifdef TCONFIG_NOCAT
2310 // if (nvram_get_int("NC_enable"))
2311 // _check(&pid_splashd, "splashd", start_splashd);
2312 //#endif
2313
2314 }
2315
2316 // -----------------------------------------------------------------------------
2317
2318 void start_services(void)
2319 {
2320 static int once = 1;
2321
2322 if (once) {
2323 once = 0;
2324
2325 if (nvram_get_int("telnetd_eas")) start_telnetd();
2326 if (nvram_get_int("sshd_eas")) start_sshd();
2327 }
2328
2329 // start_syslog();
2330 start_nas();
2331 start_zebra();
2332 #ifdef TCONFIG_SDHC
2333 start_mmc();
2334 #endif
2335 start_dnsmasq();
2336 start_cifs();
2337 start_httpd();
2338 #ifdef TCONFIG_NGINX
2339 start_enginex();
2340 start_mysql();
2341 #endif
2342 start_cron();
2343 // start_upnp();
2344 start_rstats(0);
2345 start_cstats(0);
2346 start_sched();
2347 #ifdef TCONFIG_PPTPD
2348 start_pptpd();
2349 #endif
2350 restart_nas_services(1, 1); // !!TB - Samba, FTP and Media Server
2351
2352 #ifdef TCONFIG_SNMP
2353 start_snmp();
2354 #endif
2355
2356 #ifdef TCONFIG_TOR
2357 start_tor();
2358 #endif
2359
2360 #ifdef TCONFIG_BT
2361 start_bittorrent();
2362 #endif
2363
2364 #ifdef TCONFIG_NOCAT
2365 start_splashd();
2366 #endif
2367
2368 #ifdef TCONFIG_NFS
2369 start_nfs();
2370 #endif
2371
2372 #ifdef TCONFIG_FANCTRL
2373 start_phy_tempsense();
2374 #endif
2375
2376
2377 if (get_model() == MODEL_R7000) {
2378 //enable WAN port led
2379 system("/usr/sbin/et robowr 0x0 0x10 0x3000");
2380 system("/usr/sbin/et robowr 0x0 0x12 0x78");
2381 system("/usr/sbin/et robowr 0x0 0x14 0x01");
2382 system("gpio disable 9");
2383 }
2384 }
2385
2386 void stop_services(void)
2387 {
2388 clear_resolv();
2389
2390 #ifdef TCONFIG_FANCTRL
2391 stop_phy_tempsense();
2392 #endif
2393
2394 #ifdef TCONFIG_BT
2395 stop_bittorrent();
2396 #endif
2397
2398 #ifdef TCONFIG_NOCAT
2399 stop_splashd();
2400 #endif
2401
2402 #ifdef TCONFIG_SNMP
2403 stop_snmp();
2404 #endif
2405
2406 #ifdef TCONFIG_TOR
2407 stop_tor();
2408 #endif
2409
2410 #ifdef TCONFIG_NFS
2411 stop_nfs();
2412 #endif
2413 restart_nas_services(1, 0); // stop Samba, FTP and Media Server
2414 #ifdef TCONFIG_PPTPD
2415 stop_pptpd();
2416 #endif
2417 stop_sched();
2418 stop_rstats();
2419 stop_cstats();
2420 // stop_upnp();
2421 stop_cron();
2422 stop_httpd();
2423 #ifdef TCONFIG_NGINX
2424 stop_mysql();
2425 stop_enginex();
2426 #endif
2427 #ifdef TCONFIG_SDHC
2428 stop_mmc();
2429 #endif
2430 stop_cifs();
2431 stop_dnsmasq();
2432 stop_zebra();
2433 stop_nas();
2434 // stop_syslog();
2435 }
2436
2437 // -----------------------------------------------------------------------------
2438
2439 /* nvram "action_service" is: "service-action[-modifier]"
2440 * action is something like "stop" or "start" or "restart"
2441 * optional modifier is "c" for the "service" command-line command
2442 */
2443 void exec_service(void)
2444 {
2445 const int A_START = 1;
2446 const int A_STOP = 2;
2447 const int A_RESTART = 1|2;
2448 char buffer[128];
2449 char *service;
2450 char *act;
2451 char *next;
2452 char *modifier;
2453 int action, user;
2454 int i;
2455
2456 strlcpy(buffer, nvram_safe_get("action_service"), sizeof(buffer));
2457 next = buffer;
2458
2459 TOP:
2460 act = strsep(&next, ",");
2461 service = strsep(&act, "-");
2462 if (act == NULL) {
2463 next = NULL;
2464 goto CLEAR;
2465 }
2466 modifier = act;
2467 strsep(&modifier, "-");
2468
2469 TRACE_PT("service=%s action=%s modifier=%s\n", service, act, modifier ? : "");
2470
2471 if (strcmp(act, "start") == 0) action = A_START;
2472 else if (strcmp(act, "stop") == 0) action = A_STOP;
2473 else if (strcmp(act, "restart") == 0) action = A_RESTART;
2474 else action = 0;
2475 user = (modifier != NULL && *modifier == 'c');
2476
2477 if (strcmp(service, "dhcpc") == 0) {
2478 if (action & A_STOP) stop_dhcpc();
2479 if (action & A_START) start_dhcpc();
2480 goto CLEAR;
2481 }
2482
2483 if ((strcmp(service, "dhcpd") == 0) || (strcmp(service, "dns") == 0) || (strcmp(service, "dnsmasq") == 0)) {
2484 if (action & A_STOP) stop_dnsmasq();
2485 if (action & A_START) {
2486 dns_to_resolv();
2487 start_dnsmasq();
2488 }
2489 goto CLEAR;
2490 }
2491
2492 if (strcmp(service, "firewall") == 0) {
2493 if (action & A_STOP) {
2494 stop_firewall();
2495 stop_igmp_proxy();
2496 stop_udpxy();
2497 }
2498 if (action & A_START) {
2499 start_firewall();
2500 start_igmp_proxy();
2501 start_udpxy();
2502 }
2503 goto CLEAR;
2504 }
2505
2506 if (strcmp(service, "restrict") == 0) {
2507 if (action & A_STOP) {
2508 stop_firewall();
2509 }
2510 if (action & A_START) {
2511 i = nvram_get_int("rrules_radio"); // -1 = not used, 0 = enabled by rule, 1 = disabled by rule
2512
2513 start_firewall();
2514
2515 // if radio was disabled by access restriction, but no rule is handling it now, enable it
2516 if (i == 1) {
2517 if (nvram_get_int("rrules_radio") < 0) {
2518 eval("radio", "on");
2519 }
2520 }
2521 }
2522 goto CLEAR;
2523 }
2524
2525 if (strcmp(service, "arpbind") == 0) {
2526 if (action & A_STOP) stop_arpbind();
2527 if (action & A_START) start_arpbind();
2528 goto CLEAR;
2529 }
2530
2531 if (strcmp(service, "qos") == 0) {
2532 if (action & A_STOP) {
2533 stop_qos();
2534 }
2535 stop_firewall(); start_firewall(); // always restarted
2536 if (action & A_START) {
2537 start_qos();
2538 if (nvram_match("qos_reset", "1")) f_write_string("/proc/net/clear_marks", "1", 0, 0);
2539 }
2540 goto CLEAR;
2541 }
2542
2543 if (strcmp(service, "qoslimit") == 0) {
2544 if (action & A_STOP) {
2545 new_qoslimit_stop();
2546 }
2547 #ifdef TCONFIG_NOCAT
2548 stop_splashd();
2549 #endif
2550 stop_firewall(); start_firewall(); // always restarted
2551 if (action & A_START) {
2552 new_qoslimit_start();
2553 }
2554 #ifdef TCONFIG_NOCAT
2555 start_splashd();
2556 #endif
2557 goto CLEAR;
2558 }
2559
2560 if (strcmp(service, "upnp") == 0) {
2561 if (action & A_STOP) {
2562 stop_upnp();
2563 }
2564 stop_firewall(); start_firewall(); // always restarted
2565 if (action & A_START) {
2566 start_upnp();
2567 }
2568 goto CLEAR;
2569 }
2570
2571 if (strcmp(service, "telnetd") == 0) {
2572 if (action & A_STOP) stop_telnetd();
2573 if (action & A_START) start_telnetd();
2574 goto CLEAR;
2575 }
2576
2577 if (strcmp(service, "sshd") == 0) {
2578 if (action & A_STOP) stop_sshd();
2579 if (action & A_START) start_sshd();
2580 goto CLEAR;
2581 }
2582
2583 if (strcmp(service, "httpd") == 0) {
2584 if (action & A_STOP) stop_httpd();
2585 if (action & A_START) start_httpd();
2586 goto CLEAR;
2587 }
2588
2589 #ifdef TCONFIG_IPV6
2590 if (strcmp(service, "ipv6") == 0) {
2591 if (action & A_STOP) {
2592 stop_dnsmasq();
2593 stop_ipv6();
2594 }
2595 if (action & A_START) {
2596 start_ipv6();
2597 start_dnsmasq();
2598 }
2599 goto CLEAR;
2600 }
2601
2602 if (strncmp(service, "dhcp6", 5) == 0) {
2603 if (action & A_STOP) {
2604 stop_dhcp6c();
2605 }
2606 if (action & A_START) {
2607 start_dhcp6c();
2608 }
2609 goto CLEAR;
2610 }
2611 #endif
2612
2613 if (strcmp(service, "admin") == 0) {
2614 if (action & A_STOP) {
2615 stop_sshd();
2616 stop_telnetd();
2617 stop_httpd();
2618 }
2619 stop_firewall(); start_firewall(); // always restarted
2620 if (action & A_START) {
2621 start_httpd();
2622 create_passwd();
2623 if (nvram_match("telnetd_eas", "1")) start_telnetd();
2624 if (nvram_match("sshd_eas", "1")) start_sshd();
2625 }
2626 goto CLEAR;
2627 }
2628
2629 if (strcmp(service, "ddns") == 0) {
2630 if (action & A_STOP) stop_ddns();
2631 if (action & A_START) start_ddns();
2632 goto CLEAR;
2633 }
2634
2635 if (strcmp(service, "ntpc") == 0) {
2636 if (action & A_STOP) stop_ntpc();
2637 if (action & A_START) start_ntpc();
2638 goto CLEAR;
2639 }
2640
2641 if (strcmp(service, "logging") == 0) {
2642 if (action & A_STOP) {
2643 stop_syslog();
2644 }
2645 if (action & A_START) {
2646 start_syslog();
2647 }
2648 if (!user) {
2649 // always restarted except from "service" command
2650 stop_cron(); start_cron();
2651 stop_firewall(); start_firewall();
2652 }
2653 goto CLEAR;
2654 }
2655
2656 if (strcmp(service, "crond") == 0) {
2657 if (action & A_STOP) {
2658 stop_cron();
2659 }
2660 if (action & A_START) {
2661 start_cron();
2662 }
2663 goto CLEAR;
2664 }
2665
2666 #ifdef LINUX26
2667 if (strncmp(service, "hotplug", 7) == 0) {
2668 if (action & A_STOP) {
2669 stop_hotplug2();
2670 }
2671 if (action & A_START) {
2672 start_hotplug2(1);
2673 }
2674 goto CLEAR;
2675 }
2676 #endif
2677
2678 if (strcmp(service, "upgrade") == 0) {
2679 if (action & A_START) {
2680 #if TOMATO_SL
2681 stop_usbevent();
2682 stop_smbd();
2683 #endif
2684 restart_nas_services(1, 0); // stop Samba, FTP and Media Server
2685 stop_jffs2();
2686 // stop_cifs();
2687 stop_zebra();
2688 stop_cron();
2689 stop_ntpc();
2690 stop_upnp();
2691 // stop_dhcpc();
2692 killall("rstats", SIGTERM);
2693 killall("cstats", SIGTERM);
2694 killall("buttons", SIGTERM);
2695 stop_syslog();
2696 remove_storage_main(1); // !!TB - USB Support
2697 stop_usb(); // !!TB - USB Support
2698 }
2699 goto CLEAR;
2700 }
2701
2702 #ifdef TCONFIG_CIFS
2703 if (strcmp(service, "cifs") == 0) {
2704 if (action & A_STOP) stop_cifs();
2705 if (action & A_START) start_cifs();
2706 goto CLEAR;
2707 }
2708 #endif
2709
2710 #ifdef TCONFIG_JFFS2
2711 if (strncmp(service, "jffs", 4) == 0) {
2712 if (action & A_STOP) stop_jffs2();
2713 if (action & A_START) start_jffs2();
2714 goto CLEAR;
2715 }
2716 #endif
2717
2718 if (strcmp(service, "zebra") == 0) {
2719 if (action & A_STOP) stop_zebra();
2720 if (action & A_START) start_zebra();
2721 goto CLEAR;
2722 }
2723
2724 #ifdef TCONFIG_SDHC
2725 if (strcmp(service, "mmc") == 0) {
2726 if (action & A_STOP) stop_mmc();
2727 if (action & A_START) start_mmc();
2728 goto CLEAR;
2729 }
2730 #endif
2731
2732 if (strcmp(service, "routing") == 0) {
2733 if (action & A_STOP) {
2734 stop_zebra();
2735 do_static_routes(0); // remove old '_saved'
2736 eval("brctl", "stp", nvram_safe_get("lan_ifname"), "0");
2737 if(strcmp(nvram_safe_get("lan1_ifname"),"")!=0)
2738 eval("brctl", "stp", nvram_safe_get("lan1_ifname"), "0");
2739 if(strcmp(nvram_safe_get("lan2_ifname"),"")!=0)
2740 eval("brctl", "stp", nvram_safe_get("lan2_ifname"), "0");
2741 if(strcmp(nvram_safe_get("lan3_ifname"),"")!=0)
2742 eval("brctl", "stp", nvram_safe_get("lan3_ifname"), "0");
2743 }
2744 stop_firewall();
2745 start_firewall();
2746 if (action & A_START) {
2747 do_static_routes(1); // add new
2748 start_zebra();
2749 eval("brctl", "stp", nvram_safe_get("lan_ifname"), nvram_safe_get("lan_stp"));
2750 if(strcmp(nvram_safe_get("lan1_ifname"),"")!=0)
2751 eval("brctl", "stp", nvram_safe_get("lan1_ifname"), nvram_safe_get("lan1_stp"));
2752 if(strcmp(nvram_safe_get("lan2_ifname"),"")!=0)
2753 eval("brctl", "stp", nvram_safe_get("lan2_ifname"), nvram_safe_get("lan2_stp"));
2754 if(strcmp(nvram_safe_get("lan3_ifname"),"")!=0)
2755 eval("brctl", "stp", nvram_safe_get("lan3_ifname"), nvram_safe_get("lan3_stp"));
2756 }
2757 goto CLEAR;
2758 }
2759
2760 if (strcmp(service, "ctnf") == 0) {
2761 if (action & A_START) {
2762 setup_conntrack();
2763 stop_firewall();
2764 start_firewall();
2765 }
2766 goto CLEAR;
2767 }
2768
2769 if (strcmp(service, "wan") == 0) {
2770 if (action & A_STOP) {
2771 stop_wan();
2772 }
2773
2774 if (action & A_START) {
2775 rename("/tmp/ppp/log", "/tmp/ppp/log.~");
2776 start_wan(BOOT);
2777 sleep(2);
2778 force_to_dial();
2779 }
2780 goto CLEAR;
2781 }
2782
2783 if (strcmp(service, "net") == 0) {
2784 if (action & A_STOP) {
2785 #ifdef TCONFIG_USB
2786 stop_nas_services();
2787 #endif
2788 stop_httpd();
2789 stop_dnsmasq();
2790 stop_nas();
2791 stop_wan();
2792 stop_arpbind();
2793 stop_lan();
2794 stop_vlan();
2795 }
2796 if (action & A_START) {
2797 start_vlan();
2798 start_lan();
2799 start_arpbind();
2800 start_wan(BOOT);
2801 start_nas();
2802 start_dnsmasq();
2803 start_httpd();
2804 start_wl();
2805 #ifdef TCONFIG_USB
2806 start_nas_services();
2807 #endif
2808 }
2809 goto CLEAR;
2810 }
2811
2812 if (strcmp(service, "wireless") == 0) {
2813 if(action & A_STOP) {
2814 stop_wireless();
2815 }
2816 if(action & A_START) {
2817 start_wireless();
2818 }
2819 goto CLEAR;
2820 }
2821
2822 if (strcmp(service, "wl") == 0) {
2823 if(action & A_STOP) {
2824 stop_wireless();
2825 unload_wl();
2826 }
2827 if(action & A_START) {
2828 load_wl();
2829 start_wireless();
2830 stop_wireless();
2831 start_wireless();
2832 }
2833 goto CLEAR;
2834 }
2835
2836 if (strcmp(service, "nas") == 0) {
2837 if (action & A_STOP) {
2838 stop_nas();
2839 }
2840 if (action & A_START) {
2841 start_nas();
2842 start_wl();
2843 }
2844 goto CLEAR;
2845 }
2846
2847 if (strcmp(service, "rstats") == 0) {
2848 if (action & A_STOP) stop_rstats();
2849 if (action & A_START) start_rstats(0);
2850 goto CLEAR;
2851 }
2852
2853 if (strcmp(service, "rstatsnew") == 0) {
2854 if (action & A_STOP) stop_rstats();
2855 if (action & A_START) start_rstats(1);
2856 goto CLEAR;
2857 }
2858
2859 if (strcmp(service, "cstats") == 0) {
2860 if (action & A_STOP) stop_cstats();
2861 if (action & A_START) start_cstats(0);
2862 goto CLEAR;
2863 }
2864
2865 if (strcmp(service, "cstatsnew") == 0) {
2866 if (action & A_STOP) stop_cstats();
2867 if (action & A_START) start_cstats(1);
2868 goto CLEAR;
2869 }
2870
2871 if (strcmp(service, "sched") == 0) {
2872 if (action & A_STOP) stop_sched();
2873 if (action & A_START) start_sched();
2874 goto CLEAR;
2875 }
2876
2877 #ifdef TCONFIG_BT
2878 if (strcmp(service, "bittorrent") == 0) {
2879 if (action & A_STOP) {
2880 stop_bittorrent();
2881 }
2882 stop_firewall(); start_firewall(); // always restarted
2883 if (action & A_START) {
2884 start_bittorrent();
2885 }
2886 goto CLEAR;
2887 }
2888 #endif
2889
2890 #ifdef TCONFIG_NFS
2891 if (strcmp(service, "nfs") == 0) {
2892 if (action & A_STOP) stop_nfs();
2893 if (action & A_START) start_nfs();
2894 goto CLEAR;
2895 }
2896 #endif
2897
2898 #ifdef TCONFIG_SNMP
2899 if (strcmp(service, "snmp") == 0) {
2900 if (action & A_STOP) stop_snmp();
2901 if (action & A_START) start_snmp();
2902 goto CLEAR;
2903 }
2904 #endif
2905
2906 #ifdef TCONFIG_TOR
2907 if (strcmp(service, "tor") == 0) {
2908 if (action & A_STOP) stop_tor();
2909
2910 stop_firewall(); start_firewall(); // always restarted
2911
2912 if (action & A_START) start_tor();
2913 goto CLEAR;
2914 }
2915 #endif
2916
2917 #ifdef TCONFIG_UPS
2918 if (strcmp(service, "ups") == 0) {
2919 if (action & A_STOP) stop_ups();
2920 if (action & A_START) start_ups();
2921 goto CLEAR;
2922 }
2923 #endif
2924
2925 #ifdef TCONFIG_USB
2926 // !!TB - USB Support
2927 if (strcmp(service, "usb") == 0) {
2928 if (action & A_STOP) stop_usb();
2929 if (action & A_START) {
2930 start_usb();
2931 // restart Samba and ftp since they may be killed by stop_usb()
2932 restart_nas_services(0, 1);
2933 // remount all partitions by simulating hotplug event
2934 add_remove_usbhost("-1", 1);
2935 }
2936 goto CLEAR;
2937 }
2938
2939 if (strcmp(service, "usbapps") == 0) {
2940 if (action & A_STOP) stop_nas_services();
2941 if (action & A_START) start_nas_services();
2942 goto CLEAR;
2943 }
2944 #endif
2945
2946 #ifdef TCONFIG_FTP
2947 // !!TB - FTP Server
2948 if (strcmp(service, "ftpd") == 0) {
2949 if (action & A_STOP) stop_ftpd();
2950 setup_conntrack();
2951 stop_firewall();
2952 start_firewall();
2953 if (action & A_START) start_ftpd();
2954 goto CLEAR;
2955 }
2956 #endif
2957
2958 #ifdef TCONFIG_MEDIA_SERVER
2959 if (strcmp(service, "media") == 0 || strcmp(service, "dlna") == 0) {
2960 if (action & A_STOP) stop_media_server();
2961 if (action & A_START) start_media_server();
2962 goto CLEAR;
2963 }
2964 #endif
2965
2966 #ifdef TCONFIG_SAMBASRV
2967 // !!TB - Samba
2968 if (strcmp(service, "samba") == 0 || strcmp(service, "smbd") == 0) {
2969 if (action & A_STOP) stop_samba();
2970 if (action & A_START) {
2971 create_passwd();
2972 stop_dnsmasq();
2973 start_dnsmasq();
2974 start_samba();
2975 }
2976 goto CLEAR;
2977 }
2978 #endif
2979
2980 #ifdef TCONFIG_OPENVPN
2981 if (strncmp(service, "vpnclient", 9) == 0) {
2982 if (action & A_STOP) stop_vpnclient(atoi(&service[9]));
2983 if (action & A_START) start_vpnclient(atoi(&service[9]));
2984 goto CLEAR;
2985 }
2986
2987 if (strncmp(service, "vpnserver", 9) == 0) {
2988 if (action & A_STOP) stop_vpnserver(atoi(&service[9]));
2989 if (action & A_START) start_vpnserver(atoi(&service[9]));
2990 goto CLEAR;
2991 }
2992 #endif
2993
2994 #ifdef TCONFIG_TINC
2995 if (strcmp(service, "tinc") == 0) {
2996 if (action & A_STOP) stop_tinc();
2997 if (action & A_START) start_tinc();
2998 goto CLEAR;
2999 }
3000 #endif
3001
3002 #ifdef TCONFIG_FANCTRL
3003 if (strcmp(service, "fanctrl") == 0) {
3004 if (action & A_STOP) stop_phy_tempsense();
3005 if (action & A_START) start_phy_tempsense();
3006 goto CLEAR;
3007 }
3008 #endif
3009
3010 #ifdef TCONFIG_NOCAT
3011 if (strcmp(service, "splashd") == 0) {
3012 if (action & A_STOP) stop_splashd();
3013 if (action & A_START) start_splashd();
3014 goto CLEAR;
3015 }
3016 #endif
3017
3018 #ifdef TCONFIG_NGINX
3019 if (strcmp(service, "enginex") == 0) {
3020 if (action & A_STOP) stop_enginex();
3021 stop_firewall(); start_firewall(); // always restarted
3022 if (action & A_START) start_enginex();
3023 goto CLEAR;
3024 }
3025 if (strcmp(service, "nginxfp") == 0) {
3026 if (action & A_STOP) stop_nginxfastpath();
3027 stop_firewall(); start_firewall(); // always restarted
3028 if (action & A_START) start_nginxfastpath();
3029 goto CLEAR;
3030 }
3031 if (strcmp(service, "mysql") == 0) {
3032 if (action & A_STOP) stop_mysql();
3033 stop_firewall(); start_firewall(); // always restarted
3034 if (action & A_START) start_mysql();
3035 goto CLEAR;
3036 }
3037 #endif
3038
3039 #ifdef TCONFIG_PPTPD
3040 if (strcmp(service, "pptpd") == 0) {
3041 if (action & A_STOP) stop_pptpd();
3042 if (action & A_START) start_pptpd();
3043 goto CLEAR;
3044 }
3045 #endif
3046
3047 #ifdef TCONFIG_PPTPD
3048 if (strcmp(service, "pptpclient") == 0) {
3049 if (action & A_STOP) stop_pptp_client();
3050 if (action & A_START) start_pptp_client();
3051 if (action & (A_START | A_STOP))
3052 {
3053 stop_dnsmasq();
3054 dns_to_resolv();
3055 start_dnsmasq();
3056 if ((action & A_START) == 0)
3057 clear_pptp_route();
3058 }
3059 goto CLEAR;
3060 }
3061 #endif
3062
3063 CLEAR:
3064 if (next) goto TOP;
3065
3066 // some functions check action_service and must be cleared at end -- zzz
3067 nvram_set("action_service", "");
3068
3069 // Force recheck in 500 msec
3070 setitimer(ITIMER_REAL, &pop_tv, NULL);
3071 }
3072
3073 static void do_service(const char *name, const char *action, int user)
3074 {
3075 int n;
3076 char s[64];
3077
3078 n = 150;
3079 while (!nvram_match("action_service", "")) {
3080 if (user) {
3081 putchar('*');
3082 fflush(stdout);
3083 }
3084 else if (--n < 0) break;
3085 usleep(100 * 1000);
3086 }
3087
3088 snprintf(s, sizeof(s), "%s-%s%s", name, action, (user ? "-c" : ""));
3089 nvram_set("action_service", s);
3090
3091 if (nvram_match("debug_rc_svc", "1")) {
3092 nvram_unset("debug_rc_svc");
3093 exec_service();
3094 } else {
3095 kill(1, SIGUSR1);
3096 }
3097
3098 n = 150;
3099 while (nvram_match("action_service", s)) {
3100 if (user) {
3101 putchar('.');
3102 fflush(stdout);
3103 }
3104 else if (--n < 0) {
3105 break;
3106 }
3107 usleep(100 * 1000);
3108 }
3109 }
3110
3111 int service_main(int argc, char *argv[])
3112 {
3113 if (argc != 3) usage_exit(argv[0], "<service> <action>");
3114 do_service(argv[1], argv[2], 1);
3115 printf("\nDone.\n");
3116 return 0;
3117 }
3118
3119 void start_service(const char *name)
3120 {
3121 do_service(name, "start", 0);
3122 }
3123
3124 void stop_service(const char *name)
3125 {
3126 do_service(name, "stop", 0);
3127 }
3128
3129 /*
3130 void restart_service(const char *name)
3131 {
3132 do_service(name, "restart", 0);
3133 }
3134 */
Tomato firmware and modifications.