diff options
author | cvs2svn <admin@example.com> | 1999-03-26 18:24:03 +0000 |
---|---|---|
committer | cvs2svn <admin@example.com> | 1999-03-26 18:24:03 +0000 |
commit | 3fc228fb4c1a39aceaee3d7013365042a6077bd0 (patch) | |
tree | af769f6648929b3b2c1f9e053a3754fa989ce302 /src/usr.bin/nc/scripts | |
parent | 536c76cbb863bab152f19842ab88772c01e922c7 (diff) | |
download | openbsd-OPENBSD_2_5.tar.gz openbsd-OPENBSD_2_5.tar.bz2 openbsd-OPENBSD_2_5.zip |
This commit was manufactured by cvs2git to create branch 'OPENBSD_2_5'.OPENBSD_2_5
Diffstat (limited to 'src/usr.bin/nc/scripts')
-rw-r--r-- | src/usr.bin/nc/scripts/README | 5 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/alta | 33 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/bsh | 29 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/dist.sh | 23 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/irc | 79 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/iscan | 35 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/ncp | 46 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/probe | 50 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/web | 148 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/webproxy | 138 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/webrelay | 44 | ||||
-rw-r--r-- | src/usr.bin/nc/scripts/websearch | 77 |
12 files changed, 707 insertions, 0 deletions
diff --git a/src/usr.bin/nc/scripts/README b/src/usr.bin/nc/scripts/README new file mode 100644 index 0000000000..07aee0c8ea --- /dev/null +++ b/src/usr.bin/nc/scripts/README | |||
@@ -0,0 +1,5 @@ | |||
1 | A collection of example scripts that use netcat as a backend, each | ||
2 | documented by its own internal comments. | ||
3 | |||
4 | I'll be the first to admit that some of these are seriously *sick*, | ||
5 | but they do work and are quite useful to me on a daily basis. | ||
diff --git a/src/usr.bin/nc/scripts/alta b/src/usr.bin/nc/scripts/alta new file mode 100644 index 0000000000..7a091767e8 --- /dev/null +++ b/src/usr.bin/nc/scripts/alta | |||
@@ -0,0 +1,33 @@ | |||
1 | #! /bin/sh | ||
2 | ## special handler for altavista, since they only hand out chunks of 10 at | ||
3 | ## a time. Tries to isolate out results without the leading/trailing trash. | ||
4 | ## multiword arguments are foo+bar, as usual. | ||
5 | ## Second optional arg switches the "what" field, to e.g. "news" | ||
6 | |||
7 | test "${1}" = "" && echo 'Needs an argument to search for!' && exit 1 | ||
8 | WHAT="web" | ||
9 | test "${2}" && WHAT="${2}" | ||
10 | |||
11 | # convert multiple args | ||
12 | PLUSARG="`echo $* | sed 's/ /+/g'`" | ||
13 | |||
14 | # Plug in arg. only doing simple-q for now; pg=aq for advanced-query | ||
15 | # embedded quotes define phrases; otherwise it goes wild on multi-words | ||
16 | QB="GET /cgi-bin/query?pg=q&what=${WHAT}&fmt=c&q=\"${PLUSARG}\"" | ||
17 | |||
18 | # ping 'em once, to get the routing warm | ||
19 | nc -z -w 8 www.altavista.digital.com 24015 2> /dev/null | ||
20 | echo "=== Altavista ===" | ||
21 | |||
22 | for xx in 0 10 20 30 40 50 60 70 80 90 100 110 120 130 140 150 160 170 180 \ | ||
23 | 190 200 210 220 230 240 250 260 270 280 290 300 310 320 330 340 350 ; do | ||
24 | echo "${QB}&stq=${xx}" | nc -w 15 www.altavista.digital.com 80 | \ | ||
25 | egrep '^<a href="http://' | ||
26 | done | ||
27 | |||
28 | exit 0 | ||
29 | |||
30 | # old filter stuff | ||
31 | sed -e '/Documents .* matching .* query /,/query?.*stq=.* Document/p' \ | ||
32 | -e d | ||
33 | |||
diff --git a/src/usr.bin/nc/scripts/bsh b/src/usr.bin/nc/scripts/bsh new file mode 100644 index 0000000000..796e480354 --- /dev/null +++ b/src/usr.bin/nc/scripts/bsh | |||
@@ -0,0 +1,29 @@ | |||
1 | #! /bin/sh | ||
2 | ## a little wrapper to "password" and re-launch a shell-listener. | ||
3 | ## Arg is taken as the port to listen on. Define "NC" to point wherever. | ||
4 | |||
5 | NC=nc | ||
6 | |||
7 | case "$1" in | ||
8 | ?* ) | ||
9 | LPN="$1" | ||
10 | export LPN | ||
11 | sleep 1 | ||
12 | echo "-l -p $LPN -e $0" | $NC > /dev/null 2>&1 & | ||
13 | echo "launched on port $LPN" | ||
14 | exit 0 | ||
15 | ;; | ||
16 | esac | ||
17 | |||
18 | # here we play inetd | ||
19 | echo "-l -p $LPN -e $0" | $NC > /dev/null 2>&1 & | ||
20 | |||
21 | while read qq ; do | ||
22 | case "$qq" in | ||
23 | # here's yer password | ||
24 | gimme ) | ||
25 | cd / | ||
26 | exec csh -i | ||
27 | ;; | ||
28 | esac | ||
29 | done | ||
diff --git a/src/usr.bin/nc/scripts/dist.sh b/src/usr.bin/nc/scripts/dist.sh new file mode 100644 index 0000000000..4d2534a0e3 --- /dev/null +++ b/src/usr.bin/nc/scripts/dist.sh | |||
@@ -0,0 +1,23 @@ | |||
1 | #! /bin/sh | ||
2 | ## This is a quick example listen-exec server, which was used for a while to | ||
3 | ## distribute netcat prereleases. It illustrates use of netcat both as a | ||
4 | ## "fake inetd" and a syslogger, and how easy it then is to crock up a fairly | ||
5 | ## functional server that restarts its own listener and does full connection | ||
6 | ## logging. In a half-screen of shell script!! | ||
7 | |||
8 | PORT=31337 | ||
9 | |||
10 | sleep 1 | ||
11 | SRC=`tail -1 dist.log` | ||
12 | echo "<36>elite: ${SRC}" | ./nc -u -w 1 localhost 514 > /dev/null 2>&1 | ||
13 | echo ";;; Hi, ${SRC}..." | ||
14 | echo ";;; This is a PRERELEASE version of 'netcat', tar/gzip/uuencoded." | ||
15 | echo ";;; Unless you are capturing this somehow, it won't do you much good." | ||
16 | echo ";;; Ready?? Here it comes! Have phun ..." | ||
17 | sleep 8 | ||
18 | cat dist.file | ||
19 | sleep 1 | ||
20 | ./nc -v -l -p ${PORT} -e dist.sh < /dev/null >> dist.log 2>&1 & | ||
21 | sleep 1 | ||
22 | echo "<36>elite: done" | ./nc -u -w 1 localhost 514 > /dev/null 2>&1 | ||
23 | exit 0 | ||
diff --git a/src/usr.bin/nc/scripts/irc b/src/usr.bin/nc/scripts/irc new file mode 100644 index 0000000000..3557d7a0c6 --- /dev/null +++ b/src/usr.bin/nc/scripts/irc | |||
@@ -0,0 +1,79 @@ | |||
1 | #! /bin/sh | ||
2 | ## Shit-simple script to supply the "privmsg <recipient>" of IRC typein, and | ||
3 | ## keep the connection alive. Pipe this thru "nc -v -w 5 irc-server port". | ||
4 | ## Note that this mechanism makes the script easy to debug without being live, | ||
5 | ## since it just echoes everything bound for the server. | ||
6 | ## if you want autologin-type stuff, construct some appropriate files and | ||
7 | ## shovel them in using the "<" mechanism. | ||
8 | |||
9 | # magic arg: if "tick", do keepalive process instead of main loop | ||
10 | if test "$1" = "tick" ; then | ||
11 | # ignore most signals; the parent will nuke the kid | ||
12 | # doesn't stop ^Z, of course. | ||
13 | trap '' 1 2 3 13 14 15 16 | ||
14 | while true ; do | ||
15 | sleep 60 | ||
16 | echo "PONG !" | ||
17 | done | ||
18 | fi | ||
19 | |||
20 | # top level: fire ourselves off as the keepalive process, and keep track of it | ||
21 | sh $0 tick & | ||
22 | ircpp=$! | ||
23 | echo "[Keepalive: $ircpp]" >&2 | ||
24 | # catch our own batch of signals: hup int quit pipe alrm term urg | ||
25 | trap 'kill -9 $ircpp ; exit 0' 1 2 3 13 14 15 16 | ||
26 | sleep 2 | ||
27 | |||
28 | sender='' | ||
29 | savecmd='' | ||
30 | |||
31 | # the big honkin' loop... | ||
32 | while read xx yy ; do | ||
33 | case "${xx}" in | ||
34 | # blank line: do nothing | ||
35 | "") | ||
36 | continue | ||
37 | ;; | ||
38 | # new channel or recipient; if bare ">", we're back to raw literal mode. | ||
39 | ">") | ||
40 | if test "${yy}" ; then | ||
41 | sender="privmsg ${yy} :" | ||
42 | else | ||
43 | sender='' | ||
44 | fi | ||
45 | continue | ||
46 | ;; | ||
47 | # send crud from a file, one line per second. Can you say "skr1pt kidz"?? | ||
48 | # *Note: uses current "recipient" if set. | ||
49 | "<") | ||
50 | if test -f "${yy}" ; then | ||
51 | ( while read zz ; do | ||
52 | sleep 1 | ||
53 | echo "${sender}${zz}" | ||
54 | done ) < "$yy" | ||
55 | echo "[done]" >&2 | ||
56 | else | ||
57 | echo "[File $yy not found]" >&2 | ||
58 | fi | ||
59 | continue | ||
60 | ;; | ||
61 | # do and save a single command, for quick repeat | ||
62 | "/") | ||
63 | if test "${yy}" ; then | ||
64 | savecmd="${yy}" | ||
65 | fi | ||
66 | echo "${savecmd}" | ||
67 | ;; | ||
68 | # default case goes to recipient, just like always | ||
69 | *) | ||
70 | echo "${sender}${xx} ${yy}" | ||
71 | continue | ||
72 | ;; | ||
73 | esac | ||
74 | done | ||
75 | |||
76 | # parting shot, if you want it | ||
77 | echo "quit :Bye all!" | ||
78 | kill -9 $ircpp | ||
79 | exit 0 | ||
diff --git a/src/usr.bin/nc/scripts/iscan b/src/usr.bin/nc/scripts/iscan new file mode 100644 index 0000000000..6279bc817f --- /dev/null +++ b/src/usr.bin/nc/scripts/iscan | |||
@@ -0,0 +1,35 @@ | |||
1 | #! /bin/sh | ||
2 | ## duplicate DaveG's ident-scan thingie using netcat. Oooh, he'll be pissed. | ||
3 | ## args: target port [port port port ...] | ||
4 | ## hose stdout *and* stderr together. | ||
5 | ## | ||
6 | ## advantages: runs slower than ident-scan, giving remote inetd less cause | ||
7 | ## for alarm, and only hits the few known daemon ports you specify. | ||
8 | ## disadvantages: requires numeric-only port args, the output sleazitude, | ||
9 | ## and won't work for r-services when coming from high source ports. | ||
10 | |||
11 | case "${2}" in | ||
12 | "" ) echo needs HOST and at least one PORT ; exit 1 ;; | ||
13 | esac | ||
14 | |||
15 | # ping 'em once and see if they *are* running identd | ||
16 | nc -z -w 9 "$1" 113 || { echo "oops, $1 isn't running identd" ; exit 0 ; } | ||
17 | |||
18 | # generate a randomish base port | ||
19 | RP=`expr $$ % 999 + 31337` | ||
20 | |||
21 | TRG="$1" | ||
22 | shift | ||
23 | |||
24 | while test "$1" ; do | ||
25 | nc -v -w 8 -p ${RP} "$TRG" ${1} < /dev/null > /dev/null & | ||
26 | PROC=$! | ||
27 | sleep 3 | ||
28 | echo "${1},${RP}" | nc -w 4 -r "$TRG" 113 2>&1 | ||
29 | sleep 2 | ||
30 | # does this look like a lamer script or what... | ||
31 | kill -HUP $PROC | ||
32 | RP=`expr ${RP} + 1` | ||
33 | shift | ||
34 | done | ||
35 | |||
diff --git a/src/usr.bin/nc/scripts/ncp b/src/usr.bin/nc/scripts/ncp new file mode 100644 index 0000000000..1931b03385 --- /dev/null +++ b/src/usr.bin/nc/scripts/ncp | |||
@@ -0,0 +1,46 @@ | |||
1 | #! /bin/sh | ||
2 | ## Like "rcp" but uses netcat on a high port. | ||
3 | ## do "ncp targetfile" on the RECEIVING machine | ||
4 | ## then do "ncp sourcefile receivinghost" on the SENDING machine | ||
5 | ## if invoked as "nzp" instead, compresses transit data. | ||
6 | |||
7 | ## pick your own personal favorite port, which will be used on both ends. | ||
8 | ## You should probably change this for your own uses. | ||
9 | MYPORT=23456 | ||
10 | |||
11 | ## if "nc" isn't systemwide or in your PATH, add the right place | ||
12 | # PATH=${HOME}:${PATH} ; export PATH | ||
13 | |||
14 | test "$3" && echo "too many args" && exit 1 | ||
15 | test ! "$1" && echo "no args?" && exit 1 | ||
16 | me=`echo $0 | sed 's+.*/++'` | ||
17 | test "$me" = "nzp" && echo '[compressed mode]' | ||
18 | |||
19 | # if second arg, it's a host to send an [extant] file to. | ||
20 | if test "$2" ; then | ||
21 | test ! -f "$1" && echo "can't find $1" && exit 1 | ||
22 | if test "$me" = "nzp" ; then | ||
23 | compress -c < "$1" | nc -v -w 2 $2 $MYPORT && exit 0 | ||
24 | else | ||
25 | nc -v -w 2 $2 $MYPORT < "$1" && exit 0 | ||
26 | fi | ||
27 | echo "transfer FAILED!" | ||
28 | exit 1 | ||
29 | fi | ||
30 | |||
31 | # fall here for receiver. Ask before trashing existing files | ||
32 | if test -f "$1" ; then | ||
33 | echo -n "Overwrite $1? " | ||
34 | read aa | ||
35 | test ! "$aa" = "y" && echo "[punted!]" && exit 1 | ||
36 | fi | ||
37 | # 30 seconds oughta be pleeeeenty of time, but change if you want. | ||
38 | if test "$me" = "nzp" ; then | ||
39 | nc -v -w 30 -p $MYPORT -l < /dev/null | uncompress -c > "$1" && exit 0 | ||
40 | else | ||
41 | nc -v -w 30 -p $MYPORT -l < /dev/null > "$1" && exit 0 | ||
42 | fi | ||
43 | echo "transfer FAILED!" | ||
44 | # clean up, since even if the transfer failed, $1 is already trashed | ||
45 | rm -f "$1" | ||
46 | exit 1 | ||
diff --git a/src/usr.bin/nc/scripts/probe b/src/usr.bin/nc/scripts/probe new file mode 100644 index 0000000000..c47dc3f495 --- /dev/null +++ b/src/usr.bin/nc/scripts/probe | |||
@@ -0,0 +1,50 @@ | |||
1 | #! /bin/sh | ||
2 | ## launch a whole buncha shit at yon victim in no particular order; capture | ||
3 | ## stderr+stdout in one place. Run as root for rservice and low -p to work. | ||
4 | ## Fairly thorough example of using netcat to collect a lot of host info. | ||
5 | ## Will set off every intrusion alarm in existence on a paranoid machine! | ||
6 | |||
7 | # where .d files are kept; "." if nothing else | ||
8 | DDIR=../data | ||
9 | # address of some well-connected router that groks LSRR | ||
10 | GATE=192.157.69.11 | ||
11 | |||
12 | # might conceivably wanna change this for different run styles | ||
13 | UCMD='nc -v -w 8' | ||
14 | |||
15 | test ! "$1" && echo Needs victim arg && exit 1 | ||
16 | |||
17 | echo '' | $UCMD -w 9 -r "$1" 13 79 6667 2>&1 | ||
18 | echo '0' | $UCMD "$1" 79 2>&1 | ||
19 | # if LSRR was passed thru, should get refusal here: | ||
20 | $UCMD -z -r -g $GATE "$1" 6473 2>&1 | ||
21 | $UCMD -r -z "$1" 6000 4000-4004 111 53 2105 137-140 1-20 540-550 95 87 2>&1 | ||
22 | # -s `hostname` may be wrong for some multihomed machines | ||
23 | echo 'UDP echoecho!' | nc -u -p 7 -s `hostname` -w 3 "$1" 7 19 2>&1 | ||
24 | echo '113,10158' | $UCMD -p 10158 "$1" 113 2>&1 | ||
25 | rservice bin bin | $UCMD -p 1019 "$1" shell 2>&1 | ||
26 | echo QUIT | $UCMD -w 8 -r "$1" 25 158 159 119 110 109 1109 142-144 220 23 2>&1 | ||
27 | # newline after any telnet trash | ||
28 | echo '' | ||
29 | echo PASV | $UCMD -r "$1" 21 2>&1 | ||
30 | echo 'GET /' | $UCMD -w 10 "$1" 80 81 210 70 2>&1 | ||
31 | # sometimes contains useful directory info: | ||
32 | echo 'GET /robots.txt' | $UCMD -w 10 "$1" 80 2>&1 | ||
33 | # now the big red lights go on | ||
34 | rservice bin bin 9600/9600 | $UCMD -p 1020 "$1" login 2>&1 | ||
35 | rservice root root | $UCMD -r "$1" exec 2>&1 | ||
36 | echo 'BEGIN big udp -- everything may look "open" if packet-filtered' | ||
37 | data -g < ${DDIR}/nfs-0.d | $UCMD -i 1 -u "$1" 2049 | od -x 2>&1 | ||
38 | # no wait-time, uses RTT hack | ||
39 | nc -v -z -u -r "$1" 111 66-70 88 53 87 161-164 121-123 213 49 2>&1 | ||
40 | nc -v -z -u -r "$1" 137-140 694-712 747-770 175-180 2103 510-530 2>&1 | ||
41 | echo 'END big udp' | ||
42 | $UCMD -r -z "$1" 175-180 2000-2003 530-533 1524 1525 666 213 8000 6250 2>&1 | ||
43 | # Use our identd-sniffer! | ||
44 | iscan "$1" 21 25 79 80 111 53 6667 6000 2049 119 2>&1 | ||
45 | # this gets pretty intrusive, but what the fuck. Probe for portmap first | ||
46 | if nc -w 5 -z -u "$1" 111 ; then | ||
47 | showmount -e "$1" 2>&1 | ||
48 | rpcinfo -p "$1" 2>&1 | ||
49 | fi | ||
50 | exit 0 | ||
diff --git a/src/usr.bin/nc/scripts/web b/src/usr.bin/nc/scripts/web new file mode 100644 index 0000000000..382b18e1e3 --- /dev/null +++ b/src/usr.bin/nc/scripts/web | |||
@@ -0,0 +1,148 @@ | |||
1 | #! /bin/sh | ||
2 | ## The web sucks. It is a mighty dismal kludge built out of a thousand | ||
3 | ## tiny dismal kludges all band-aided together, and now these bottom-line | ||
4 | ## clueless pinheads who never heard of "TCP handshake" want to run | ||
5 | ## *commerce* over the damn thing. Ye godz. Welcome to TV of the next | ||
6 | ## century -- six million channels of worthless shit to choose from, and | ||
7 | ## about as much security as today's cable industry! | ||
8 | ## | ||
9 | ## Having grown mightily tired of pain in the ass browsers, I decided | ||
10 | ## to build the minimalist client. It doesn't handle POST, just GETs, but | ||
11 | ## the majority of cgi forms handlers apparently ignore the method anyway. | ||
12 | ## A distinct advantage is that it *doesn't* pass on any other information | ||
13 | ## to the server, like Referer: or info about your local machine such as | ||
14 | ## Netscum tries to! | ||
15 | ## | ||
16 | ## Since the first version, this has become the *almost*-minimalist client, | ||
17 | ## but it saves a lot of typing now. And with netcat as its backend, it's | ||
18 | ## totally the balls. Don't have netcat? Get it here in /src/hacks! | ||
19 | ## _H* 950824, updated 951009 et seq. | ||
20 | ## | ||
21 | ## args: hostname [port]. You feed it the filename-parts of URLs. | ||
22 | ## In the loop, HOST, PORT, and SAVE do the right things; a null line | ||
23 | ## gets the previous spec again [useful for initial timeouts]; EOF to exit. | ||
24 | ## Relative URLs behave like a "cd" to wherever the last slash appears, or | ||
25 | ## just use the last component with the saved preceding "directory" part. | ||
26 | ## "\" clears the "filename" part and asks for just the "directory", and | ||
27 | ## ".." goes up one "directory" level while retaining the "filename" part. | ||
28 | ## Play around; you'll get used to it. | ||
29 | |||
30 | if test "$1" = "" ; then | ||
31 | echo Needs hostname arg. | ||
32 | exit 1 | ||
33 | fi | ||
34 | umask 022 | ||
35 | |||
36 | # optional PATH fixup | ||
37 | # PATH=${HOME}:${PATH} ; export PATH | ||
38 | |||
39 | test "${PAGER}" || PAGER=more | ||
40 | BACKEND="nc -v -w 15" | ||
41 | TMPAGE=/tmp/web$$ | ||
42 | host="$1" | ||
43 | port="80" | ||
44 | if test "$2" != "" ; then | ||
45 | port="$2" | ||
46 | fi | ||
47 | |||
48 | spec="/" | ||
49 | specD="/" | ||
50 | specF='' | ||
51 | saving='' | ||
52 | |||
53 | # be vaguely smart about temp file usage. Use your own homedir if you're | ||
54 | # paranoid about someone symlink-racing your shell script, jeez. | ||
55 | rm -f ${TMPAGE} | ||
56 | test -f ${TMPAGE} && echo "Can't use ${TMPAGE}" && exit 1 | ||
57 | |||
58 | # get loopy. Yes, I know "echo -n" aint portable. Everything echoed would | ||
59 | # need "\c" tacked onto the end in an SV universe, which you can fix yourself. | ||
60 | while echo -n "${specD}${specF} " && read spec ; do | ||
61 | case $spec in | ||
62 | HOST) | ||
63 | echo -n 'New host: ' | ||
64 | read host | ||
65 | continue | ||
66 | ;; | ||
67 | PORT) | ||
68 | echo -n 'New port: ' | ||
69 | read port | ||
70 | continue | ||
71 | ;; | ||
72 | SAVE) | ||
73 | echo -n 'Save file: ' | ||
74 | read saving | ||
75 | # if we've already got a page, save it | ||
76 | test "${saving}" && test -f ${TMPAGE} && | ||
77 | echo "=== ${host}:${specD}${specF} ===" >> $saving && | ||
78 | cat ${TMPAGE} >> $saving && echo '' >> $saving | ||
79 | continue | ||
80 | ;; | ||
81 | # changing the logic a bit here. Keep a state-concept of "current dir" | ||
82 | # and "current file". Dir is /foo/bar/ ; file is "baz" or null. | ||
83 | # leading slash: create whole new state. | ||
84 | /*) | ||
85 | specF=`echo "${spec}" | sed 's|.*/||'` | ||
86 | specD=`echo "${spec}" | sed 's|\(.*/\).*|\1|'` | ||
87 | spec="${specD}${specF}" | ||
88 | ;; | ||
89 | # embedded slash: adding to the path. "file" part can be blank, too | ||
90 | */*) | ||
91 | specF=`echo "${spec}" | sed 's|.*/||'` | ||
92 | specD=`echo "${specD}${spec}" | sed 's|\(.*/\).*|\1|'` | ||
93 | ;; | ||
94 | # dotdot: jump "up" one level and just reprompt [confirms what it did...] | ||
95 | ..) | ||
96 | specD=`echo "${specD}" | sed 's|\(.*/\)..*/|\1|'` | ||
97 | continue | ||
98 | ;; | ||
99 | # blank line: do nothing, which will re-get the current one | ||
100 | '') | ||
101 | ;; | ||
102 | # hack-quoted blank line: "\" means just zero out "file" part | ||
103 | '\') | ||
104 | specF='' | ||
105 | ;; | ||
106 | # sigh | ||
107 | '?') | ||
108 | echo Help yourself. Read the script fer krissake. | ||
109 | continue | ||
110 | ;; | ||
111 | # anything else is taken as a "file" part | ||
112 | *) | ||
113 | specF=${spec} | ||
114 | ;; | ||
115 | esac | ||
116 | |||
117 | # now put it together and stuff it down a connection. Some lame non-unix | ||
118 | # http servers assume they'll never get simple-query format, and wait till | ||
119 | # an extra newline arrives. If you're up against one of these, change | ||
120 | # below to (echo GET "$spec" ; echo '') | $BACKEND ... | ||
121 | spec="${specD}${specF}" | ||
122 | echo GET "${spec}" | $BACKEND $host $port > ${TMPAGE} | ||
123 | ${PAGER} ${TMPAGE} | ||
124 | |||
125 | # save in a format that still shows the URLs we hit after a de-html run | ||
126 | if test "${saving}" ; then | ||
127 | echo "=== ${host}:${spec} ===" >> $saving | ||
128 | cat ${TMPAGE} >> $saving | ||
129 | echo '' >> $saving | ||
130 | fi | ||
131 | done | ||
132 | rm -f ${TMPAGE} | ||
133 | exit 0 | ||
134 | |||
135 | ####### | ||
136 | # Encoding notes, finally from RFC 1738: | ||
137 | # %XX -- hex-encode of special chars | ||
138 | # allowed alphas in a URL: $_-.+!*'(), | ||
139 | # relative names *not* described, but obviously used all over the place | ||
140 | # transport://user:pass@host:port/path/name?query-string | ||
141 | # wais: port 210, //host:port/database?search or /database/type/file? | ||
142 | # cgi-bin/script?arg1=foo&arg2=bar&... scripts have to parse xxx&yyy&zzz | ||
143 | # ISMAP imagemap stuff: /bin/foobar.map?xxx,yyy -- have to guess at coords! | ||
144 | # local access-ctl files: ncsa: .htaccess ; cern: .www_acl | ||
145 | ####### | ||
146 | # SEARCH ENGINES: fortunately, all are GET forms or at least work that way... | ||
147 | # multi-word args for most cases: foo+bar | ||
148 | # See 'websearch' for concise results of this research... | ||
diff --git a/src/usr.bin/nc/scripts/webproxy b/src/usr.bin/nc/scripts/webproxy new file mode 100644 index 0000000000..cee2d29fd1 --- /dev/null +++ b/src/usr.bin/nc/scripts/webproxy | |||
@@ -0,0 +1,138 @@ | |||
1 | #! /bin/sh | ||
2 | ## Web proxy, following the grand tradition of Web things being handled by | ||
3 | ## gross scripts. Uses netcat to listen on a high port [default 8000], | ||
4 | ## picks apart requests and sends them on to the right place. Point this | ||
5 | ## at the browser client machine you'll be coming from [to limit access to | ||
6 | ## only it], and point the browser's concept of an HTTP proxy to the | ||
7 | ## machine running this. Takes a single argument of the client that will | ||
8 | ## be using it, and rejects connections from elsewhere. LOGS the queries | ||
9 | ## to a configurable logfile, which can be an interesting read later on! | ||
10 | ## If the argument is "reset", the listener and logfile are cleaned up. | ||
11 | ## | ||
12 | ## This works surprisingly fast and well, for a shell script, although may | ||
13 | ## randomly fail when hammered by a browser that tries to open several | ||
14 | ## connections at once. Drop the "maximum connections" in your browser if | ||
15 | ## this is a problem. | ||
16 | ## | ||
17 | ## A more degenerate case of this, or preferably a small C program that | ||
18 | ## does the same thing under inetd, could handle a small site's worth of | ||
19 | ## proxy queries. Given the way browsers are evolving, proxies like this | ||
20 | ## can play an important role in protecting your own privacy. | ||
21 | ## | ||
22 | ## If you grabbed this in ASCII mode, search down for "eew" and make sure | ||
23 | ## the embedded-CR check is intact, or requests might hang. | ||
24 | ## | ||
25 | ## Doesn't handle POST forms. Who cares, if you're just watching HTTV? | ||
26 | ## Dumbness here has a highly desirable side effect: it only sends the first | ||
27 | ## GET line, since that's all you really ever need to send, and suppresses | ||
28 | ## the other somewhat revealing trash that most browsers insist on sending. | ||
29 | |||
30 | # set these as you wish: proxy port... | ||
31 | PORT=8000 | ||
32 | # logfile spec: a real file or /dev/null if you don't care | ||
33 | LFILE=${0}.log | ||
34 | # optional: where to dump connect info, so you can see if anything went wrong | ||
35 | # CFILE=${0}.conn | ||
36 | # optional extra args to the listener "nc", for instance "-s inside-net-addr" | ||
37 | # XNC='' | ||
38 | |||
39 | # functionality switch has to be done fast, so the next listener can start | ||
40 | # prelaunch check: if no current client and no args, bail. | ||
41 | case "${1}${CLIENT}" in | ||
42 | "") | ||
43 | echo needs client hostname | ||
44 | exit 1 | ||
45 | ;; | ||
46 | esac | ||
47 | |||
48 | case "${1}" in | ||
49 | "") | ||
50 | # Make like inetd, and run the next relayer process NOW. All the redirection | ||
51 | # is necessary so this shell has NO remaining channel open to the net. | ||
52 | # This will hang around for 10 minutes, and exit if no new connections arrive. | ||
53 | # Using -n for speed, avoiding any DNS/port lookups. | ||
54 | nc -w 600 -n -l -p $PORT -e "$0" $XNC "$CLIENT" < /dev/null > /dev/null \ | ||
55 | 2> $CFILE & | ||
56 | ;; | ||
57 | esac | ||
58 | |||
59 | # no client yet and had an arg, this checking can be much slower now | ||
60 | umask 077 | ||
61 | |||
62 | if test "$1" ; then | ||
63 | # if magic arg, just clean up and then hit our own port to cause server exit | ||
64 | if test "$1" = "reset" ; then | ||
65 | rm -f $LFILE | ||
66 | test -f "$CFILE" && rm -f $CFILE | ||
67 | nc -w 1 -n 127.0.0.1 $PORT < /dev/null > /dev/null 2>&1 | ||
68 | exit 0 | ||
69 | fi | ||
70 | # find our ass with both hands | ||
71 | test ! -f "$0" && echo "Oops, cannot find my own corporeal being" && exit 1 | ||
72 | # correct launch: set up client access control, passed along thru environment. | ||
73 | CLIENT="$1" | ||
74 | export CLIENT | ||
75 | test "$CFILE" || CFILE=/dev/null | ||
76 | export CFILE | ||
77 | touch "$CFILE" | ||
78 | # tell us what happened during the last run, if possible | ||
79 | if test -f "$CFILE" ; then | ||
80 | echo "Last connection results:" | ||
81 | cat $CFILE | ||
82 | fi | ||
83 | |||
84 | # ping client machine and get its bare IP address | ||
85 | CLIENT=`nc -z -v -w 8 "$1" 22000 2>&1 | sed 's/.*\[\(..*\)\].*/\1/'` | ||
86 | test ! "$CLIENT" && echo "Can't find address of $1" && exit 1 | ||
87 | |||
88 | # if this was an initial launch, be informative about it | ||
89 | echo "=== Launch: $CLIENT" >> $LFILE | ||
90 | echo "Proxy running -- will accept connections on $PORT from $CLIENT" | ||
91 | echo " Logging queries to $LFILE" | ||
92 | test -f "$CFILE" && echo " and connection fuckups to $CFILE" | ||
93 | |||
94 | # and run the first listener, showing us output just for the first hit | ||
95 | nc -v -w 600 -n -l -p $PORT -e "$0" $XNC "$CLIENT" & | ||
96 | exit 0 | ||
97 | fi | ||
98 | |||
99 | # Fall here to handle a page. | ||
100 | # GET type://host.name:80/file/path HTTP/1.0 | ||
101 | # Additional: trash | ||
102 | # More: trash | ||
103 | # <newline> | ||
104 | |||
105 | read x1 x2 x3 x4 | ||
106 | echo "=== query: $x1 $x2 $x3 $x4" >> $LFILE | ||
107 | test "$x4" && echo "extra junk after request: $x4" && exit 0 | ||
108 | # nuke questionable characters and split up the request | ||
109 | hurl=`echo "$x2" | sed -e "s+.*//++" -e 's+[\`'\''|$;<>{}\\!*()"]++g'` | ||
110 | # echo massaged hurl: $hurl >> $LFILE | ||
111 | hh=`echo "$hurl" | sed -e "s+/.*++" -e "s+:.*++"` | ||
112 | hp=`echo "$hurl" | sed -e "s+.*:++" -e "s+/.*++"` | ||
113 | test "$hp" = "$hh" && hp=80 | ||
114 | hf=`echo "$hurl" | sed -e "s+[^/]*++"` | ||
115 | # echo total split: $hh : $hp : $hf >> $LFILE | ||
116 | # suck in and log the entire request, because we're curious | ||
117 | # Fails on multipart stuff like forms; oh well... | ||
118 | if test "$x3" ; then | ||
119 | while read xx ; do | ||
120 | echo "${xx}" >> $LFILE | ||
121 | test "${xx}" || break | ||
122 | # eew, buried returns, gross but necessary for DOS stupidity: | ||
123 | test "${xx}" = " " && break | ||
124 | done | ||
125 | fi | ||
126 | # check for non-GET *after* we log the query... | ||
127 | test "$x1" != "GET" && echo "sorry, this proxy only does GETs" && exit 0 | ||
128 | # no, you can *not* phone home, you miserable piece of shit | ||
129 | test "`echo $hh | fgrep -i netscap`" && \ | ||
130 | echo "access to Netscam's servers <b>DENIED.</b>" && exit 0 | ||
131 | # Do it. 30 sec net-wait time oughta be *plenty*... | ||
132 | # Some braindead servers have forgotten how to handle the simple-query syntax. | ||
133 | # If necessary, replace below with (echo "$x1 $hf" ; echo '') | nc... | ||
134 | echo "$x1 $hf" | nc -w 30 "$hh" "$hp" 2> /dev/null || \ | ||
135 | echo "oops, can't get to $hh : $hp". | ||
136 | echo "sent \"$x1 $hf\" to $hh : $hp" >> $LFILE | ||
137 | exit 0 | ||
138 | |||
diff --git a/src/usr.bin/nc/scripts/webrelay b/src/usr.bin/nc/scripts/webrelay new file mode 100644 index 0000000000..829a8b0708 --- /dev/null +++ b/src/usr.bin/nc/scripts/webrelay | |||
@@ -0,0 +1,44 @@ | |||
1 | #! /bin/sh | ||
2 | ## web relay -- a degenerate version of webproxy, usable with browsers that | ||
3 | ## don't understand proxies. This just forwards connections to a given server. | ||
4 | ## No query logging, no access control [although you can add it to XNC for | ||
5 | ## your own run], and full-URL links will undoubtedly confuse the browser | ||
6 | ## if it can't reach the server directly. This was actually written before | ||
7 | ## the full proxy was, and it shows. | ||
8 | ## The arguments in this case are the destination server and optional port. | ||
9 | ## Please flame pinheads who use self-referential absolute links. | ||
10 | |||
11 | # set these as you wish: proxy port... | ||
12 | PORT=8000 | ||
13 | # any extra args to the listening "nc", for instance "-s inside-net-addr" | ||
14 | XNC='' | ||
15 | |||
16 | # functionality switch, which has to be done fast to start the next listener | ||
17 | case "${1}${RDEST}" in | ||
18 | "") | ||
19 | echo needs hostname | ||
20 | exit 1 | ||
21 | ;; | ||
22 | esac | ||
23 | |||
24 | case "${1}" in | ||
25 | "") | ||
26 | # no args: fire off new relayer process NOW. Will hang around for 10 minutes | ||
27 | nc -w 600 -l -n -p $PORT -e "$0" $XNC < /dev/null > /dev/null 2>&1 & | ||
28 | # and handle this request, which will simply fail if vars not set yet. | ||
29 | exec nc -w 15 $RDEST $RPORT | ||
30 | ;; | ||
31 | esac | ||
32 | |||
33 | # Fall here for setup; this can now be slower. | ||
34 | RDEST="$1" | ||
35 | RPORT="$2" | ||
36 | test "$RPORT" || RPORT=80 | ||
37 | export RDEST RPORT | ||
38 | |||
39 | # Launch the first relayer same as above, but let its error msgs show up | ||
40 | # will hang around for a minute, and exit if no new connections arrive. | ||
41 | nc -v -w 600 -l -p $PORT -e "$0" $XNC < /dev/null > /dev/null & | ||
42 | echo \ | ||
43 | "Relay to ${RDEST}:${RPORT} running -- point your browser here on port $PORT" | ||
44 | exit 0 | ||
diff --git a/src/usr.bin/nc/scripts/websearch b/src/usr.bin/nc/scripts/websearch new file mode 100644 index 0000000000..60c3a3356a --- /dev/null +++ b/src/usr.bin/nc/scripts/websearch | |||
@@ -0,0 +1,77 @@ | |||
1 | #! /bin/sh | ||
2 | ## Hit the major search engines. Hose the [large] output to a file! | ||
3 | ## autoconverts multiple arguments into the right format for given servers -- | ||
4 | ## usually worda+wordb, with certain lame exceptions like dejanews. | ||
5 | ## Extracting and post-sorting the URLs is highly recommended... | ||
6 | ## | ||
7 | ## Altavista currently handled by a separate script; may merge at some point. | ||
8 | ## | ||
9 | ## _H* original 950824, updated 951218 and 960209 | ||
10 | |||
11 | test "${1}" = "" && echo 'Needs argument[s] to search for!' && exit 1 | ||
12 | PLUSARG="`echo $* | sed 's/ /+/g'`" | ||
13 | PIPEARG="`echo ${PLUSARG} | sed 's/+/|/g'`" | ||
14 | IFILE=/tmp/.webq.$$ | ||
15 | |||
16 | # Don't have "nc"? Get "netcat" from avian.org and add it to your toolkit. | ||
17 | doquery () { | ||
18 | echo GET "$1" | nc -v -i 1 -w 30 "$2" "$3" | ||
19 | } | ||
20 | |||
21 | # changed since original: now supplying port numbers and separator lines... | ||
22 | |||
23 | echo "=== Yahoo ===" | ||
24 | doquery "/bin/search?p=${PLUSARG}&n=300&w=w&s=a" search.yahoo.com 80 | ||
25 | |||
26 | echo '' ; echo "=== Webcrawler ===" | ||
27 | doquery "/cgi-bin/WebQuery?searchText=${PLUSARG}&maxHits=300" webcrawler.com 80 | ||
28 | |||
29 | # the infoseek lamers want "registration" before they do a real search, but... | ||
30 | echo '' ; echo "=== Infoseek ===" | ||
31 | echo " is broken." | ||
32 | # doquery "WW/IS/Titles?qt=${PLUSARG}" www2.infoseek.com 80 | ||
33 | # ... which doesn't work cuz their lame server wants the extra newlines, WITH | ||
34 | # CRLF pairs ferkrissake. Fuck 'em for now, they're hopelessly broken. If | ||
35 | # you want to play, the basic idea and query formats follow. | ||
36 | # echo "GET /WW/IS/Titles?qt=${PLUSARG}" > $IFILE | ||
37 | # echo "" >> $IFILE | ||
38 | # nc -v -w 30 guide-p.infoseek.com 80 < $IFILE | ||
39 | |||
40 | # this is kinda flakey; might have to do twice?? | ||
41 | echo '' ; echo "=== Opentext ===" | ||
42 | doquery "/omw/simplesearch?SearchFor=${PLUSARG}&mode=phrase" \ | ||
43 | search.opentext.com 80 | ||
44 | |||
45 | # looks like inktomi will only take hits=100, or defaults back to 30 | ||
46 | # we try to suppress all the stupid rating dots here, too | ||
47 | echo '' ; echo "=== Inktomi ===" | ||
48 | doquery "/query/?query=${PLUSARG}&hits=100" ink3.cs.berkeley.edu 1234 | \ | ||
49 | sed '/^<IMG ALT.*inktomi.*\.gif">$/d' | ||
50 | |||
51 | #djnews lame shit limits hits to 120 and has nonstandard format | ||
52 | echo '' ; echo "=== Dejanews ===" | ||
53 | doquery "/cgi-bin/nph-dnquery?query=${PIPEARG}+maxhits=110+format=terse+defaultOp=AND" \ | ||
54 | smithers.dejanews.com 80 | ||
55 | |||
56 | # OLD lycos: used to work until they fucking BROKE it... | ||
57 | # doquery "/cgi-bin/pursuit?query=${PLUSARG}&maxhits=300&terse=1" \ | ||
58 | # query5.lycos.cs.cmu.edu 80 | ||
59 | # NEW lycos: wants the User-agent field present in query or it returns nothing | ||
60 | # 960206: webmaster@lycos duly bitched at | ||
61 | # 960208: reply received; here's how we will now handle it: | ||
62 | echo \ | ||
63 | "GET /cgi-bin/pursuit?query=${PLUSARG}&maxhits=300&terse=terse&matchmode=and&minscore=.5 HTTP/1.x" \ | ||
64 | > $IFILE | ||
65 | echo "User-agent: *FUCK OFF*" >> $IFILE | ||
66 | echo "Why: go ask todd@pointcom.com (Todd Whitney)" >> $IFILE | ||
67 | echo '' >> $IFILE | ||
68 | echo '' ; echo "=== Lycos ===" | ||
69 | nc -v -i 1 -w 30 twelve.srv.lycos.com 80 < $IFILE | ||
70 | |||
71 | rm -f $IFILE | ||
72 | exit 0 | ||
73 | |||
74 | # CURRENTLY BROKEN [?] | ||
75 | # infoseek | ||
76 | |||
77 | # some args need to be redone to ensure whatever "and" mode applies | ||