/*
Unix SMB / Netbios implementation .
Version 1.9 .
Samba Web Administration Tool
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 0213 9 , USA .
*/
# ifdef SYSLOG
# undef SYSLOG
# endif
# include "includes.h"
# include "smb.h"
# define GLOBALS_SNUM -1
static pstring servicesf = CONFIGFILE ;
/* we need these because we link to locking*.o */
void become_root ( BOOL save_dir ) { }
void unbecome_root ( BOOL restore_dir ) { }
connection_struct Connections [ MAX_CONNECTIONS ] ;
files_struct Files [ MAX_OPEN_FILES ] ;
struct current_user current_user ;
/* start the page with standard stuff */
static void print_header ( void )
{
printf ( " Expires: 0 \r \n " ) ;
printf ( " Content-type: text/html \r \n \r \n " ) ;
printf ( " <!DOCTYPE HTML PUBLIC \" -//W3C//DTD HTML 3.2//EN \" > \n " ) ;
printf ( " <HTML> \n <HEAD> \n <TITLE>Samba Web Administration Tool</TITLE> \n </HEAD> \n <BODY background= \" %simages/background.jpg \" > \n \n " , cgi_rooturl ( ) ) ;
}
/* finish off the page */
static void print_footer ( void )
{
printf ( " \n </BODY> \n </HTML> \n " ) ;
}
/* include a lump of html in a page */
static void include_html ( char * fname )
{
FILE * f = fopen ( fname , " r " ) ;
char buf [ 1024 ] ;
int ret ;
if ( ! f ) {
printf ( " ERROR: Can't open %s \n " , fname ) ;
return ;
}
while ( ! feof ( f ) ) {
ret = fread ( buf , 1 , sizeof ( buf ) , f ) ;
if ( ret < = 0 ) break ;
fwrite ( buf , 1 , ret , stdout ) ;
}
fclose ( f ) ;
}
/* display one editable parameter in a form */
static void show_parameter ( int snum , struct parm_struct * parm )
{
int i ;
void * ptr = parm - > ptr ;
if ( parm - > class = = P_LOCAL & & snum > = 0 ) {
ptr = lp_local_ptr ( snum , ptr ) ;
}
printf ( " <tr><td><A HREF= \" %shelp/parameters.html#%s \" >?</A> %s</td><td> " ,
cgi_rooturl ( ) , parm - > label , parm - > label ) ;
switch ( parm - > type ) {
case P_CHAR :
printf ( " <input type=text size=2 name= \" parm_%s \" value= \" %c \" > " ,
parm - > label , * ( char * ) ptr ) ;
break ;
case P_STRING :
case P_USTRING :
printf ( " <input type=text size=40 name= \" parm_%s \" value= \" %s \" > " ,
parm - > label , * ( char * * ) ptr ) ;
break ;
case P_GSTRING :
case P_UGSTRING :
printf ( " <input type=text size=40 name= \" parm_%s \" value= \" %s \" > " ,
parm - > label , ( char * ) ptr ) ;
break ;
case P_BOOL :
printf ( " <input type=radio name= \" parm_%s \" value=Yes %s>yes " , parm - > label , ( * ( BOOL * ) ptr ) ? " CHECKED " : " " ) ;
printf ( " <input type=radio name= \" parm_%s \" value=No %s>no " , parm - > label , ( * ( BOOL * ) ptr ) ? " " : " CHECKED " ) ;
break ;
case P_BOOLREV :
printf ( " <input type=radio name= \" parm_%s \" value=Yes %s>yes " , parm - > label , ( * ( BOOL * ) ptr ) ? " " : " CHECKED " ) ;
printf ( " <input type=radio name= \" parm_%s \" value=No %s>no " , parm - > label , ( * ( BOOL * ) ptr ) ? " CHECKED " : " " ) ;
break ;
case P_INTEGER :
printf ( " <input type=text size=8 name= \" parm_%s \" value=%d> " , parm - > label , * ( int * ) ptr ) ;
break ;
case P_OCTAL :
printf ( " <input type=text size=8 name= \" parm_%s \" value=0%o> " , parm - > label , * ( int * ) ptr ) ;
break ;
case P_ENUM :
for ( i = 0 ; parm - > enum_list [ i ] . name ; i + + )
printf ( " <input type=radio name= \" parm_%s \" value=%s %s>%s " ,
parm - > label , parm - > enum_list [ i ] . name ,
( * ( int * ) ptr ) = = parm - > enum_list [ i ] . value ? " CHECKED " : " " ,
parm - > enum_list [ i ] . name ) ;
break ;
case P_SEP :
break ;
}
printf ( " </td></tr> \n " ) ;
}
/* display a set of parameters for a service */
static void show_parameters ( int snum , int allparameters , int advanced , int printers )
{
int i = 0 ;
struct parm_struct * parm ;
char * heading = NULL ;
char * last_heading = NULL ;
while ( ( parm = lp_next_parameter ( snum , & i , allparameters ) ) ) {
if ( snum < 0 & & parm - > class = = P_LOCAL & & ! ( parm - > flags & FLAG_GLOBAL ) )
continue ;
if ( parm - > class = = P_SEPARATOR ) {
heading = parm - > label ;
continue ;
}
if ( parm - > flags & FLAG_HIDE ) continue ;
if ( ! advanced ) {
if ( ! printers & & ! ( parm - > flags & FLAG_BASIC ) ) continue ;
if ( printers & & ! ( parm - > flags & FLAG_PRINT ) ) continue ;
}
if ( heading & & heading ! = last_heading ) {
printf ( " <tr><td></td></tr><tr><td><b><u>%s</u></b></td></tr> \n " , heading ) ;
last_heading = heading ;
}
show_parameter ( snum , parm ) ;
}
}
/* write a config file */
static void write_config ( FILE * f , BOOL show_defaults )
{
fprintf ( f , " # Samba config file created using SWAT \n " ) ;
fprintf ( f , " # from %s (%s) \n " , cgi_remote_host ( ) , cgi_remote_addr ( ) ) ;
fprintf ( f , " # Date: %s \n \n " , timestring ( ) ) ;
lp_dump ( f , show_defaults ) ;
}
/* save and reoad the smb.conf config file */
static int save_reload ( void )
{
FILE * f ;
f = fopen ( servicesf , " w " ) ;
if ( ! f ) {
printf ( " failed to open %s for writing \n " , servicesf ) ;
return 0 ;
}
write_config ( f , False ) ;
fclose ( f ) ;
lp_killunused ( NULL ) ;
if ( ! lp_load ( servicesf , False , False , False ) ) {
printf ( " Can't reload %s \n " , servicesf ) ;
return 0 ;
}
return 1 ;
}
/* commit one parameter */
static void commit_parameter ( int snum , struct parm_struct * parm , char * v )
{
int i ;
char * s ;
if ( snum < 0 & & parm - > class = = P_LOCAL ) {
/* this handles the case where we are changing a local
variable globally . We need to change the parameter in
all shares where it is currently set to the default */
for ( i = 0 ; i < lp_numservices ( ) ; i + + ) {
s = lp_servicename ( i ) ;
if ( s & & ( * s ) & & lp_is_default ( i , parm ) ) {
lp_do_parameter ( i , parm - > label , v ) ;
}
}
}
lp_do_parameter ( snum , parm - > label , v ) ;
}
/* commit a set of parameters for a service */
static void commit_parameters ( int snum )
{
int i = 0 ;
struct parm_struct * parm ;
pstring label ;
char * v ;
while ( ( parm = lp_next_parameter ( snum , & i , 1 ) ) ) {
sprintf ( label , " parm_%s " , parm - > label ) ;
if ( ( v = cgi_variable ( label ) ) ) {
if ( parm - > flags & FLAG_HIDE ) continue ;
commit_parameter ( snum , parm , v ) ;
}
}
}
/* load the smb.conf file into loadparm. */
static void load_config ( void )
{
if ( ! lp_load ( servicesf , False , True , False ) ) {
printf ( " <b>Can't load %s - using defaults</b><p> \n " ,
servicesf ) ;
}
}
/* spit out the html for a link with an image */
static void image_link ( char * name , char * hlink , char * src , int width , int height )
{
printf ( " <A HREF= \" %s/%s \" ><img width=%d height=%d src= \" %s%s \" alt= \" %s \" ></A> \n " ,
cgi_baseurl ( ) ,
hlink , width , height ,
cgi_rooturl ( ) ,
src , name ) ;
}
/* display the main navigation controls at the top of each page along
with a title */
static void show_main_buttons ( void )
{
printf ( " <H2 align=center>Samba Web Administration Tool</H2> \n " ) ;
image_link ( " Home " , " " , " images/home.gif " , 50 , 50 ) ;
image_link ( " Globals " , " globals " , " images/globals.gif " , 50 , 50 ) ;
image_link ( " Shares " , " shares " , " images/shares.gif " , 50 , 50 ) ;
image_link ( " Printers " , " printers " , " images/printers.gif " , 50 , 50 ) ;
image_link ( " Status " , " status " , " images/status.gif " , 50 , 50 ) ;
image_link ( " View Config " , " viewconfig " , " images/viewconfig.gif " , 50 , 50 ) ;
printf ( " <HR> \n " ) ;
}
/* display a welcome page */
static void welcome_page ( void )
{
include_html ( " help/welcome.html " ) ;
}
/* display the current smb.conf */
static void viewconfig_page ( void )
{
int full_view = 0 ;
if ( cgi_variable ( " full_view " ) ) {
full_view = 1 ;
}
printf ( " <H2>Current Config</H2> \n " ) ;
printf ( " <form method=post> \n " ) ;
if ( full_view ) {
printf ( " <input type=submit name= \" normal_view \" value= \" Normal View \" > \n " ) ;
} else {
printf ( " <input type=submit name= \" full_view \" value= \" Full View \" > \n " ) ;
}
printf ( " <p><pre> " ) ;
write_config ( stdout , ! full_view ) ;
printf ( " </pre> " ) ;
printf ( " </form> \n " ) ;
}
/* display a globals editing page */
static void globals_page ( void )
{
int advanced = 0 ;
printf ( " <H2>Global Variables</H2> \n " ) ;
if ( cgi_variable ( " Advanced " ) & & ! cgi_variable ( " Basic " ) )
advanced = 1 ;
if ( cgi_variable ( " Commit " ) ) {
commit_parameters ( GLOBALS_SNUM ) ;
save_reload ( ) ;
}
printf ( " <FORM method=post> \n " ) ;
printf ( " <input type=submit name= \" Commit \" value= \" Commit Changes \" > \n " ) ;
if ( advanced = = 0 ) {
printf ( " <input type=submit name= \" Advanced \" value= \" Advanced View \" > \n " ) ;
} else {
printf ( " <input type=submit name= \" Basic \" value= \" Basic View \" > \n " ) ;
}
printf ( " <p> \n " ) ;
printf ( " <table> \n " ) ;
show_parameters ( GLOBALS_SNUM , 1 , advanced , 0 ) ;
printf ( " </table> \n " ) ;
if ( advanced ) {
printf ( " <input type=hidden name= \" Advanced \" value=1> \n " ) ;
}
printf ( " </form> \n " ) ;
}
/* display a shares editing page */
static void shares_page ( void )
{
char * share = cgi_variable ( " share " ) ;
char * s ;
int snum = - 1 ;
int i ;
int advanced = 0 ;
if ( share )
snum = lp_servicenumber ( share ) ;
printf ( " <H2>Share Parameters</H2> \n " ) ;
if ( cgi_variable ( " Advanced " ) & & ! cgi_variable ( " Basic " ) )
advanced = 1 ;
if ( cgi_variable ( " Commit " ) & & snum > = 0 ) {
commit_parameters ( snum ) ;
save_reload ( ) ;
}
if ( cgi_variable ( " Delete " ) & & snum > = 0 ) {
lp_remove_service ( snum ) ;
save_reload ( ) ;
share = NULL ;
snum = - 1 ;
}
if ( cgi_variable ( " createshare " ) & & ( share = cgi_variable ( " newshare " ) ) ) {
lp_copy_service ( GLOBALS_SNUM , share ) ;
save_reload ( ) ;
snum = lp_servicenumber ( share ) ;
}
printf ( " <FORM method=post> \n " ) ;
printf ( " <table> \n " ) ;
printf ( " <tr><td><input type=submit name=selectshare value= \" Choose Share \" ></td> \n " ) ;
printf ( " <td><select name=share> \n " ) ;
if ( snum < 0 )
printf ( " <option value= \" \" > \n " ) ;
for ( i = 0 ; i < lp_numservices ( ) ; i + + ) {
s = lp_servicename ( i ) ;
if ( s & & ( * s ) & & strcmp ( s , " IPC$ " ) & & ! lp_print_ok ( i ) ) {
printf ( " <option %s value= \" %s \" >%s \n " ,
( share & & strcmp ( share , s ) = = 0 ) ? " SELECTED " : " " ,
s , s ) ;
}
}
printf ( " </select></td></tr><p> " ) ;
printf ( " <tr><td><input type=submit name=createshare value= \" Create Share \" ></td> \n " ) ;
printf ( " <td><input type=text size=30 name=newshare></td></tr> \n " ) ;
printf ( " </table> " ) ;
if ( snum > = 0 ) {
printf ( " <input type=submit name= \" Commit \" value= \" Commit Changes \" > \n " ) ;
printf ( " <input type=submit name= \" Delete \" value= \" Delete Share \" > \n " ) ;
if ( advanced = = 0 ) {
printf ( " <input type=submit name= \" Advanced \" value= \" Advanced View \" > \n " ) ;
} else {
printf ( " <input type=submit name= \" Basic \" value= \" Basic View \" > \n " ) ;
}
printf ( " <p> \n " ) ;
}
if ( snum > = 0 ) {
printf ( " <table> \n " ) ;
show_parameters ( snum , 1 , advanced , 0 ) ;
printf ( " </table> \n " ) ;
}
if ( advanced ) {
printf ( " <input type=hidden name= \" Advanced \" value=1> \n " ) ;
}
printf ( " </FORM> \n " ) ;
}
/* display a printers editing page */
static void printers_page ( void )
{
char * share = cgi_variable ( " share " ) ;
char * s ;
int snum = - 1 ;
int i ;
int advanced = 0 ;
if ( share )
snum = lp_servicenumber ( share ) ;
printf ( " <H2>Printer Parameters</H2> \n " ) ;
if ( cgi_variable ( " Advanced " ) & & ! cgi_variable ( " Basic " ) )
advanced = 1 ;
if ( cgi_variable ( " Commit " ) & & snum > = 0 ) {
commit_parameters ( snum ) ;
save_reload ( ) ;
}
if ( cgi_variable ( " Delete " ) & & snum > = 0 ) {
lp_remove_service ( snum ) ;
save_reload ( ) ;
share = NULL ;
snum = - 1 ;
}
if ( cgi_variable ( " createshare " ) & & ( share = cgi_variable ( " newshare " ) ) ) {
lp_copy_service ( GLOBALS_SNUM , share ) ;
snum = lp_servicenumber ( share ) ;
lp_do_parameter ( snum , " print ok " , " Yes " ) ;
save_reload ( ) ;
snum = lp_servicenumber ( share ) ;
}
printf ( " <FORM method=post> \n " ) ;
printf ( " <table> \n " ) ;
printf ( " <tr><td><input type=submit name=selectshare value= \" Choose Printer \" ></td> \n " ) ;
printf ( " <td><select name=share> \n " ) ;
if ( snum < 0 | | ! lp_print_ok ( snum ) )
printf ( " <option value= \" \" > \n " ) ;
for ( i = 0 ; i < lp_numservices ( ) ; i + + ) {
s = lp_servicename ( i ) ;
if ( s & & ( * s ) & & strcmp ( s , " IPC$ " ) & & lp_print_ok ( i ) ) {
printf ( " <option %s value= \" %s \" >%s \n " ,
( share & & strcmp ( share , s ) = = 0 ) ? " SELECTED " : " " ,
s , s ) ;
}
}
printf ( " </select></td></tr><p> " ) ;
printf ( " <tr><td><input type=submit name=createshare value= \" Create Printer \" ></td> \n " ) ;
printf ( " <td><input type=text size=30 name=newshare></td></tr> \n " ) ;
printf ( " </table> " ) ;
if ( snum > = 0 ) {
printf ( " <input type=submit name= \" Commit \" value= \" Commit Changes \" > \n " ) ;
printf ( " <input type=submit name= \" Delete \" value= \" Delete Printer \" > \n " ) ;
if ( advanced = = 0 ) {
printf ( " <input type=submit name= \" Advanced \" value= \" Advanced View \" > \n " ) ;
} else {
printf ( " <input type=submit name= \" Basic \" value= \" Basic View \" > \n " ) ;
}
printf ( " <p> \n " ) ;
}
if ( snum > = 0 ) {
printf ( " <table> \n " ) ;
show_parameters ( snum , 1 , advanced , 1 ) ;
printf ( " </table> \n " ) ;
}
if ( advanced ) {
printf ( " <input type=hidden name= \" Advanced \" value=1> \n " ) ;
}
printf ( " </FORM> \n " ) ;
}
int main ( int argc , char * argv [ ] )
{
extern char * optarg ;
extern int optind ;
extern FILE * dbf ;
int opt ;
char * page ;
int auth_required = 1 ;
/* just in case it goes wild ... */
alarm ( 300 ) ;
dbf = fopen ( " /dev/null " , " w " ) ;
if ( ! dbf ) dbf = stderr ;
while ( ( opt = getopt ( argc , argv , " s:a " ) ) ! = EOF ) {
switch ( opt ) {
case ' s ' :
pstrcpy ( servicesf , optarg ) ;
break ;
case ' a ' :
auth_required = 0 ;
break ;
}
}
cgi_setup ( SWATDIR , auth_required ) ;
print_header ( ) ;
charset_initialise ( ) ;
/* if this binary is setuid then run completely as root */
setuid ( 0 ) ;
load_config ( ) ;
cgi_load_variables ( NULL ) ;
show_main_buttons ( ) ;
page = cgi_pathinfo ( ) ;
if ( strcmp ( page , " globals " ) = = 0 ) {
globals_page ( ) ;
} else if ( strcmp ( page , " shares " ) = = 0 ) {
shares_page ( ) ;
} else if ( strcmp ( page , " printers " ) = = 0 ) {
printers_page ( ) ;
} else if ( strcmp ( page , " status " ) = = 0 ) {
status_page ( ) ;
} else if ( strcmp ( page , " viewconfig " ) = = 0 ) {
viewconfig_page ( ) ;
} else {
welcome_page ( ) ;
}
print_footer ( ) ;
return 0 ;
}
