CARVIEW |
Select Language
HTTP/2 302
server: nginx
date: Wed, 16 Jul 2025 11:09:08 GMT
content-type: text/plain; charset=utf-8
content-length: 0
x-archive-redirect-reason: found capture at 20090210084820
location: https://web.archive.org/web/20090210084820/https://examples.oreilly.com/upt2/split/dirtop
server-timing: captures_list;dur=0.755416, exclusion.robots;dur=0.026695, exclusion.robots.policy;dur=0.011824, esindex;dur=0.016000, cdx.remote;dur=17.673444, LoadShardBlock;dur=232.806802, PetaboxLoader3.datanode;dur=70.638238, PetaboxLoader3.resolve;dur=39.770372
x-app-server: wwwb-app224
x-ts: 302
x-tr: 280
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0
set-cookie: SERVER=wwwb-app224; path=/
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
HTTP/2 200
server: nginx
date: Wed, 16 Jul 2025 11:09:09 GMT
content-type: text/plain
content-length: 1086
x-archive-orig-date: Tue, 10 Feb 2009 08:48:20 GMT
x-archive-orig-server: Apache
x-archive-orig-last-modified: Mon, 31 Mar 2008 18:10:12 GMT
x-archive-orig-etag: "fb3e20-43e-90194900"
x-archive-orig-accept-ranges: bytes
x-archive-orig-content-length: 1086
x-archive-orig-connection: close
cache-control: max-age=1800
x-archive-guessed-content-type: text/plain
x-archive-guessed-charset: utf-8
memento-datetime: Tue, 10 Feb 2009 08:48:20 GMT
link: ; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Sun, 18 Aug 2002 00:34:56 GMT", ; rel="prev memento"; datetime="Sun, 18 May 2008 20:44:39 GMT", ; rel="memento"; datetime="Tue, 10 Feb 2009 08:48:20 GMT", ; rel="next memento"; datetime="Wed, 30 Sep 2015 17:26:35 GMT", ; rel="last memento"; datetime="Fri, 25 Mar 2016 03:26:27 GMT"
content-security-policy: default-src 'self' 'unsafe-eval' 'unsafe-inline' data: blob: archive.org web.archive.org web-static.archive.org wayback-api.archive.org athena.archive.org analytics.archive.org pragma.archivelab.org wwwb-events.archive.org
x-archive-src: 52_8_20090210075601_crawl103-c/52_8_20090210084753_crawl100.arc.gz
server-timing: captures_list;dur=0.446035, exclusion.robots;dur=0.016997, exclusion.robots.policy;dur=0.008218, esindex;dur=0.009816, cdx.remote;dur=38.475718, LoadShardBlock;dur=309.381302, PetaboxLoader3.datanode;dur=228.123639, PetaboxLoader3.resolve;dur=173.370520, load_resource;dur=143.067852
x-app-server: wwwb-app224
x-ts: 200
x-tr: 513
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
accept-ranges: bytes
#! /bin/sh
### dirtop - put 'ls' listing in non-scrolling area at top of VTxxx screen.
### Usage: dirtop [-c]
# Only for VTxxx terminals and compatibles, sigh.
ls="/bin/ls -FC" # ls command to use
maxlines=10 # if more lines in listing than this, quit
# UNCOMMENT THE LINE FOR YOUR SYSTEM:
#cmd=echo c='\c' e='\033' n= # SysV
cmd=/usr/5bin/echo c='\c' e='\033' n= # SunOS
#cmd=/bin/echo c= e="`echo e | tr e '\033'`" n=-n # BSD
case "$1" in
-c) $cmd $n "${e}[r${e}[2J${c}"; exit 0;; # just reset screen
"") ;;
*) echo "Usage: `basename $0` [-c]" 1>&2; exit 1 ;;
esac
temp=/tmp/DIRTOP$$
trap 'rm -f $temp; exit' 0 1 2 15
$ls > $temp
# set number of lines to clear: one more than length of ls listing:
lines=`expr 1 + \`wc -l < $temp\``
if [ $lines -gt $maxlines ]
then
echo "`basename $0`: Directory listing > $maxlines lines" 1>&2
exit 1
else
# CLEAR SCREEN. SET NO-SCROLL AREA:
$cmd $n "${e}[2J${c}"
$cmd $n "${e}[${lines};24r${c}"
# MOVE CURSOR TO TOP-LEFT CORNER, THEN PRINT LISTING:
$cmd $n "${e}[0;0f${c}"
cat $temp
exit
fi