Changeset 301 for branches/scripts

Timestamp:

Jul 14, 2009, 9:24:00 AM (16 years ago)

Author:

Herwig Bauernfeind

Message:

smb.cmd: Check free space on TMPDIR

File:

• branches/scripts/smb_init/smb.cmd (modified) (3 diffs)

branches/scripts/smb_init/smb.cmd

@@ -1 @@
-/* Samba Server for eCS (OS/2) init script Version 3.1.1
+/* Samba Server for eCS (OS/2) init script Version 3.1.2
    Copyright (C) netlabs.org 2007-2009
 
@@ -143 +143 @@
 return
 
+_ChkTempFreeSpace:
+    /* Check free space */
+    TempDrvInfo   = SysDriveInfo(left(TempDir,2))
+    parse var TempDrvInfo . TempFreeSpace . .
+    if TempFreeSpace < 1048576 then do
+        say 'Warning: Free space on "'||TempDir||'" low!'
+    end
+    drop TempDrvInfo
+return TempFreeSpace
+
 _SambaInit: /* Detect Samba components, initialize samba. stem */
     ETC = value('ETC',,'OS2ENVIRONMENT')
@@ -229 +239 @@
     /* Check if winbindd daemon exists */
     HaveWinbindd = (stream(samba.!bin'\winbindd.exe', 'c', 'query exists') <> "")
+
+    /* Do we have a minimum of free temporary space? */
+    if _ChkTempFreeSpace < 262144 then do
+        say 'Free space on "'TempDir'" exhausted! Aborting...'
+        exit -4
+    end
 return