# ctwm_exec -- Support for application startup. # $Id: ctwm_exec,v 1.7 2007-05-21 11:18:31+02 jv Exp jv $ # # Customized for system phoenix at squirrel.nl. # Submenus come first. Several of them control the main menu as well. */ changequote([,]) ################ Emacs ################ define([HAVE_EmacsMenu]) Menu "EmacsMenu" { "Emacs" f.title # Geometry is controlled from .Xdefaults "*Default" f.exec "emacs -geometry -0-0 &" "VM" f.exec "emacs -geometry -0-0 -f jv-start-vm &" "Plain" f.exec "emacs -geometry -0-0 -q &" } ################ EekBoek ################ define([HAVE_EekBoekMenu]) Menu "EekBoek2008Menu" { "Shell" f.exec "cd HOME/Squirrel/Administratie/Boekhouding/2008; xterm ebshell &" "GUI" f.exec "cd HOME/Squirrel/Administratie/Boekhouding/2008; ebgui &" "*Mutaties" f.exec "gnudoit '(find-file \"HOME/Squirrel/Administratie/Boekhouding/2008/mutaties.eb\")' &" } Menu "EekBoek2007Menu" { "Shell" f.exec "cd HOME/Squirrel/Administratie/Boekhouding/2007; xterm ebshell &" "GUI" f.exec "cd HOME/Squirrel/Administratie/Boekhouding/2007; ebgui &" "*Mutaties" f.exec "gnudoit '(find-file \"HOME/Squirrel/Administratie/Boekhouding/2007/mutaties.eb\")' &" } Menu "EekBoekMenu" { "EekBoek" f.title "*2008" f.menu "EekBoek2008Menu" "2007" f.menu "EekBoek2007Menu" } ################ Mozilla ################ undefine([HAVE_Mozilla]) define([HAVE_MozillaMenu]) ifelse(eval(HEIGHT >= 1024),1, [define([NSEXEC],[cd HOME/tmp; netscape -geometry 664x922+10+10 -xrm 'Mozilla*Bookmark.geometry:400x922-10+10'])], [define([NSEXEC],[cd HOME/tmp; netscape -geometry 664x724+10+10 -xrm 'Mozilla*Bookmark.geometry:320x724-10+10'])]) define([NSHOME],[http://www.userfriendly.org/static/]) ifelse(HOSTNAME,phoenix.squirrel.nl, [define([NSHOME],[file:/home/jv/public_html/index.html])]) ifelse(HOSTNAME,deirdre.squirrel.nl, [define([NSHOME],[file:/home/jv/wrk/mp3/index.html])]) Menu "MozillaMenu" { "Browser" f.title # Geometry is controlled from .Xdefaults "*FireFox" f.exec "browser &" "-" f.separator "FireFox" f.exec "browser -ProfileManager &" "Mozilla" f.exec "/usr/bin/mozilla &" } undefine([NSEXEC])undefine([NSHOME]) ################ Netscape ################ undefine([HAVE_NetscapeMenu]) ifelse(eval(HEIGHT >= 1024),1, [define([NSEXEC],[cd HOME/tmp; netscape -geometry 664x922+10+10 -xrm 'Netscape*Bookmark.geometry:400x922-10+10'])], [define([NSEXEC],[cd HOME/tmp; netscape -geometry 664x724+10+10 -xrm 'Netscape*Bookmark.geometry:320x724-10+10'])]) ifelse(HOSTNAME,phoenix.squirrel.nl, [define([NSHOME],[file:/home/jv/public_html/index.html])], [define([NSHOME],[http://www.userfriendly.org/static/])]) Menu "NetscapeMenu" { "Mozilla" f.title # Geometry is controlled from .Xdefaults "*Default" f.exec "NSEXEC NSHOME &" "Font Catalogue" f.exec "NSEXEC http://localhost/fontdb/query.cgi &" } undefine([NSEXEC])undefine([NSHOME]) ################ OpenOffice ################ define([HAVE_OpenOfficeMenu]) Menu "OpenOfficeMenu" { "OpenOffice.org" f.title "*Writer" f.exec "soffice -writer&" "Impress" f.exec "soffice -impress &" "Draw" f.exec "soffice -draw &" "Calc" f.exec "soffice -calc &" "--" f.separator "Admin" f.exec "spadmin &" } ################ Palm ################ ifelse(HOSTNAME,phoenix.squirrel.nl,[ define([HAVE_PalmMenu]) Menu "PalmMenu" { "Palm Tools" f.title "*Sync/Backup" f.exec "uxterm -geometry +10+10 -T Sync/Backup -e sh -c 'pilotmgr -sync; cat' &" "Backup" f.exec "uxterm -geometry +10+10 -T Sync/Backup -e sh -c 'pilotmgr -syncWith Backup; cat' &" "SyncPlan" f.exec "uxterm -geometry +10+10 -T SyncPlan -e sh -c 'pilotmgr -syncWith SyncPlan; cat' &" "SyncAB" f.exec "uxterm -geometry +10+10 -T SyncAB -e sh -c 'pilotmgr -syncWith SyncAB; cat' &" "xx" f.separator "JPilot" f.exec "jpilot &" } ]) ################ Music Player Daemon ################ define([HAVE_MPDMenu]) Menu "MPDMenu" { "Music Player Daemon" f.title "*Local" f.exec "uxterm -T 'MPD: localhost' -e ncmpc -h localhost &" "Deirdre" f.exec "uxterm -T 'MPD: deirdre -e ncmpc -h deirdre &" "xx" f.separator "SoftSqueeze" f.exec "softsqueeze&" } ################ CD Players ################ define([HAVE_CDPlayer],"xmcd -geometry +368+0 -title 'NoTitle_CD_Player' &") ifelse(0,1,[ define([HAVE_CDPlayerMenu]) Menu "CDPlayerMenu" { "*CD Player" f.exec HAVE_CDPlayer "WorkMan" f.title "Run" f.exec "workman -d -d -e -e -V 0 -l 0 -geometry -122+0 -title 'NoTitle WorkMan' &" "xx" f.separator "Play" f.exec "workman -s play &" "Stop" f.exec "workman -s stop &" "Pause" f.exec "workman -s pause &" "Back" f.exec "workman -s back &" "Forward" f.exec "workman -s forward &" "Eject" f.exec "workman -s eject &" } ]) ################ XMeters ################ Menu "XMetersMenu" { "XMeters" f.title "*Default" f.exec "sh WM_DIR/Xmeters &" "Recheck" f.exec "sh HOME/XStart/recheck-meters &" "-" f.separator "XOsView" f.exec "xosview -xrm 'xosview.interrupts:false' -load -net 0 &" ifelse(HOSTNAME,phoenix.squirrel.nl,[ "-" f.separator "ISDN" f.exec "sh WM_DIR/XISDNLoad &" ])dnl } ################ XClock ################ Menu "XClockMenu" { "XClock" f.title "*Digital" f.exec "sh WM_DIR/XClock &" "Analogue" f.exec "sh WM_DIR/XClock-bw &" } ################ XSnow ################ Menu "XSnowMenu" { "XSnow" f.title "*Start XSnow" f.exec "sh WM_DIR/XSnow &" "Stop XSnow" f.exec "kill `ps ax | grep 'x[[s]]now' | cut -c1-6`" } ################ XOneko ################ #Menu "XOnekoMenu" { # "Oneko" f.title # "*Start Oneko" f.exec "oneko &" # "Stop Oneko" f.exec "kill `ps -ax | grep 'o[[n]]eko' | cut -c1-6`" #} ################ XAlarm ################ Menu "XAlarmMenu" { "XAlarm" f.title "*Set alarm" f.exec "xalarm &" "Reset alarms" f.exec "xalarm -reset all &" "Init alarms" f.exec "xalarm -file today -noconfirm &" "Edit alarms" f.exec "cemacs HOME/.xalarms &" } ################ Scanner ################ syscmd([test -r /dev/scanner])ifelse(sysval,0, define([HAVE_ScannerMenu]) Menu "ScannerMenu" { "Scanner" f.title "*Copy" f.exec "scan_copier -once &" "Copier" f.exec "scan_copier &" "XSane" f.exec "scan_copier -xsane &" "Stop" f.exec "killall scanimage &" "Lamp Off" f.exec "scanimage -n --lamp-off &" } )dnl ################ GPG/PGP keys ################ define([HAVE_Pgpkeymanmenu]) Menu "PGP/GPG Keys" { "*Key management" f.exec "pgpkeyman &" "Key management (Virgo)" f.exec "pgpkeyman -virgo &" } ################ VoIP ################ Menu "VoIP" { "*Ekiga" f.exec "ekiga&" "Skype" f.exec "skype&" } ################ IRC ################ menu "IRC / IM" { "*IRSSI" f.exec "xterm -u8 -T IRC -geometry 80x60 -e screen -d -RR -S irssi irssi &" "Gaim" f.exec "gaim&" "Gajim" f.exec "gajim&" } ################ Main (Exec) Menu ################ Menu "ExecMenu" { "Execute" f.title ifdef([HAVE_EmacsMenu], "Emacs" f.menu "EmacsMenu" ) # "Tgif" f.exec "cd HOME/tmp; tgif -geometry 800x800+20+20&" # "SquirrelCalc" f.exec "scalc &" # "Calendar" f.exec "plan -geometry +10+10 -xrm ctwm.Workspace:CM &" "Calendar" f.exec "jpilot -xrm ctwm.Workspace:CM &" # "FTP" f.exec "cd HOME/tmp; uxterm -e ncftp &" ifdef([HAVE_Mozilla], "Browser" f.exec "browser&" ) ifdef([HAVE_MozillaMenu], "Browser" f.menu "MozillaMenu" ) ifdef([HAVE_NetscapeMenu], "Browser" f.menu "NetscapeMenu" ) ifdef([HAVE_EekBoekMenu], "EekBoek" f.menu "EekBoekMenu" ) "Zim" f.exec "zim&" ifdef([HAVE_Forte4jMenu], "Forte4J" f.exec "forte4j >& /usr/tmp/forte-USER.log&" ) ifdef([HAVE_StarOfficeMenu], "StarOffice" f.menu "StarOfficeMenu" ) ifdef([HAVE_StarOfficeExec], "StarOffice" f.exec HAVE_StarOfficeExec ) ifdef([HAVE_OpenOfficeExec], "OpenOffice" f.exec HAVE_OpenOfficeExec ) ifdef([HAVE_OpenOfficeMenu], "OpenOffice" f.menu "OpenOfficeMenu" ) define([tb],[HOME/bin])dnl syscmd(test -x tb/thunderbird)ifelse(sysval,0, "Mail" f.exec "tb/thunderbird &" [ifdef([HAVE_Pgpkeymanmenu], "PGP/GPG Keys" f.menu "PGP/GPG Keys" , "PGP Keys" f.exec "pgpkeyman &" "PGP Keys (Virgo)" f.exec "pgpkeyman -virgo &")] ) #syscmd([test -x /usr/bin/evolution])ifelse(sysval,0, # "Evolution" f.exec "evolution &" #) "GNU KeyRing" f.exec "wxkeyring -geometry 400x400+eval(WIDTH-450)+62 --clip HOME/.jpilot/Keys-Gtkr.pdb &" "EekBoek" f.exec "wxeb &" ifdef([HAVE_HypermailMenu], "HyperMail" f.menu "HypermailMenu" ) ifdef([HAVE_PalmMenu], "Palm Tools" f.menu "PalmMenu" ) ifdef([HAVE_MPDMenu], "Music Player" f.menu "MPDMenu" ) ifdef([HAVE_XMMSMenu], "XMMS" f.menu "XMMSMenu" ) ifdef([HAVE_CDPlayerMenu], "CD Player" f.menu "CDPlayerMenu" , # "CD Player" f.exec HAVE_CDPlayer ) # "CD Ripper" f.exec "grip&" "JukeBox" f.exec "jukebox&" "CD/DVD Burner" f.exec "k3b&" ifdef([HAVE_ScannerMenu], "Scanner" f.menu "ScannerMenu" ) "VoIP" f.menu "VoIP" "IRC / IM" f.menu "IRC / IM" "Nieuws" f.menu "Nieuws" # "DSL-TV" f.menu "DSLTV" ifelse(HOSTNAME,deirdre.squirrel.nl,[ "Phoenix" f.title "Emacs" f.exec "xhost +phoenix; ssh -n -X phoenix emacs -f jv-start-vm&" "Browser" f.exec "xhost +phoenix; ssh -n -X phoenix mozilla &" "Mail" f.exec "xhost +phoenix; ssh -n -X phoenix thunderbird &" "XConsole" f.exec "xhost +phoenix; ssh -n -X phoenix sh WM_DIR/XConsole&" ],)dnl ifelse(HOSTNAME,eithne.squirrel.nl,[ "Phoenix" f.title "Emacs" f.exec "xhost +phoenix; ssh -n -X phoenix emacs -f jv-start-vm&" "Browser" f.exec "xhost +phoenix; ssh -n -X phoenix mozilla &" "Mail" f.exec "xhost +phoenix; ssh -n -X phoenix thunderbird &" "XConsole" f.exec "xhost +phoenix; ssh -n -X phoenix sh WM_DIR/XConsole&" ],)dnl "Gadgets" f.title "XStart" f.exec "WM_LIB/XStartup tools &" "XMeters" f.menu "XMetersMenu" # "XPostIt" f.exec "sh WM_DIR/XPostIt &" "XAlarm" f.menu "XAlarmMenu" "XClock" f.menu "XClockMenu" "XMag" f.exec "xmag &" "XBiff" f.exec "sh WM_DIR/XBiff &" # "XOneko" f.menu "XOnekoMenu" "XSnow" f.menu "XSnowMenu" } define([xmms],[f.exec "cd HOME/.[xmms]/pl; [xmms] $1 &"])dnl Menu "XMMSMenu" { "XMMS" f.title "*Player" xmms() "Zinf" f.exec "zinf&" "-" f.separator "World Jazz Federation" xmms(http://12.14.177.62:8000) "Real Jazz" xmms(http://64.108.99.191:2528) "Feel Jazz" xmms(http://61.82.16.252:1004) "Radio10 Berlin Jazz" xmms(http://195.88.140.11:9000) "Power95FM" xmms(http://80.56.147.100:8005) "Seattle Swing/Jazz Radio" xmms(http://207.115.77.202:8000) "The Jazz Lounge" xmms(http://66.12.93.122:8002) "Top Shelf Jazz" xmms(http://205.188.234.36:8002) "Top Shelf Jazz" xmms(http://205.188.234.36:8000) } undefine([xmms])dnl Menu "Nieuws" { "*Radio" f.exec "realplay http://www.omroep.nl/cgi-bin/streams?/radio2/nos/bulletin/laatste2.rm&" "TV Journaal (Real)" f.exec "realplay rtsp://streams.omroep.nl/tv/nos/journaal/bb.laatste.rm&" "TV Journaal (ASF)" f.exec "mplay mms://streams.omroep.nl/tv/nos/journaal/bb.laatste.asf&" } Menu "DSLTV" { "Nat.Geo" f.exec "gmplayer http://www.dsltv.nl/asx/ngc.asx&" "Clips" f.exec "gmplayer http://www.dsltv.nl/asx/mcm2.asx&" "Fashion" f.exec "gmplayer http://www.dsltv.nl/asx/fashiontv.asx&" "Mezzo" f.exec "gmplayer http://www.dsltv.nl/asx/mezzo.asx&" "Travel" f.exec "gmplayer http://www.dsltv.nl/asx/travelchannel.asx&" "XXL" f.exec "gmplayer http://www.dsltv.nl/asx/xxl.asx&" } changequote(`,') # Local Variables: # eval:(auto-fill-mode -1) # End: