Changeset 925 for trunk/guitools/smbmon

Timestamp:

Jun 16, 2016, 4:43:52 PM (9 years ago)

Author:

Herwig Bauernfeind

Message:

GUITools: EVFSGUI: more client settings, SMBMON: made rpm/yum aware, cosmetics

Location:

trunk/guitools/smbmon

Files:

• smbmon.vrp (modified) (1 diff)
• smbmon.vrx (modified) (4 diffs)
• smbmon.vry (modified) ( previous)

trunk/guitools/smbmon/smbmon.vrp

@@ -8 +8 @@
 VRXWindow: __VREMainWindow,1,2180,3614,1024,6769
 VRXWindow: __VRESectionListWindow,1,4083,11226,7372,7685
-VRXWindow: __VREToolsWindow,1,2156,1494,5471,1659
+VRXWindow: __VREToolsWindow,1,2156,1494,5477,1663
 VRXWindow: __VREWindListWindow,1,964,11708,5372,3150
 UserFile: 1
 UserWindow: Main,1
+UserWindow: SW_FILES,1

trunk/guitools/smbmon/smbmon.vrx

@@ -229 +229 @@
     say '_ContainerInit() started.'
 
-    /* User */
+    /* Users */
     UIconH     = VRMethod( "CN_Users", "AddField", "Icon",   NLVGetMessage(148) )
     UsernameFH = VRMethod( "CN_Users", "AddField", "String", NLVGetMessage(131) )
@@ -252 +252 @@
     NameFH     = VRMethod( "CN_Files", "AddField", "String", NLVGetMessage(142) )
 
-    /* service */
+    /* Service */
     SIconH     = VRMethod( "CN_Service", "AddField", "Icon",   NLVGetMessage(148) )
     SPIDFH     = VRMethod( "CN_Service", "AddField", "String", NLVGetMessage(130) )
@@ -259 +259 @@
     ConnectedFH= VRMethod( "CN_Service", "AddField", "String", NLVGetMessage(144) )
 
-    /* daemons */
+    /* Daemons */
     DaemonFH   = VRMethod( "CN_Daemons", "AddField", "String", NLVGetMessage(145) )
     DStatusFH  = VRMethod( "CN_Daemons", "AddField", "String", NLVGetMessage(146) )
     DPidsFH    = VRMethod( "CN_Daemons", "AddField", "String", NLVGetMessage(130) )
 
-    /* chktdb */
-    ChkTDBFilesFH = VRMethod( "CN_CHKTDB", "AddField", "String", NLVGetMessage(134) )
-    ChkTDBIconFH  = VRMethod( "CN_CHKTDB", "AddField", "Icon",   NLVGetMessage(146) )
-    ChkTDBSizeFH  = VRMethod( "CN_CHKTDB", "AddField", "String", NLVGetMessage(152) )
-    ChkTDBStatusFH= VRMethod( "CN_CHKTDB", "AddField", "String", NLVGetMessage(151) )
-
-    /* Browse tree */
-    WorkgroupFH= VRMethod( "CN_smbtree", "AddField", "String", NLVGetMessage(150)  )
-    NBFH      = VRMethod( "CN_smbtree", "AddField", "String", "NetBIOS name" )
-    IpFH      = VRMethod( "CN_smbtree", "AddField", "String",  NLVGetMessage(147)  )
-    MBFH      = VRMethod( "CN_smbtree", "AddField", "String", "DMB/LMB" )    
-    
-    OSFH   = VRMethod( "CN_smbtree", "AddField", "String", "OS" )    
-    /* VersionFH = VRMethod( "CN_SmbTree", "AddField", "String", "Version" ) */
-    CommentFH = VRMethod( "CN_smbtree", "AddField", "String", NLVGetMessage(151) )
-    MacFH = VRMethod( "CN_smbtree", "AddField", "String", "MAC" )
+    smbdHandle = VRMethod("CN_Daemons", "Addrecord",, ,"smbd.exe","$41")
+    nmbdHandle = VRMethod("CN_Daemons", "Addrecord", ,,"nmbd.exe","$41")
+    winbHandle = VRMethod("CN_Daemons", "Addrecord",, ,"winbindd.exe","$41")
+
+    ok = VRMethod("CN_Daemons", "SetFieldData", smbdHandle, DaemonFH, "smbd.exe")
+    ok = VRMethod("CN_Daemons", "SetFieldData", nmbdHandle, DaemonFH, "nmbd.exe")
+    ok = VRMethod("CN_Daemons", "SetFieldData", winbHandle, DaemonFH, "winbindd.exe")
+    ok = (stream(samba.!bin'\winbindd.exe','c','query exists') <> "")
+    ok = VRMethod("CN_Daemons", "SetRecordAttr", winbHandle, "Visible", ok)
+    ok = VRMethod("CN_Daemons", "SetRecordAttr","All", "Collapsed", 0 )
+
+
+    /* SMBTree */
+    WorkgroupFH = VRMethod( "CN_smbtree", "AddField", "String", NLVGetMessage(150)  )
+    NBFH        = VRMethod( "CN_smbtree", "AddField", "String", "NetBIOS name" )
+    IpFH        = VRMethod( "CN_smbtree", "AddField", "String",  NLVGetMessage(147)  )
+    MBFH        = VRMethod( "CN_smbtree", "AddField", "String", "DMB/LMB" )    
+    OSFH        = VRMethod( "CN_smbtree", "AddField", "String", "OS" )
+ /* VersionFH   = VRMethod( "CN_SmbTree", "AddField", "String", "Version" ) */
+    CommentFH   = VRMethod( "CN_smbtree", "AddField", "String", NLVGetMessage(151) )
+    MacFH       = VRMethod( "CN_smbtree", "AddField", "String", "MAC" )
 
     ok = VRMethod("CN_smbtree","SetfieldAttr",IPFH,       "ReadOnly", 1)
@@ -288 +293 @@
     ok = VRMethod("CN_smbtree","SetfieldAttr",MacFH,      "ReadOnly", 1)
 
-
-    /* add records for the 3 daemons */
-    smbdHandle = VRMethod("CN_Daemons", "Addrecord",, ,"smbd.exe","$41")
-    ok = VRMethod("CN_Daemons", "SetFieldData", smbdHandle, DaemonFH, "smbd.exe")
-    nmbdHandle = VRMethod("CN_Daemons", "Addrecord", ,,"nmbd.exe","$41")
-    ok = VRMethod("CN_Daemons", "SetFieldData", nmbdHandle, DaemonFH, "nmbd.exe")
-    winbHandle = VRMethod("CN_Daemons", "Addrecord",, ,"winbindd.exe","$41")
-    ok = VRMethod("CN_Daemons", "SetFieldData", winbHandle, DaemonFH, "winbindd.exe")
-    ok = (stream(samba.!bin'\winbindd.exe','c','query exists') <> "")
-    ok = VRMethod("CN_Daemons", "SetRecordAttr", winbHandle, "Visible", ok)
-
-    ok = VRMethod("CN_Daemons","SetRecordAttr","All", "Collapsed", 0 )
+    /* ChkTdb */
+    ChkTDBFilesFH = VRMethod( "CN_CHKTDB", "AddField", "String", NLVGetMessage(134) )
+    ChkTDBIconFH  = VRMethod( "CN_CHKTDB", "AddField", "Icon",   NLVGetMessage(146) )
+    ChkTDBSizeFH  = VRMethod( "CN_CHKTDB", "AddField", "String", NLVGetMessage(152) )
+    ChkTDBStatusFH= VRMethod( "CN_CHKTDB", "AddField", "String", NLVGetMessage(151) )
+
+    ok = VRMethod( "CN_CHKTDB", "SetfieldAttr", ChkTDBIconFH,   "Justification","Center", "ReadOnly", 1)
+    ok = VRMethod( "CN_CHKTDB", "SetfieldAttr", ChkTDBSizeFH,   "Justification","Right",  "ReadOnly", 1)
+    ok = VRMethod( "CN_CHKTDB", "SetfieldAttr", ChkTDBStatusFH, "Justification","Right",  "ReadOnly", 1)
 
     say '_ContainerInit() done.'