ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/gvpe/src/conf.C
(Generate patch)

Comparing gvpe/src/conf.C (file contents):
Revision 1.49 by pcg, Sun Aug 10 22:18:58 2008 UTC vs.
Revision 1.59 by root, Tue Dec 4 10:29:43 2012 UTC

1/* 1/*
2 conf.c -- configuration code 2 conf.C -- configuration code
3 Copyright (C) 2003-2008 Marc Lehmann <gvpe@schmorp.de> 3 Copyright (C) 2003-2008,2011 Marc Lehmann <gvpe@schmorp.de>
4 4
5 This file is part of GVPE. 5 This file is part of GVPE.
6 6
7 GVPE is free software; you can redistribute it and/or modify it 7 GVPE is free software; you can redistribute it and/or modify it
8 under the terms of the GNU General Public License as published by the 8 under the terms of the GNU General Public License as published by the
… …
38#include <errno.h> 38#include <errno.h>
39#include <netdb.h> 39#include <netdb.h>
40#include <sys/stat.h> 40#include <sys/stat.h>
41#include <sys/types.h> 41#include <sys/types.h>
42#include <unistd.h> 42#include <unistd.h>
43#include <pwd.h>
43 44
44#include "netcompat.h" 45#include "netcompat.h"
45 46
46#include <openssl/err.h> 47#include <openssl/err.h>
47#include <openssl/pem.h> 48#include <openssl/pem.h>
… …
57char *thisnode; 58char *thisnode;
58char *identname; 59char *identname;
59 60
60struct configuration conf; 61struct configuration conf;
61 62
63u8
62u8 best_protocol (u8 protset) 64best_protocol (u8 protset)
63{ 65{
64 if (protset & PROT_IPv4 ) return PROT_IPv4; 66 if (protset & PROT_IPv4 ) return PROT_IPv4;
65 if (protset & PROT_ICMPv4) return PROT_ICMPv4; 67 if (protset & PROT_ICMPv4) return PROT_ICMPv4;
66 if (protset & PROT_UDPv4 ) return PROT_UDPv4; 68 if (protset & PROT_UDPv4 ) return PROT_UDPv4;
67 if (protset & PROT_TCPv4 ) return PROT_TCPv4; 69 if (protset & PROT_TCPv4 ) return PROT_TCPv4;
68 if (protset & PROT_DNSv4 ) return PROT_DNSv4; 70 if (protset & PROT_DNSv4 ) return PROT_DNSv4;
69 71
70 return 0; 72 return 0;
71} 73}
72 74
75const char *
73const char *strprotocol (u8 protocol) 76strprotocol (u8 protocol)
74{ 77{
75 if (protocol & PROT_IPv4 ) return "rawip"; 78 if (protocol & PROT_IPv4 ) return "rawip";
76 if (protocol & PROT_ICMPv4) return "icmp"; 79 if (protocol & PROT_ICMPv4) return "icmp";
77 if (protocol & PROT_UDPv4 ) return "udp"; 80 if (protocol & PROT_UDPv4 ) return "udp";
78 if (protocol & PROT_TCPv4 ) return "tcp"; 81 if (protocol & PROT_TCPv4 ) return "tcp";
… …
103 return false; 106 return false;
104 107
105 return true; 108 return true;
106} 109}
107 110
108void
109conf_node::print ()
110{
111 printf ("%4d fe:fd:80:00:0%1x:%02x %c %-8.8s %-10.10s %s%s%d\n",
112 id,
113 id >> 8, id & 0xff,
114 compress ? 'Y' : 'N',
115 connectmode == C_ONDEMAND ? "ondemand"
116 : connectmode == C_NEVER ? "never"
117 : connectmode == C_ALWAYS ? "always"
118 : connectmode == C_DISABLED ? "disabled"
119 : "",
120 nodename,
121 hostname ? hostname : "",
122 hostname ? ":" : "",
123 hostname ? udp_port : 0
124 );
125}
126
127conf_node::~conf_node () 111conf_node::~conf_node ()
128{ 112{
129#if 0 113#if 0
130 // does not work, because string pointers etc. are shared 114 // does not work, because string pointers etc. are shared
131 // is not called, however 115 // is not called, however
… …
140 free (dns_hostname); 124 free (dns_hostname);
141#endif 125#endif
142#endif 126#endif
143} 127}
144 128
129void
145void configuration::init () 130configuration::init ()
146{ 131{
147 memset (this, 0, sizeof (*this)); 132 memset (this, 0, sizeof (*this));
148 133
149 mtu = DEFAULT_MTU; 134 mtu = DEFAULT_MTU;
135 nfmark = 0;
150 rekey = DEFAULT_REKEY; 136 rekey = DEFAULT_REKEY;
151 keepalive = DEFAULT_KEEPALIVE; 137 keepalive = DEFAULT_KEEPALIVE;
152 llevel = L_INFO; 138 llevel = L_INFO;
153 ip_proto = IPPROTO_GRE; 139 ip_proto = IPPROTO_GRE;
154#if ENABLE_ICMP 140#if ENABLE_ICMP
… …
166 default_node.if_up_data = strdup (""); 152 default_node.if_up_data = strdup ("");
167 153
168#if ENABLE_DNS 154#if ENABLE_DNS
169 default_node.dns_port = 0; // default is 0 == client 155 default_node.dns_port = 0; // default is 0 == client
170 156
157 dns_case_preserving = true;
171 dns_forw_host = strdup ("127.0.0.1"); 158 dns_forw_host = strdup ("127.0.0.1");
172 dns_forw_port = 53; 159 dns_forw_port = 53;
173 dns_timeout_factor = DEFAULT_DNS_TIMEOUT_FACTOR; 160 dns_timeout_factor = DEFAULT_DNS_TIMEOUT_FACTOR;
174 dns_send_interval = DEFAULT_DNS_SEND_INTERVAL; 161 dns_send_interval = DEFAULT_DNS_SEND_INTERVAL;
175 dns_overlap_factor = DEFAULT_DNS_OVERLAP_FACTOR; 162 dns_overlap_factor = DEFAULT_DNS_OVERLAP_FACTOR;
… …
177#endif 164#endif
178 165
179 conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid"); 166 conf.pidfilename = strdup (LOCALSTATEDIR "/run/gvpe.pid");
180} 167}
181 168
169void
182void configuration::cleanup() 170configuration::cleanup ()
183{ 171{
184 if (rsa_key) 172 if (rsa_key)
185 RSA_free (rsa_key); 173 RSA_free (rsa_key);
186 174
187 rsa_key = 0; 175 rsa_key = 0;
188 176
189 free (pidfilename); pidfilename = 0; 177 free (pidfilename); pidfilename = 0;
190 free (ifname); ifname = 0; 178 free (ifname); ifname = 0;
191#if ENABLE_HTTP_PROXY 179#if ENABLE_HTTP_PROXY
192 free (proxy_host); proxy_host = 0; 180 free (proxy_host); proxy_host = 0;
193 free (proxy_auth); proxy_auth = 0; 181 free (proxy_auth); proxy_auth = 0;
194#endif 182#endif
195#if ENABLE_DNS 183#if ENABLE_DNS
196 free (dns_forw_host); dns_forw_host = 0; 184 free (dns_forw_host); dns_forw_host = 0;
197#endif 185#endif
186 free (change_root); change_root = 0;
187 free (script_if_up); script_if_up = 0;
188 free (script_node_up); script_node_up = 0;
189 free (script_node_change); script_node_change = 0;
190 free (script_node_down); script_node_down = 0;
198} 191}
199 192
200void 193void
201configuration::clear () 194configuration::clear ()
202{ 195{
… …
206 nodes.clear (); 199 nodes.clear ();
207 200
208 cleanup (); 201 cleanup ();
209 init (); 202 init ();
210} 203}
204
205//static bool
206//is_true (const char *name)
207//{
208 //re
209//}
211 210
212#define parse_bool(target,name,trueval,falseval) do { \ 211#define parse_bool(target,name,trueval,falseval) do { \
213 if (!strcmp (val, "yes")) target = trueval; \ 212 if (!strcmp (val, "yes")) target = trueval; \
214 else if (!strcmp (val, "no")) target = falseval; \ 213 else if (!strcmp (val, "no")) target = falseval; \
215 else if (!strcmp (val, "true")) target = trueval; \ 214 else if (!strcmp (val, "true")) target = trueval; \
216 else if (!strcmp (val, "false")) target = falseval; \ 215 else if (!strcmp (val, "false")) target = falseval; \
217 else if (!strcmp (val, "on")) target = trueval; \ 216 else if (!strcmp (val, "on")) target = trueval; \
218 else if (!strcmp (val, "off")) target = falseval; \ 217 else if (!strcmp (val, "off")) target = falseval; \
219 else \ 218 else \
220 return _("illegal boolean value, only 'yes|true|on' or 'no|false|off' allowed. (ignored)"); \ 219 return _("illegal boolean value, only 'yes|true|on' or 'no|false|off' allowed, ignored"); \
221} while (0) 220} while (0)
222 221
223const char * 222const char *
224configuration_parser::parse_line (char *line) 223configuration_parser::parse_line (char *line)
225{ 224{
… …
243 return 0; /* comment: ignore */ 242 return 0; /* comment: ignore */
244 243
245 char *val = strtok (NULL, "\t\n\r ="); 244 char *val = strtok (NULL, "\t\n\r =");
246 245
247 if (!val || val[0] == '#') 246 if (!val || val[0] == '#')
248 return _("no value given for variable. (ignored)"); 247 return _("no value given for variable, ignored");
249 248
250 if (!strcmp (var, "on")) 249 else if (!strcmp (var, "on"))
251 { 250 {
252 if (!::thisnode 251 if (::thisnode
253 || (val[0] == '!' && strcmp (val + 1, ::thisnode)) 252 && ((val[0] == '!' && strcmp (val + 1, ::thisnode))
254 || !strcmp (val, ::thisnode)) 253 || !strcmp (val, ::thisnode)))
255 return parse_line (strtok (NULL, "\n\r")); 254 return parse_line (strtok (NULL, "\n\r"));
256 else 255 }
257 return 0; 256
257 else if (!strcmp (var, "include"))
258 {
259 char *fname = conf.config_filename (val);
260 parse_file (fname);
261 free (fname);
258 } 262 }
259 263
260 // truly global 264 // truly global
261 if (!strcmp (var, "loglevel")) 265 else if (!strcmp (var, "loglevel"))
262 { 266 {
263 loglevel l = string_to_loglevel (val); 267 loglevel l = string_to_loglevel (val);
264 268
265 if (l == L_NONE) 269 if (l == L_NONE)
266 return _("unknown loglevel. (skipping)"); 270 return _("unknown loglevel, ignored");
267 } 271 }
268 else if (!strcmp (var, "ip-proto")) 272 else if (!strcmp (var, "ip-proto"))
269 conf.ip_proto = atoi (val); 273 conf.ip_proto = atoi (val);
270 else if (!strcmp (var, "icmp-type")) 274 else if (!strcmp (var, "icmp-type"))
271 { 275 {
272#if ENABLE_ICMP 276#if ENABLE_ICMP
273 conf.icmp_type = atoi (val); 277 conf.icmp_type = atoi (val);
274#endif 278#endif
275 } 279 }
280 else if (!strcmp (var, "chuser"))
281 {
282 struct passwd *pw = getpwnam (val);
283 if (!pw)
284 return _("user specified for chuser not found");
276 285
277 // per config 286 conf.change_uid = pw->pw_uid;
287 conf.change_gid = pw->pw_gid;
288 }
289 else if (!strcmp (var, "chuid"))
290 conf.change_uid = atoi (val);
291 else if (!strcmp (var, "chgid"))
292 conf.change_gid = atoi (val);
293 else if (!strcmp (var, "chroot"))
294 free (conf.change_root), conf.change_root = strdup (val);
295
296 // per node
278 else if (!strcmp (var, "node")) 297 else if (!strcmp (var, "node"))
279 { 298 {
280 parse_argv (); 299 parse_argv ();
281 300
282 conf.default_node.id++; 301 conf.default_node.id++;
… …
330 conf.rekey = atoi (val); 349 conf.rekey = atoi (val);
331 else if (!strcmp (var, "keepalive")) 350 else if (!strcmp (var, "keepalive"))
332 conf.keepalive = atoi (val); 351 conf.keepalive = atoi (val);
333 else if (!strcmp (var, "mtu")) 352 else if (!strcmp (var, "mtu"))
334 conf.mtu = atoi (val); 353 conf.mtu = atoi (val);
354 else if (!strcmp (var, "nfmark"))
355 conf.nfmark = atoi (val);
335 else if (!strcmp (var, "if-up")) 356 else if (!strcmp (var, "if-up"))
336 free (conf.script_if_up), conf.script_if_up = strdup (val); 357 free (conf.script_if_up), conf.script_if_up = strdup (val);
337 else if (!strcmp (var, "node-up")) 358 else if (!strcmp (var, "node-up"))
338 free (conf.script_node_up), conf.script_node_up = strdup (val); 359 free (conf.script_node_up), conf.script_node_up = strdup (val);
360 else if (!strcmp (var, "node-change"))
361 free (conf.script_node_change), conf.script_node_change = strdup (val);
339 else if (!strcmp (var, "node-down")) 362 else if (!strcmp (var, "node-down"))
340 free (conf.script_node_down), conf.script_node_down = strdup (val); 363 free (conf.script_node_down), conf.script_node_down = strdup (val);
341 else if (!strcmp (var, "pid-file")) 364 else if (!strcmp (var, "pid-file"))
342 free (conf.pidfilename), conf.pidfilename = strdup (val); 365 free (conf.pidfilename), conf.pidfilename = strdup (val);
343 else if (!strcmp (var, "dns-forw-host")) 366 else if (!strcmp (var, "dns-forw-host"))
… …
372 } 395 }
373 else if (!strcmp (var, "dns-max-outstanding")) 396 else if (!strcmp (var, "dns-max-outstanding"))
374 { 397 {
375#if ENABLE_DNS 398#if ENABLE_DNS
376 conf.dns_max_outstanding = atoi (val); 399 conf.dns_max_outstanding = atoi (val);
400#endif
401 }
402 else if (!strcmp (var, "dns-case-preserving"))
403 {
404#if ENABLE_DNS
405 parse_bool (conf.dns_case_preserving, "dns-case-preserving", true, false);
377#endif 406#endif
378 } 407 }
379 else if (!strcmp (var, "http-proxy-host")) 408 else if (!strcmp (var, "http-proxy-host"))
380 { 409 {
381#if ENABLE_HTTP_PROXY 410#if ENABLE_HTTP_PROXY
… …
437 else if (!strcmp (val, "always")) 466 else if (!strcmp (val, "always"))
438 node->connectmode = conf_node::C_ALWAYS; 467 node->connectmode = conf_node::C_ALWAYS;
439 else if (!strcmp (val, "disabled")) 468 else if (!strcmp (val, "disabled"))
440 node->connectmode = conf_node::C_DISABLED; 469 node->connectmode = conf_node::C_DISABLED;
441 else 470 else
442 return _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled'. (ignored)"); 471 return _("illegal value for 'connectmode', use one of 'ondemand', 'never', 'always' or 'disabled', ignored");
443 } 472 }
444 else if (!strcmp (var, "inherit-tos")) 473 else if (!strcmp (var, "inherit-tos"))
445 parse_bool (node->inherit_tos, "inherit-tos", true, false); 474 parse_bool (node->inherit_tos, "inherit-tos", true, false);
446 else if (!strcmp (var, "compress")) 475 else if (!strcmp (var, "compress"))
447 parse_bool (node->compress, "compress", true, false); 476 parse_bool (node->compress, "compress", true, false);
… …
481 else if (!strcmp (var, "max-queue")) 510 else if (!strcmp (var, "max-queue"))
482 node->max_queue = atoi (val); 511 node->max_queue = atoi (val);
483 512
484 // unknown or misplaced 513 // unknown or misplaced
485 else 514 else
486 return _("unknown configuration directive. (ignored)"); 515 return _("unknown configuration directive - ignored");
487 516
488 return 0; 517 return 0;
489} 518}
490 519
520void
491void conf_node::finalise () 521conf_node::finalise ()
492{ 522{
493 if (max_queue < 1) 523 if (max_queue < 1)
494 { 524 {
495 slog (L_WARN, _("%s: max-queue value invalid, setting it to 1."), nodename); 525 slog (L_WARN, _("%s: max-queue value invalid, setting it to 1."), nodename);
496 max_queue = 1; 526 max_queue = 1;
… …
501 //slog (L_WARN, _("%s: has non-zero router-priority but either 'never' or 'ondemand' as connectmode, setting it to 'always'."), nodename); 531 //slog (L_WARN, _("%s: has non-zero router-priority but either 'never' or 'ondemand' as connectmode, setting it to 'always'."), nodename);
502 connectmode = C_ALWAYS; 532 connectmode = C_ALWAYS;
503 } 533 }
504} 534}
505 535
536void
506void configuration_parser::parse_argv () 537configuration_parser::parse_argv ()
507{ 538{
508 for (int i = 0; i < argc; ++i) 539 for (int i = 0; i < argc; ++i)
509 { 540 {
510 char *v = argv [i]; 541 char *v = argv [i];
511 542
… …
532 if (warn) 563 if (warn)
533 slog (L_WARN, _("%s, while parsing command line option '%s'."), warn, v); 564 slog (L_WARN, _("%s, while parsing command line option '%s'."), warn, v);
534 565
535 *v = 0; 566 *v = 0;
536 } 567 }
568 }
569}
570
571void
572configuration_parser::parse_file (const char *fname)
573{
574 if (FILE *f = fopen (fname, "r"))
575 {
576 char line [2048];
577 int lineno = 0;
578
579 while (fgets (line, sizeof (line), f))
580 {
581 lineno++;
582
583 const char *warn = parse_line (line);
584
585 if (warn)
586 slog (L_WARN, _("%s, at '%s', line %d."), warn, fname, lineno);
587 }
588
589 fclose (f);
590
591 parse_argv ();
592 }
593 else
594 {
595 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
596 exit (EXIT_FAILURE);
537 } 597 }
538} 598}
539 599
540configuration_parser::configuration_parser (configuration &conf, 600configuration_parser::configuration_parser (configuration &conf,
541 bool need_keys, 601 bool need_keys,
542 int argc, 602 int argc,
543 char **argv) 603 char **argv)
544: conf (conf),need_keys (need_keys), argc (argc), argv (argv) 604: conf (conf),need_keys (need_keys), argc (argc), argv (argv)
545{ 605{
546 char *fname; 606 char *fname;
547 FILE *f;
548 607
549 conf.clear (); 608 conf.clear ();
609 node = &conf.default_node;
550 610
551 asprintf (&fname, "%s/gvpe.conf", confbase); 611 asprintf (&fname, "%s/gvpe.conf", confbase);
552 f = fopen (fname, "r"); 612 parse_file (fname);
553
554 if (f)
555 {
556 char line[16384];
557 int lineno = 0;
558 node = &conf.default_node;
559
560 while (fgets (line, sizeof (line), f))
561 {
562 lineno++;
563
564 const char *warn = parse_line (line);
565
566 if (warn)
567 slog (L_WARN, _("%s, at '%s', line %d."), warn, fname, lineno);
568 }
569
570 fclose (f);
571
572 parse_argv ();
573 }
574 else
575 {
576 slog (L_ERR, _("unable to read config file '%s': %s"), fname, strerror (errno));
577 exit (EXIT_FAILURE);
578 }
579
580 free (fname); 613 free (fname);
581 614
582 fname = conf.config_filename (conf.prikeyfile, "hostkey"); 615 fname = conf.config_filename (conf.prikeyfile, "hostkey");
583 616
584 f = fopen (fname, "r"); 617 if (FILE *f = fopen (fname, "r"))
585 if (f)
586 { 618 {
587 conf.rsa_key = RSA_new (); 619 conf.rsa_key = RSA_new ();
588 620
589 if (!PEM_read_RSAPrivateKey (f, &conf.rsa_key, NULL, NULL)) 621 if (!PEM_read_RSAPrivateKey (f, &conf.rsa_key, NULL, NULL))
590 { 622 {
… …
602 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno)); 634 slog (need_keys ? L_ERR : L_NOTICE, _("unable to open private rsa key file '%s': %s"), fname, strerror (errno));
603 635
604 if (need_keys) 636 if (need_keys)
605 exit (EXIT_FAILURE); 637 exit (EXIT_FAILURE);
606 } 638 }
639
640 free (fname);
607 641
608 if (need_keys && ::thisnode 642 if (need_keys && ::thisnode
609 && conf.rsa_key && conf.thisnode && conf.thisnode->rsa_key) 643 && conf.rsa_key && conf.thisnode && conf.thisnode->rsa_key)
610 if (BN_cmp (conf.rsa_key->n, conf.thisnode->rsa_key->n) != 0 644 if (BN_cmp (conf.rsa_key->n, conf.thisnode->rsa_key->n) != 0
611 || BN_cmp (conf.rsa_key->e, conf.thisnode->rsa_key->e) != 0) 645 || BN_cmp (conf.rsa_key->e, conf.thisnode->rsa_key->e) != 0)
612 { 646 {
613 slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode); 647 slog (L_NOTICE, _("private hostkey and public node key mismatch: is '%s' the correct node?"), ::thisnode);
614 exit (EXIT_FAILURE); 648 exit (EXIT_FAILURE);
615 } 649 }
616 650
617 free (fname);
618
619 for (configuration::node_vector::iterator i = conf.nodes.begin(); i != conf.nodes.end(); ++i) 651 for (configuration::node_vector::iterator i = conf.nodes.begin(); i != conf.nodes.end(); ++i)
620 (*i)->finalise (); 652 (*i)->finalise ();
621} 653}
622 654
655char *
623char *configuration::config_filename (const char *name, const char *dflt) 656configuration::config_filename (const char *name, const char *dflt)
624{ 657{
625 char *fname; 658 char *fname;
626 659
627 asprintf (&fname, name ? name : dflt, ::thisnode); 660 asprintf (&fname, name ? name : dflt, ::thisnode);
628 661
… …
632 asprintf (&fname, "%s/%s", confbase, rname); 665 asprintf (&fname, "%s/%s", confbase, rname);
633 free (rname); 666 free (rname);
634 } 667 }
635 668
636 return fname; 669 return fname;
670}
671
672void
673conf_node::print ()
674{
675 printf ("%4d fe:fd:80:00:0%1x:%02x %c %-8.8s %-10.10s %02x %s%s%d\n",
676 id,
677 id >> 8, id & 0xff,
678 compress ? 'Y' : 'N',
679 connectmode == C_ONDEMAND ? "ondemand"
680 : connectmode == C_NEVER ? "never"
681 : connectmode == C_ALWAYS ? "always"
682 : connectmode == C_DISABLED ? "disabled"
683 : "",
684 nodename,
685 protocols,
686 hostname ? hostname : "",
687 hostname ? ":" : "",
688 hostname ? udp_port : 0
689 );
637} 690}
638 691
639void 692void
640configuration::print () 693configuration::print ()
641{ 694{
… …
648 printf (_("interface: %s\n"), ifname); 701 printf (_("interface: %s\n"), ifname);
649 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>"); 702 printf (_("primary rsa key: %s\n"), prikeyfile ? prikeyfile : "<default>");
650 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) * 8 : -1); 703 printf (_("rsa key size: %d\n"), rsa_key ? RSA_size (rsa_key) * 8 : -1);
651 printf ("\n"); 704 printf ("\n");
652 705
653 printf ("%4s %-17s %s %-8.8s %-10.10s %s\n", 706 printf ("%4s %-17s %s %-8.8s %-10.10s %04s %s\n",
654 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Host:Port")); 707 _("ID#"), _("MAC"), _("Com"), _("Conmode"), _("Node"), _("Prot"), _("Host:Port"));
655 708
656 for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i) 709 for (node_vector::iterator i = nodes.begin (); i != nodes.end (); ++i)
657 (*i)->print (); 710 (*i)->print ();
658 711
659 printf ("\n"); 712 printf ("\n");
… …
669configuration::~configuration () 722configuration::~configuration ()
670{ 723{
671 cleanup (); 724 cleanup ();
672} 725}
673 726
674

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines