WindowLocaleTitle {Workstation Information}
WindowSize 486 352
Font "xft::Regular:pixelsize=12"
Colorset 22

Init
Begin
   Key Escape A 36 1 {Quit}
   Key Return A 36 1 {Quit}
   
   Set $WidgetFont = (GetOutput {} 1 -1)
   ChangeFont 36 $WidgetFont


   ChangeFont 1 $TextFont
   ChangeFont 2 $TextFont
   ChangeFont 3 $TextFont
   ChangeFont 4 $TextFont
   ChangeFont 5 $TextFont
   ChangeFont 6 $TextFont
   ChangeFont 7 $TextFont
   ChangeFont 8 $TextFont
   ChangeFont 9 $TextFont
   ChangeFont 10 $TextFont
   ChangeFont 11 $TextFont
   ChangeFont 12 $TextFont
   ChangeFont 13 $TextFont
   ChangeFont 14 $TextFont
   ChangeFont 19 $TextFont
   ChangeFont 20 $TextFont
   ChangeFont 21 $TextFont
   ChangeFont 22 $TextFont
   ChangeFont 23 $TextFont
   ChangeFont 24 $TextFont
   ChangeFont 25 $TextFont
   ChangeFont 26 $TextFont
   ChangeFont 27 $TextFont
   ChangeFont 28 $TextFont
   ChangeFont 29 $TextFont
   ChangeFont 30 $TextFont
   ChangeFont 31 $TextFont
   ChangeFont 32 $TextFont
   ChangeFont 33 $TextFont
   ChangeFont 34 $TextFont

   Set $username = {  } (GetOutput {id -un} 1 -1)
   Set $hostname = {  } (GetOutput {uname -n} 1 1)
   Set $machtype = {  } (GetOutput {uname -mpi} 1 -1)

   Set $ipaddr = {  } (GetOutput {$NSCDE_ROOT/bin/sysinfo.py} 4 -1)
   Set $hostid = {  } (GetOutput {hostid} 1 -1)
   Set $domainname = {  } (GetOutput {domainname} 1 -1)
   Set $inetdomain = {  } (GetOutput {$NSCDE_ROOT/bin/sysinfo.py} 5 -1)

   Set $mem = {  } (GetOutput {$HOME/.fvwm/scripts/posix/memmb} 0 -1) { MB}
   Set $mempct = {   } (GetOutput {$HOME/.fvwm/scripts/posix/memusemb} 0 -1)
   Set $swapinfo = {   } (GetOutput {$HOME/.fvwm/scripts/posix/memfree} 0 -1) {MB Available}
   
   Set $swap = {  } (GetOutput {$HOME/.fvwm/scripts/posix/swapmb} 0 -1) { MB}
   Set $swappct = {   } (GetOutput {$HOME/.fvwm/scripts/posix/} 0 -1)
   Set $swapinfo = {   } (GetOutput {$HOME/.fvwm/scripts/posix/swapfree} 0 -1) { MB Available}

   Set $sysname = (GetOutput {uname -s} 1 -1)
   Set $osname = (GetOutput {uname -o} 1 -1)
   Set $osver = (GetOutput {uname -r} 1 -1)
   Set $sysstring = {  } $sysname { Release } $osver { } $osname

   Set $winmgr = {  } (GetOutput {fvwm -version} 1 -1)

   If $sysname == {Linux} Then
   Begin
      Set $lastboot = {  } (GetOutput {x=`uptime | cut -b 17` ; y=`uptime | cut -b 19,20` ; printf "$x hours and $y minutes\n"} 1 -1)
   End
   Else
   Begin
      Set $lastboot = {  Not available/displayed on } $sysname
   End

   ChangeTitle 21 $username
   ChangeTitle 22 $hostname
   ChangeTitle 23 $machtype
   ChangeTitle 24 $ipaddr
   ChangeTitle 25 $hostid
   ChangeTitle 26 $domainname
   ChangeTitle 27 $inetdomain
   ChangeTitle 28 $mem
   ChangeTitle 29 $swap
   ChangeTitle 30 $swapinfo
   ChangeTitle 31 $sysstring
   ChangeTitle 32 $winmgr
   ChangeTitle 33 $nscdever
   ChangeTitle 34 $lastboot
   ChangeValue 20 $swappct
End

Widget 1
   Property
   Size 150 0
   Position 10 15
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {User Name:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 21
   Property
   Size 100 0
   Position 159 15
   Type ItemDraw
   Flags NoReliefString Left
   Title {<username>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 2
   Property
   Size 150 0
   Position 10 32
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Workstation Name:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 22
   Property
   Size 100 0
   Position 159 32
   Type ItemDraw
   Flags NoReliefString Left
   Title {<hostname>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 3
   Property
   Size 150 0
   Position 10 48
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Type:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 23
   Property
   Size 100 0
   Position 159 48
   Type ItemDraw
   Flags NoReliefString Left
   Title {<machtype>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 4
   Property
   Size 150 0
   Position 10 77
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Internet (IP) Address:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 24
   Property
   Size 100 0
   Position 159 77
   Type ItemDraw
   Flags NoReliefString Left
   Title {<ipaddr>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 5
   Property
   Size 150 0
   Position 10 94
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Host ID:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 25
   Property
   Size 100 0
   Position 159 94
   Type ItemDraw
   Flags NoReliefString Left
   Title {<hostid>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 6
   Property
   Size 150 0
   Position 10 110
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Network Domain:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 26
   Property
   Size 100 0
   Position 159 110
   Type ItemDraw
   Flags NoReliefString Left
   Title {<domainname>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 7
   Property
   Size 150 0
   Position 10 128
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Internet Domain:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 27
   Property
   Size 200 0
   Position 159 128
   Type ItemDraw
   Flags NoReliefString Left
   Title {<domain>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 8
   Property
   Size 154 0
   Position 6 162
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Physical Memory (RAM):}
   Main
      Case message of
      SingleClic :
      Begin
      End
End



Widget 28
   Property
   Size 200 0
   Position 159 162
   Type ItemDraw
   Flags NoReliefString Left
   Title {<mem>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 9
   Property
   Size 150 0
   Position 6 179
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Virtual Memory (Swap):}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 29
   Property
   Size 200 0
   Position 159 179
   Type ItemDraw
   Flags NoReliefString Left
   Title {<swap>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 10
   Property
   Size 150 0
   Position 10 196
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Virtual Memory in Use:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 30
   Property
   Size 256 0
   Position 264 196
   Type ItemDraw
   Flags NoReliefString Left
   Title {<swapused>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 20
   Property
   Position 166 198
   Type HDipstick
   Size 102 16
   Title {}
   MinValue 0
   MaxValue 100
   Value 1
   Colorset 3
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 11
   Property
   Size 150 0
   Position 10 220
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Operating System:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 31
   Property
   Size 324 0
   Position 159 220
   Type ItemDraw
   Flags NoReliefString Left
   Title {<sysstring>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 12
   Property
   Size 150 0
   Position 10 238
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {Window Manager:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 32
   Property
   Size 314 0
   Position 159 238
   Type ItemDraw
   Flags NoReliefString Left
   Title {<winmgr>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 13
   Property
   Size 150 0
   Position 10 256
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle { }
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 33
   Property
   Size 256 0
   Position 159 256
   Type ItemDraw
   Flags NoReliefString Left
   Title {<nscdever>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 14
   Property
   Size 150 0
   Position 10 284
   Type ItemDraw
   Flags NoReliefString Right
   LocaleTitle {System Uptime:}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 34
   Property
   Size 256 0
   Position 159 284
   Type ItemDraw
   Flags NoReliefString Left
   Title {<lastboot>}
   Main
      Case message of
      SingleClic :
      Begin
      End
End

Widget 36
   Property
    Size 72 0
    Position 204 312
    Type PushButton
    LocaleTitle {Dismiss}
    Flags NoReliefString
    Main
       Case message of
       SingleClic :
       Begin
          SendSignal 36 1
       End
       1 :
       Begin
          Quit
       End
End

Widget 19
   Property
   Size 48 48
   Position 300 8
   Type ItemDraw
   Flags NoReliefString Left
   Title {}
   Icon CDE/SDtsysinfo.m.pm
   Main
      Case message of
      SingleClic :
      Begin
      End
End