2 Unix SMB/CIFS implementation.
3 Main SMB server routines
4 Copyright (C) Jean François Micouleau 1998-2002.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 #include "wins_repl.h"
24 extern pstring user_socket_options
;
26 extern WINS_OWNER
*global_wins_table
;
27 extern int partner_count
;
29 extern fd_set
*listen_set
;
30 extern int listen_number
;
31 extern int *sock_array
;
33 extern TALLOC_CTX
*mem_ctx
;
37 /****************************************************************************
38 when exiting, take the whole family
39 ****************************************************************************/
40 static void *dflt_sig(void)
42 exit_server("caught signal");
46 /****************************************************************************
47 reload the services file
48 **************************************************************************/
49 BOOL
reload_services(BOOL test
)
55 pstrcpy(fname
,lp_configfile());
56 if (file_exist(fname
,NULL
) && !strcsequal(fname
,dyn_CONFIGFILE
)) {
57 pstrcpy(dyn_CONFIGFILE
,fname
);
64 if (test
&& !lp_file_list_changed())
67 ret
= lp_load(dyn_CONFIGFILE
,False
,False
,True
);
70 /* perhaps the config filename is now set */
72 reload_services(True
);
81 /****************************************************************************
83 ****************************************************************************/
85 VOLATILE
sig_atomic_t reload_after_sighup
= False
;
87 static void sig_hup(int sig
)
89 BlockSignals(True
,SIGHUP
);
90 DEBUG(0,("Got SIGHUP\n"));
92 sys_select_signal(SIGHUP
);
93 reload_after_sighup
= True
;
94 BlockSignals(False
,SIGHUP
);
98 /*******************************************************************
99 prepare to dump a core file - carefully!
100 ********************************************************************/
101 static BOOL
dump_core(void)
105 pstrcpy(dname
,lp_logfile());
106 if ((p
=strrchr_m(dname
,'/'))) *p
=0;
107 pstrcat(dname
,"/corefiles");
109 sys_chown(dname
,getuid(),getgid());
111 if (chdir(dname
)) return(False
);
114 #ifdef HAVE_GETRLIMIT
118 getrlimit(RLIMIT_CORE
, &rlp
);
119 rlp
.rlim_cur
= MAX(4*1024*1024,rlp
.rlim_cur
);
120 setrlimit(RLIMIT_CORE
, &rlp
);
121 getrlimit(RLIMIT_CORE
, &rlp
);
122 DEBUG(3,("Core limits now %d %d\n",
123 (int)rlp
.rlim_cur
,(int)rlp
.rlim_max
));
129 DEBUG(0,("Dumping core in %s\n",dname
));
135 /****************************************************************************
137 ****************************************************************************/
138 void exit_server(const char *reason
)
140 static int firsttime
=1;
146 DEBUG(2,("Closing connections\n"));
149 int oldlevel
= DEBUGLEVEL
;
151 DEBUGLEVEL
= oldlevel
;
152 DEBUG(0,("===============================================================\n"));
154 if (dump_core()) return;
158 DEBUG(3,("Server exit (%s)\n", (reason
? reason
: "")));
162 /****************************************************************************
163 Create an fd_set containing all the sockets in the subnet structures,
164 plus the broadcast sockets.
165 ***************************************************************************/
167 static BOOL
create_listen_fdset( int *maxfd
)
170 int num_interfaces
= iface_count();
173 listen_set
= (fd_set
*)malloc(sizeof(fd_set
));
174 if(listen_set
== NULL
) {
175 DEBUG(0,("create_listen_fdset: malloc fail !\n"));
181 static int atexit_set
;
182 if(atexit_set
== 0) {
190 if(lp_interfaces() && lp_bind_interfaces_only()) {
191 /* We have been given an interfaces line, and been
192 told to only bind to those interfaces. Create a
193 socket per interface and bind to only these.
196 if(num_interfaces
> FD_SETSIZE
) {
197 DEBUG(0,("create_listen_fdset: Too many interfaces specified to bind to. Number was %d max can be %d\n", num_interfaces
, FD_SETSIZE
));
201 /* Now open a listen socket for each of the interfaces. */
202 for(i
= 0; i
< num_interfaces
; i
++) {
203 struct in_addr
*ifip
= iface_n_ip(i
);
206 DEBUG(0,("create_listen_fdset: interface %d has NULL IP address !\n", i
));
209 s
= open_socket_in(SOCK_STREAM
, wins_port
, 0, ifip
->s_addr
, True
);
213 /* ready to listen */
214 set_socket_options(s
,"SO_KEEPALIVE");
215 set_socket_options(s
,user_socket_options
);
217 if (listen(s
, 5) == -1) {
218 DEBUG(5,("listen: %s\n",strerror(errno
)));
222 add_fd_to_sock_array(s
);
223 FD_SET(s
, listen_set
);
224 *maxfd
= MAX( *maxfd
, s
);
227 /* Just bind to 0.0.0.0 - accept connections from anywhere. */
230 /* open an incoming socket */
231 s
= open_socket_in(SOCK_STREAM
, wins_port
, 0, interpret_addr(lp_socket_address()),True
);
235 /* ready to listen */
236 set_socket_options(s
,"SO_KEEPALIVE");
237 set_socket_options(s
,user_socket_options
);
239 if (listen(s
, 5) == -1) {
240 DEBUG(0,("create_listen_fdset: listen: %s\n", strerror(errno
)));
245 add_fd_to_sock_array(s
);
246 FD_SET(s
, listen_set
);
247 *maxfd
= MAX( *maxfd
, s
);
253 /*******************************************************************
254 read a packet from a socket and parse it, returning a packet ready
255 to be used or put on the queue. This assumes a UDP socket
256 ******************************************************************/
257 static struct wins_packet_struct
*read_wins_packet(int fd
, int timeout
)
259 struct wins_packet_struct
*p
;
271 if(!grow_buffer(&inbuf
, 4))
274 ok
= (read(fd
, inbuf
.buffer
,4) == 4);
277 len
= smb_len(inbuf
.buffer
);
282 if(!grow_buffer(&inbuf
, len
))
285 while (total
< len
) {
286 ret
= read(fd
, inbuf
.buffer
+ total
+ 4, len
- total
);
288 DEBUG(10,("read_socket_data: recv of %d returned 0. Error = %s\n", (int)(len
- total
), strerror(errno
) ));
292 DEBUG(0,("read_socket_data: recv failure for %d. Error = %s\n", (int)(len
- total
), strerror(errno
) ));
298 q
= talloc(mem_ctx
, GENERIC_PACKET
);
299 p
= talloc(mem_ctx
, struct wins_packet_struct
);
300 if (q
==NULL
|| p
==NULL
)
303 decode_generic_packet(&inbuf
, q
);
309 p
->stop_packet
= False
;
310 p
->timestamp
= time(NULL
);
317 static struct wins_packet_struct
*packet_queue
= NULL
;
319 /*******************************************************************
320 Queue a packet into a packet queue
321 ******************************************************************/
322 static void queue_packet(struct wins_packet_struct
*packet
)
324 struct wins_packet_struct
*p
;
329 packet_queue
= packet
;
333 /* find the bottom */
334 for (p
=packet_queue
;p
->next
;p
=p
->next
)
342 /****************************************************************************
343 Listens for NMB or DGRAM packets, and queues them.
344 return True if the socket is dead
345 ***************************************************************************/
346 static BOOL
listen_for_wins_packets(void)
348 int num_interfaces
= iface_count();
350 int i
, num
, s
, new_s
;
351 static int maxfd
= 0;
352 struct timeval timeout
;
354 if(listen_set
== NULL
) {
355 if(!create_listen_fdset( &maxfd
)) {
356 DEBUG(0,("listen_for_packets: Fatal error. unable to create listen set. Exiting.\n"));
361 memcpy((char *)&fds
, (char *)listen_set
, sizeof(fd_set
));
363 timeout
.tv_sec
= NMBD_SELECT_LOOP
;
366 /* Prepare for the select - allow certain signals. */
368 BlockSignals(False
, SIGTERM
);
370 num
= sys_select(maxfd
+1, &fds
, NULL
, NULL
, &timeout
);
372 /* We can only take signals when we are in the select - block them again here. */
374 BlockSignals(True
, SIGTERM
);
379 for (; num
> 0; num
--) {
381 /* check the sockets we are only listening on, waiting to accept */
382 for (i
=0; i
<num_interfaces
; i
++) {
383 struct sockaddr addr
;
384 socklen_t in_addrlen
= sizeof(addr
);
386 if(FD_ISSET(sock_array
[i
], &fds
)) {
388 /* Clear this so we don't look at it again. */
389 FD_CLR(sock_array
[i
], &fds
);
391 /* accept and add the new socket to the listen set */
392 new_s
=accept(s
, &addr
, &in_addrlen
);
397 DEBUG(5,("listen_for_wins_packets: new connection, old: %d, new : %d\n", s
, new_s
));
399 set_socket_options(new_s
, "SO_KEEPALIVE");
400 set_socket_options(new_s
, user_socket_options
);
401 FD_SET(new_s
, listen_set
);
402 add_fd_to_sock_array(new_s
);
403 maxfd
= MAX( maxfd
, new_s
);
408 * check for the sockets we are waiting data from
409 * either client sending datas
410 * or reply to our requests
412 for (i
=num_interfaces
; i
<listen_number
; i
++) {
413 if(FD_ISSET(sock_array
[i
], &fds
)) {
414 struct wins_packet_struct
*packet
= read_wins_packet(sock_array
[i
], timeout
.tv_sec
);
416 packet
->fd
= sock_array
[i
];
417 queue_packet(packet
);
419 DEBUG(2,("listen_for_wins_packets: some data on fd %d\n", sock_array
[i
]));
420 FD_CLR(sock_array
[i
], &fds
);
432 /*******************************************************************
433 Run elements off the packet queue till its empty
434 ******************************************************************/
436 static void run_wins_packet_queue(void)
438 struct wins_packet_struct
*p
;
440 while ((p
= packet_queue
)) {
441 packet_queue
= p
->next
;
443 packet_queue
->prev
= NULL
;
444 p
->next
= p
->prev
= NULL
;
448 /* if it was a stop assoc, close the connection */
449 if (p
->stop_packet
) {
450 FD_CLR(p
->fd
, listen_set
);
451 remove_fd_from_sock_array(p
->fd
);
457 /**************************************************************************** **
458 The main select loop.
459 **************************************************************************** */
460 static void process(void)
464 time_t t
= time(NULL
);
466 /* check for internal messages */
469 if(listen_for_wins_packets())
472 run_wins_packet_queue();
474 run_pull_replication(t
);
476 run_push_replication(t
);
479 * Reload the services file if we got a sighup.
482 if(reload_after_sighup
) {
483 reload_services( True
);
485 reload_after_sighup
= False
;
488 /* free temp memory */
489 talloc_free_children(mem_ctx
);
491 /* free up temp memory */
496 /****************************************************************************
498 ****************************************************************************/
499 int main(int argc
,char *argv
[])
501 /* shall I run as a daemon */
502 static BOOL is_daemon
= False
;
503 static BOOL interactive
= False
;
504 static BOOL Fork
= True
;
505 static BOOL log_stdout
= False
;
506 struct poptOption long_options
[] = {
508 { "daemon", 'D', POPT_ARG_VAL
, &is_daemon
, True
, "Become a daemon (default)" },
509 { "foreground", 'F', POPT_ARG_VAL
, &Fork
, False
, "Run daemon in foreground (for daemontools, etc)" },
510 { "stdout", 'S', POPT_ARG_VAL
, &log_stdout
, True
, "Log to stdout" },
511 { "interactive", 'i', POPT_ARG_NONE
, NULL
, 'i', "Run interactive (not a daemon)" },
512 { "port", 'p', POPT_ARG_INT
, &wins_port
, 'p', "Listen on the specified port" },
519 #ifdef HAVE_SET_AUTH_PARAMETERS
520 set_auth_parameters(argc
,argv
);
523 pc
= poptGetContext("wrepld", argc
, (const char **)argv
, long_options
,
524 POPT_CONTEXT_KEEP_FIRST
);
526 while ((opt
= poptGetNextOpt(pc
)) != -1) {
537 if (log_stdout
&& Fork
) {
538 d_printf("Can't log to stdout (-S) unless daemon is in foreground (-F) or interactive (-i)\n");
539 poptPrintUsage(pc
, stderr
, 0);
544 /* needed for SecureWare on SCO */
552 set_remote_machine_name("wrepld", False
);
554 setup_logging(argv
[0],log_stdout
);
556 /* we want to re-seed early to prevent time delays causing
557 client problems at a later date. (tridge) */
558 generate_random_buffer(NULL
, 0);
560 /* make absolutely sure we run as root - to handle cases where people
561 are crazy enough to have it setuid */
563 gain_root_privilege();
564 gain_root_group_privilege();
566 fault_setup((void (*)(void *))exit_server
);
567 CatchSignal(SIGTERM
, SIGNAL_CAST dflt_sig
);
569 /* we are never interested in SIGPIPE */
570 BlockSignals(True
,SIGPIPE
);
573 /* we are never interested in SIGFPE */
574 BlockSignals(True
,SIGFPE
);
578 /* We are no longer interested in USR2 */
579 BlockSignals(True
,SIGUSR2
);
582 /* POSIX demands that signals are inherited. If the invoking process has
583 * these signals masked, we will have problems, as we won't recieve them. */
584 BlockSignals(False
, SIGHUP
);
585 BlockSignals(False
, SIGUSR1
);
587 /* we want total control over the permissions on created files,
588 so set our umask to 0 */
593 DEBUG(1,( "wrepld version %s started.\n", SAMBA_VERSION_STRING
));
594 DEBUGADD(1,( "Copyright Andrew Tridgell and the Samba Team 1992-2004\n"));
596 DEBUG(2,("uid=%d gid=%d euid=%d egid=%d\n",
597 (int)getuid(),(int)getgid(),(int)geteuid(),(int)getegid()));
599 if (sizeof(uint16
) < 2 || sizeof(uint32
) < 4) {
600 DEBUG(0,("ERROR: Samba is not configured correctly for the word size on your machine\n"));
605 * Do this before reload_services.
608 if (!reload_services(False
))
615 if (!profile_setup(False
)) {
616 DEBUG(0,("ERROR: failed to setup profiling\n"));
621 CatchSignal(SIGHUP
,SIGNAL_CAST sig_hup
);
623 DEBUG(3,( "loaded services\n"));
625 if (!is_daemon
&& !is_a_socket(0)) {
626 DEBUG(0,("standard input is not a socket, assuming -D option\n"));
630 if (is_daemon
&& !interactive
) {
631 DEBUG( 3, ( "Becoming a daemon.\n" ) );
637 * If we're interactive we want to set our own process group for
641 setpgid( (pid_t
)0, (pid_t
)0);
644 if (!directory_exist(lp_lockdir(), NULL
)) {
645 mkdir(lp_lockdir(), 0755);
649 pidfile_create("wrepld");
652 if (!message_init()) {
656 /* Initialise the memory context */
657 mem_ctx
=talloc_init("wins repl talloc ctx");
659 /* initialise the global partners table */
660 partner_count
=init_wins_partner_table();
662 /* We can only take signals in the select. */
663 BlockSignals( True
, SIGTERM
);
668 exit_server("normal exit");