2 * daemon/unbound.c - main program for unbound DNS resolver daemon.
4 * Copyright (c) 2007, NLnet Labs. All rights reserved.
6 * This software is open source.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
12 * Redistributions of source code must retain the above copyright notice,
13 * this list of conditions and the following disclaimer.
15 * Redistributions in binary form must reproduce the above copyright notice,
16 * this list of conditions and the following disclaimer in the documentation
17 * and/or other materials provided with the distribution.
19 * Neither the name of the NLNET LABS nor the names of its contributors may
20 * be used to endorse or promote products derived from this software without
21 * specific prior written permission.
23 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
24 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
25 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
26 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
27 * HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
28 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
29 * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
30 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
31 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
32 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
33 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
40 * Main program to start the DNS resolver daemon.
49 #include "daemon/daemon.h"
50 #include "daemon/remote.h"
51 #include "util/config_file.h"
52 #include "util/storage/slabhash.h"
53 #include "services/listen_dnsport.h"
54 #include "services/cache/rrset.h"
55 #include "services/cache/infra.h"
56 #include "util/fptr_wlist.h"
57 #include "util/data/msgreply.h"
58 #include "util/module.h"
59 #include "util/net_help.h"
60 #include "util/ub_event.h"
63 #include <openssl/crypto.h>
70 #include <openssl/ssl.h>
73 /* splint chokes on this system header file */
74 #ifdef HAVE_SYS_RESOURCE_H
75 #include <sys/resource.h>
77 #endif /* S_SPLINT_S */
78 #ifdef HAVE_LOGIN_CAP_H
79 #include <login_cap.h>
83 # include "winrc/win_svc.h"
91 #ifdef HAVE_TARGETCONDITIONALS_H
92 #include <TargetConditionals.h>
95 #if (defined(TARGET_OS_TV) && TARGET_OS_TV) || (defined(TARGET_OS_WATCH) && TARGET_OS_WATCH)
99 /** print build options. */
101 print_build_options(void)
104 const char *evnm="event", *evsys="", *evmethod="";
107 struct ub_event_base* base;
108 printf("Version %s\n\n", PACKAGE_VERSION);
109 printf("Configure line: %s\n", CONFCMDLINE);
110 base = ub_default_event_base(0,&t,&now);
111 ub_get_event_sys(base, &evnm, &evsys, &evmethod);
112 printf("Linked libs: %s %s (it uses %s), %s\n",
113 evnm, evsys, evmethod,
115 # ifdef SSLEAY_VERSION
116 SSLeay_version(SSLEAY_VERSION)
118 OpenSSL_version(OPENSSL_VERSION)
120 #elif defined(HAVE_NSS)
122 #elif defined(HAVE_NETTLE)
126 printf("Linked modules:");
127 for(m = module_list_avail(); *m; m++)
131 printf("DNSCrypt feature available\n");
133 #ifdef USE_TCP_FASTOPEN
134 printf("TCP Fastopen feature available\n");
136 ub_event_base_free(base);
137 printf("\nBSD licensed, see LICENSE in source package for details.\n");
138 printf("Report bugs to %s\n", PACKAGE_BUGREPORT);
145 printf("usage: unbound [options]\n");
146 printf(" start unbound daemon DNS resolver.\n");
147 printf("-h this help.\n");
148 printf("-c file config file to read instead of %s\n", CONFIGFILE);
149 printf(" file format is described in unbound.conf(5).\n");
150 printf("-d do not fork into the background.\n");
151 printf("-p do not create a pidfile.\n");
152 printf("-v verbose (more times to increase verbosity).\n");
153 printf("-V show version number and build options.\n");
155 printf("-w opt windows option: \n");
156 printf(" install, remove - manage the services entry\n");
157 printf(" service - used to start from services control panel\n");
159 printf("\nVersion %s\n", PACKAGE_VERSION);
160 printf("BSD licensed, see LICENSE in source package for details.\n");
161 printf("Report bugs to %s\n", PACKAGE_BUGREPORT);
164 #ifndef unbound_testbound
165 int replay_var_compare(const void* ATTR_UNUSED(a), const void* ATTR_UNUSED(b))
172 /** check file descriptor count */
174 checkrlimits(struct config_file* cfg)
177 #ifdef HAVE_GETRLIMIT
178 /* list has number of ports to listen to, ifs number addresses */
179 int list = ((cfg->do_udp?1:0) + (cfg->do_tcp?1 +
180 (int)cfg->incoming_num_tcp:0));
181 size_t listen_ifs = (size_t)(cfg->num_ifs==0?
182 ((cfg->do_ip4 && !cfg->if_automatic?1:0) +
183 (cfg->do_ip6?1:0)):cfg->num_ifs);
184 size_t listen_num = list*listen_ifs;
185 size_t outudpnum = (size_t)cfg->outgoing_num_ports;
186 size_t outtcpnum = cfg->outgoing_num_tcp;
187 size_t misc = 4; /* logfile, pidfile, stdout... */
188 size_t perthread_noudp = listen_num + outtcpnum +
189 2/*cmdpipe*/ + 2/*libevent*/ + misc;
190 size_t perthread = perthread_noudp + outudpnum;
192 #if !defined(HAVE_PTHREAD) && !defined(HAVE_SOLARIS_THREADS)
193 int numthread = 1; /* it forks */
195 int numthread = (cfg->num_threads?cfg->num_threads:1);
197 size_t total = numthread * perthread + misc;
202 strncmp(ub_event_get_version(), "mini-event", 10) == 0) {
203 log_warn("too many file descriptors requested. The builtin"
204 "mini-event cannot handle more than 1024. Config "
205 "for less fds or compile with libevent");
206 if(numthread*perthread_noudp+15 > 1024)
207 fatal_exit("too much tcp. not enough fds.");
208 cfg->outgoing_num_ports = (int)((1024
209 - numthread*perthread_noudp
210 - 10 /* safety margin */) /numthread);
211 log_warn("continuing with less udp ports: %u",
212 cfg->outgoing_num_ports);
216 strncmp(ub_event_get_version(), "winsock-event", 13) == 0) {
217 log_err("too many file descriptors requested. The winsock"
218 " event handler cannot handle more than 64 per "
219 " thread. Config for less fds");
220 if(perthread_noudp+2 > 64)
221 fatal_exit("too much tcp. not enough fds.");
222 cfg->outgoing_num_ports = (int)((64
224 - 2/* safety margin */));
225 log_warn("continuing with less udp ports: %u",
226 cfg->outgoing_num_ports);
227 total = numthread*(perthread_noudp+
228 (size_t)cfg->outgoing_num_ports)+misc;
230 if(getrlimit(RLIMIT_NOFILE, &rlim) < 0) {
231 log_warn("getrlimit: %s", strerror(errno));
234 if(rlim.rlim_cur == (rlim_t)RLIM_INFINITY)
236 if((size_t)rlim.rlim_cur < total) {
237 avail = (size_t)rlim.rlim_cur;
238 rlim.rlim_cur = (rlim_t)(total + 10);
239 rlim.rlim_max = (rlim_t)(total + 10);
240 #ifdef HAVE_SETRLIMIT
241 if(setrlimit(RLIMIT_NOFILE, &rlim) < 0) {
242 log_warn("setrlimit: %s", strerror(errno));
244 log_warn("cannot increase max open fds from %u to %u",
245 (unsigned)avail, (unsigned)total+10);
246 /* check that calculation below does not underflow,
247 * with 15 as margin */
248 if(numthread*perthread_noudp+15 > avail)
249 fatal_exit("too much tcp. not enough fds.");
250 cfg->outgoing_num_ports = (int)((avail
251 - numthread*perthread_noudp
252 - 10 /* safety margin */) /numthread);
253 log_warn("continuing with less udp ports: %u",
254 cfg->outgoing_num_ports);
255 log_warn("increase ulimit or decrease threads, "
256 "ports in config to remove this warning");
258 #ifdef HAVE_SETRLIMIT
261 verbose(VERB_ALGO, "increased limit(open files) from %u to %u",
262 (unsigned)avail, (unsigned)total+10);
266 #endif /* HAVE_GETRLIMIT */
267 #endif /* S_SPLINT_S */
270 /** set verbosity, check rlimits, cache settings */
272 apply_settings(struct daemon* daemon, struct config_file* cfg,
273 int cmdline_verbose, int debug_mode)
275 /* apply if they have changed */
276 verbosity = cmdline_verbose + cfg->verbosity;
277 if (debug_mode > 1) {
282 daemon_apply_cfg(daemon, cfg);
285 if (cfg->use_systemd && cfg->do_daemonize) {
286 log_warn("use-systemd and do-daemonize should not be enabled at the same time");
289 log_ident_set_or_default(cfg->log_identity);
293 /** Read existing pid from pidfile.
294 * @param file: file name of pid file.
295 * @return: the pid from the file or -1 if none.
298 readpid (const char* file)
306 if ((fd = open(file, O_RDONLY)) == -1) {
308 log_err("Could not read pidfile %s: %s",
309 file, strerror(errno));
313 if (((l = read(fd, pidbuf, sizeof(pidbuf)))) == -1) {
315 log_err("Could not read pidfile %s: %s",
316 file, strerror(errno));
323 /* Empty pidfile means no pidfile... */
328 pidbuf[sizeof(pidbuf)-1] = 0;
329 pid = (pid_t)strtol(pidbuf, &t, 10);
331 if (*t && *t != '\n') {
337 /** write pid to file.
338 * @param pidfile: file name of pid file.
339 * @param pid: pid to write to file.
340 * @return false on failure
343 writepid (const char* pidfile, pid_t pid)
348 snprintf(pidbuf, sizeof(pidbuf), "%lu\n", (unsigned long)pid);
350 if((fd = open(pidfile, O_WRONLY | O_CREAT | O_TRUNC
355 log_err("cannot open pidfile %s: %s",
356 pidfile, strerror(errno));
359 while(count < strlen(pidbuf)) {
360 ssize_t r = write(fd, pidbuf+count, strlen(pidbuf)-count);
362 if(errno == EAGAIN || errno == EINTR)
364 log_err("cannot write to pidfile %s: %s",
365 pidfile, strerror(errno));
369 log_err("cannot write any bytes to pidfile %s: "
370 "write returns 0 bytes written", pidfile);
381 * check old pid file.
382 * @param pidfile: the file name of the pid file.
383 * @param inchroot: if pidfile is inchroot and we can thus expect to
384 * be able to delete it.
387 checkoldpid(char* pidfile, int inchroot)
390 if((old = readpid(pidfile)) != -1) {
391 /* see if it is still alive */
392 if(kill(old, 0) == 0 || errno == EPERM)
393 log_warn("unbound is already running as pid %u.",
396 log_warn("did not exit gracefully last time (%u)",
400 #endif /* HAVE_KILL */
402 /** detach from command line */
406 #if defined(HAVE_DAEMON) && !defined(DEPRECATED_DAEMON)
407 /* use POSIX daemon(3) function */
408 if(daemon(1, 0) != 0)
409 fatal_exit("daemon failed: %s", strerror(errno));
410 #else /* no HAVE_DAEMON */
418 fatal_exit("fork failed: %s", strerror(errno));
420 /* exit interactive session */
426 fatal_exit("setsid() failed: %s", strerror(errno));
428 if ((fd = open("/dev/null", O_RDWR, 0)) != -1) {
429 (void)dup2(fd, STDIN_FILENO);
430 (void)dup2(fd, STDOUT_FILENO);
431 (void)dup2(fd, STDERR_FILENO);
435 #endif /* HAVE_FORK */
436 #endif /* HAVE_DAEMON */
439 /** daemonize, drop user privileges and chroot if needed */
441 perform_setup(struct daemon* daemon, struct config_file* cfg, int debug_mode,
442 const char** cfgfile, int need_pidfile)
448 struct passwd *pwd = NULL;
450 if(cfg->username && cfg->username[0]) {
451 if((pwd = getpwnam(cfg->username)) == NULL)
452 fatal_exit("user '%s' does not exist.", cfg->username);
453 /* endpwent below, in case we need pwd for setusercontext */
457 w_config_adjust_directory(cfg);
460 /* read ssl keys while superuser and outside chroot */
462 if(!(daemon->rc = daemon_remote_create(cfg)))
463 fatal_exit("could not set up remote-control");
464 if(cfg->ssl_service_key && cfg->ssl_service_key[0]) {
465 if(!(daemon->listen_sslctx = listen_sslctx_create(
466 cfg->ssl_service_key, cfg->ssl_service_pem, NULL)))
467 fatal_exit("could not set up listen SSL_CTX");
468 if(cfg->tls_ciphers && cfg->tls_ciphers[0]) {
469 if (!SSL_CTX_set_cipher_list(daemon->listen_sslctx, cfg->tls_ciphers)) {
470 fatal_exit("failed to set tls-cipher %s", cfg->tls_ciphers);
473 #ifdef HAVE_SSL_CTX_SET_CIPHERSUITES
474 if(cfg->tls_ciphersuites && cfg->tls_ciphersuites[0]) {
475 if (!SSL_CTX_set_ciphersuites(daemon->listen_sslctx, cfg->tls_ciphersuites)) {
476 fatal_exit("failed to set tls-ciphersuites %s", cfg->tls_ciphersuites);
480 if(cfg->tls_session_ticket_keys.first &&
481 cfg->tls_session_ticket_keys.first->str[0] != 0) {
482 if(!listen_sslctx_setup_ticket_keys(daemon->listen_sslctx, cfg->tls_session_ticket_keys.first)) {
483 fatal_exit("could not set session ticket SSL_CTX");
487 if(!(daemon->connect_sslctx = connect_sslctx_create(NULL, NULL,
488 cfg->tls_cert_bundle, cfg->tls_win_cert)))
489 fatal_exit("could not set up connect SSL_CTX");
492 /* init syslog (as root) if needed, before daemonize, otherwise
493 * a fork error could not be printed since daemonize closed stderr.*/
494 if(cfg->use_syslog) {
495 log_init(cfg->logfile, cfg->use_syslog, cfg->chrootdir);
497 /* if using a logfile, we cannot open it because the logfile would
498 * be created with the wrong permissions, we cannot chown it because
499 * we cannot chown system logfiles, so we do not open at all.
500 * So, using a logfile, the user does not see errors unless -d is
501 * given to unbound on the commandline. */
504 /* true if pidfile is inside chrootdir, or nochroot */
505 pidinchroot = need_pidfile && (!(cfg->chrootdir && cfg->chrootdir[0]) ||
506 (cfg->chrootdir && cfg->chrootdir[0] &&
507 strncmp(cfg->pidfile, cfg->chrootdir,
508 strlen(cfg->chrootdir))==0));
510 /* check old pid file before forking */
511 if(cfg->pidfile && cfg->pidfile[0] && need_pidfile) {
512 /* calculate position of pidfile */
513 if(cfg->pidfile[0] == '/')
514 daemon->pidfile = strdup(cfg->pidfile);
515 else daemon->pidfile = fname_after_chroot(cfg->pidfile,
518 fatal_exit("pidfile alloc: out of memory");
519 checkoldpid(daemon->pidfile, pidinchroot);
523 /* daemonize because pid is needed by the writepid func */
524 if(!debug_mode && cfg->do_daemonize) {
528 /* write new pidfile (while still root, so can be outside chroot) */
530 if(cfg->pidfile && cfg->pidfile[0] && need_pidfile) {
531 if(writepid(daemon->pidfile, getpid())) {
532 if(cfg->username && cfg->username[0] && cfg_uid != (uid_t)-1 &&
535 if(chown(daemon->pidfile, cfg_uid, cfg_gid) == -1) {
536 verbose(VERB_QUERY, "cannot chown %u.%u %s: %s",
537 (unsigned)cfg_uid, (unsigned)cfg_gid,
538 daemon->pidfile, strerror(errno));
540 # endif /* HAVE_CHOWN */
547 #endif /* HAVE_KILL */
549 /* Set user context */
551 if(cfg->username && cfg->username[0] && cfg_uid != (uid_t)-1) {
552 #ifdef HAVE_SETUSERCONTEXT
553 /* setusercontext does initgroups, setuid, setgid, and
554 * also resource limits from login config, but we
555 * still call setresuid, setresgid to be sure to set all uid*/
556 if(setusercontext(NULL, pwd, cfg_uid, (unsigned)
557 LOGIN_SETALL & ~LOGIN_SETUSER & ~LOGIN_SETGROUP) != 0)
558 log_warn("unable to setusercontext %s: %s",
559 cfg->username, strerror(errno));
562 #endif /* HAVE_SETUSERCONTEXT */
564 #endif /* HAVE_GETPWNAM */
566 /* box into the chroot */
568 if(cfg->chrootdir && cfg->chrootdir[0]) {
569 if(chdir(cfg->chrootdir)) {
570 fatal_exit("unable to chdir to chroot %s: %s",
571 cfg->chrootdir, strerror(errno));
573 verbose(VERB_QUERY, "chdir to %s", cfg->chrootdir);
574 if(chroot(cfg->chrootdir))
575 fatal_exit("unable to chroot to %s: %s",
576 cfg->chrootdir, strerror(errno));
578 fatal_exit("unable to chdir to / in chroot %s: %s",
579 cfg->chrootdir, strerror(errno));
580 verbose(VERB_QUERY, "chroot to %s", cfg->chrootdir);
581 if(strncmp(*cfgfile, cfg->chrootdir,
582 strlen(cfg->chrootdir)) == 0)
583 (*cfgfile) += strlen(cfg->chrootdir);
585 /* adjust stored pidfile for chroot */
586 if(daemon->pidfile && daemon->pidfile[0] &&
587 strncmp(daemon->pidfile, cfg->chrootdir,
588 strlen(cfg->chrootdir))==0) {
589 char* old = daemon->pidfile;
590 daemon->pidfile = strdup(old+strlen(cfg->chrootdir));
593 log_err("out of memory in pidfile adjust");
595 daemon->chroot = strdup(cfg->chrootdir);
597 log_err("out of memory in daemon chroot dir storage");
602 /* change to working directory inside chroot */
603 if(cfg->directory && cfg->directory[0]) {
604 char* dir = cfg->directory;
605 if(cfg->chrootdir && cfg->chrootdir[0] &&
606 strncmp(dir, cfg->chrootdir,
607 strlen(cfg->chrootdir)) == 0)
608 dir += strlen(cfg->chrootdir);
611 fatal_exit("Could not chdir to %s: %s",
612 dir, strerror(errno));
614 verbose(VERB_QUERY, "chdir to %s", dir);
618 /* drop permissions after chroot, getpwnam, pidfile, syslog done*/
620 if(cfg->username && cfg->username[0] && cfg_uid != (uid_t)-1) {
621 # ifdef HAVE_INITGROUPS
622 if(initgroups(cfg->username, cfg_gid) != 0)
623 log_warn("unable to initgroups %s: %s",
624 cfg->username, strerror(errno));
625 # endif /* HAVE_INITGROUPS */
626 # ifdef HAVE_ENDPWENT
630 #ifdef HAVE_SETRESGID
631 if(setresgid(cfg_gid,cfg_gid,cfg_gid) != 0)
632 #elif defined(HAVE_SETREGID) && !defined(DARWIN_BROKEN_SETREUID)
633 if(setregid(cfg_gid,cfg_gid) != 0)
634 #else /* use setgid */
635 if(setgid(cfg_gid) != 0)
636 #endif /* HAVE_SETRESGID */
637 fatal_exit("unable to set group id of %s: %s",
638 cfg->username, strerror(errno));
639 #ifdef HAVE_SETRESUID
640 if(setresuid(cfg_uid,cfg_uid,cfg_uid) != 0)
641 #elif defined(HAVE_SETREUID) && !defined(DARWIN_BROKEN_SETREUID)
642 if(setreuid(cfg_uid,cfg_uid) != 0)
643 #else /* use setuid */
644 if(setuid(cfg_uid) != 0)
645 #endif /* HAVE_SETRESUID */
646 fatal_exit("unable to set user id of %s: %s",
647 cfg->username, strerror(errno));
648 verbose(VERB_QUERY, "drop user privileges, run as %s",
651 #endif /* HAVE_GETPWNAM */
652 /* file logging inited after chroot,chdir,setuid is done so that
653 * it would succeed on SIGHUP as well */
655 log_init(cfg->logfile, cfg->use_syslog, cfg->chrootdir);
660 * @param cfgfile: the config file name.
661 * @param cmdline_verbose: verbosity resulting from commandline -v.
662 * These increase verbosity as specified in the config file.
663 * @param debug_mode: if set, do not daemonize.
664 * @param need_pidfile: if false, no pidfile is checked or created.
667 run_daemon(const char* cfgfile, int cmdline_verbose, int debug_mode, int need_pidfile)
669 struct config_file* cfg = NULL;
670 struct daemon* daemon = NULL;
673 if(!(daemon = daemon_init()))
674 fatal_exit("alloc failure");
675 while(!daemon->need_to_exit) {
677 verbose(VERB_OPS, "Restart of %s.", PACKAGE_STRING);
678 else verbose(VERB_OPS, "Start of %s.", PACKAGE_STRING);
681 if(!(cfg = config_create()))
682 fatal_exit("Could not alloc config defaults");
683 if(!config_read(cfg, cfgfile, daemon->chroot)) {
685 fatal_exit("Could not read config file: %s."
686 " Maybe try unbound -dd, it stays on "
687 "the commandline to see more errors, "
688 "or unbound-checkconf", cfgfile);
689 log_warn("Continuing with default config settings");
691 apply_settings(daemon, cfg, cmdline_verbose, debug_mode);
693 config_lookup_uid(cfg);
696 if(!daemon_open_shared_ports(daemon))
697 fatal_exit("could not open ports");
699 perform_setup(daemon, cfg, debug_mode, &cfgfile, need_pidfile);
702 /* reopen log after HUP to facilitate log rotation */
704 log_init(cfg->logfile, 0, cfg->chrootdir);
709 /* clean up for restart */
710 verbose(VERB_ALGO, "cleanup.");
711 daemon_cleanup(daemon);
714 verbose(VERB_ALGO, "Exit cleanup.");
715 /* this unlink may not work if the pidfile is located outside
716 * of the chroot/workdir or we no longer have permissions */
717 if(daemon->pidfile) {
719 /* truncate pidfile */
720 fd = open(daemon->pidfile, O_WRONLY | O_TRUNC, 0644);
724 unlink(daemon->pidfile);
726 daemon_delete(daemon);
729 /** getopt global, in case header files fail to declare it. */
731 /** getopt global, in case header files fail to declare it. */
735 * main program. Set options given commandline arguments.
736 * @param argc: number of commandline arguments.
737 * @param argv: array of commandline arguments.
738 * @return: exit status of the program.
741 main(int argc, char* argv[])
744 const char* cfgfile = CONFIGFILE;
745 const char* winopt = NULL;
746 const char* log_ident_default;
747 int cmdline_verbose = 0;
749 int need_pidfile = 1;
755 log_init(NULL, 0, NULL);
756 log_ident_default = strrchr(argv[0],'/')?strrchr(argv[0],'/')+1:argv[0];
757 log_ident_set_default(log_ident_default);
758 log_ident_set(log_ident_default);
759 /* parse the options */
760 while( (c=getopt(argc, argv, "c:dhpvw:V")) != -1) {
782 print_build_options();
792 /* argv += optind; not using further arguments */
796 wsvc_command_option(winopt, cfgfile, cmdline_verbose,
799 fatal_exit("option not supported");
808 run_daemon(cfgfile, cmdline_verbose, debug_mode, need_pidfile);
809 log_init(NULL, 0, NULL); /* close logfile */
810 #ifndef unbound_testbound
812 lock_basic_destroy((lock_basic_type*)log_get_lock());