fxde-core/scripts/fvwmscript/FvwmScript-Sysinfo

542 lines
9.1 KiB
Plaintext

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