Ignore:
Timestamp:
Nov 2, 2012, 6:56:43 PM (13 years ago)
Author:
Herwig Bauernfeind
Message:

GUI-Tools: smblogon initial commit

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/guitools/shared/sambainit.vrs

    r675 r719  
    384384    IF options.!debug == 1 then say time()' _SambaRunning() done'
    385385return runres
    386 
    387 /*:VRX */
    388 _PasswordDbRewrite:
    389     IF options.!debug == 1 then say time()' _PasswordDBRewrite() started'
    390 
    391     /* Reset any old rc from pwd_mkdb.exe */
    392     pwd_mkdbrc = 0
    393 
    394     /* delete old .db.tmp files */
    395     ok = SysFileDelete(UnixETC'\pwd.db.tmp')
    396     ok = SysFileDelete(UnixETC'\spwd.db.tmp')
    397 
    398     /* create backups of old .db files */
    399     ok = VRCopyFile( UnixETC'\pwd.db',  UnixETC'\pwd.db.bak'  )
    400     ok = VRCopyFile( UnixETC'\spwd.db', UnixETC'\spwd.db.bak' )
    401 
    402     /* delete old .db files */
    403     ok = SysFileDelete(UnixETC'\pwd.db')
    404     ok = SysFileDelete(UnixETC'\spwd.db')
    405 
    406     /* Create new password db */
    407     address cmd samba.!pwd_mkdb' -d 'unixetc' 'samba.!masterpasswd' 2>'samba.!error
    408     pwd_mkdbrc = rc
    409     if \VRFileExists(samba.!pwddb) | pwd_mkdbrc <> 0 then do
    410         call _SambaShowError
    411     end
    412     IF options.!debug == 1 then say time()" _PasswordDBRewrite() done ("pwd_mkdbrc")"
    413 return
Note: See TracChangeset for help on using the changeset viewer.