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(get_dyn_CONFIGFILE(), true, false, false, true);
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(get_dyn_CONFIGFILE(), true, false, false, true);
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
,
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 inteface! (%s)\n",
282 status
= rpc_samr_init(NULL
);
283 if (!NT_STATUS_IS_OK(status
)) {
284 DEBUG(0, ("Failed to register samr rpc inteface! (%s)\n",
289 status
= rpc_netlogon_init(NULL
);
290 if (!NT_STATUS_IS_OK(status
)) {
291 DEBUG(0, ("Failed to register netlogon rpc inteface! (%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 inteface %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
)) {
616 /* Create only one tcpip listener for all services */
617 status
= rpc_create_tcpip_sockets(&ndr_table_lsarpc
,
622 if (!NT_STATUS_IS_OK(status
)) {
627 /* Start to listen on tcpip sockets */
628 for (i
= 0; i
< *listen_fd_size
; i
++) {
629 rc
= listen(listen_fd
[i
], pf_lsasd_cfg
.max_allowed_clients
);
631 DEBUG(0, ("Failed to listen on tcpip socket - %s\n",
639 fd
= create_named_pipe_socket("lsarpc");
644 listen_fd
[*listen_fd_size
] = fd
;
647 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
649 DEBUG(0, ("Failed to listen on lsarpc pipe - %s\n",
655 fd
= create_named_pipe_socket("lsass");
660 listen_fd
[*listen_fd_size
] = fd
;
663 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
665 DEBUG(0, ("Failed to listen on lsass pipe - %s\n",
671 fd
= create_dcerpc_ncalrpc_socket("lsarpc");
676 listen_fd
[*listen_fd_size
] = fd
;
679 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
681 DEBUG(0, ("Failed to listen on lsarpc ncalrpc - %s\n",
687 v
= dcerpc_binding_vector_dup(tmp_ctx
, v_orig
);
693 status
= dcerpc_binding_vector_replace_iface(&ndr_table_lsarpc
, v
);
694 if (!NT_STATUS_IS_OK(status
)) {
698 status
= dcerpc_binding_vector_add_np_default(&ndr_table_lsarpc
, v
);
699 if (!NT_STATUS_IS_OK(status
)) {
704 status
= dcerpc_binding_vector_add_unix(&ndr_table_lsarpc
, v
, "lsarpc");
705 if (!NT_STATUS_IS_OK(status
)) {
710 status
= rpc_ep_register(ev_ctx
, msg_ctx
, &ndr_table_lsarpc
, v
);
711 if (!NT_STATUS_IS_OK(status
)) {
717 fd
= create_named_pipe_socket("samr");
723 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
725 DEBUG(0, ("Failed to listen on samr pipe - %s\n",
730 listen_fd
[*listen_fd_size
] = fd
;
733 fd
= create_dcerpc_ncalrpc_socket("samr");
738 listen_fd
[*listen_fd_size
] = fd
;
741 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
743 DEBUG(0, ("Failed to listen on samr ncalrpc - %s\n",
749 v
= dcerpc_binding_vector_dup(tmp_ctx
, v_orig
);
755 status
= dcerpc_binding_vector_replace_iface(&ndr_table_samr
, v
);
756 if (!NT_STATUS_IS_OK(status
)) {
760 status
= dcerpc_binding_vector_add_np_default(&ndr_table_samr
, v
);
761 if (!NT_STATUS_IS_OK(status
)) {
766 status
= dcerpc_binding_vector_add_unix(&ndr_table_lsarpc
, v
, "samr");
767 if (!NT_STATUS_IS_OK(status
)) {
772 status
= rpc_ep_register(ev_ctx
, msg_ctx
, &ndr_table_samr
, v
);
773 if (!NT_STATUS_IS_OK(status
)) {
779 fd
= create_named_pipe_socket("netlogon");
785 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
787 DEBUG(0, ("Failed to listen on samr pipe - %s\n",
792 listen_fd
[*listen_fd_size
] = fd
;
795 fd
= create_dcerpc_ncalrpc_socket("netlogon");
800 listen_fd
[*listen_fd_size
] = fd
;
803 rc
= listen(fd
, pf_lsasd_cfg
.max_allowed_clients
);
805 DEBUG(0, ("Failed to listen on netlogon ncalrpc - %s\n",
811 v
= dcerpc_binding_vector_dup(tmp_ctx
, v_orig
);
817 status
= dcerpc_binding_vector_replace_iface(&ndr_table_netlogon
, v
);
818 if (!NT_STATUS_IS_OK(status
)) {
822 status
= dcerpc_binding_vector_add_np_default(&ndr_table_netlogon
, v
);
823 if (!NT_STATUS_IS_OK(status
)) {
828 status
= dcerpc_binding_vector_add_unix(&ndr_table_lsarpc
, v
, "netlogon");
829 if (!NT_STATUS_IS_OK(status
)) {
834 status
= rpc_ep_register(ev_ctx
, msg_ctx
, &ndr_table_netlogon
, v
);
835 if (!NT_STATUS_IS_OK(status
)) {
841 talloc_free(tmp_ctx
);
845 void start_lsasd(struct tevent_context
*ev_ctx
,
846 struct messaging_context
*msg_ctx
)
849 int listen_fd
[LSASD_MAX_SOCKETS
];
850 int listen_fd_size
= 0;
855 DEBUG(1, ("Forking LSA Service Daemon\n"));
858 * Block signals before forking child as it will have to
859 * set its own handlers. Child will re-enable SIGHUP as
860 * soon as the handlers are set up.
862 BlockSignals(true, SIGTERM
);
863 BlockSignals(true, SIGHUP
);
867 DEBUG(0, ("Failed to fork LSASD [%s], aborting ...\n",
872 /* parent or error */
875 /* Re-enable SIGHUP before returnig */
876 BlockSignals(false, SIGTERM
);
877 BlockSignals(false, SIGHUP
);
882 status
= reinit_after_fork(msg_ctx
,
885 if (!NT_STATUS_IS_OK(status
)) {
886 DEBUG(0,("reinit_after_fork() failed\n"));
887 smb_panic("reinit_after_fork() failed");
890 /* save the parent process id so the children can use it later */
891 parent_id
= messaging_server_id(msg_ctx
);
893 lsasd_reopen_logs(0);
894 pfh_daemon_config(DAEMON_NAME
,
896 &default_pf_lsasd_cfg
);
898 lsasd_setup_sig_term_handler(ev_ctx
);
899 lsasd_setup_sig_hup_handler(ev_ctx
);
901 BlockSignals(false, SIGTERM
);
902 BlockSignals(false, SIGHUP
);
904 ok
= lsasd_create_sockets(ev_ctx
, msg_ctx
, listen_fd
, &listen_fd_size
);
909 /* start children before any more initialization is done */
910 ok
= prefork_create_pool(ev_ctx
, /* mem_ctx */
915 pf_lsasd_cfg
.min_children
,
916 pf_lsasd_cfg
.max_children
,
917 &lsasd_children_main
,
924 if (!serverid_register(messaging_server_id(msg_ctx
),
929 messaging_register(msg_ctx
,
931 MSG_SMB_CONF_UPDATED
,
932 lsasd_smb_conf_updated
);
933 messaging_register(msg_ctx
, ev_ctx
,
934 MSG_PREFORK_CHILD_EVENT
, child_ping
);
936 status
= rpc_lsarpc_init(NULL
);
937 if (!NT_STATUS_IS_OK(status
)) {
938 DEBUG(0, ("Failed to register lsarpc rpc inteface in lsasd! (%s)\n",
943 status
= rpc_samr_init(NULL
);
944 if (!NT_STATUS_IS_OK(status
)) {
945 DEBUG(0, ("Failed to register samr rpc inteface in lsasd! (%s)\n",
950 status
= rpc_netlogon_init(NULL
);
951 if (!NT_STATUS_IS_OK(status
)) {
952 DEBUG(0, ("Failed to register netlogon rpc inteface in lsasd! (%s)\n",
957 ok
= lsasd_setup_children_monitor(ev_ctx
, msg_ctx
);
959 DEBUG(0, ("Failed to setup children monitoring!\n"));
963 DEBUG(1, ("LSASD Daemon Started (%d)\n", getpid()));
966 rc
= tevent_loop_wait(ev_ctx
);
968 /* should not be reached */
969 DEBUG(0,("lsasd: tevent_loop_wait() exited with %d - %s\n",
970 rc
, (rc
== 0) ? "out of events" : strerror(errno
)));