r7882: Looks like a large patch - but what it actually does is make Samba
[ira/wip.git] / source3 / web / diagnose.c
1 /* 
2    Unix SMB/CIFS implementation.
3    diagnosis tools for web admin
4    Copyright (C) Andrew Tridgell 1998
5    
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.
10    
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.
15    
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.
19 */
20
21 #include "includes.h"
22 #include "web/swat_proto.h"
23
24 extern struct in_addr loopback_ip;
25
26 #ifdef WITH_WINBIND
27
28 /* check to see if winbind is running by pinging it */
29
30 BOOL winbindd_running(void)
31 {
32         return winbind_ping();
33 }       
34 #endif
35
36 /* check to see if nmbd is running on localhost by looking for a __SAMBA__
37    response */
38 BOOL nmbd_running(void)
39 {
40         int fd, count, flags;
41         struct in_addr *ip_list;
42
43         if ((fd = open_socket_in(SOCK_DGRAM, 0, 3,
44                                  interpret_addr("127.0.0.1"), True)) != -1) {
45                 if ((ip_list = name_query(fd, "__SAMBA__", 0, 
46                                           True, True, loopback_ip,
47                                           &count, &flags, NULL)) != NULL) {
48                         SAFE_FREE(ip_list);
49                         close(fd);
50                         return True;
51                 }
52                 close (fd);
53         }
54
55         return False;
56 }
57
58
59 /* check to see if smbd is running on localhost by trying to open a connection
60    then closing it */
61 BOOL smbd_running(void)
62 {
63         static struct cli_state cli;
64
65         if (!cli_initialise(&cli))
66                 return False;
67
68         if (!cli_connect(&cli, global_myname(), &loopback_ip)) {
69                 cli_shutdown(&cli);
70                 return False;
71         }
72
73         cli_shutdown(&cli);
74         return True;
75 }