Changeset 302 for branches/guitools-1.0/shared/sambainit.vrs
- Timestamp:
- Jul 14, 2009, 10:36:39 AM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/guitools-1.0/shared/sambainit.vrs
r300 r302 71 71 end 72 72 73 if samba.!smbd = "" then call _ErrorBinaryNotFound " could not find smbd.exe!"73 if samba.!smbd = "" then call _ErrorBinaryNotFound "Could not find smbd.exe!" 74 74 75 75 samba.!bin = VRParseFileName(samba.!smbd,'DP') … … 80 80 if \VRFileExists(samba.!smbcmd) then do 81 81 samba.!smbcmd = samba.!bin'\smb.cmd' 82 if \VRFileExists(samba.!smbcmd) then call _ErrorBinaryNotFound " could not find smb.cmd!"82 if \VRFileExists(samba.!smbcmd) then call _ErrorBinaryNotFound "Could not find smb.cmd!" 83 83 end 84 84 IF options.!debug == 1 THEN say ' smb.cmd = "'samba.!smbcmd'"' … … 86 86 /* smbpasswd.exe */ 87 87 samba.!smbpasswdexe = samba.!bin'\smbpasswd.exe' 88 if \VRFileExists(samba.!smbpasswdexe) then call _ErrorBinaryNotFound " could not find smbpasswd.exe!"88 if \VRFileExists(samba.!smbpasswdexe) then call _ErrorBinaryNotFound "Could not find smbpasswd.exe!" 89 89 IF options.!debug == 1 THEN say ' smbpasswd.exe = "'samba.!smbpasswdexe'"' 90 90 91 91 /* pdbedit.exe */ 92 92 samba.!pdbeditexe = samba.!bin'\pdbedit.exe' 93 if \VRFileExists(samba.!pdbeditexe) then call _ErrorBinaryNotFound " could not find pdbedit.exe!"93 if \VRFileExists(samba.!pdbeditexe) then call _ErrorBinaryNotFound "Could not find pdbedit.exe!" 94 94 IF options.!debug == 1 THEN say ' pdbedit.exe = "'samba.!pdbeditexe'"' 95 95 96 96 /* net.exe */ 97 97 samba.!netexe = samba.!bin'\net.exe' 98 if \VRFileExists(samba.!netexe) then call _ErrorBinaryNotFound " could not find net.exe!"98 if \VRFileExists(samba.!netexe) then call _ErrorBinaryNotFound "Could not find net.exe!" 99 99 IF options.!debug == 1 THEN say ' net.exe = "'samba.!netexe'"' 100 100 101 101 /* testparm.exe */ 102 102 samba.!testparmexe = samba.!bin'\testparm.exe' 103 if \VRFileExists(samba.!testparmexe) then call _ErrorBinaryNotFound " could not find testparm.exe!"103 if \VRFileExists(samba.!testparmexe) then call _ErrorBinaryNotFound "Could not find testparm.exe!" 104 104 IF options.!debug == 1 THEN say ' testparm.exe = "'samba.!testparmexe'"' 105 105 106 106 /* smbtree.exe */ 107 107 samba.!smbtreeexe = samba.!bin'\smbtree.exe' 108 if \VRFileExists(samba.!smbtreeexe) then call _ErrorBinaryNotFound " could not find smbtree.exe!"108 if \VRFileExists(samba.!smbtreeexe) then call _ErrorBinaryNotFound "Could not find smbtree.exe!" 109 109 IF options.!debug == 1 THEN say ' smbtree.exe = "'samba.!smbtreeexe'"' 110 110 111 111 /* smbstatus.exe */ 112 112 samba.!smbstatusexe = samba.!bin'\smbstatus.exe' 113 if \VRFileExists(samba.!smbstatusexe) then call _ErrorBinaryNotFound " could not find smbstatus.exe!"113 if \VRFileExists(samba.!smbstatusexe) then call _ErrorBinaryNotFound "Could not find smbstatus.exe!" 114 114 IF options.!debug == 1 THEN say ' smbstatus.exe = "'samba.!smbstatusexe'"' 115 115 116 116 /* smbcontrol.exe */ 117 117 samba.!smbcontrolexe = samba.!bin'\smbcontrol.exe' 118 if \VRFileExists(samba.!smbcontrolexe) then call _ErrorBinaryNotFound " could not find smbcontrol.exe!"118 if \VRFileExists(samba.!smbcontrolexe) then call _ErrorBinaryNotFound "Could not find smbcontrol.exe!" 119 119 IF options.!debug == 1 THEN say ' smbcontrol.exe = "'samba.!smbcontrolexe'"' 120 120 121 121 /* smbclient.exe */ 122 122 samba.!smbclientexe = samba.!bin'\smbclient.exe' 123 if \VRFileExists(samba.!smbclientexe) then call _ErrorBinaryNotFound " could not find smbclient.exe!"123 if \VRFileExists(samba.!smbclientexe) then call _ErrorBinaryNotFound "Could not find smbclient.exe!" 124 124 IF options.!debug == 1 THEN say ' smbclient.exe = "'samba.!smbclientexe'"' 125 125 … … 146 146 end 147 147 148 if samba.!pwd_mkdb = "" then call _ErrorBinaryNotFound " could not find pwd_mkdb.exe!"148 if samba.!pwd_mkdb = "" then call _ErrorBinaryNotFound "Could not find pwd_mkdb.exe!" 149 149 IF options.!debug == 1 THEN say ' pwd_mkdb.exe = "'samba.!pwd_mkdb'"' 150 150 … … 163 163 end 164 164 165 if samba.!log = "" then call _ErrorDataFileNotFound " could not find logfiles!"165 if samba.!log = "" then call _ErrorDataFileNotFound "Could not find logfiles!" 166 166 IF options.!debug == 1 THEN say ' Samba logfiles = "'samba.!log'"' 167 167 … … 175 175 /* the password files - we'll create them if they don't exist */ 176 176 samba.!masterpasswd = unixetc'\master.passwd' 177 if \VRFileExists(samba.!masterpasswd) then call _ErrorDataFileNotFound " could not find master.passwd!"177 if \VRFileExists(samba.!masterpasswd) then call _ErrorDataFileNotFound "Could not find master.passwd!" 178 178 IF options.!debug == 1 THEN say ' master.passwd = "'samba.!masterpasswd'"' 179 179 180 180 samba.!pwddb = unixetc'\pwd.db' 181 if \VRFileExists(samba.!pwddb) then call _ErrorDataFileNotFound " could not find pwd.db!"181 if \VRFileExists(samba.!pwddb) then call _ErrorDataFileNotFound "Could not find pwd.db!" 182 182 IF options.!debug == 1 THEN say ' pwd.db = "'samba.!pwddb'"' 183 183 184 184 samba.!spwddb = unixetc'\spwd.db' 185 if \VRFileExists(samba.!spwddb) then call _ErrorDataFileNotFound " could not find spwd.db!"185 if \VRFileExists(samba.!spwddb) then call _ErrorDataFileNotFound "Could not find spwd.db!" 186 186 IF options.!debug == 1 THEN say ' spwd.db = "'samba.!spwddb'"' 187 187 188 188 samba.!group = unixetc'\group' 189 if \VRFileExists(samba.!group) then call _ErrorDataFileNotFound " could not find "samba.!group"!"189 if \VRFileExists(samba.!group) then call _ErrorDataFileNotFound "Could not find "samba.!group"!" 190 190 IF options.!debug == 1 THEN say ' group = "'samba.!group'"' 191 191 192 192 samba.!printcap = unixetc'\printcap' 193 if \VRFileExists(samba.!spwddb) then call _ErrorDataFileNotFound " could not find printcap!"193 if \VRFileExists(samba.!spwddb) then call _ErrorDataFileNotFound "Could not find printcap!" 194 194 IF options.!debug == 1 THEN say ' printcap = "'samba.!printcap'"' 195 195 … … 210 210 /* Check if winbindd daemon exists */ 211 211 HaveWinbindd = (stream(samba.!bin'\winbindd.exe', 'c', 'query exists') <> "") 212 213 /* Do we have a minimum of free temporary space? */ 214 if _ChkTempFreeSpace < 262144 then call _ErrorDataFileNotFound 'Free space on "'TempDir'" exhausted!' 212 215 213 216 /* Messages from Samba will go here */
Note:
See TracChangeset
for help on using the changeset viewer.