aboutsummaryrefslogtreecommitdiffstats
path: root/www/smb2www/files/patch-Install.pl
blob: 4b8c5f13d3173f53cb008c2143ddabdef4d15643 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
--- Install.pl.orig Sun Aug  2 21:31:40 1998
+++ Install.pl  Sun Mar 25 17:53:37 2001
@@ -19,24 +19,24 @@
 if ($is_root == 1) {
   while (! getpwnam($uname)) {
     print "$uname is not a valid username.\n" if (! $uname eq ""); 
-    print "What username shall I use to install smb2www [www-data] ? ";
+    print "What username shall I use to install smb2www [nobody] ? ";
     $uname=<STDIN>;
     chop $uname;
-    $uname = "www-data" if ($uname eq "");
+    $uname = "nobody" if ($uname eq "");
   }
 
   while (! getgrnam($gname)) {
     print "$gname is not a valid groupname.\n" if (! $gname eq "");
-    print "What groupname shall I use to install smb2www [www-data] ? ";
+    print "What groupname shall I use to install smb2www [nobody] ? ";
     $gname= <STDIN>;
     chop $gname;
-    $gname = "www-data" if ($gname eq "");
+    $gname = "nobody" if ($gname eq "");
   }
 }
 
-print "Where shall I put smb2www [/usr/local/smb2www] ? ";
+print "Where shall I put smb2www [/usr/local/www/smb2www] ? ";
 $dir=<STDIN>; chop $dir;
-if ( $dir eq "") { $dir = "/usr/local/smb2www" };
+if ( $dir eq "") { $dir = "/usr/local/www/smb2www" };
 print "\n";
 die "Directory already exists ! Move first before continuing !" if ( -d $dir);
 mkdir "$dir",0755 or die "Unable to create directory ! Check your permissions.";
@@ -59,9 +59,9 @@
 
 $smbc = "";
 while (not -x "$smbc/smbclient" ) {
-  print "In which directory is smbclient located [/usr/local/samba/bin] ? ";
+  print "In which directory is smbclient located [/usr/local/bin] ? ";
   $smbc=<STDIN>; chop $smbc;
-  if ( $smbc eq "") { $smbc = "/usr/local/samba/bin" }; 
+  if ( $smbc eq "") { $smbc = "/usr/local/bin" }; 
   print "\n";
 }
 
@@ -100,9 +100,9 @@
 if ( $cgiroot eq "" ) { $cgiroot = "/samba" };
 print "\n";
 
-print "Where is your mime.types file [/etc] ? ";
+print "Where is your mime.types file [/usr/local/etc/apache] ? ";
 $mime=<STDIN>; chop $mime;
-if ( $mime eq "" ) { $mime = "/etc" };
+if ( $mime eq "" ) { $mime = "/usr/local/etc/apache" };
 $mime= $mime."/mime.types";
 print "\n";
 
@@ -124,7 +124,7 @@
 cfgdir        = $dir/etc
 imgroot       = $imgpath
 cgiroot       = $cgiroot
-linkto_other  = http://samba.anu.edu.au/samba/smb2www/
+linkto_other  = http://www.samba.org/samba/smb2www/
 background    = cloud.gif
 icon_other    = world.gif
 icon_all      = network.gif
@@ -209,6 +209,6 @@
 print "\nAdd this to your apache config:\n";
 print "-------------------------------\n\n";
 print "Alias $imgpath $dir/images\n";
-print "ScriptAlias $cgiroot/ $dir/cgi-bin\n";
+print "ScriptAlias $cgiroot/ $dir/cgi-bin/\n";
 
 print "\nThank you for using SMB2WWW.\n\n";