/* Unix SMB/CIFS implementation. web status page Copyright (C) Andrew Tridgell 1997-1998 This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #include "includes.h" #include "../web/swat_proto.h" #define PIDMAP struct PidMap PIDMAP { PIDMAP *next, *prev; pid_t pid; char *machine; }; static PIDMAP *pidmap; static int PID_or_Machine; /* 0 = show PID, else show Machine name */ static pid_t smbd_pid; /* from 2nd call on, remove old list */ static void initPid2Machine (void) { /* show machine name rather PID on table "Open Files"? */ if (PID_or_Machine) { PIDMAP *p; for (p = pidmap; p != NULL; ) { DLIST_REMOVE(pidmap, p); SAFE_FREE(p->machine); SAFE_FREE(p); } pidmap = NULL; } } /* add new PID <-> Machine name mapping */ static void addPid2Machine (pid_t pid, char *machine) { /* show machine name rather PID on table "Open Files"? */ if (PID_or_Machine) { PIDMAP *newmap; if ((newmap = (PIDMAP *) malloc (sizeof (PIDMAP))) == NULL) { /* XXX need error message for this? if malloc fails, PID is always shown */ return; } newmap->pid = pid; newmap->machine = strdup (machine); DLIST_ADD(pidmap, newmap); } } /* lookup PID <-> Machine name mapping */ static char *mapPid2Machine (pid_t pid) { static char pidbuf [64]; PIDMAP *map; /* show machine name rather PID on table "Open Files"? */ if (PID_or_Machine) { for (map = pidmap; map != NULL; map = map->next) { if (pid == map->pid) { if (map->machine == NULL) /* no machine name */ break; /* show PID */ return map->machine; } } } /* PID not in list or machine name NULL? return pid as string */ snprintf (pidbuf, sizeof (pidbuf) - 1, "%d", pid); return pidbuf; } static char *tstring(time_t t) { static pstring buf; pstrcpy(buf, asctime(LocalTime(&t))); all_string_sub(buf," "," ",sizeof(buf)); return buf; } static void print_share_mode(share_mode_entry *e, char *fname) { d_printf("%s",_(mapPid2Machine(e->pid))); d_printf(""); switch ((e->share_mode>>4)&0xF) { case DENY_NONE: d_printf("DENY_NONE"); break; case DENY_ALL: d_printf("DENY_ALL "); break; case DENY_DOS: d_printf("DENY_DOS "); break; case DENY_READ: d_printf("DENY_READ "); break; case DENY_WRITE:d_printf("DENY_WRITE "); break; } d_printf(""); d_printf(""); switch (e->share_mode&0xF) { case 0: d_printf("RDONLY "); break; case 1: d_printf("WRONLY "); break; case 2: d_printf("RDWR "); break; } d_printf(""); d_printf(""); if((e->op_type & (EXCLUSIVE_OPLOCK|BATCH_OPLOCK)) == (EXCLUSIVE_OPLOCK|BATCH_OPLOCK)) d_printf("EXCLUSIVE+BATCH "); else if (e->op_type & EXCLUSIVE_OPLOCK) d_printf("EXCLUSIVE "); else if (e->op_type & BATCH_OPLOCK) d_printf("BATCH "); else if (e->op_type & LEVEL_II_OPLOCK) d_printf("LEVEL_II "); else d_printf("NONE "); d_printf(""); d_printf("%s%s\n", fname,tstring(e->time.tv_sec)); } /* kill off any connections chosen by the user */ static int traverse_fn1(TDB_CONTEXT *tdb, TDB_DATA kbuf, TDB_DATA dbuf, void* state) { struct connections_data crec; if (dbuf.dsize != sizeof(crec)) return 0; memcpy(&crec, dbuf.dptr, sizeof(crec)); if (crec.cnum == -1 && process_exists(crec.pid)) { char buf[30]; slprintf(buf,sizeof(buf)-1,"kill_%d", (int)crec.pid); if (cgi_variable(buf)) { kill_pid(crec.pid); } } return 0; } /* traversal fn for showing machine connections */ static int traverse_fn2(TDB_CONTEXT *tdb, TDB_DATA kbuf, TDB_DATA dbuf, void* state) { struct connections_data crec; if (dbuf.dsize != sizeof(crec)) return 0; memcpy(&crec, dbuf.dptr, sizeof(crec)); if (crec.cnum != -1 || !process_exists(crec.pid) || (crec.pid == smbd_pid)) return 0; addPid2Machine (crec.pid, crec.machine); d_printf("%d%s%s%s\n", (int)crec.pid, crec.machine,crec.addr, tstring(crec.start)); if (geteuid() == 0) { d_printf("\n", (int)crec.pid); } d_printf("\n"); return 0; } /* traversal fn for showing share connections */ static int traverse_fn3(TDB_CONTEXT *tdb, TDB_DATA kbuf, TDB_DATA dbuf, void* state) { struct connections_data crec; if (dbuf.dsize != sizeof(crec)) return 0; memcpy(&crec, dbuf.dptr, sizeof(crec)); if (crec.cnum == -1 || !process_exists(crec.pid)) return 0; d_printf("%s%s%s%d%s%s\n", crec.name,uidtoname(crec.uid), gidtoname(crec.gid),(int)crec.pid, crec.machine, tstring(crec.start)); return 0; } /* show the current server status */ void status_page(void) { char *v; int autorefresh=0; int refresh_interval=30; TDB_CONTEXT *tdb; smbd_pid = pidfile_pid("smbd"); if (cgi_variable("smbd_restart")) { stop_smbd(); start_smbd(); } if (cgi_variable("smbd_start")) { start_smbd(); } if (cgi_variable("smbd_stop")) { stop_smbd(); } if (cgi_variable("nmbd_restart")) { stop_nmbd(); start_nmbd(); } if (cgi_variable("nmbd_start")) { start_nmbd(); } if (cgi_variable("nmbd_stop")) { stop_nmbd(); } if (cgi_variable("autorefresh")) { autorefresh = 1; } else if (cgi_variable("norefresh")) { autorefresh = 0; } else if (cgi_variable("refresh")) { autorefresh = 1; } if ((v=cgi_variable("refresh_interval"))) { refresh_interval = atoi(v); } if (cgi_variable("show_client_in_col_1")) { PID_or_Machine = 1; } tdb = tdb_open_log(lock_path("connections.tdb"), 0, TDB_DEFAULT, O_RDONLY, 0); if (tdb) tdb_traverse(tdb, traverse_fn1, NULL); initPid2Machine (); d_printf("

%s

\n", _("Server Status")); d_printf("
\n"); if (!autorefresh) { d_printf("\n", _("Auto Refresh")); d_printf("
%s", _("Refresh Interval: ")); d_printf("\n", refresh_interval); } else { d_printf("\n", _("Stop Refreshing")); d_printf("
%s%d\n", _("Refresh Interval: "), refresh_interval); d_printf("\n"); } d_printf("

\n"); if (!tdb) { /* open failure either means no connections have been made */ } d_printf("\n"); d_printf("", _("version:"), VERSION); fflush(stdout); d_printf("\n", _("smbd:"), smbd_running()?_("running"):_("not running")); if (geteuid() == 0) { if (smbd_running()) { d_printf("\n", _("Stop smbd")); } else { d_printf("\n", _("Start smbd")); } d_printf("\n", _("Restart smbd")); } d_printf("\n"); fflush(stdout); d_printf("\n", _("nmbd:"), nmbd_running()?_("running"):_("not running")); if (geteuid() == 0) { if (nmbd_running()) { d_printf("\n", _("Stop nmbd")); } else { d_printf("\n", _("Start nmbd")); } d_printf("\n", _("Restart nmbd")); } d_printf("\n"); d_printf("
%s%s
%s%s
%s%s
\n"); fflush(stdout); d_printf("

%s

\n", _("Active Connections")); d_printf("\n"); d_printf("\n", _("PID"), _("Client"), _("IP address"), _("Date")); if (geteuid() == 0) { d_printf("\n", _("Kill")); } d_printf("\n"); if (tdb) tdb_traverse(tdb, traverse_fn2, NULL); d_printf("
%s%s%s%s%s

\n"); d_printf("

%s

\n", _("Active Shares")); d_printf("\n"); d_printf("\n\n", _("Share"), _("User"), _("Group"), _("PID"), _("Client"), _("Date")); if (tdb) tdb_traverse(tdb, traverse_fn3, NULL); d_printf("
%s%s%s%s%s%s

\n"); d_printf("

%s

\n", _("Open Files")); d_printf("\n"); d_printf("\n", _("PID"), _("Sharing"), _("R/W"), _("Oplock"), _("File"), _("Date")); locking_init(1); share_mode_forall(print_share_mode); locking_end(); d_printf("
%s%s%s%s%s%s
\n"); if (tdb) tdb_close(tdb); d_printf("
\n"); d_printf("\n"); d_printf("
\n"); if (autorefresh) { /* this little JavaScript allows for automatic refresh of the page. There are other methods but this seems to be the best alternative */ d_printf("\n"); } }