|
|
DataMuseum.dkPresents historical artifacts from the history of: RC9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: @ T l
Length: 984 (0x3d8)
Types: TextFile
Notes: @(#)listatjobs.csh 13.1 (RC International) 91/09/06
Names: »listatjobs«
└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
└─⟦bbf173f5c⟧ »0004«
└─⟦this⟧ »./usr/sadm/sysadm/add-ons/sysadm/backup_service/schedule/later_time/remove/listatjobs«
#!/bin/csh
# Ident: @(#)listatjobs.csh 13.1 (RC International) 91/09/06
@ 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
echo -n "$file_name "
echo -n "$day $month $date $hms ${year}: "
/usr/ucb/tail -2 /usr/spool/cron/atjobs/${file_name} | /usr/ucb/head -1 | awk '{printf"%4s%11s%5s%3s%5s %s ",substr($1,6,32),$2,$3,$4,$5,$6;if ( substr($7,1,7) == "/dev/lv" ) print substr($7,8,32) ; else print $7}' -
breaksw
default:
breaksw
endsw
@ count--
end