rda-python-miscs 1.0.1__py3-none-any.whl

rda_python_miscs/rdals.usg

@@ -0,0 +1,61 @@
+
+ List directory and file information of the current or specified directories
+ with metadata information recorded in RDADB if matched. Four columns are
+ listed, they are Directory Name, Data Volume, File Count, and Brief
+ Description if the listed item is a directory, and they are File Name,
+ Data Size, Data Format, and Brief Description if the listed item is a
+ file.
+ 
+ A leading letter is displayed on each line to indicate what type item is listed;
+ including 'D' for a whole dataset, 'G' for a group or subgroup in a dataset,
+ and 'F' for a data file.
+ 
+ The output of directory/file list is formatted as default with double spaces
+ as delimiter and each column lined up vertically at least for the files under each
+ directory. Provide Option -N to display list without format. A delimiter symbol '|'
+ is defaulted if Option -N is present.
+ 
+ Usage: rdals [-d] [-f] [-N] [-h] [-r] [-D DelimitSymbols] [-R RecursiveLevel] [Directory/File List]
+
+      - Option -d, list directory information only. Directory information
+        is included as default. Add this option to exclude file information;
+ 
+      - Option -f, list file information only. File information
+        is included as default. Add this option to exclude directory information;
+ 
+      - Option -N, list files unformatted;
+
+      - Option -h, display this help document;
+
+      - Option -r, list directories and files recursively;
+
+      - Option -R, list directories and files recursively up to the level 
+        provided with this Option;
+
+      - Option -D, specify delimiting symbols for dividing the columns.
+        It defaults to "  " for formatted output and '|' for unformatted output.
+        Make sure quote the symbols if any character in the symbols has Unix
+        meaning, for example -D '<:>';
+
+      - Directory/file List is optional; without specification, all directories
+        and files in the current directory are listed. Unix command line
+        wildcards are supported.
+
+  This utility program can be executed anywhere. Nothing is displayed if neither
+  directory nor file information matches RDADB information.
+  
+  For examples, to check directories and files of ds277.6, you can
+     
+     1. Change into the dataset home data directory as 'cd /PathTo/ds277.6' and
+        execute 'rdals'; add recursive option '-r' to check directories and files
+        further into the sub-directories, or change directory into a sub-directory
+        to check files inside of it.
+     
+     2. Pass an absolute path to rdals as 'rdals /PathTo/ds277.6/' or as
+        'rdals /PathTo/ds277.6/*'; without the ending by '/' or an appended
+        wildcard symbol '*' information of the dataset itself is check unless
+        the recursive option '-r' or '-R RecursiveLevel' is present
+     
+     3. If the current directory is in another dataset home data directory,
+        such as /PathTo/ds277.7, you can pass a relative path to rdals
+        as  'rdals ../ds277.6/' or as 'rdals ../ds277.6/*'

rda_python_miscs/rdamod.py

@@ -0,0 +1,172 @@
+#!/usr/bin/env python3
+#
+##################################################################################
+#
+#     Title: rdamod
+#    Author: Zaihua Ji, zji@ucar.edu
+#      Date: 10/24/2020
+#            2025-03-10 transferred to package rda_python_miscs from
+#            https://github.com/NCAR/rda-utility-programs.git
+#   Purpose: change file/directory modes in given one or mutilple local directories
+#            owned by 'rdadata'
+#
+#    Github: https://github.com/NCAR/rda-python-miscs.git
+#
+##################################################################################
+#
+import re
+import os
+import sys
+from os import path as op
+from rda_python_common import PgLOG
+from rda_python_common import PgUtil
+from rda_python_common import PgFile
+from rda_python_common import PgDBI
+
+RDAMOD = {
+   'd' : 0,     # 1 to change directory mode
+   'f' : 0,     # 1 to change file mode
+   'h' : 0,     # 1 to show help message
+   'r' : 0,     # 1 if recursive all
+   'R' : 0,     # > 0 to set recursive limit
+   'F' : 0o664,   # to chnage file mode, default to 664
+   'D' : 0o775,   # to chnge directory mode, default to 775
+}
+
+MINFO = {
+   'files' : [],
+   'curdir' : os.getcwd(),
+   'tpath' : None,
+   'dcnt' : 0,
+   'fcnt' : 0
+}
+
+#
+# main function to run the application
+#
+def main():
+
+   PgDBI.dssdb_dbname()
+   PgLOG.set_suid(PgLOG.PGLOG['EUID'])
+   PgLOG.set_help_path(__file__)
+   PgLOG.PGLOG['LOGFILE'] = "rdamod.log"   # set different log file
+   argv = sys.argv[1:]
+   PgLOG.cmdlog("rdamod {} ({})".format(' '.join(argv), MINFO['curdir']))
+   option = defopt = 'l'
+   for arg in argv:
+      ms = re.match(r'-(\w)$', arg)
+      if ms:
+         option = ms.group(1)
+         if option not in RDAMOD: PgLOG.pglog(arg + ": Unknown Option", PgLOG.LGEREX)
+         if 'dfhr'.find(option) > -1:
+            RDAMOD[option] = 1
+            option = defopt
+         continue
+      if not option: PgLOG.pglog(arg + ": Value provided without option", PgLOG.LGEREX)
+      if option == 'l':
+         MINFO['files'].append(arg)
+         defopt = None
+      else:
+         if option == 'R':
+            RDAMOD[option] = int(arg)
+         elif 'FD'.find(option) > -1:
+            RDAMOD[option] = PgLOG.base2int(arg, 8)
+         else:
+            RDAMOD[option] = arg
+         option = defopt
+
+   if RDAMOD['h'] or not MINFO['files']: PgLOG.show_usage("rdamod")
+   if not (RDAMOD['d'] or RDAMOD['f']):
+      RDAMOD['d'] = RDAMOD['f'] = 1   # both directories and files as default
+   if not RDAMOD['R'] and RDAMOD['r']: RDAMOD['R'] = 1000
+   PgDBI.validate_decs_group('rdamod', PgLOG.PGLOG['CURUID'], 1)   
+
+   change_top_list(MINFO['files'])
+   
+   if (MINFO['dcnt'] + MINFO['fcnt']) > 1:
+      msg = ''
+      if MINFO['dcnt'] > 0:
+         s = ('ies' if MINFO['dcnt'] else 'y')
+         msg = "{} Director{}".format(MINFO['dcnt'], s) 
+      if MINFO['fcnt'] > 0:
+         s = ('s' if MINFO['fcnt'] > 1 else '')
+         if msg: msg += " & "
+         msg += "{} File{}".format(MINFO['fcnt'], s)
+      PgLOG.pglog("Total {} changed Mode".format(msg), PgLOG.LOGWRN)
+   elif (MINFO['dcnt'] + MINFO['fcnt']) == 0:
+      PgLOG.pglog((MINFO['tpath'] if MINFO['tpath'] else MINFO['curdir']) + ": No Mode changed", PgLOG.LOGWRN)
+
+   PgLOG.cmdlog()   
+   PgLOG.pgexit(0)
+
+#
+# change mode for the top level list
+#
+def change_top_list(files):
+
+   for file in files:
+      info = PgFile.check_local_file(file, 6, PgLOG.LOGWRN)
+      if not info:
+         PgLOG.pglog(file + ": NOT exists", PgLOG.LOGERR)
+         continue
+
+      change = 1
+      if not info['isfile'] and re.search(r'/$', file):
+         change = 0    # do not change the directory mode if it is ended by '/'
+         file = re.sub(r'/$', '', file, 1)
+
+      if not re.match(r'^/', file): file = PgLOG.join_paths(MINFO['curdir'], file)
+      MINFO['tpath'] = (op.dirname(file) if change else file) + "/"
+      if change: change_mode(file, info)
+      if not info['isfile'] and (RDAMOD['R'] > 0 or not change):
+         fs = PgFile.local_glob(file, 6, PgLOG.LOGWRN)
+         change_list(fs, 1, file)
+
+#
+# recursively change directory/file mode
+#
+def change_list(files, level, cdir):
+
+   fcnt = 0
+
+   for file in files:
+      info = files[file]
+      fcnt += change_mode(file, info)
+      if not info['isfile'] and level < RDAMOD['R']:
+         fs = PgFile.local_glob(file, 6, PgLOG.LOGWRN)
+         change_list(fs, level+1, file)
+
+   if fcnt > 1:  # display sub count if two more files are changed mode
+      PgLOG.pglog("{}: {} Files changed Mode".format(cdir, fcnt), PgLOG.LOGWRN)
+
+#
+# change mode of a single directory/file
+#
+def change_mode(file, info):
+
+   fname = re.sub(r'^{}'.format(MINFO['tpath']), '', file, 1)
+   if info['isfile']:
+      if not RDAMOD['d']: return 0
+      fname = "F" + fname
+      mode = RDAMOD['F']
+   else:
+      if not RDAMOD['d']: return 0
+      fname = "D" + fname
+      mode = RDAMOD['D']
+
+   if info['logname'] != "rdadata":
+      return PgLOG.pglog("{}: owner {} not rdadata".format(fname, info['logname']), PgLOG.LOGERR)
+   if info['mode'] == mode: return 0   # no need change mode
+
+   if PgFile.set_local_mode(file, info['isfile'], mode, info['mode'], info['logname'], PgLOG.LOGWRN):
+      if info['isfile']:
+         MINFO['fcnt'] += 1
+         return 1
+      else:
+         MINFO['dcnt'] += 1
+         return 0
+
+#
+# call main() to start program
+#
+if __name__ == "__main__": main()

rda_python_miscs/rdamod.usg

@@ -0,0 +1,51 @@
+
+ Change modes for directories and files in the current or specified directories.
+ The owner of the directories and files must be 'rdadata' for their modes being
+ changed. For directories and files with modes changed successfully or with error,
+ a leading letter is displayed in font of the relative file names to indicate
+ file types; 'D' for a directory and 'F' for a data file.
+ 
+ Usage: rdamod [-d] [-f] [-D DiretoryMode] [-F FileMode] [-h HostName] [-r] [-R RecursiveLevel] \
+               [Directory/File List]
+
+      - Option -d, change directory modes only. Changing Directory mode is included
+        as default. Add this option to exclude changing file mode;
+ 
+      - Option -f, change file modes only. Changing File mode is included
+        as default. Add this option to exclude changing Directory mode;
+ 
+      - Option -h, pass in the remote host name; hpss for change file mode on HPSS;
+
+      - Option -r, change modes for directories and files recursively;
+
+      - Option -R, change modes for directories and files recursively up to
+        the level provided with this Option;
+
+      - Option -D, change directory mode to a value provided by this Option.
+        It defaults to "755";
+
+      - Option -F, change file mode to a value provided by this Option.
+        It defaults to "644";
+
+      - Directory/file List is mandatory; this help document is displayed 
+        without it.  Unix command line wildcards are supported. Use './' or '*'
+        for all directories and files in the current directory to be considered.
+
+  This utility program can be executed anywhere. No Mode is changed if neither
+  directory nor file are owned by user 'rdadata'.
+  
+  For examples, to change modes for directories and files under ds277.6, you can
+     
+     1. Change into the dataset home data directory as 'cd /PathTo/ds277.6' and
+        execute 'rdamod ./'; add recursive option '-r' to change modes for directories
+        and files further into the sub-directories, or change directory into
+        a sub-directory to change mode for files inside of it.
+     
+     2. Pass an absolute path to rdamod as 'rdamod /PathTo/ds277.6/';
+        without the ending by '/', mode of top directory itself is
+        changed only unless the recursive option '-r' or '-R RecursiveLevel'
+        is present.
+     
+     3. If the current directory is in another dataset home data directory,
+        such as /PathTo/ds277.7, you can pass a relative path to rdamod
+        as  'rdamod ../ds277.6/' or as 'rdamod ../ds277.6/*'

rda_python_miscs/rdaown.py

@@ -0,0 +1,169 @@
+#!/usr/bin/env python3
+#
+##################################################################################
+#
+#     Title: rdaown
+#    Author: Zaihua Ji, zji@ucar.edu
+#      Date: 10/24/2020
+#            2025-03-10 transferred to package rda_python_miscs from
+#            https://github.com/NCAR/rda-utility-programs.git
+#   Purpose: change file/directory ownership to 'rdadata' in given one or mutilple
+#            local directories that are owned by decs specialists. it needs
+#            super user privilege to execute. 
+#
+#    Github: https://github.com/NCAR/rda-python-miscs.git
+#
+##################################################################################
+#
+import re
+import os
+import sys
+import glob
+from os import path as op
+from rda_python_common import PgLOG
+from rda_python_common import PgUtil
+from rda_python_common import PgFile
+from rda_python_common import PgDBI
+
+RDAOWN = {
+   'd' : 0,     # 1 to change directory owner
+   'f' : 0,     # 1 to change file owner
+   'h' : 0,     # 1 to show help message
+   'r' : 0,     # 1 if recursive all
+   'R' : 0,     # > 0 to set recursive limit
+   'F' : 0o664,   # to change file mode, default to 664
+   'D' : 0o775,   # to change directory mode, default to 775
+}
+
+OINFO = {
+   'files' : [],
+   'curdir' : os.getcwd(),
+   'tpath' : None,
+   'dcnt' : 0,
+   'fcnt' : 0
+}
+
+#
+# main function to run the application
+#
+def main():
+
+   argv = sys.argv[1:]
+   PgDBI.dssdb_scname()
+   PgLOG.set_help_path(__file__)
+   PgLOG.PGLOG['LOGFILE'] = "rdaown.log"   # set different log file
+   PgLOG.cmdlog("rdaown {} ({})".format(' '.join(argv), OINFO['curdir']))
+   option = defopt = 'l'
+   for arg in argv:
+      ms = re.match(r'-(\w+)$', arg)
+      if ms:
+         option = ms.group(1)
+         if option not in RDAOWN: PgLOG.pglog(arg + ": Unknown Option", PgLOG.LGEREX)
+         if 'dfhr'.find(option) > -1:
+            RDAOWN[option] = 1
+            option = defopt
+         continue
+      if not option: PgLOG.pglog(arg + ": Value provided without option", PgLOG.LGEREX)
+      if option == 'R':
+         RDAOWN['R'] = int(arg)
+         option = defopt
+      else:
+         OINFO['files'].append(arg)
+         defopt = None
+
+   if RDAOWN['h'] or not OINFO['files']: PgLOG.show_usage("rdaown")   
+   if PgLOG.PGLOG['CURUID'] != "root":
+      PgLOG.pglog(PgLOG.PGLOG['CURUID'] + ": you must execute 'rdaown' as 'root'!", PgLOG.LGEREX)
+   if not (RDAOWN['d'] or RDAOWN['f']):
+      RDAOWN['d'] = RDAOWN['f'] = 1   # list both directories and files as default
+   if not RDAOWN['R'] and RDAOWN['r']: RDAOWN['R'] = 1000
+
+   change_top_list(OINFO['files'])
+
+   if (OINFO['dcnt'] + OINFO['fcnt']) > 1:
+      msg = ""
+      if OINFO['dcnt'] > 0:
+         s = ("ies" if OINFO['dcnt'] > 1 else "y")
+         msg = "{} Director{}".format(OINFO['dcnt'], s) 
+      if OINFO['fcnt'] > 0:
+         s = ('s' if OINFO['fcnt'] > 1 else '')
+         if msg: msg += " & "
+         msg += "{} File{}".format(OINFO['fcnt'], s)
+      PgLOG.pglog("Total {} changed owner".format(msg), PgLOG.LOGWRN)
+   elif (OINFO['dcnt'] + OINFO['fcnt']) == 0:
+      PgLOG.pglog((OINFO['tpath'] if OINFO['tpath'] else OINFO['curdir']) + ": No Owner changed", PgLOG.LOGWRN)
+
+   PgLOG.cmdlog()
+   PgLOG.pgexit(0)
+
+#
+# change owner for the top level list
+#
+def change_top_list(files):
+   
+   for file in files:
+      info = PgFile.check_local_file(file, 2, PgLOG.LOGWRN)
+      if not info:
+         PgLOG.pglog(file + ": NOT exists", PgLOG.LOGERR)
+         continue
+      change = 1
+      if not info['isfile'] and re.search(r'/$', file):
+         change = 0   # do not change the directory owner if it is ended by '/'
+         file = re.sub(r'/$', '', file, 1)
+
+      if not re.match(r'^/', file): file = PgLOG.join_paths(OINFO['curdir'], file)
+      OINFO['tpath'] = (op.dirname(file) if change else file) + "/"
+      if change: change_owner(file, info)
+      if not info['isfile'] and (RDAOWN['R'] or not change):
+         fs = glob.glob(file + "/*")
+         change_list(fs, 1, file)
+
+#
+# recursively change directory/file owner
+#
+def change_list(files, level, cdir):
+
+   fcnt = 0
+   for file in files:
+      info = PgFile.check_local_file(file, 2, PgLOG.LOGWRN)
+      if not info: continue   # should not happen
+      fcnt += change_owner(file, info)
+      if not info['isfile'] and level < RDAOWN['R']:
+         fs = glob.glob(file + "/*")
+         change_list(fs, level+1, file)
+
+   if fcnt > 1:  # display sub count if two more files are changed mode
+      PgLOG.pglog("{}: {} Files changed owner in the directory".format(cdir, fcnt), PgLOG.LOGWRN)
+
+#
+# change owner for a single directory/file
+#
+def change_owner(file, info):
+
+   fname = re.sub(r'^{}'.format(OINFO['tpath']), '', file, 1)
+   if info['isfile']:
+      if not RDAOWN['f']: return 0
+      fname = "F" + fname
+   else:
+      if not RDAOWN['d']: return 0
+      fname = "D" + fname
+
+   if info['logname'] == "rdadata": return 0
+   if not PgLOG.pgget("dssgrp", "", "logname = '{}'".format(info['logname']), PgLOG.LGEREX):
+      return PgLOG.pglog("{}: owner {} not a DECS Specialist!".format(fname, info['logname']), PgLOG.LOGERR)
+   
+   if PgLOG.pgsystem("su root -c 'chown rdadata {}'".format(file), PgLOG.LOGWRN, 4):
+      PgLOG.pglog("{}: {} => rdadata".format(fname, info['logname']), PgLOG.LOGWRN)
+      if info['isfile']:
+         OINFO['fcnt'] += 1
+         return 1
+      else:
+         OINFO['dcnt'] += 1
+         return 0
+
+   return PgLOG.pglog("{}: Error change owner {} to rdadata".format(fname, info['logname']), PgLOG.LOGERR)
+
+#
+# call main() to start program
+#
+if __name__ == "__main__": main()

rda_python_miscs/rdaown.usg

@@ -0,0 +1,46 @@
+
+ Change owner to 'rdadata' for directories and files in the current or specified
+ directories. You must execute this program as 'root' to be able to change owner.
+ The owner of the directories and files must be DSS specialists to be
+ changed. For directories and files with ownership changed successfully or with error,
+ a leading letter is displayed in font of the relative file names to indicate
+ file types; 'D' for a directory and 'F' for a data file.
+ 
+ Usage: rdaown [-d] [-f] [-h] [-r] [-R RecursiveLevel] [Directory/File List]
+
+      - Option -d, change directory owner only. Changing Directory owner is included
+        as default. Add this option to exclude changing file owner;
+ 
+      - Option -f, change file owner only. Changing File owner is included
+        as default. Add this option to exclude changing Directory owner;
+ 
+      - Option -h, display this help document;
+
+      - Option -r, change owner for directories and files recursively;
+
+      - Option -R, change owner for directories and files recursively up to
+        the level provided with this Option;
+
+      - Directory/file List is mandatory; this help document is displayed 
+        without it.  Unix command line wildcards are supported. Use './' or '*'
+        for all directories and files in the current directory to be considered.
+        
+
+  This utility program can be executed anywhere. No Mode is changed if neither
+  directory nor file are owned by user 'rdadata'.
+  
+  For examples, to change owner for directories and files under ds277.6, you can
+     
+     1. Change into the dataset home data directory as 'cd /PathTo/ds277.6' and
+        execute 'rdaown ./'; add recursive option '-r' to change owner for directories
+        and files further into the sub-directories, or change directory into
+        a sub-directory to change owner for files inside of it.
+     
+     2. Pass an absolute path to rdaown as 'rdaown /PathTo/ds277.6/';
+        without the ending by '/', owner of top directory itself is
+        changed only unless the recursive option '-r' or '-R RecursiveLevel'
+        is present.
+     
+     3. If the current directory is in another dataset home data directory,
+        such as /PathTo/ds277.7, you can pass a relative path to rdaown
+        as  'rdaown ../ds277.6/' or as 'rdaown ../ds277.6/*'

rda_python_miscs/rdaps.py

@@ -0,0 +1,194 @@
+#!/usr/bin/env python3
+#
+##################################################################################
+#
+#     Title: rdaps
+#    Author: Zaihua Ji, zji@ucar.edu
+#      Date: 10/24/2020
+#            2025-03-10 transferred to package rda_python_miscs from
+#            https://github.com/NCAR/rda-utility-programs.git
+#   Purpose: run ps against running process ID locally or remotely
+#
+#    Github: https://github.com/NCAR/rda-python-miscs.git
+#
+##################################################################################
+#
+import re
+import os
+import sys
+from rda_python_common import PgLOG
+from rda_python_common import PgSIG
+from rda_python_common import PgUtil
+from rda_python_common import PgFile
+from rda_python_common import PgDBI
+
+RDAPS = {
+   'a' : None,   # application name
+   'h' : None,   # remote hostname
+   'p' : 0,      # process id to be checked
+   'P' : 0,      # parent process id to be checked
+   'u' : None,   # login user name
+}
+
+#
+# main function to run the application
+#
+def main():
+
+   optcnt = 0
+   argv = sys.argv[1:]
+   PgDBI.dssdb_dbname()
+   PgLOG.set_suid(PgLOG.PGLOG['EUID'])
+   PgLOG.set_help_path(__file__)
+   PgLOG.PGLOG['LOGFILE'] = "rdaps.log"   # set different log file
+   PgLOG.cmdlog("rdaps {}".format(' '.join(argv)))
+   
+   for arg in argv:
+      ms = re.match(r'-([ahpPtu])$', arg)
+      if ms:
+         option = ms.group(1)
+      elif re.match(r'-\w+$', arg):
+         PgLOG.pglog(arg + ": Unknown Option", PgLOG.LGEREX)
+      elif option:
+         if RDAPS[option]: PgLOG.pglog("{}: value passed to Option -{} already".format(arg, option), PgLOG.LGEREX)
+         if 'pPt'.find(option) > -1:
+            RDAPS[option] = int(arg)
+         elif option == 'h':
+            RDAPS[option] = PgLOG.get_short_host(arg)
+         else:
+            RDAPS[option] = arg
+         option = None
+         optcnt += 1
+      else:
+         ms = re.match(r'^(\d+)$', arg)
+         if ms and not RDAPS['p']:
+            RDAPS['p'] = int(ms.group(1))   # pid allow value only without leading option
+            optcnt += 1
+         else:
+            PgLOG.pglog(arg + ": Value passed in without Option", PgLOG.LGEREX)
+   
+   if not optcnt: PgLOG.show_usage("rdaps")
+   chkloc = 1
+   if RDAPS['h']:
+      PgFile.local_host_action(RDAPS['h'], "check processes", PgLOG.PGLOG['HOSTNAME'], PgLOG.LGEREX)
+      if not PgUtil.pgcmp(RDAPS['h'], PgLOG.PGLOG['SLMNAME'], 1):
+         slurm_snapshot()
+         chkloc = 0
+      elif not PgUtil.pgcmp(RDAPS['h'], PgLOG.PGLOG['PBSNAME'], 1):
+         pbs_snapshot()
+         chkloc = 0
+   if chkloc: process_snapshot()
+   
+   PgLOG.cmdlog()
+   PgLOG.pgexit(0)
+
+#
+# get a snapshot of a process status
+#
+def process_snapshot():
+
+   if RDAPS['p']:
+      cmd = "ps -p {} -f".format(RDAPS['p'])
+   elif RDAPS['P']:
+      cmd = "ps --ppid {} -f".format(RDAPS['P'])
+   elif RDAPS['u']:
+      cmd = "ps -u {} -f".format(RDAPS['u'])
+   else:
+      cmd = "ps -ef"
+
+   buf = PgLOG.pgsystem(cmd, PgLOG.LGWNEX, 20)
+
+   for line in re.split('\n', buf):
+      ms = re.match(r'\s*(\w+)\s+(\d+)\s+(\d+)\s+(.*)$', line)
+      if ms:
+         uid = ms.group(1)
+         pid = int(ms.group(2))
+         ppid = int(ms.group(3))
+         aname = ms.group(4)
+         if RDAPS['u'] and RDAPS['u'] != uid: continue
+         if RDAPS['p'] and RDAPS['p'] != pid: continue
+         if RDAPS['P'] and RDAPS['P'] != ppid: continue
+         if RDAPS['a'] and aname.find(RDAPS['a']) < 0: continue
+         PgLOG.pglog(re.sub(r'  +', ' ', line), PgLOG.LOGWRN)
+
+#
+# get a snapshot of a SLURM batch process status
+#
+def slurm_snapshot():
+
+   qopts = ''
+   if RDAPS['u']: qopts += " -u " + RDAPS['u']
+   if RDAPS['p']:
+      qopts += " -j {}".format(RDAPS['p'])
+   else:
+      qopts =  " -p rda"
+   cmd = "squeue -l" + qopts
+
+   buf = PgLOG.pgsystem(cmd, PgLOG.LOGWRN, 272)
+   if not buf:
+      if PgLOG.PGLOG['SYSERR'] and PgLOG.PGLOG['SYSERR'].find('Invalid job id specified') < 0:
+         PgLOG.pglog(PgLOG.PGLOG['SYSERR'], PgLOG.LGEREX)
+      return
+
+   lines = re.split(r'\n', buf)
+   lcnt = len(lines)
+   if lcnt < 3: return
+   dochk = 1
+   for line in lines:
+      if not line: continue
+      if dochk:
+         if re.match(r'^\s*JOBID\s', line): dochk = 0
+      else:
+         vals = re.split(r'\s+', PgLOG.pgtrim(line))
+         if RDAPS['a'] and vals[2] and RDAPS['a'] != vals[2]: continue
+         # move user name to front
+         val = vals[3]
+         vals[3] = vals[2]
+         vals[2] = vals[1]
+         vals[1] = vals[0]
+         vals[0] = val
+         PgLOG.pglog(' '.join(vals), PgLOG.LOGWRN)
+
+#
+# get a snapshot of a PBS batch process status
+#
+def pbs_snapshot():
+
+   qopts = ''
+   if RDAPS['u']:
+      qopts = "-u {}".format(RDAPS['u'])
+   if RDAPS['p']:
+      if qopts: qopts += ' '
+      qopts += str(RDAPS['p'])
+   if not qopts: qopts = 'rda'
+
+   stat = PgSIG.get_pbs_info(qopts, 1, PgLOG.LOGWRN)
+   if not stat:
+      if PgLOG.PGLOG['SYSERR']: PgLOG.pglog(PgLOG.PGLOG['SYSERR'], PgLOG.LGEREX)
+      return
+
+   lcnt = len(stat['JobID'])
+
+   ckeys = list(stat.keys())
+   kcnt = len(ckeys)
+   # moving 'UserName' to the first
+   for i in range(kcnt):
+      if i > 0 and ckeys[i] == 'UserName':
+         j = i
+         while j > 0:
+            ckeys[j] = ckeys[j-1]
+            j -= 1
+         ckeys[0] = 'UserName'
+         break
+
+   for i in range(lcnt):
+      if RDAPS['a'] and stat['JobName'] and RDAPS['a'] != stat['JobName']: continue
+      vals = []
+      for k in ckeys:
+         vals.append(stat[k][i])
+      PgLOG.pglog(' '.join(vals), PgLOG.LOGWRN)
+
+#
+# call main() to start program
+#
+if __name__ == "__main__": main()