From fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 Mon Sep 17 00:00:00 2001 From: Joseph Hunkeler Date: Wed, 8 Jul 2015 20:46:52 -0400 Subject: Initial commit --- vo/votools/topcat.cl | 43 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) create mode 100644 vo/votools/topcat.cl (limited to 'vo/votools/topcat.cl') diff --git a/vo/votools/topcat.cl b/vo/votools/topcat.cl new file mode 100644 index 00000000..a8192fb1 --- /dev/null +++ b/vo/votools/topcat.cl @@ -0,0 +1,43 @@ +#{ TOPCAT -- Start or stop the TOPCAT app. + +procedure topcat (cmd) + +string cmd { prompt = "Command" } +bool bkg = yes { prompt = "Run in background?" } +bool verbose = no { prompt = "Print actions?" } + +begin + string action, command, ch + bool verb + + + if ($nargs > 0) + action = cmd + else + action = "start" + verb = verbose + command = "!" // osfn ("vo$java/app.topcat") + + + if (action == "stop" || action == "off") { + if (verb) + printf ("Stopping Topcat .... ") + command = command // " -kill" + print (command) | cl(, >& "dev$null") + + + } else if (action == "status") { + command = command // " -status" + print (command) | cl() + + } else { + # Default is to start the app + if (verb) + printf ("Starting Topcat .... ") + command = command // " -bg" + print (command) | cl(, >& "dev$null") + } + + if (verb) + printf ("\n") +end -- cgit