2 Unix SMB/CIFS implementation.
4 Copyright (C) Andrew Tridgell 1997-1998
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 "../web/swat_proto.h"
24 #define PIDMAP struct PidMap
32 static PIDMAP
*pidmap
;
33 static int PID_or_Machine
; /* 0 = show PID, else show Machine name */
35 static pid_t smbd_pid
;
37 /* from 2nd call on, remove old list */
38 static void initPid2Machine (void)
40 /* show machine name rather PID on table "Open Files"? */
44 for (p
= pidmap
; p
!= NULL
; ) {
45 DLIST_REMOVE(pidmap
, p
);
46 SAFE_FREE(p
->machine
);
54 /* add new PID <-> Machine name mapping */
55 static void addPid2Machine (pid_t pid
, char *machine
)
57 /* show machine name rather PID on table "Open Files"? */
61 if ((newmap
= (PIDMAP
*) malloc (sizeof (PIDMAP
))) == NULL
) {
62 /* XXX need error message for this?
63 if malloc fails, PID is always shown */
68 newmap
->machine
= strdup (machine
);
70 DLIST_ADD(pidmap
, newmap
);
74 /* lookup PID <-> Machine name mapping */
75 static char *mapPid2Machine (pid_t pid
)
77 static char pidbuf
[64];
80 /* show machine name rather PID on table "Open Files"? */
82 for (map
= pidmap
; map
!= NULL
; map
= map
->next
) {
83 if (pid
== map
->pid
) {
84 if (map
->machine
== NULL
) /* no machine name */
92 /* PID not in list or machine name NULL? return pid as string */
93 snprintf (pidbuf
, sizeof (pidbuf
) - 1, "%d", pid
);
97 static char *tstring(time_t t
)
100 pstrcpy(buf
, asctime(LocalTime(&t
)));
101 all_string_sub(buf
," "," ",sizeof(buf
));
105 static void print_share_mode(share_mode_entry
*e
, char *fname
)
107 d_printf("<tr><td>%s</td>",_(mapPid2Machine(e
->pid
)));
109 switch ((e
->share_mode
>>4)&0xF) {
110 case DENY_NONE
: d_printf("DENY_NONE"); break;
111 case DENY_ALL
: d_printf("DENY_ALL "); break;
112 case DENY_DOS
: d_printf("DENY_DOS "); break;
113 case DENY_READ
: d_printf("DENY_READ "); break;
114 case DENY_WRITE
:d_printf("DENY_WRITE "); break;
119 switch (e
->share_mode
&0xF) {
120 case 0: d_printf("RDONLY "); break;
121 case 1: d_printf("WRONLY "); break;
122 case 2: d_printf("RDWR "); break;
128 (EXCLUSIVE_OPLOCK
|BATCH_OPLOCK
)) ==
129 (EXCLUSIVE_OPLOCK
|BATCH_OPLOCK
))
130 d_printf("EXCLUSIVE+BATCH ");
131 else if (e
->op_type
& EXCLUSIVE_OPLOCK
)
132 d_printf("EXCLUSIVE ");
133 else if (e
->op_type
& BATCH_OPLOCK
)
135 else if (e
->op_type
& LEVEL_II_OPLOCK
)
136 d_printf("LEVEL_II ");
141 d_printf("<td>%s</td><td>%s</td></tr>\n",
142 fname
,tstring(e
->time
.tv_sec
));
146 /* kill off any connections chosen by the user */
147 static int traverse_fn1(TDB_CONTEXT
*tdb
, TDB_DATA kbuf
, TDB_DATA dbuf
, void* state
)
149 struct connections_data crec
;
151 if (dbuf
.dsize
!= sizeof(crec
))
154 memcpy(&crec
, dbuf
.dptr
, sizeof(crec
));
156 if (crec
.cnum
== -1 && process_exists(crec
.pid
)) {
158 slprintf(buf
,sizeof(buf
)-1,"kill_%d", (int)crec
.pid
);
159 if (cgi_variable(buf
)) {
166 /* traversal fn for showing machine connections */
167 static int traverse_fn2(TDB_CONTEXT
*tdb
, TDB_DATA kbuf
, TDB_DATA dbuf
, void* state
)
169 struct connections_data crec
;
171 if (dbuf
.dsize
!= sizeof(crec
))
174 memcpy(&crec
, dbuf
.dptr
, sizeof(crec
));
176 if (crec
.cnum
!= -1 || !process_exists(crec
.pid
) || (crec
.pid
== smbd_pid
))
179 addPid2Machine (crec
.pid
, crec
.machine
);
181 d_printf("<tr><td>%d</td><td>%s</td><td>%s</td><td>%s</td>\n",
183 crec
.machine
,crec
.addr
,
184 tstring(crec
.start
));
185 if (geteuid() == 0) {
186 d_printf("<td><input type=submit value=\"X\" name=\"kill_%d\"></td>\n",
194 /* traversal fn for showing share connections */
195 static int traverse_fn3(TDB_CONTEXT
*tdb
, TDB_DATA kbuf
, TDB_DATA dbuf
, void* state
)
197 struct connections_data crec
;
199 if (dbuf
.dsize
!= sizeof(crec
))
202 memcpy(&crec
, dbuf
.dptr
, sizeof(crec
));
204 if (crec
.cnum
== -1 || !process_exists(crec
.pid
))
207 d_printf("<tr><td>%s</td><td>%s</td><td>%s</td><td>%d</td><td>%s</td><td>%s</td></tr>\n",
208 crec
.name
,uidtoname(crec
.uid
),
209 gidtoname(crec
.gid
),(int)crec
.pid
,
211 tstring(crec
.start
));
216 /* show the current server status */
217 void status_page(void)
221 int refresh_interval
=30;
224 smbd_pid
= pidfile_pid("smbd");
226 if (cgi_variable("smbd_restart")) {
231 if (cgi_variable("smbd_start")) {
235 if (cgi_variable("smbd_stop")) {
239 if (cgi_variable("nmbd_restart")) {
243 if (cgi_variable("nmbd_start")) {
247 if (cgi_variable("nmbd_stop")) {
252 if (cgi_variable("winbindd_restart")) {
257 if (cgi_variable("winbindd_start")) {
261 if (cgi_variable("winbindd_stop")) {
265 if (cgi_variable("autorefresh")) {
267 } else if (cgi_variable("norefresh")) {
269 } else if (cgi_variable("refresh")) {
273 if ((v
=cgi_variable("refresh_interval"))) {
274 refresh_interval
= atoi(v
);
277 if (cgi_variable("show_client_in_col_1")) {
281 tdb
= tdb_open_log(lock_path("connections.tdb"), 0, TDB_DEFAULT
, O_RDONLY
, 0);
282 if (tdb
) tdb_traverse(tdb
, traverse_fn1
, NULL
);
286 d_printf("<H2>%s</H2>\n", _("Server Status"));
288 d_printf("<FORM method=post>\n");
291 d_printf("<input type=submit value=\"%s\" name=autorefresh>\n", _("Auto Refresh"));
292 d_printf("<br>%s", _("Refresh Interval: "));
293 d_printf("<input type=text size=2 name=\"refresh_interval\" value=%d>\n",
296 d_printf("<input type=submit value=\"%s\" name=norefresh>\n", _("Stop Refreshing"));
297 d_printf("<br>%s%d\n", _("Refresh Interval: "), refresh_interval
);
298 d_printf("<input type=hidden name=refresh value=1>\n");
304 /* open failure either means no connections have been
309 d_printf("<table>\n");
311 d_printf("<tr><td>%s</td><td>%s</td></tr>", _("version:"), VERSION
);
314 d_printf("<tr><td>%s</td><td>%s</td>\n", _("smbd:"), smbd_running()?_("running"):_("not running"));
315 if (geteuid() == 0) {
316 if (smbd_running()) {
317 d_printf("<td><input type=submit name=\"smbd_stop\" value=\"%s\"></td>\n", _("Stop smbd"));
319 d_printf("<td><input type=submit name=\"smbd_start\" value=\"%s\"></td>\n", _("Start smbd"));
321 d_printf("<td><input type=submit name=\"smbd_restart\" value=\"%s\"></td>\n", _("Restart smbd"));
326 d_printf("<tr><td>%s</td><td>%s</td>\n", _("nmbd:"), nmbd_running()?_("running"):_("not running"));
327 if (geteuid() == 0) {
328 if (nmbd_running()) {
329 d_printf("<td><input type=submit name=\"nmbd_stop\" value=\"%s\"></td>\n", _("Stop nmbd"));
331 d_printf("<td><input type=submit name=\"nmbd_start\" value=\"%s\"></td>\n", _("Start nmbd"));
333 d_printf("<td><input type=submit name=\"nmbd_restart\" value=\"%s\"></td>\n", _("Restart nmbd"));
339 d_printf("<tr><td>%s</td><td>%s</td>\n", _("winbindd:"), winbindd_running()?_("running"):_("not running"));
340 if (geteuid() == 0) {
341 if (winbindd_running()) {
342 d_printf("<td><input type=submit name=\"winbindd_stop\" value=\"%s\"></td>\n", _("Stop winbindd"));
344 d_printf("<td><input type=submit name=\"winbindd_start\" value=\"%s\"></td>\n", _("Start winbindd"));
346 d_printf("<td><input type=submit name=\"winbindd_restart\" value=\"%s\"></td>\n", _("Restart winbindd"));
351 d_printf("</table>\n");
354 d_printf("<p><h3>%s</h3>\n", _("Active Connections"));
355 d_printf("<table border=1>\n");
356 d_printf("<tr><th>%s</th><th>%s</th><th>%s</th><th>%s</th>\n", _("PID"), _("Client"), _("IP address"), _("Date"));
357 if (geteuid() == 0) {
358 d_printf("<th>%s</th>\n", _("Kill"));
362 if (tdb
) tdb_traverse(tdb
, traverse_fn2
, NULL
);
364 d_printf("</table><p>\n");
366 d_printf("<p><h3>%s</h3>\n", _("Active Shares"));
367 d_printf("<table border=1>\n");
368 d_printf("<tr><th>%s</th><th>%s</th><th>%s</th><th>%s</th><th>%s</th><th>%s</th></tr>\n\n",
369 _("Share"), _("User"), _("Group"), _("PID"), _("Client"), _("Date"));
371 if (tdb
) tdb_traverse(tdb
, traverse_fn3
, NULL
);
373 d_printf("</table><p>\n");
375 d_printf("<h3>%s</h3>\n", _("Open Files"));
376 d_printf("<table border=1>\n");
377 d_printf("<tr><th>%s</th><th>%s</th><th>%s</th><th>%s</th><th>%s</th><th>%s</th></tr>\n", _("PID"), _("Sharing"), _("R/W"), _("Oplock"), _("File"), _("Date"));
380 share_mode_forall(print_share_mode
);
382 d_printf("</table>\n");
384 if (tdb
) tdb_close(tdb
);
386 d_printf("<br><input type=submit name=\"show_client_in_col_1\" value=\"Show Client in col 1\">\n");
387 d_printf("<input type=submit name=\"show_pid_in_col_1\" value=\"Show PID in col 1\">\n");
389 d_printf("</FORM>\n");
392 /* this little JavaScript allows for automatic refresh
393 of the page. There are other methods but this seems
394 to be the best alternative */
395 d_printf("<script language=\"JavaScript\">\n");
396 d_printf("<!--\nsetTimeout('window.location.replace(\"%s/status?refresh_interval=%d&refresh=1\")', %d)\n",
399 refresh_interval
*1000);
400 d_printf("//-->\n</script>\n");