2 * Unix SMB/CIFS implementation.
6 * Copyright (c) 2011 Andreas Schneider <asn@samba.org>
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 3 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, see <http://www.gnu.org/licenses/>.
27 #include "lib/id_cache.h"
29 #include "../lib/tsocket/tsocket.h"
30 #include "lib/server_prefork.h"
31 #include "lib/server_prefork_util.h"
32 #include "librpc/rpc/dcerpc_ep.h"
34 #include "rpc_server/rpc_server.h"
35 #include "rpc_server/rpc_ep_register.h"
36 #include "rpc_server/rpc_sock_helper.h"
38 #include "librpc/gen_ndr/srv_lsa.h"
39 #include "librpc/gen_ndr/srv_samr.h"
40 #include "librpc/gen_ndr/srv_netlogon.h"
42 #define DAEMON_NAME "lsasd"
43 #define LSASD_MAX_SOCKETS 64
45 static struct server_id parent_id
;
46 static struct prefork_pool
*lsasd_pool
= NULL
;
47 static int lsasd_child_id
= 0;
49 static struct pf_daemon_config default_pf_lsasd_cfg
= {
50 .prefork_status
= PFH_INIT
,
54 .max_allowed_clients
= 100,
55 .child_min_life
= 60 /* 1 minute minimum life time */
57 static struct pf_daemon_config pf_lsasd_cfg
= { 0 };
59 void start_lsasd(struct tevent_context
*ev_ctx
,
60 struct messaging_context
*msg_ctx
);
62 static void lsasd_reopen_logs(int child_id
)
64 char *lfile
= lp_logfile(talloc_tos());
69 rc
= asprintf(&extension
, "%s.%d", DAEMON_NAME
, child_id
);
71 rc
= asprintf(&extension
, "%s", DAEMON_NAME
);
78 if (lfile
== NULL
|| lfile
[0] == '\0') {
79 rc
= asprintf(&lfile
, "%s/log.%s",
80 get_dyn_LOGFILEBASE(), extension
);
82 if (strstr(lfile
, extension
) == NULL
) {
84 rc
= asprintf(&lfile
, "%s.%d",
85 lp_logfile(talloc_tos()),
88 rc
= asprintf(&lfile
, "%s.%s",
89 lp_logfile(talloc_tos()),
96 lp_set_logfile(lfile
);
100 SAFE_FREE(extension
);
105 static void lsasd_smb_conf_updated(struct messaging_context
*msg
,
108 struct server_id server_id
,
111 struct tevent_context
*ev_ctx
;
113 DEBUG(10, ("Got message saying smb.conf was updated. Reloading.\n"));
114 ev_ctx
= talloc_get_type_abort(private_data
, struct tevent_context
);
116 change_to_root_user();
117 lp_load_global(get_dyn_CONFIGFILE());
119 lsasd_reopen_logs(lsasd_child_id
);
120 if (lsasd_child_id
== 0) {
121 pfh_daemon_config(DAEMON_NAME
,
123 &default_pf_lsasd_cfg
);
124 pfh_manage_pool(ev_ctx
, msg
, &pf_lsasd_cfg
, lsasd_pool
);
128 static void lsasd_sig_term_handler(struct tevent_context
*ev
,
129 struct tevent_signal
*se
,
135 rpc_netlogon_shutdown();
137 rpc_lsarpc_shutdown();
139 DEBUG(0, ("termination signal\n"));
143 static void lsasd_setup_sig_term_handler(struct tevent_context
*ev_ctx
)
145 struct tevent_signal
*se
;
147 se
= tevent_add_signal(ev_ctx
,
150 lsasd_sig_term_handler
,
153 DEBUG(0, ("failed to setup SIGTERM handler\n"));
158 static void lsasd_sig_hup_handler(struct tevent_context
*ev
,
159 struct tevent_signal
*se
,
166 change_to_root_user();
167 lp_load_global(get_dyn_CONFIGFILE());
169 lsasd_reopen_logs(lsasd_child_id
);
170 pfh_daemon_config(DAEMON_NAME
,
172 &default_pf_lsasd_cfg
);
174 /* relay to all children */
175 prefork_send_signal_to_all(lsasd_pool
, SIGHUP
);
178 static void lsasd_setup_sig_hup_handler(struct tevent_context
*ev_ctx
)
180 struct tevent_signal
*se
;
182 se
= tevent_add_signal(ev_ctx
,
185 lsasd_sig_hup_handler
,
188 DEBUG(0, ("failed to setup SIGHUP handler\n"));
193 /**********************************************************
195 **********************************************************/
197 static void lsasd_chld_sig_hup_handler(struct tevent_context
*ev
,
198 struct tevent_signal
*se
,
204 change_to_root_user();
205 lsasd_reopen_logs(lsasd_child_id
);
208 static bool lsasd_setup_chld_hup_handler(struct tevent_context
*ev_ctx
)
210 struct tevent_signal
*se
;
212 se
= tevent_add_signal(ev_ctx
,
215 lsasd_chld_sig_hup_handler
,
218 DEBUG(1, ("failed to setup SIGHUP handler"));
225 static void parent_ping(struct messaging_context
*msg_ctx
,
228 struct server_id server_id
,
232 /* The fact we received this message is enough to let make the event
233 * loop if it was idle. lsasd_children_main will cycle through
234 * lsasd_next_client at least once. That function will take whatever
235 * action is necessary */
237 DEBUG(10, ("Got message that the parent changed status.\n"));
241 static bool lsasd_child_init(struct tevent_context
*ev_ctx
,
243 struct pf_worker_data
*pf
)
246 struct messaging_context
*msg_ctx
= server_messaging_context();
249 status
= reinit_after_fork(msg_ctx
, ev_ctx
,
250 true, "lsasd-child");
251 if (!NT_STATUS_IS_OK(status
)) {
252 DEBUG(0,("reinit_after_fork() failed\n"));
253 smb_panic("reinit_after_fork() failed");
256 lsasd_child_id
= child_id
;
257 lsasd_reopen_logs(child_id
);
259 ok
= lsasd_setup_chld_hup_handler(ev_ctx
);
264 if (!serverid_register(messaging_server_id(msg_ctx
),
269 messaging_register(msg_ctx
, ev_ctx
,
270 MSG_SMB_CONF_UPDATED
, lsasd_smb_conf_updated
);
271 messaging_register(msg_ctx
, ev_ctx
,
272 MSG_PREFORK_PARENT_EVENT
, parent_ping
);
273 id_cache_register_msgs(msg_ctx
);
275 status
= rpc_lsarpc_init(NULL
);
276 if (!NT_STATUS_IS_OK(status
)) {
277 DEBUG(0, ("Failed to register lsarpc rpc interface! (%s)\n",
282 status
= rpc_samr_init(NULL
);
283 if (!NT_STATUS_IS_OK(status
)) {
284 DEBUG(0, ("Failed to register samr rpc interface! (%s)\n",
289 status
= rpc_netlogon_init(NULL
);
290 if (!NT_STATUS_IS_OK(status
)) {
291 DEBUG(0, ("Failed to register netlogon rpc interface! (%s)\n",
299 struct lsasd_children_data
{
300 struct tevent_context
*ev_ctx
;
301 struct messaging_context
*msg_ctx
;
302 struct pf_worker_data
*pf
;
307 static void lsasd_next_client(void *pvt
);
309 static int lsasd_children_main(struct tevent_context
*ev_ctx
,
310 struct messaging_context
*msg_ctx
,
311 struct pf_worker_data
*pf
,
317 struct lsasd_children_data
*data
;
321 ok
= lsasd_child_init(ev_ctx
, child_id
, pf
);
326 data
= talloc(ev_ctx
, struct lsasd_children_data
);
331 data
->ev_ctx
= ev_ctx
;
332 data
->msg_ctx
= msg_ctx
;
333 data
->listen_fd_size
= listen_fd_size
;
334 data
->listen_fds
= listen_fds
;
336 /* loop until it is time to exit */
337 while (pf
->status
!= PF_WORKER_EXITING
) {
338 /* try to see if it is time to schedule the next client */
339 lsasd_next_client(data
);
341 ret
= tevent_loop_once(ev_ctx
);
343 DEBUG(0, ("tevent_loop_once() exited with %d: %s\n",
344 ret
, strerror(errno
)));
345 pf
->status
= PF_WORKER_EXITING
;
352 static void lsasd_client_terminated(void *pvt
)
354 struct lsasd_children_data
*data
;
356 data
= talloc_get_type_abort(pvt
, struct lsasd_children_data
);
358 pfh_client_terminated(data
->pf
);
360 lsasd_next_client(pvt
);
363 struct lsasd_new_client
{
364 struct lsasd_children_data
*data
;
367 static void lsasd_handle_client(struct tevent_req
*req
);
369 static void lsasd_next_client(void *pvt
)
371 struct tevent_req
*req
;
372 struct lsasd_children_data
*data
;
373 struct lsasd_new_client
*next
;
375 data
= talloc_get_type_abort(pvt
, struct lsasd_children_data
);
377 if (!pfh_child_allowed_to_accept(data
->pf
)) {
378 /* nothing to do for now we are already listening
379 * or we are not allowed to listen further */
383 next
= talloc_zero(data
, struct lsasd_new_client
);
385 DEBUG(1, ("Out of memory!?\n"));
390 req
= prefork_listen_send(next
,
393 data
->listen_fd_size
,
396 DEBUG(1, ("Failed to make listening request!?\n"));
400 tevent_req_set_callback(req
, lsasd_handle_client
, next
);
403 static void lsasd_handle_client(struct tevent_req
*req
)
405 struct lsasd_children_data
*data
;
406 struct lsasd_new_client
*client
;
407 const DATA_BLOB ping
= data_blob_null
;
411 struct tsocket_address
*srv_addr
;
412 struct tsocket_address
*cli_addr
;
414 client
= tevent_req_callback_data(req
, struct lsasd_new_client
);
417 tmp_ctx
= talloc_stackframe();
418 if (tmp_ctx
== NULL
) {
419 DEBUG(1, ("Failed to allocate stackframe!\n"));
423 rc
= prefork_listen_recv(req
,
429 /* this will free the request too */
433 DEBUG(6, ("No client connection was available after all!\n"));
437 /* Warn parent that our status changed */
438 messaging_send(data
->msg_ctx
, parent_id
,
439 MSG_PREFORK_CHILD_EVENT
, &ping
);
441 DEBUG(2, ("LSASD preforked child %d got client connection!\n",
442 (int)(data
->pf
->pid
)));
444 if (tsocket_address_is_inet(srv_addr
, "ip")) {
445 DEBUG(3, ("Got a tcpip client connection from %s on interface %s\n",
446 tsocket_address_string(cli_addr
, tmp_ctx
),
447 tsocket_address_string(srv_addr
, tmp_ctx
)));
449 dcerpc_ncacn_accept(data
->ev_ctx
,
457 } else if (tsocket_address_is_unix(srv_addr
)) {
461 p
= tsocket_address_unix_path(srv_addr
, tmp_ctx
);
463 talloc_free(tmp_ctx
);
474 if (strstr(p
, "/np/")) {
475 named_pipe_accept_function(data
->ev_ctx
,
479 lsasd_client_terminated
,
482 dcerpc_ncacn_accept(data
->ev_ctx
,
492 DEBUG(0, ("ERROR: Unsupported socket!\n"));
496 talloc_free(tmp_ctx
);
503 static void child_ping(struct messaging_context
*msg_ctx
,
506 struct server_id server_id
,
509 struct tevent_context
*ev_ctx
;
511 ev_ctx
= talloc_get_type_abort(private_data
, struct tevent_context
);
513 DEBUG(10, ("Got message that a child changed status.\n"));
514 pfh_manage_pool(ev_ctx
, msg_ctx
, &pf_lsasd_cfg
, lsasd_pool
);
517 static bool lsasd_schedule_check(struct tevent_context
*ev_ctx
,
518 struct messaging_context
*msg_ctx
,
519 struct timeval current_time
);
521 static void lsasd_check_children(struct tevent_context
*ev_ctx
,
522 struct tevent_timer
*te
,
523 struct timeval current_time
,
526 static void lsasd_sigchld_handler(struct tevent_context
*ev_ctx
,
527 struct prefork_pool
*pfp
,
530 struct messaging_context
*msg_ctx
;
532 msg_ctx
= talloc_get_type_abort(pvt
, struct messaging_context
);
534 /* run pool management so we can fork/retire or increase
535 * the allowed connections per child based on load */
536 pfh_manage_pool(ev_ctx
, msg_ctx
, &pf_lsasd_cfg
, lsasd_pool
);
539 static bool lsasd_setup_children_monitor(struct tevent_context
*ev_ctx
,
540 struct messaging_context
*msg_ctx
)
544 /* add our oun sigchld callback */
545 prefork_set_sigchld_callback(lsasd_pool
, lsasd_sigchld_handler
, msg_ctx
);
547 ok
= lsasd_schedule_check(ev_ctx
, msg_ctx
, tevent_timeval_current());
552 static bool lsasd_schedule_check(struct tevent_context
*ev_ctx
,
553 struct messaging_context
*msg_ctx
,
554 struct timeval current_time
)
556 struct tevent_timer
*te
;
557 struct timeval next_event
;
559 /* check situation again in 10 seconds */
560 next_event
= tevent_timeval_current_ofs(10, 0);
562 /* TODO: check when the socket becomes readable, so that children
563 * are checked only when there is some activity ? */
564 te
= tevent_add_timer(ev_ctx
, lsasd_pool
, next_event
,
565 lsasd_check_children
, msg_ctx
);
567 DEBUG(2, ("Failed to set up children monitoring!\n"));
574 static void lsasd_check_children(struct tevent_context
*ev_ctx
,
575 struct tevent_timer
*te
,
576 struct timeval current_time
,
579 struct messaging_context
*msg_ctx
;
581 msg_ctx
= talloc_get_type_abort(pvt
, struct messaging_context
);
583 pfh_manage_pool(ev_ctx
, msg_ctx
, &pf_lsasd_cfg
, lsasd_pool
);
585 lsasd_schedule_check(ev_ctx
, msg_ctx
, current_time
);
592 static bool lsasd_create_sockets(struct tevent_context
*ev_ctx
,
593 struct messaging_context
*msg_ctx
,
597 struct dcerpc_binding_vector
*v
, *v_orig
;
605 tmp_ctx
= talloc_stackframe();
606 if (tmp_ctx
== NULL
) {
610 status
= dcerpc_binding_vector_new(tmp_ctx
, &v_orig
);
611 if (!NT_STATUS_IS_OK(status
)) {
615 /* Create only one tcpip listener for all services */
616 status
= rpc_create_tcpip_sockets(&ndr_table_lsarpc
,
621 if (!NT_STATUS_IS_OK(status
)) {
625 /* Start to listen on tcpip sockets */
626 for (i
= 0; i
< *listen_fd_size
; i
++) {
627 rc
= listen(listen_fd
[i
], pf_lsasd_cfg
.max_allowed_clients
);
629 DEBUG(0, ("Failed to listen on tcpip socket - %s\n",
636 fd
= create_named_pipe_socket("lsarpc");
641 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
643 DEBUG(0, ("Failed to listen on lsarpc pipe - %s\n",
647 listen_fd
[*listen_fd_size
] = fd
;
650 fd
= create_named_pipe_socket("lsass");
655 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
657 DEBUG(0, ("Failed to listen on lsass pipe - %s\n",
661 listen_fd
[*listen_fd_size
] = fd
;
664 fd
= create_dcerpc_ncalrpc_socket("lsarpc");
669 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
671 DEBUG(0, ("Failed to listen on lsarpc ncalrpc - %s\n",
675 listen_fd
[*listen_fd_size
] = fd
;
679 v
= dcerpc_binding_vector_dup(tmp_ctx
, v_orig
);
684 status
= dcerpc_binding_vector_replace_iface(&ndr_table_lsarpc
, v
);
685 if (!NT_STATUS_IS_OK(status
)) {
689 status
= dcerpc_binding_vector_add_np_default(&ndr_table_lsarpc
, v
);
690 if (!NT_STATUS_IS_OK(status
)) {
694 status
= dcerpc_binding_vector_add_unix(&ndr_table_lsarpc
, v
, "lsarpc");
695 if (!NT_STATUS_IS_OK(status
)) {
699 status
= rpc_ep_register(ev_ctx
, msg_ctx
, &ndr_table_lsarpc
, v
);
700 if (!NT_STATUS_IS_OK(status
)) {
705 fd
= create_named_pipe_socket("samr");
710 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
712 DEBUG(0, ("Failed to listen on samr pipe - %s\n",
716 listen_fd
[*listen_fd_size
] = fd
;
719 fd
= create_dcerpc_ncalrpc_socket("samr");
724 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
726 DEBUG(0, ("Failed to listen on samr ncalrpc - %s\n",
730 listen_fd
[*listen_fd_size
] = fd
;
734 v
= dcerpc_binding_vector_dup(tmp_ctx
, v_orig
);
739 status
= dcerpc_binding_vector_replace_iface(&ndr_table_samr
, v
);
740 if (!NT_STATUS_IS_OK(status
)) {
744 status
= dcerpc_binding_vector_add_np_default(&ndr_table_samr
, v
);
745 if (!NT_STATUS_IS_OK(status
)) {
749 status
= dcerpc_binding_vector_add_unix(&ndr_table_lsarpc
, v
, "samr");
750 if (!NT_STATUS_IS_OK(status
)) {
754 status
= rpc_ep_register(ev_ctx
, msg_ctx
, &ndr_table_samr
, v
);
755 if (!NT_STATUS_IS_OK(status
)) {
760 fd
= create_named_pipe_socket("netlogon");
765 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
767 DEBUG(0, ("Failed to listen on samr pipe - %s\n",
771 listen_fd
[*listen_fd_size
] = fd
;
774 fd
= create_dcerpc_ncalrpc_socket("netlogon");
779 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
781 DEBUG(0, ("Failed to listen on netlogon ncalrpc - %s\n",
785 listen_fd
[*listen_fd_size
] = fd
;
789 v
= dcerpc_binding_vector_dup(tmp_ctx
, v_orig
);
794 status
= dcerpc_binding_vector_replace_iface(&ndr_table_netlogon
, v
);
795 if (!NT_STATUS_IS_OK(status
)) {
799 status
= dcerpc_binding_vector_add_np_default(&ndr_table_netlogon
, v
);
800 if (!NT_STATUS_IS_OK(status
)) {
804 status
= dcerpc_binding_vector_add_unix(&ndr_table_lsarpc
, v
, "netlogon");
805 if (!NT_STATUS_IS_OK(status
)) {
809 status
= rpc_ep_register(ev_ctx
, msg_ctx
, &ndr_table_netlogon
, v
);
810 if (!NT_STATUS_IS_OK(status
)) {
819 talloc_free(tmp_ctx
);
823 void start_lsasd(struct tevent_context
*ev_ctx
,
824 struct messaging_context
*msg_ctx
)
827 int listen_fd
[LSASD_MAX_SOCKETS
];
828 int listen_fd_size
= 0;
833 DEBUG(1, ("Forking LSA Service Daemon\n"));
836 * Block signals before forking child as it will have to
837 * set its own handlers. Child will re-enable SIGHUP as
838 * soon as the handlers are set up.
840 BlockSignals(true, SIGTERM
);
841 BlockSignals(true, SIGHUP
);
845 DEBUG(0, ("Failed to fork LSASD [%s], aborting ...\n",
850 /* parent or error */
853 /* Re-enable SIGHUP before returnig */
854 BlockSignals(false, SIGTERM
);
855 BlockSignals(false, SIGHUP
);
860 status
= smbd_reinit_after_fork(msg_ctx
, ev_ctx
, true, "lsasd-master");
861 if (!NT_STATUS_IS_OK(status
)) {
862 DEBUG(0,("reinit_after_fork() failed\n"));
863 smb_panic("reinit_after_fork() failed");
866 /* save the parent process id so the children can use it later */
867 parent_id
= messaging_server_id(msg_ctx
);
869 lsasd_reopen_logs(0);
870 pfh_daemon_config(DAEMON_NAME
,
872 &default_pf_lsasd_cfg
);
874 lsasd_setup_sig_term_handler(ev_ctx
);
875 lsasd_setup_sig_hup_handler(ev_ctx
);
877 BlockSignals(false, SIGTERM
);
878 BlockSignals(false, SIGHUP
);
880 ok
= lsasd_create_sockets(ev_ctx
, msg_ctx
, listen_fd
, &listen_fd_size
);
885 /* start children before any more initialization is done */
886 ok
= prefork_create_pool(ev_ctx
, /* mem_ctx */
891 pf_lsasd_cfg
.min_children
,
892 pf_lsasd_cfg
.max_children
,
893 &lsasd_children_main
,
900 if (!serverid_register(messaging_server_id(msg_ctx
),
905 messaging_register(msg_ctx
,
907 MSG_SMB_CONF_UPDATED
,
908 lsasd_smb_conf_updated
);
909 messaging_register(msg_ctx
, ev_ctx
,
910 MSG_PREFORK_CHILD_EVENT
, child_ping
);
912 status
= rpc_lsarpc_init(NULL
);
913 if (!NT_STATUS_IS_OK(status
)) {
914 DEBUG(0, ("Failed to register lsarpc rpc interface in lsasd! (%s)\n",
919 status
= rpc_samr_init(NULL
);
920 if (!NT_STATUS_IS_OK(status
)) {
921 DEBUG(0, ("Failed to register samr rpc interface in lsasd! (%s)\n",
926 status
= rpc_netlogon_init(NULL
);
927 if (!NT_STATUS_IS_OK(status
)) {
928 DEBUG(0, ("Failed to register netlogon rpc interface in lsasd! (%s)\n",
933 ok
= lsasd_setup_children_monitor(ev_ctx
, msg_ctx
);
935 DEBUG(0, ("Failed to setup children monitoring!\n"));
939 DEBUG(1, ("LSASD Daemon Started (%u)\n", (unsigned int)getpid()));
942 rc
= tevent_loop_wait(ev_ctx
);
944 /* should not be reached */
945 DEBUG(0,("lsasd: tevent_loop_wait() exited with %d - %s\n",
946 rc
, (rc
== 0) ? "out of events" : strerror(errno
)));