fyi> popme version 0.04 (simple pop3 client) (3/3)

4 views
Skip to first unread message

Robin A. Goodfellow

unread,
Oct 10, 1997, 3:00:00 AM10/10/97
to

Submitted-by: r...@earthling.net
Archive-name: popme-0.04/part03

---- Cut Here and feed the following to sh ----
#!/bin/sh
# This is part 03 of popme-0.04.
touch -am 1231235999 $$.touch >/dev/null 2>&1
if test ! -f 1231235999 && test -f $$.touch; then
shar_touch=touch
else
shar_touch=:
echo 'WARNING: not restoring timestamps'
fi
rm -f 1231235999 $$.touch
#
# ============= popme-0.04/popme.ps ==============
if test ! -d 'popme-0.04'; then
echo 'x - creating directory popme-0.04'
mkdir 'popme-0.04'
fi
if test -f 'popme-0.04/popme.ps' && test X"$1" != X"-c"; then
echo 'x - skipping popme-0.04/popme.ps (File already exists)'
else
echo 'x - extracting popme-0.04/popme.ps (text)'
sed 's/^X//' << 'United Earthlings, Inc.' > 'popme-0.04/popme.ps' &&
%!PS-Adobe-3.0
%%Creator: groff version 1.08
%%DocumentNeededResources: font Times-Roman
%%+ font Times-Bold
%%+ font Times-Italic
%%DocumentSuppliedResources: procset grops 1.08 0
%%Pages: 2
%%PageOrder: Ascend
%%Orientation: Portrait
%%EndComments
%%BeginProlog
%%BeginResource: procset grops 1.08 0
/setpacking where{
pop
currentpacking
true setpacking
}if
/grops 120 dict dup begin
/SC 32 def
/A/show load def
/B{0 SC 3 -1 roll widthshow}bind def
/C{0 exch ashow}bind def
/D{0 exch 0 SC 5 2 roll awidthshow}bind def
/E{0 rmoveto show}bind def
/F{0 rmoveto 0 SC 3 -1 roll widthshow}bind def
/G{0 rmoveto 0 exch ashow}bind def
/H{0 rmoveto 0 exch 0 SC 5 2 roll awidthshow}bind def
/I{0 exch rmoveto show}bind def
/J{0 exch rmoveto 0 SC 3 -1 roll widthshow}bind def
/K{0 exch rmoveto 0 exch ashow}bind def
/L{0 exch rmoveto 0 exch 0 SC 5 2 roll awidthshow}bind def
/M{rmoveto show}bind def
/N{rmoveto 0 SC 3 -1 roll widthshow}bind def
/O{rmoveto 0 exch ashow}bind def
/P{rmoveto 0 exch 0 SC 5 2 roll awidthshow}bind def
/Q{moveto show}bind def
/R{moveto 0 SC 3 -1 roll widthshow}bind def
/S{moveto 0 exch ashow}bind def
/T{moveto 0 exch 0 SC 5 2 roll awidthshow}bind def
/SF{
findfont exch
[exch dup 0 exch 0 exch neg 0 0]makefont
dup setfont
[exch/setfont cvx]cvx bind def
}bind def
/MF{
findfont
[5 2 roll
0 3 1 roll
neg 0 0]makefont
dup setfont
[exch/setfont cvx]cvx bind def
}bind def
/level0 0 def
/RES 0 def
/PL 0 def
/LS 0 def
/PLG{
gsave newpath clippath pathbbox grestore
exch pop add exch pop
}bind def
/BP{
/level0 save def
1 setlinecap
1 setlinejoin
72 RES div dup scale
LS{
90 rotate
}{
0 PL translate
}ifelse
1 -1 scale
}bind def
/EP{
level0 restore
showpage
}bind def
/DA{
newpath arcn stroke
}bind def
/SN{
transform
X.25 sub exch .25 sub exch
round .25 add exch round .25 add exch
itransform
}bind def
/DL{
SN
moveto
SN
lineto stroke
}bind def
/DC{
newpath 0 360 arc closepath
}bind def
/TM matrix def
/DE{
TM currentmatrix pop
translate scale newpath 0 0 .5 0 360 arc closepath
TM setmatrix
}bind def
/RC/rcurveto load def
/RL/rlineto load def
/ST/stroke load def
/MT/moveto load def
/CL/closepath load def
/FL{
currentgray exch setgray fill setgray
}bind def
/BL/fill load def
/LW/setlinewidth load def
/RE{
findfont
dup maxlength 1 index/FontName known not{1 add}if dict begin
{
1 index/FID ne{def}{pop pop}ifelse
}forall
/Encoding exch def
dup/FontName exch def
currentdict end definefont pop
}bind def
/DEFS 0 def
/EBEGIN{
moveto
DEFS begin
}bind def
/EEND/end load def
/CNT 0 def
/level1 0 def
/PBEGIN{
/level1 save def
translate
div 3 1 roll div exch scale
neg exch neg exch translate
0 setgray
0 setlinecap
1 setlinewidth
0 setlinejoin
10 setmiterlimit
[]0 setdash
/setstrokeadjust where{
pop
false setstrokeadjust
}if
/setoverprint where{
pop
false setoverprint
}if
newpath
/CNT countdictstack def
userdict begin
/showpage{}def
}bind def
/PEND{
clear
countdictstack CNT sub{end}repeat
level1 restore
}bind def
end def
/setpacking where{
pop
setpacking
}if
%%EndResource
%%IncludeResource: font Times-Roman
%%IncludeResource: font Times-Bold
%%IncludeResource: font Times-Italic
grops begin/DEFS 1 dict def DEFS begin/u{.001 mul}bind def end/RES 72 def/PL
792 def/LS false def/ENC0[/asciicircum/asciitilde/Scaron/Zcaron/scaron/zcaron
/Ydieresis/trademark/quotesingle/.notdef/.notdef/.notdef/.notdef/.notdef
/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef
/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/.notdef/space
/exclam/quotedbl/numbersign/dollar/percent/ampersand/quoteright/parenleft
/parenright/asterisk/plus/comma/hyphen/period/slash/zero/one/two/three/four
/five/six/seven/eight/nine/colon/semicolon/less/equal/greater/question/at/A/B/C
/D/E/F/G/H/I/J/K/L/M/N/O/P/Q/R/S/T/U/V/W/X/Y/Z/bracketleft/backslash
/bracketright/circumflex/underscore/quoteleft/a/b/c/d/e/f/g/h/i/j/k/l/m/n/o/p/q
/r/s/t/u/v/w/x/y/z/braceleft/bar/braceright/tilde/.notdef/quotesinglbase
/guillemotleft/guillemotright/bullet/florin/fraction/perthousand/dagger
/daggerdbl/endash/emdash/ff/fi/fl/ffi/ffl/dotlessi/dotlessj/grave/hungarumlaut
/dotaccent/breve/caron/ring/ogonek/quotedblleft/quotedblright/oe/lslash
/quotedblbase/OE/Lslash/.notdef/exclamdown/cent/sterling/currency/yen/brokenbar
/section/dieresis/copyright/ordfeminine/guilsinglleft/logicalnot/minus
/registered/macron/degree/plusminus/twosuperior/threesuperior/acute/mu
/paragraph/periodcentered/cedilla/onesuperior/ordmasculine/guilsinglright
/onequarter/onehalf/threequarters/questiondown/Agrave/Aacute/Acircumflex/Atilde
/Adieresis/Aring/AE/Ccedilla/Egrave/Eacute/Ecircumflex/Edieresis/Igrave/Iacute
/Icircumflex/Idieresis/Eth/Ntilde/Ograve/Oacute/Ocircumflex/Otilde/Odieresis
/multiply/Oslash/Ugrave/Uacute/Ucircumflex/Udieresis/Yacute/Thorn/germandbls
/agrave/aacute/acircumflex/atilde/adieresis/aring/ae/ccedilla/egrave/eacute
/ecircumflex/edieresis/igrave/iacute/icircumflex/idieresis/eth/ntilde/ograve
/oacute/ocircumflex/otilde/odieresis/divide/oslash/ugrave/uacute/ucircumflex
/udieresis/yacute/thorn/ydieresis]def/Times-Italic@0 ENC0/Times-Italic RE
/Times-Bold@0 ENC0/Times-Bold RE/Times-Roman@0 ENC0/Times-Roman RE
%%EndProlog
%%Page: 1 1
%%BeginPageSetup
BP
%%EndPageSetup
/F0 10/Times-Roman@0 SF 143.025(POPME\(1\) USER)72 48 R 143.025
(COMMANDS POPME\(1\))2.5 F/F1 9/Times-Bold@0 SF -.18(NA)72 84 S(ME).18 E F0
(popme \255 simple mail client for post of)108 96 Q(\214ce protocol v)-.25 E
(ersion 3)-.15 E F1(SYNOPSIS)72 112.8 Q/F2 10/Times-Bold@0 SF(popme --ser)108
124.8 Q -.1(ve)-.1 G(r).1 E/F3 10/Times-Italic@0 SF(SER)2.5 E(V)-.18 E F2
(--user)2.5 E F3(USER)2.5 E F2(--passwd)2.5 E F3(PWD)2.5 E F0([options] ...)2.5
E(The options are:)108 146.4 Q .518
(`--port' or `-P', `--delete' or `-D', `--deb)144 158.4 R .518
(ug' or `-d', `--help' or `-h', `--output FILE' or `-o FILE',)-.2 F(`--v)144
170.4 Q(erbose' or `-v', `--v)-.15 E(ersion' or `-V', `--w)-.15 E
(arranty' or `-W'.)-.1 E F1(DESCRIPTION)72 192 Q F2 -.2(Po)108 204 S(pme).2 E
F0 .132(is a simple mail client for post of)2.632 F .132(\214ce protocol v)-.25
F .132(ersion 3 mail serv)-.15 F 2.632(ers. It)-.15 F .132
(lets you specify your POP3)2.632 F(serv)108 216 Q(er)-.15 E 3.586(,y)-.4 G
1.086(our POP3 account name, and your POP3 passw)142.966 216 R 1.086(ord to do)
-.1 F 1.086(wnload your email messages. The mail)-.25 F .45
(can be left on the serv)108 228 R(er)-.15 E 2.95(,o)-.4 G 2.95(rm)215.95 228 S
X.45(aye be deleted whate)230.01 228 R -.15(ve)-.25 G 2.951(ry).15 G .451
(ou choose. Y)335.261 228 R .451(ou can retrie)-1.1 F .751 -.15(ve t)-.25 H
X.451(he full contents of all).15 F 1.203
(messages or only the top N lines. \(CA)108 240 R(VEA)-1.35 E 2.203 -.5(T: I)
-1.11 H 3.703(fy).5 G 1.203(ou decide to do)314.177 240 R 1.202
(wnload only the top N lines remember)-.25 F(NO)108 252 Q 2.707(Tt)-.4 G 2.707
(od)133.637 252 S .208(elete the messages; otherwise the)146.344 252 R(y')-.15
E .208(re gone.\))-.5 F -1.1(Yo)5.208 G 2.708(um)1.1 G .208
(ay also alter the IP port used to connect to the)355.17 252 R 1.436(POP3 serv)
108 264 R 1.436(er; in cases you use a "hidden" POP3 serv)-.15 F 1.436
(er or ha)-.15 F 1.736 -.15(ve t)-.2 H 3.936(oc).15 G(ircumv)393.298 264 Q
1.436(ent a \214re)-.15 F -.1(wa)-.25 G 1.435(ll, or must use a).1 F(proxy)108
276 Q 6.441(.Y)-.65 G 1.441(ou can also turn on the deb)145.741 276 R 1.441
(ugging and v)-.2 F 1.442(erbose options for educational purposes and see what)
-.15 F F2(popme)108 288 Q F0(is doing and ho)2.5 E 2.5(wt)-.25 G
(he POP3 protocol w)213.03 288 Q(orks.)-.1 E F1(OPTIONS)72 304.8 Q F2(popme)108
316.8 Q F0(recognizes the follo)2.5 E(wing options:)-.25 E F2(-s, --ser)108
333.6 Q -.1(ve)-.1 G(r).1 E F3(SER)2.5 E(V)-.18 E F0(to set the POP3 serv)144
345.6 Q(er)-.15 E F3(SER)2.5 E(V)-.18 E F0(.)A F2(-u, --user)108 362.4 Q F3(ID)
2.5 E F0(to set the POP3 user)144 374.4 Q F3(ID)2.5 E F0(.)A F2(-p, --passwd)
108 391.2 Q F3(PWD)2.5 E F0(to set the POP3 passw)144 403.2 Q(ord)-.1 E F3(PWD)
2.5 E F0(.)A F2(-P)108 420 Q 2.5(,-)-.92 G(-port)124.85 420 Q F3(PORT)2.5 E F0
(to set the POP3 serv)144 432 Q(er port. Def)-.15 E(ault is port 110, per RFC.)
-.1 E F2(-D, --delete)108 448.8 Q F0(to delete mail from serv)144 460.8 Q(er)
-.15 E 2.5(.D)-.55 G(ef)258.83 460.8 Q(ault is to k)-.1 E(eep mail.)-.1 E F2
(-T)108 477.6 Q 2.5(,-)-.74 G(-top)125.59 477.6 Q F3(LINES)2.5 E F0
(to get only the top)144 489.6 Q F3(LINES)2.5 E F0(of mail.)2.5 E F2(-d, --deb)
108 506.4 Q(ug)-.2 E F0(to print deb)144 518.4 Q
(ugging information, which may help you understand ho)-.2 E 2.5(wP)-.25 G
(OP3 w)427.7 518.4 Q(orks.)-.1 E F2(-h, --help)108 535.2 Q F0
(to print this information.)144 547.2 Q F2(-o, --output)108 564 Q F3(FILE)2.5 E
F0(to specify the output)144 576 Q F3(FILE)2.5 E F0 5(.I)C 2.5(fy)260.38 576 S
(ou do not specify an output \214le, the program writes to)271.21 576 Q F3
(stdout.)2.5 E F2(-v)108 592.8 Q 2.5(,-)-.55 G(-v)124.11 592.8 Q(erbose)-.1 E
F0(to print information about what is being done.)144 604.8 Q F2(-V)108 621.6 Q
2.5(,-)-1.29 G(-v)125.59 621.6 Q(ersion)-.1 E F0(to print v)144 633.6 Q
(ersion and COPYRIGHT information.)-.15 E F2(-W)108 650.4 Q 2.5(,-)-.92 G
(-warranty)128.74 650.4 Q F0(to print W)144 662.4 Q(ARRANTY information.)-1.2 E
F1(SEE ALSO)72 679.2 Q F2(elm)108 691.2 Q F0(\(1\),)A F2(eudora)2.5 E F0
(\(1\),)A F2(mh)2.5 E F0(\(1\),)A F2(netscape)2.5 E F0(\(1\),)A F2(pine)2.5 E
F0(\(1\),)A F2(zmail)2.5 E F0(\(1\).)A -1.11(Ve)72 768 S(rsion 0.04)1.11 E
(October 1997)278.645 768 Q(1)535 768 Q EP
%%Page: 2 2
%%BeginPageSetup
BP
%%EndPageSetup
/F0 10/Times-Roman@0 SF 143.025(POPME\(1\) USER)72 48 R 143.025
(COMMANDS POPME\(1\))2.5 F/F1 9/Times-Bold@0 SF(EXAMPLES)72 84 Q F0(Sho)108 96
Q 2.5(wm)-.25 G 2.5(em)140.81 96 S 2.5(ye)155.53 96 S(mail:)167.47 96 Q -.15
(ex)144 108 S(ample%).15 E/F2 10/Times-Italic@0 SF
(popme --server pop3.earthling)2.5 E(.net --user r)-.15 E .2 -.1(ag -)-.15 H
(-passwd foobar).1 E F0(Sho)108 124.8 Q 2.5(wm)-.25 G 2.5(em)140.81 124.8 S 2.5
(ye)155.53 124.8 S(mail and delete it from the serv)167.47 124.8 Q(er:)-.15 E
-.15(ex)144 136.8 S(ample%).15 E F2(popme -s pop3.earthling)2.5 E(.net -u r)
-.15 E .2 -.1(ag -)-.15 H 2.5(pf).1 G(oobar -D)344.26 136.8 Q F0(Sa)108 153.6 Q
X.3 -.15(ve m)-.2 H 2.5(ye).15 G
(mail in \214le "mbox" deleting it from the serv)149.31 153.6 Q(er:)-.15 E -.15
(ex)144 165.6 S(ample%).15 E F2(popme -s pop3.earthling)2.5 E(.net -u r)-.15 E
X.2 -.1(ag -)-.15 H 2.5(pf).1 G(oobar -D -o mbox)344.26 165.6 Q F0(Sho)108 182.4
Q 2.5(wm)-.25 G 2.5(et)140.81 182.4 S(he top 5 lines \(en)150.53 182.4 Q -.15
(ve)-.4 G(lope headers e).15 E(xcluded\) of my email messages:)-.15 E -.15(ex)
144 194.4 S(ample%).15 E F2(popme -s pop3.earthling)2.5 E(.net -u r)-.15 E .2
-.1(ag -)-.15 H 2.5(pf).1 G(oobar -T 5)344.26 194.4 Q F0(Sa)108 211.2 Q .3 -.15
(ve m)-.2 H 2.5(ye).15 G(mail in \214le "mbox" from a serv)149.31 211.2 Q
(er using a non-standard port for POP3 deli)-.15 E -.15(ve)-.25 G(ry:).15 E
-.15(ex)144 223.2 S(ample%).15 E F2(popme -s pop3.earthling)2.5 E(.net -u r)
-.15 E .2 -.1(ag -)-.15 H 2.5(pf).1 G(oobar -P 10110 -o mbox)344.26 223.2 Q F0
(In cases when there is no email w)108 240 Q(aiting for you)-.1 E/F3 10
/Times-Bold@0 SF(popme)2.5 E F0(will prompt you with:)2.5 E F2(popme: Sorry)144
256.8 Q 2.5(,n)-.55 G 2.5<6f8c>208.16 256.8 S(sh.)220.66 256.8 Q F0 .831
(After you')108 273.6 R 1.131 -.15(ve s)-.5 H .831(ucessfully sa).15 F -.15(ve)
-.2 G 3.331(dy).15 G .83
(our email to an mbox \214le, you can process the mail using your f)241.404
273.6 R -.2(avo)-.1 G(urite).2 E(mailreader)108 285.6 Q 2.5(,l)-.4 G(ik)158.14
285.6 Q(e)-.1 E F3(elm)2.5 E F0(\(1\),)A F3(pine)2.5 E F0(\(1\),)A F3(mh)2.5 E
F0(\(1\).)A(Process my email from "mbox" \214le using)108 302.4 Q F3(elm)2.5 E
F0(\(1\):)A -.15(ex)144 314.4 S(ample%).15 E F2(elm -f mbox)2.5 E F1 -.09(BU)72
331.2 S(GS).09 E F0(Bugs? In my programs? Are you kidding??)108 343.2 Q F1
-.855 -1.305(AV A)72 360 T(ILABILITY)1.305 E F3 -.2(Po)108 372 S(pme).2 E F0
X.836(has been cross posted to)3.335 F/F4 9/Times-Roman@0 SF(USENET')3.336 E(s)
-.495 E F3(alt.sour)3.086 E .836(ces, comp.sour)-.18 F(ces.unix)-.18 E F0 .836
(and is consequently a)3.336 F -.25(va)-.2 G(ilable).25 E
(from your local netne)108 384 Q(ws archi)-.25 E -.15(ve)-.25 G(.).15 E F1 -.45
(AU)72 400.8 S(THOR).45 E F0(Cop)108 412.8 Q
(yright \251 1997 Robin A. Goodfello)-.1 E 1.3 -.65(w. A)-.25 H
(ll rights reserv).65 E(ed.)-.15 E(Send b)108 424.8 Q
(ugs, comments, and all the usual \214sh to r...@earthling.net)-.2 E F1 -1.08
(WA)72 441.6 S(RRANTY)1.08 E F0 .421(This program is free softw)108 453.6 R
X.421(are; you can redistrib)-.1 F .421
(ute it and/or modify it under the terms of the)-.2 F F4(GNU)2.92 E F0(General)
2.67 E .766(Public License as published by the Free Softw)108 465.6 R .766
(are F)-.1 F .766(oundation; either v)-.15 F .766
(ersion 2 of the License, or \(at your)-.15 F(option\) an)108 477.6 Q 2.5(yl)
-.15 G(ater v)158.96 477.6 Q(ersion.)-.15 E .101(This program is distrib)108
494.4 R .101(uted in the hope that it will be useful, b)-.2 F(ut)-.2 E F4 .101
(WITHOUT ANY W)2.601 F(ARRANTY)-1.08 E(;)-.828 E F0 .1(without e)2.35 F -.15
(ve)-.25 G(n).15 E 1.204(the implied w)108 506.4 R 1.204(arranty of)-.1 F F4
(MERCHANT)3.704 E(ABILITY)-.837 E F0(or)3.455 E F4 1.205(FITNESS FOR A P)3.705
F(AR)-.828 E 1.205(TICULAR PURPOSE.)-.54 F F0 1.205(See the)5.705 F F4(GNU)
3.705 E F0(General Public License for more details.)108 518.4 Q -1.1(Yo)108
535.2 S 2.905(us)1.1 G .405(hould ha)130.915 535.2 R .705 -.15(ve r)-.2 H(ecei)
X.15 E -.15(ve)-.25 G 2.905(da).15 G(cop)-.001 E 2.904(yo)-.1 G 2.904(ft)248.998
535.2 S(he)258.012 535.2 Q F4(GNU)2.904 E F0 .404
(General Public License along with this program; if not, write)2.654 F
(to the Free Softw)108 547.2 Q(are F)-.1 E(oundation, 59 T)-.15 E
(emple Place--Suite 330, Boston, MA 02111-1307, USA.)-.7 E -1.11(Ve)72 768 S
(rsion 0.04)1.11 E(October 1997)278.645 768 Q(2)535 768 Q EP
%%Trailer
end
%%EOF
United Earthlings, Inc.
$shar_touch -am 1010103197 'popme-0.04/popme.ps' &&
chmod 0644 'popme-0.04/popme.ps' ||
echo 'restore of popme-0.04/popme.ps failed'
shar_count="`wc -c < 'popme-0.04/popme.ps'`"
test 13942 -eq "$shar_count" ||
echo "popme-0.04/popme.ps: original size 13942, current size $shar_count"
fi
# ============= popme-0.04/orig/pop3-miniclient.tar.gz ==============
if test ! -d 'popme-0.04/orig'; then
echo 'x - creating directory popme-0.04/orig'
mkdir 'popme-0.04/orig'
fi
if test -f 'popme-0.04/orig/pop3-miniclient.tar.gz' && test X"$1" != X"-c"; then
echo 'x - skipping popme-0.04/orig/pop3-miniclient.tar.gz (File already exists)'
else
echo 'x - extracting popme-0.04/orig/pop3-miniclient.tar.gz (binary)'
sed 's/^X//' << 'United Earthlings, Inc.' | uudecode &&
begin 600 popme-0.04/orig/pop3-miniclient.tar.gz
<encoded_portion_removed>
end
United Earthlings, Inc.
$shar_touch -am 0926123797 'popme-0.04/orig/pop3-miniclient.tar.gz' &&
chmod 0644 'popme-0.04/orig/pop3-miniclient.tar.gz' ||
echo 'restore of popme-0.04/orig/pop3-miniclient.tar.gz failed'
shar_count="`wc -c < 'popme-0.04/orig/pop3-miniclient.tar.gz'`"
test 4602 -eq "$shar_count" ||
echo "popme-0.04/orig/pop3-miniclient.tar.gz: original size 4602, current size $shar_count"
fi
exit 0
--
Choose life, -rag

Robin A. Goodfellow
Philosopher, Thinker, Hacker. "The structure is that there
United Earthlings, Inc. is no structure at all."
r...@earthling.net --Andrew S. Tanenbaum

Reply all
Reply to author
Forward
0 new messages