X-Git-Url: http://git.ipfire.org/?p=people%2Fpmueller%2Fipfire-2.x.git;a=blobdiff_plain;f=html%2Fcgi-bin%2Fsamba.cgi;h=375a7364129b40aea9edec6792a93ea774ce0aea;hp=0b29bbca640aaf56e16870713f908506eaac12e9;hb=92004c612683f0e5b75684a4d284ed6880a0f0f7;hpb=1a8688ba59e21e3e1a1a8651e36e0d51de0815be diff --git a/html/cgi-bin/samba.cgi b/html/cgi-bin/samba.cgi index 0b29bbca64..375a736412 100644 --- a/html/cgi-bin/samba.cgi +++ b/html/cgi-bin/samba.cgi @@ -24,7 +24,7 @@ my $message = ""; my $errormessage = ""; my @Logs = qx(ls /var/log/samba/); my $Log =$Lang::tr{'no log selected'}; -my $defaultoption= "[Share]\npath = /var/samba/share1\ncomment = Share - Public Access\nbrowseable = yes\nwriteable = yes\ncreate mask = 0777\ndirectory mask = 0777\nguest ok = yes\npublic = yes\nforce user = samba"; +my $defaultoption= "[Share]\npath = /var/ipfire/samba/share1\ncomment = Share - Public Access\nbrowseable = yes\nwriteable = yes\ncreate mask = 0777\ndirectory mask = 0777\npublic = yes\nforce user = samba"; my $userentry = ""; my @user = (); my @userline = (); @@ -174,14 +174,14 @@ system('/usr/local/bin/sambactrl smbsharesreset'); if ($sambasettings{'ACTION'} eq 'globalreset') { print < - -

Globals zurück setzen? +
$Lang::tr{'resetglobals'}
- Yes + $Lang::tr{'yes'}
- No + $Lang::tr{'no'}
@@ -192,14 +192,14 @@ END if ($sambasettings{'ACTION'} eq 'sharesreset') { print < - -

Shares zurück setzen? +
$Lang::tr{'resetshares'}
- Yes + $Lang::tr{'yes'}
- No + $Lang::tr{'no'}
@@ -510,6 +510,7 @@ $selected{'SECURITY'}{$sambasettings{'SECURITY'}} = "selected='selected'"; &Header::openbox('100%', 'center', $Lang::tr{'samba'}); print < +
END ; @@ -519,7 +520,6 @@ if ( $message ne "" ) } print <

$Lang::tr{'all services'}
END @@ -536,17 +536,16 @@ foreach $key (sort keys %servicenames) print < +
-

- +
- @@ -638,8 +637,8 @@ END print < +

$Lang::tr{'basic options'}
$Lang::tr{'workgroup'}
$Lang::tr{'netbios name'}
- @@ -656,8 +655,8 @@ END if ($sambasettings{'ACTION'} eq 'globalcaption') { print <

- @@ -683,8 +682,8 @@ if ($sambasettings{'SECURITY'} eq 'user') } print < +

$Lang::tr{'caption'}
$Lang::tr{'save settings'}
$Lang::tr{'restore settings'}
- @@ -697,10 +696,10 @@ END } else { - print ""; + print ""; } - print ""; + print ""; system('/usr/local/bin/sambactrl readsmbpasswd'); open(FILE, "; @@ -738,7 +737,7 @@ END if ($userline[4] =~ /D/) { print < + $Lang::tr{'inactive'}

$Lang::tr{'accounting'}
$Lang::tr{'username'}$Lang::tr{'password'}Typ$Lang::tr{'type'}$Lang::tr{'interfaces'}$Lang::tr{'options'}
$Lang::tr{'status'}$Lang::tr{'options'}
@@ -750,7 +749,7 @@ END else { print < + $Lang::tr{'active'}
@@ -801,8 +800,8 @@ END } print < +
- @@ -830,8 +829,8 @@ END if ($sambasettings{'ACTION'} eq 'usercaption') { print <

- @@ -852,9 +851,9 @@ END my $password = 'samba'; print < +

$Lang::tr{'caption'}
$Lang::tr{'add user'}
$Lang::tr{'add pc'}
- @@ -876,9 +875,9 @@ END $password=~s/\s//g; print < +

$Lang::tr{'change passwords'}
$Lang::tr{'username'}
$Lang::tr{'password'}
- @@ -899,9 +898,9 @@ END $pcname=~s/\s//g; print < +

$Lang::tr{'add user'}
$Lang::tr{'username'}
$Lang::tr{'password'}
- @@ -924,8 +923,8 @@ END print < +

$Lang::tr{'pc add'}
$Lang::tr{'client'}
$Lang::tr{'unix group'}
- END @@ -951,8 +950,8 @@ END print < +

$Lang::tr{'manage shares'}
$Lang::tr{'sharename'}$Lang::tr{'options'}
-

@@ -972,9 +971,9 @@ END if ($sambasettings{'ACTION'} eq 'sharecaption') { print < - - + @@ -989,8 +988,8 @@ if ($sambasettings{'ACTION'} eq 'shareadd' || $sambasettings{'ACTION'} eq 'optio { print < +

Legende:
$Lang::tr{'caption'}
$Lang::tr{'add share'}
$Lang::tr{'edit share'}
$Lang::tr{'save config'}
-

$Lang::tr{'add share'}
$Lang::tr{'show share options'} @@ -999,8 +998,8 @@ if ($sambasettings{'ACTION'} eq 'shareadd' || $sambasettings{'ACTION'} eq 'optio
+
-

@@ -1030,8 +1029,8 @@ if ($sambasettings{'ACTION'} eq 'sharechange' || $sambasettings{'ACTION'} eq 'op } print < +
-

$Lang::tr{'edit share'}
$Lang::tr{'show share options'}
@@ -1039,8 +1038,8 @@ if ($sambasettings{'ACTION'} eq 'sharechange' || $sambasettings{'ACTION'} eq 'op
+
- @@ -1052,8 +1051,8 @@ END if ($sambasettings{'ACTION'} eq 'optioncaption' || $sambasettings{'ACTION'} eq 'optioncaption2') { print <

- @@ -1117,8 +1116,8 @@ END print < +

$Lang::tr{'caption'}
$Lang::tr{'options'}$Lang::tr{'meaning'} / $Lang::tr{'exampel'}
comment$Lang::tr{'comment'}
-

$Lang::tr{'samba status'}
$Status
@@ -1140,9 +1139,9 @@ $Log=~s/\n/
/g; print < +
-

$Lang::tr{'log view'}