OpenStep 4.2J (Developer)

home *** CD-ROM | disk | FTP | other *** search
/ OpenStep 4.2J (Developer) / os42jdev.iso / NextDeveloper / Source / GNU / uucp / Uucp.framework / contrib / uudemon.shar < prev next >
SHell self-extracting ARchive | 1993-10-06 | 2.4 KB
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: SHell self-extracting ARchive (archive/shar).

You can browse this item here: uudemon.shar
Confidence	Program	Detection	Match Type	Support
`100%`	dexvert	SHell self-extracting ARchive `(archive/shar)`	magic	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	POSIX shell script text executable	default
`99%`	file	a /bin/sh script, ASCII text executable	default (weak)
`100%`	checkBytes	Printable ASCII	default
`100%`	perlTextCheck	Likely Text (Perl)	default
`100%`	siegfried	fmt/329 Shell Archive Format	default
`100%`	gt2	Shell Skript: '/bin/sh'	default (weak)
`100%`	detectItEasy	Format: plain text[LF]	default (weak)
`100%`	binwalkID	Executable script, shebang: "/bin/sh"	default (weak)
`100%`	xdgMime	application/x-shellscript	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 23 21 20 2f 62 69 6e 2f | 73 68 0a 23 20 54 68 69 |#! /bin/|sh.# Thi|
|00000010| 73 20 69 73 20 61 20 73 | 68 65 6c 6c 20 61 72 63 |s is a s|hell arc|
|00000020| 68 69 76 65 2e 20 20 52 | 65 6d 6f 76 65 20 61 6e |hive.  R|emove an|
|00000030| 79 74 68 69 6e 67 20 62 | 65 66 6f 72 65 20 74 68 |ything b|efore th|
|00000040| 69 73 20 6c 69 6e 65 2c | 20 74 68 65 6e 20 75 6e |is line,| then un|
|00000050| 70 61 63 6b 0a 23 20 69 | 74 20 62 79 20 73 61 76 |pack.# i|t by sav|
|00000060| 69 6e 67 20 69 74 20 69 | 6e 74 6f 20 61 20 66 69 |ing it i|nto a fi|
|00000070| 6c 65 20 61 6e 64 20 74 | 79 70 69 6e 67 20 22 73 |le and t|yping "s|
|00000080| 68 20 66 69 6c 65 22 2e | 20 20 54 6f 20 6f 76 65 |h file".|  To ove|
|00000090| 72 77 72 69 74 65 20 65 | 78 69 73 74 69 6e 67 0a |rwrite e|xisting.|
|000000a0| 23 20 66 69 6c 65 73 2c | 20 74 79 70 65 20 22 73 |# files,| type "s|
|000000b0| 68 20 66 69 6c 65 20 2d | 63 22 2e 20 20 59 6f 75 |h file -|c".  You|
|000000c0| 20 63 61 6e 20 61 6c 73 | 6f 20 66 65 65 64 20 74 | can als|o feed t|
|000000d0| 68 69 73 20 61 73 20 73 | 74 61 6e 64 61 72 64 20 |his as s|tandard |
|000000e0| 69 6e 70 75 74 20 76 69 | 61 0a 23 20 75 6e 73 68 |input vi|a.# unsh|
|000000f0| 61 72 2c 20 6f 72 20 62 | 79 20 74 79 70 69 6e 67 |ar, or b|y typing|
|00000100| 20 22 73 68 20 3c 66 69 | 6c 65 22 2c 20 65 2e 67 | "sh <fi|le", e.g|
|00000110| 2e 2e 20 20 49 66 20 74 | 68 69 73 20 61 72 63 68 |..  If t|his arch|
|00000120| 69 76 65 20 69 73 20 63 | 6f 6d 70 6c 65 74 65 2c |ive is c|omplete,|
|00000130| 20 79 6f 75 0a 23 20 77 | 69 6c 6c 20 73 65 65 20 | you.# w|ill see |
|00000140| 74 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 6d 65 |the foll|owing me|
|00000150| 73 73 61 67 65 20 61 74 | 20 74 68 65 20 65 6e 64 |ssage at| the end|
|00000160| 3a 0a 23 09 09 22 45 6e | 64 20 6f 66 20 73 68 65 |:.#.."En|d of she|
|00000170| 6c 6c 20 61 72 63 68 69 | 76 65 2e 22 0a 23 20 43 |ll archi|ve.".# C|
|00000180| 6f 6e 74 65 6e 74 73 3a | 20 20 50 6f 6c 6c 20 75 |ontents:|  Poll u|
|00000190| 75 64 65 6d 6f 6e 2e 70 | 6f 6c 6c 0a 23 20 57 72 |udemon.p|oll.# Wr|
|000001a0| 61 70 70 65 64 20 62 79 | 20 64 62 75 72 72 40 73 |apped by| dburr@s|
|000001b0| 62 61 6e 65 74 20 6f 6e | 20 46 72 69 20 4a 75 6c |banet on| Fri Jul|
|000001c0| 20 32 33 20 32 30 3a 31 | 35 3a 31 38 20 31 39 39 | 23 20:1|5:18 199|
|000001d0| 33 0a 50 41 54 48 3d 2f | 62 69 6e 3a 2f 75 73 72 |3.PATH=/|bin:/usr|
|000001e0| 2f 62 69 6e 3a 2f 75 73 | 72 2f 75 63 62 20 3b 20 |/bin:/us|r/ucb ; |
|000001f0| 65 78 70 6f 72 74 20 50 | 41 54 48 0a 69 66 20 74 |export P|ATH.if t|
|00000200| 65 73 74 20 2d 66 20 27 | 50 6f 6c 6c 27 20 2d 61 |est -f '|Poll' -a|
|00000210| 20 22 24 7b 31 7d 22 20 | 21 3d 20 22 2d 63 22 20 | "${1}" |!= "-c" |
|00000220| 3b 20 74 68 65 6e 20 0a | 20 20 65 63 68 6f 20 73 |; then .|  echo s|
|00000230| 68 61 72 3a 20 57 69 6c | 6c 20 6e 6f 74 20 63 6c |har: Wil|l not cl|
|00000240| 6f 62 62 65 72 20 65 78 | 69 73 74 69 6e 67 20 66 |obber ex|isting f|
|00000250| 69 6c 65 20 5c 22 27 50 | 6f 6c 6c 27 5c 22 0a 65 |ile \"'P|oll'\".e|
|00000260| 6c 73 65 0a 65 63 68 6f | 20 73 68 61 72 3a 20 45 |lse.echo| shar: E|
|00000270| 78 74 72 61 63 74 69 6e | 67 20 5c 22 27 50 6f 6c |xtractin|g \"'Pol|
|00000280| 6c 27 5c 22 20 5c 28 32 | 34 34 20 63 68 61 72 61 |l'\" \(2|44 chara|
|00000290| 63 74 65 72 73 5c 29 0a | 73 65 64 20 22 73 2f 5e |cters\).|sed "s/^|
|000002a0| 58 2f 2f 22 20 3e 27 50 | 6f 6c 6c 27 20 3c 3c 27 |X//" >'P|oll' <<'|
|000002b0| 45 4e 44 5f 4f 46 5f 46 | 49 4c 45 27 0a 58 23 20 |END_OF_F|ILE'.X# |
|000002c0| 48 44 42 2d 69 73 68 20 | 70 6f 6c 6c 20 66 69 6c |HDB-ish |poll fil|
|000002d0| 65 0a 58 23 0a 58 23 20 | 46 6f 72 6d 61 74 3a 20 |e.X#.X# |Format: |
|000002e0| 3c 73 69 74 65 3e 3c 74 | 61 62 3e 3c 68 6f 75 72 |<site><t|ab><hour|
|000002f0| 31 3e 20 3c 68 6f 75 72 | 32 3e 20 2e 2e 2e 0a 58 |1> <hour|2> ....X|
|00000300| 23 20 4f 4e 4c 59 20 4f | 4e 45 20 54 41 42 20 42 |# ONLY O|NE TAB B|
|00000310| 45 54 57 45 45 4e 20 46 | 49 45 4c 44 53 2e 2e 2e |ETWEEN F|IELDS...|
|00000320| 20 6d 6f 72 65 20 6d 61 | 79 20 77 6f 72 6b 2c 20 | more ma|y work, |
|00000330| 62 75 74 20 49 20 68 61 | 76 65 20 61 62 73 6f 6c |but I ha|ve absol|
|00000340| 75 74 65 6c 79 20 6e 6f | 0a 58 23 20 69 64 65 61 |utely no|.X# idea|
|00000350| 20 69 66 20 69 74 20 77 | 69 6c 6c 20 77 6f 72 6b | if it w|ill work|
|00000360| 20 61 74 20 61 6c 6c 2e | 0a 58 23 0a 58 23 20 63 | at all.|.X#.X# c|
|00000370| 6f 6d 6d 65 6e 74 20 6c | 69 6e 65 73 20 28 62 65 |omment l|ines (be|
|00000380| 67 69 6e 20 77 69 74 68 | 20 60 23 27 29 20 61 72 |gin with| `#') ar|
|00000390| 65 20 69 67 6e 6f 72 65 | 64 2e 0a 58 0a 58 64 73 |e ignore|d..X.Xds|
|000003a0| 63 68 75 62 09 32 30 20 | 32 31 20 32 32 0a 58 67 |chub.20 |21 22.Xg|
|000003b0| 64 09 32 30 20 32 31 20 | 32 32 0a 45 4e 44 5f 4f |d.20 21 |22.END_O|
|000003c0| 46 5f 46 49 4c 45 0a 69 | 66 20 74 65 73 74 20 32 |F_FILE.i|f test 2|
|000003d0| 34 34 20 2d 6e 65 20 60 | 77 63 20 2d 63 20 3c 27 |44 -ne `|wc -c <'|
|000003e0| 50 6f 6c 6c 27 60 3b 20 | 74 68 65 6e 0a 20 20 20 |Poll'`; |then.   |
|000003f0| 20 65 63 68 6f 20 73 68 | 61 72 3a 20 5c 22 27 50 | echo sh|ar: \"'P|
|00000400| 6f 6c 6c 27 5c 22 20 75 | 6e 70 61 63 6b 65 64 20 |oll'\" u|npacked |
|00000410| 77 69 74 68 20 77 72 6f | 6e 67 20 73 69 7a 65 21 |with wro|ng size!|
|00000420| 0a 66 69 0a 23 20 65 6e | 64 20 6f 66 20 27 50 6f |.fi.# en|d of 'Po|
|00000430| 6c 6c 27 0a 66 69 0a 69 | 66 20 74 65 73 74 20 2d |ll'.fi.i|f test -|
|00000440| 66 20 27 75 75 64 65 6d | 6f 6e 2e 70 6f 6c 6c 27 |f 'uudem|on.poll'|
|00000450| 20 2d 61 20 22 24 7b 31 | 7d 22 20 21 3d 20 22 2d | -a "${1|}" != "-|
|00000460| 63 22 20 3b 20 74 68 65 | 6e 20 0a 20 20 65 63 68 |c" ; the|n .  ech|
|00000470| 6f 20 73 68 61 72 3a 20 | 57 69 6c 6c 20 6e 6f 74 |o shar: |Will not|
|00000480| 20 63 6c 6f 62 62 65 72 | 20 65 78 69 73 74 69 6e | clobber| existin|
|00000490| 67 20 66 69 6c 65 20 5c | 22 27 75 75 64 65 6d 6f |g file \|"'uudemo|
|000004a0| 6e 2e 70 6f 6c 6c 27 5c | 22 0a 65 6c 73 65 0a 65 |n.poll'\|".else.e|
|000004b0| 63 68 6f 20 73 68 61 72 | 3a 20 45 78 74 72 61 63 |cho shar|: Extrac|
|000004c0| 74 69 6e 67 20 5c 22 27 | 75 75 64 65 6d 6f 6e 2e |ting \"'|uudemon.|
|000004d0| 70 6f 6c 6c 27 5c 22 20 | 5c 28 39 34 31 20 63 68 |poll'\" |\(941 ch|
|000004e0| 61 72 61 63 74 65 72 73 | 5c 29 0a 73 65 64 20 22 |aracters|\).sed "|
|000004f0| 73 2f 5e 58 2f 2f 22 20 | 3e 27 75 75 64 65 6d 6f |s/^X//" |>'uudemo|
|00000500| 6e 2e 70 6f 6c 6c 27 20 | 3c 3c 27 45 4e 44 5f 4f |n.poll' |<<'END_O|
|00000510| 46 5f 46 49 4c 45 27 0a | 58 23 21 2f 62 69 6e 2f |F_FILE'.|X#!/bin/|
|00000520| 73 68 0a 58 23 0a 58 23 | 20 54 68 69 73 20 69 73 |sh.X#.X#| This is|
|00000530| 20 6d 79 20 69 6d 70 65 | 72 73 6f 6e 61 74 69 6f | my impe|rsonatio|
|00000540| 6e 20 6f 66 20 74 68 65 | 20 48 44 42 20 75 75 64 |n of the| HDB uud|
|00000550| 65 6d 6f 6e 2e 70 6f 6c | 6c 20 73 63 72 69 70 74 |emon.pol|l script|
|00000560| 2e 0a 58 23 20 59 65 73 | 2c 20 49 20 6b 6e 6f 77 |..X# Yes|, I know|
|00000570| 2c 20 74 68 69 73 20 69 | 73 20 76 65 72 79 20 63 |, this i|s very c|
|00000580| 6c 75 6d 73 79 20 61 6e | 64 20 63 6c 75 6e 6b 79 |lumsy an|d clunky|
|00000590| 2e 2e 2e 20 61 68 68 20 | 77 65 6c 6c 2c 20 49 27 |... ahh |well, I'|
|000005a0| 76 65 20 61 6c 77 61 79 | 73 0a 58 23 20 62 65 65 |ve alway|s.X# bee|
|000005b0| 6e 20 62 65 74 74 65 72 | 20 61 74 20 43 2f 70 61 |n better| at C/pa|
|000005c0| 73 63 61 6c 2f 65 74 63 | 20 74 68 61 6e 20 53 68 |scal/etc| than Sh|
|000005d0| 65 6c 6c 20 70 72 6f 67 | 72 61 6d 6d 69 6e 67 2e |ell prog|ramming.|
|000005e0| 2e 2e 20 3a 28 0a 58 0a | 58 23 20 63 68 61 6e 67 |.. :(.X.|X# chang|
|000005f0| 65 20 4c 49 42 44 49 52 | 20 74 6f 20 77 68 65 72 |e LIBDIR| to wher|
|00000600| 65 20 55 55 43 50 20 6c | 69 62 72 61 72 79 2f 63 |e UUCP l|ibrary/c|
|00000610| 6f 6e 66 2e 20 66 69 6c | 65 73 20 61 72 65 0a 58 |onf. fil|es are.X|
|00000620| 23 20 63 68 61 6e 67 65 | 20 53 50 4f 4f 4c 44 49 |# change| SPOOLDI|
|00000630| 52 20 74 6f 20 74 68 65 | 20 55 55 43 50 20 73 70 |R to the| UUCP sp|
|00000640| 6f 6f 6c 20 64 69 72 65 | 63 74 6f 72 79 2e 20 20 |ool dire|ctory.  |
|00000650| 49 74 20 6d 75 73 74 20 | 62 65 20 48 44 42 2d 69 |It must |be HDB-i|
|00000660| 73 68 2e 0a 58 4c 49 42 | 44 49 52 3d 2f 75 73 72 |sh..XLIB|DIR=/usr|
|00000670| 2f 6c 69 62 2f 75 75 63 | 70 3b 20 65 78 70 6f 72 |/lib/uuc|p; expor|
|00000680| 74 20 4c 49 42 44 49 52 | 0a 58 53 50 4f 4f 4c 44 |t LIBDIR|.XSPOOLD|
|00000690| 49 52 3d 2f 75 73 72 2f | 73 70 6f 6f 6c 2f 75 75 |IR=/usr/|spool/uu|
|000006a0| 63 70 3b 20 65 78 70 6f | 72 74 20 53 50 4f 4f 4c |cp; expo|rt SPOOL|
|000006b0| 44 49 52 0a 58 0a 58 23 | 23 23 20 20 6e 6f 20 63 |DIR.X.X#|##  no c|
|000006c0| 68 61 6e 67 65 73 20 6e | 65 65 64 65 64 20 70 61 |hanges n|eeded pa|
|000006d0| 73 74 20 68 65 72 65 20 | 20 23 23 23 0a 58 0a 58 |st here | ###.X.X|
|000006e0| 48 4f 55 52 3d 60 64 61 | 74 65 20 2b 25 48 60 3b |HOUR=`da|te +%H`;|
|000006f0| 20 65 78 70 6f 72 74 20 | 48 4f 55 52 0a 58 0a 58 | export |HOUR.X.X|
|00000700| 69 66 20 5b 20 2d 66 20 | 24 7b 4c 49 42 44 49 52 |if [ -f |${LIBDIR|
|00000710| 7d 2f 50 6f 6c 6c 20 5d | 3b 20 74 68 65 6e 0a 58 |}/Poll ]|; then.X|
|00000720| 09 66 6f 72 20 53 59 53 | 20 69 6e 20 60 75 75 6e |.for SYS| in `uun|
|00000730| 61 6d 65 60 0a 58 09 64 | 6f 0a 58 09 09 43 48 4f |ame`.X.d|o.X..CHO|
|00000740| 49 43 45 53 3d 22 60 67 | 72 65 70 20 22 5e 24 53 |ICES="`g|rep "^$S|
|00000750| 59 53 5b 09 5d 22 20 24 | 7b 4c 49 42 44 49 52 7d |YS[.]" $|{LIBDIR}|
|00000760| 2f 50 6f 6c 6c 20 7c 20 | 61 77 6b 20 2d 46 27 09 |/Poll | |awk -F'.|
|00000770| 27 20 5c 0a 58 09 09 09 | 27 7b 20 70 72 69 6e 74 |' \.X...|'{ print|
|00000780| 20 24 32 20 7d 27 60 22 | 0a 58 09 09 44 4f 49 54 | $2 }'`"|.X..DOIT|
|00000790| 3d 22 6e 6f 22 0a 58 09 | 09 66 6f 72 20 48 20 69 |="no".X.|.for H i|
|000007a0| 6e 20 24 43 48 4f 49 43 | 45 53 0a 58 09 09 64 6f |n $CHOIC|ES.X..do|
|000007b0| 0a 58 09 09 09 69 66 20 | 5b 20 22 24 48 4f 55 52 |.X...if |[ "$HOUR|
|000007c0| 22 20 3d 20 22 24 48 22 | 20 5d 3b 20 74 68 65 6e |" = "$H"| ]; then|
|000007d0| 0a 58 09 09 09 09 44 4f | 49 54 3d 22 79 65 73 22 |.X....DO|IT="yes"|
|000007e0| 0a 58 09 09 09 66 69 0a | 58 09 09 64 6f 6e 65 0a |.X...fi.|X..done.|
|000007f0| 58 09 09 69 66 20 5b 20 | 22 24 44 4f 49 54 22 20 |X..if [ |"$DOIT" |
|00000800| 3d 20 22 79 65 73 22 20 | 5d 3b 20 74 68 65 6e 0a |= "yes" |]; then.|
|00000810| 58 09 09 09 69 66 20 5b | 20 21 20 2d 64 20 24 7b |X...if [| ! -d ${|
|00000820| 53 50 4f 4f 4c 44 49 52 | 7d 2f 24 7b 53 59 53 7d |SPOOLDIR|}/${SYS}|
|00000830| 20 5d 3b 20 74 68 65 6e | 0a 58 09 09 09 09 6d 6b | ]; then|.X....mk|
|00000840| 64 69 72 20 24 7b 53 50 | 4f 4f 4c 44 49 52 7d 2f |dir ${SP|OOLDIR}/|
|00000850| 24 7b 53 59 53 7d 0a 58 | 09 09 09 66 69 0a 58 09 |${SYS}.X|...fi.X.|
|00000860| 09 09 63 68 6d 6f 64 20 | 37 35 35 20 24 7b 53 50 |..chmod |755 ${SP|
|00000870| 4f 4f 4c 44 49 52 7d 2f | 24 7b 53 59 53 7d 0a 58 |OOLDIR}/|${SYS}.X|
|00000880| 09 09 09 74 6f 75 63 68 | 20 24 7b 53 50 4f 4f 4c |...touch| ${SPOOL|
|00000890| 44 49 52 7d 2f 24 7b 53 | 59 53 7d 2f 43 2e 24 7b |DIR}/${S|YS}/C.${|
|000008a0| 53 59 53 7d 6e 30 30 30 | 30 0a 58 09 09 09 63 68 |SYS}n000|0.X...ch|
|000008b0| 6d 6f 64 20 36 34 34 20 | 24 7b 53 50 4f 4f 4c 44 |mod 644 |${SPOOLD|
|000008c0| 49 52 7d 2f 24 7b 53 59 | 53 7d 2f 43 2e 24 7b 53 |IR}/${SY|S}/C.${S|
|000008d0| 59 53 7d 6e 30 30 30 30 | 0a 58 09 09 66 69 0a 58 |YS}n0000|.X..fi.X|
|000008e0| 09 64 6f 6e 65 0a 58 66 | 69 0a 45 4e 44 5f 4f 46 |.done.Xf|i.END_OF|
|000008f0| 5f 46 49 4c 45 0a 69 66 | 20 74 65 73 74 20 39 34 |_FILE.if| test 94|
|00000900| 31 20 2d 6e 65 20 60 77 | 63 20 2d 63 20 3c 27 75 |1 -ne `w|c -c <'u|
|00000910| 75 64 65 6d 6f 6e 2e 70 | 6f 6c 6c 27 60 3b 20 74 |udemon.p|oll'`; t|
|00000920| 68 65 6e 0a 20 20 20 20 | 65 63 68 6f 20 73 68 61 |hen.    |echo sha|
|00000930| 72 3a 20 5c 22 27 75 75 | 64 65 6d 6f 6e 2e 70 6f |r: \"'uu|demon.po|
|00000940| 6c 6c 27 5c 22 20 75 6e | 70 61 63 6b 65 64 20 77 |ll'\" un|packed w|
|00000950| 69 74 68 20 77 72 6f 6e | 67 20 73 69 7a 65 21 0a |ith wron|g size!.|
|00000960| 66 69 0a 63 68 6d 6f 64 | 20 2b 78 20 27 75 75 64 |fi.chmod| +x 'uud|
|00000970| 65 6d 6f 6e 2e 70 6f 6c | 6c 27 0a 23 20 65 6e 64 |emon.pol|l'.# end|
|00000980| 20 6f 66 20 27 75 75 64 | 65 6d 6f 6e 2e 70 6f 6c | of 'uud|emon.pol|
|00000990| 6c 27 0a 66 69 0a 65 63 | 68 6f 20 73 68 61 72 3a |l'.fi.ec|ho shar:|
|000009a0| 20 45 6e 64 20 6f 66 20 | 73 68 65 6c 6c 20 61 72 | End of |shell ar|
|000009b0| 63 68 69 76 65 2e 0a 65 | 78 69 74 20 30 0a       |chive..e|xit 0.  |
+--------+-------------------------+-------------------------+--------+--------+