DataMuseum.dk

Presents historical artifacts from the history of:

RC9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: @ T l

⟦85c0feaf6⟧ TextFile

    Length: 906 (0x38a)
    Types: TextFile
    Notes: @(#)listatjobs.csh 13.2 (RC International) 91/10/11
    Names: »listatjobs«

Derivation

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦bbf173f5c⟧ »0004« 
        └─⟦this⟧ »./usr/sadm/sysadm/add-ons/sysadm/backup_service/schedule/later_time/display/listatjobs« 

TextFile

#!/bin/csh
# Ident: @(#)listatjobs.csh	13.2 (RC International) 91/10/11
@ count = 0
set l_user=""
set file_name=""
foreach name ( ` /usr/bin/at -l ` )
  if ( $count == 0 && $name == "user" ) then
    @ count = 9
  else if ( $count == 0 ) then
    @ count = 6
  endif
  switch ( $count )
    case 8,9:
    breaksw
    case 7:
      set l_user=$name
    breaksw
    case 6:
      set file_name=$name
    breaksw
    case 5:
      set day=$name
    breaksw
    case 4:
      set month=$name
    breaksw
    case 3:
      set date=$name
    breaksw
    case 2:
      set hms=$name
    breaksw
    case 1:
      set year=$name
      /usr/ucb/tail -2 /usr/spool/cron/atjobs/${file_name} | /usr/ucb/head -1 | /usr/bin/fgrep dump > at_line
      if ( !(-z at_line) ) then
        echo "$day $month $date $hms ${year}:" 
        cat at_line;
      endif
    breaksw
    default:
    breaksw
  endsw
  @ count--
end