home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / misc / volume40 / ncftp / part03 < prev    next >
Encoding:
Text File  |  1993-11-02  |  61.0 KB  |  2,368 lines
  1. Newsgroups: comp.sources.misc
  2. From: mgleason@cse.unl.edu (Mike Gleason)
  3. Subject: v40i078:  ncftp - Alternative User Interface for FTP, v1.6, Part03/06
  4. Message-ID: <1993Nov2.232348.6380@sparky.sterling.com>
  5. X-Md4-Signature: e61de168560bd974970fb040dc3b4380
  6. Keywords: ncftp
  7. Sender: kent@sparky.sterling.com (Kent Landfield)
  8. Organization: NCEMRSoft
  9. Date: Tue, 2 Nov 1993 23:23:48 GMT
  10. Approved: kent@sparky.sterling.com
  11.  
  12. Submitted-by: mgleason@cse.unl.edu (Mike Gleason)
  13. Posting-number: Volume 40, Issue 78
  14. Archive-name: ncftp/part03
  15. Environment: UNIX, ANSI-C, !SVR4
  16. Supersedes: ncftp: Volume 39, Issue 53-57
  17.  
  18. #! /bin/sh
  19. # This is a shell archive.  Remove anything before this line, then feed it
  20. # into a shell via "sh file" or similar.  To overwrite existing files,
  21. # type "sh file -c".
  22. # Contents:  Makefile getpass.h ncftp.1 open.c
  23. # Wrapped by kent@sparky on Mon Nov  1 16:19:17 1993
  24. PATH=/bin:/usr/bin:/usr/ucb:/usr/local/bin:/usr/lbin:$PATH ; export PATH
  25. echo If this archive is complete, you will see the following message:
  26. echo '          "shar: End of archive 3 (of 6)."'
  27. if test -f 'Makefile' -a "${1}" != "-c" ; then 
  28.   echo shar: Will not clobber existing file \"'Makefile'\"
  29. else
  30.   echo shar: Extracting \"'Makefile'\" \(6637 characters\)
  31.   sed "s/^X//" >'Makefile' <<'END_OF_FILE'
  32. X# Makefile for ncftp
  33. X# 
  34. X# Major sections delimited by a dash lines.  If several lines set the same
  35. X# make variable, you can choose between the commented #samples, or just
  36. X# type what you want manually.
  37. X#--------------------------------------------------------------------------
  38. X
  39. X
  40. X# System dependent definitions.  See the README, part B.
  41. X#--------------------------------------------------------------------------
  42. XSDEFS = 
  43. X
  44. X
  45. X# Program definitions.  See the README, part C.
  46. X#--------------------------------------------------------------------------
  47. XPDEFS =
  48. X#PDEFS = -DGETLINE
  49. X#PDEFS = -DREADLINE -DCURSES
  50. X#PDEFS = -DSOCKS
  51. X#PDEFS = -DDEBUG -DDB_ERRS
  52. X
  53. X
  54. X# Choose your compiler and flags below.  Make sure you use an ANSI compiler
  55. X# that handles new style function declarations and prototypes (gcc should).
  56. X#--------------------------------------------------------------------------
  57. XCC = cc
  58. X#CC = gcc
  59. X
  60. X#CFLAGS = -O
  61. XCFLAGS = -O2
  62. X#CFLAGS = -g
  63. X
  64. XLFLAGS = -s
  65. X#LFLAGS =
  66. X
  67. X
  68. X# Additional libraries and/or object files.
  69. X# 
  70. X# For each library, add -lLIBNAME to the LIBS line below, for a library
  71. X#   named libLIBNAME.a.
  72. X#
  73. X# For each object file, just add the pathname of the object file.
  74. X#
  75. X# Some may need any of -lsocket, -lnet, -linet, -lintl, or -lnsl. 
  76. X# You'll need -lcurses or -ltermcap if CURSES is defined.
  77. X# You'll need -lreadline AND either -lcurses or -ltermcap if you
  78. X#   want to use the GNU Readline library.
  79. X# You'll need -lgetline (compile it as a library) if you want to use
  80. X#   getline.
  81. X# If your system is running Yellow Pages, you'll need to add the library
  82. X#   that has the YP/NIS version of getpwuid() in it (Important!)
  83. X# You'll need to know where the Rconnect.o object file is if you want
  84. X#   to use Socks.
  85. X#--------------------------------------------------------------------------
  86. XLIBS =
  87. X#LIBS = -ldbmalloc
  88. X#LIBS = -lgetline
  89. X#LIBS = -lreadline -lcurses
  90. X#LIBS = ../lib/Rconnect.o
  91. X#LIBS = -lnet -lnsl -lsocket -lcurses
  92. X
  93. X
  94. X# If the libraries are in a non-standard directory, or you if want to use
  95. X# getline or readline and they aren't installed system-wide, add the
  96. X# extra directories to look in here, using -L's.
  97. X#--------------------------------------------------------------------------
  98. XLIBDIRS =
  99. X#LIBDIRS = -L../getline
  100. X#LIBDIRS = -L../readline
  101. X
  102. X
  103. X# Additional headers.
  104. X#
  105. X# If you defined READLINE or GETLINE, you have to tell where it's header
  106. X# file can be found.
  107. X#
  108. X# For READLINE, provide a path which would find <readline/readline.h>,
  109. X#   so you would put the parent directory of the readline directory below.
  110. X#   If you had '/usr/local/readline/readline.h' you would use
  111. X#   -I/usr/local.
  112. X#
  113. X# For GETLINE, a little different. Just supply a path that would find
  114. X#   <getline.h>.  If you had '/usr/local/getline/getline.h' you would use
  115. X#   -I/usr/local/getline.
  116. X#--------------------------------------------------------------------------
  117. XHDRDIRS =
  118. X#HDRDIRS = -I../getline
  119. X#HDRDIRS = -I..
  120. X
  121. X
  122. X# If you want to 'make install,' edit these variables, otherwise don't
  123. X# worry about it.
  124. X# To install MAN style pages, set MANDIR to the proper location.
  125. X# To install CATMAN style pages, set CATMANDIR, NROFF, and PACK to the proper
  126. X# locations.
  127. X# To inhibit the installation of either, unset MANDIR/CATMANDIR.
  128. X#--------------------------------------------------------------------------
  129. XBINDIR = /usr/lbin
  130. XMANDIR = /usr/man/man1
  131. X#MANDIR = 
  132. XCATMANDIR = /usr/catman/LOCAL/g1
  133. X#CATMANDIR =
  134. XNROFF    = /usr/ucb/nroff
  135. XPACK    = pack
  136. XTEST    = test
  137. XRM = rm -f
  138. XCP = cp
  139. X
  140. X
  141. X#************************************************
  142. X#*** SHOULD NOT NEED TO EDIT BELOW THIS POINT ***
  143. X#************************************************
  144. X
  145. XDEFS = $(PDEFS) $(SDEFS)
  146. XMK = $(CC) $(CFLAGS) $(DEFS) $(HDRDIRS) $(LFLAGS) $(LIBDIRS) $(LIBS)
  147. X 
  148. XSRCS = cmds.c cmdtab.c ftp.c ftprc.c getpass.c glob.c main.c open.c set.c \
  149. Xtips.c util.c
  150. X  
  151. XHEADERS = cmds.h copyright.h defaults.h ftp.h ftprc.h getpass.h glob.h \
  152. Xmain.h open.h set.h sys.h util.h
  153. X   
  154. XOBJS = cmds.o cmdtab.o ftp.o ftprc.o getpass.o glob.o main.o open.o set.o \
  155. Xtips.o util.o
  156. X
  157. XNAME = ncftp
  158. XMAN = ncftp.1
  159. XCATMAN = ncftp.z
  160. XALL = $(SRCS) $(HEADERS) patchlevel.h Blurb README Makefile $(MAN) \
  161. Xv2_Note
  162. X
  163. XC_COMPILE = $(CC) $(CFLAGS) $(DEFS) $(HDRDIRS)
  164. XC_COMPILE2 = $(CC) $(CFLAGS) $(DEFS) -DMK='"$(MK)"' $(HDRDIRS)
  165. X
  166. Xall: $(NAME) done
  167. X
  168. X$(NAME): $(OBJS)
  169. X    $(CC) $(LFLAGS) $(LIBDIRS) $(OBJS)  -o $(NAME) $(LIBS)
  170. X
  171. Xinstall: $(NAME)
  172. X    $(CP) $(NAME) $(BINDIR)/$(NAME)
  173. X    @if $(TEST) -n '$(MANDIR)'; then \
  174. X        $(MAKE) install_man ; else true ;  fi
  175. X    @if $(TEST) -n '$(CATMANDIR)'; then \
  176. X        $(MAKE) install_catman ; else true ;  fi
  177. X
  178. Xinstall_man: 
  179. X    $(CP) $(MAN)  $(MANDIR)/$(MAN)
  180. X
  181. Xinstall_catman:  $(CATMAN)
  182. X    $(CP) $(CATMAN)  $(CATMANDIR)/$(CATMAN)
  183. X
  184. Xuninstall:
  185. X    $(RM) $(BINDIR)/$(NAME)
  186. X    $(RM) $(MANDIR)/$(MAN)
  187. X    $(RM) $(CATMANDIR)/$(CATMAN)
  188. X
  189. X$(CATMAN): $(MAN)
  190. X    rm -f tmp
  191. X    $(NROFF) -man -Tlp $(MAN) > tmp
  192. X    $(PACK) -f tmp
  193. X    mv tmp.z $(CATMAN)
  194. X
  195. Xcmds.o:
  196. X    $(C_COMPILE2) cmds.c -c
  197. X
  198. X.c.o:
  199. X    $(C_COMPILE) -c $<
  200. X
  201. Xdone: $(NAME)
  202. X    -@ls -l $(NAME)
  203. X    -@echo 'Done.'
  204. X
  205. Xclean:
  206. X    rm -f $(OBJS) $(NAME)
  207. X
  208. X# Dependencies:
  209. Xcmds.o: cmds.c 
  210. Xcmds.o: sys.h 
  211. Xcmds.o: util.h 
  212. Xcmds.o: cmds.h 
  213. Xcmds.o: main.h 
  214. Xcmds.o: ftp.h 
  215. Xcmds.o: ftprc.h 
  216. Xcmds.o: getpass.h 
  217. Xcmds.o: glob.h 
  218. Xcmds.o: open.h 
  219. Xcmds.o: set.h 
  220. Xcmds.o: defaults.h 
  221. Xcmds.o: copyright.h 
  222. Xcmdtab.o: cmdtab.c 
  223. Xcmdtab.o: sys.h 
  224. Xcmdtab.o: util.h 
  225. Xcmdtab.o: cmds.h 
  226. Xcmdtab.o: main.h 
  227. Xcmdtab.o: ftp.h 
  228. Xcmdtab.o: ftprc.h 
  229. Xcmdtab.o: glob.h 
  230. Xcmdtab.o: open.h 
  231. Xcmdtab.o: set.h 
  232. Xcmdtab.o: copyright.h 
  233. Xftp.o: ftp.c 
  234. Xftp.o: sys.h 
  235. Xftp.o: util.h 
  236. Xftp.o: ftp.h 
  237. Xftp.o: cmds.h 
  238. Xftp.o: main.h 
  239. Xftp.o: ftprc.h 
  240. Xftp.o: getpass.h 
  241. Xftp.o: defaults.h 
  242. Xftp.o: copyright.h 
  243. Xftprc.o: ftprc.c 
  244. Xftprc.o: sys.h 
  245. Xftprc.o: util.h 
  246. Xftprc.o: ftprc.h 
  247. Xftprc.o: main.h 
  248. Xftprc.o: cmds.h 
  249. Xftprc.o: set.h 
  250. Xftprc.o: defaults.h 
  251. Xftprc.o: copyright.h 
  252. Xgetpass.o: getpass.c 
  253. Xgetpass.o: sys.h 
  254. Xgetpass.o: util.h 
  255. Xgetpass.o: cmds.h 
  256. Xgetpass.o: getpass.h 
  257. Xgetpass.o: copyright.h 
  258. Xglob.o: glob.c 
  259. Xglob.o: sys.h 
  260. Xglob.o: util.h 
  261. Xglob.o: glob.h 
  262. Xglob.o: cmds.h 
  263. Xglob.o: copyright.h 
  264. Xmain.o: main.c 
  265. Xmain.o: sys.h 
  266. Xmain.o: util.h 
  267. Xmain.o: cmds.h 
  268. Xmain.o: main.h 
  269. Xmain.o: ftp.h 
  270. Xmain.o: ftprc.h 
  271. Xmain.o: open.h 
  272. Xmain.o: set.h 
  273. Xmain.o: defaults.h 
  274. Xmain.o: copyright.h 
  275. Xopen.o: open.c 
  276. Xopen.o: sys.h 
  277. Xopen.o: util.h 
  278. Xopen.o: open.h 
  279. Xopen.o: cmds.h 
  280. Xopen.o: ftp.h 
  281. Xopen.o: ftprc.h 
  282. Xopen.o: main.h 
  283. Xopen.o: defaults.h 
  284. Xopen.o: copyright.h 
  285. Xset.o: set.c 
  286. Xset.o: sys.h 
  287. Xset.o: util.h 
  288. Xset.o: cmds.h 
  289. Xset.o: main.h 
  290. Xset.o: set.h 
  291. Xset.o: defaults.h 
  292. Xset.o: copyright.h 
  293. Xtips.o: tips.c 
  294. Xtips.o: sys.h 
  295. Xtips.o: util.h 
  296. Xutil.o: util.c 
  297. Xutil.o: sys.h 
  298. Xutil.o: util.h 
  299. Xutil.o: cmds.h 
  300. Xutil.o: main.h 
  301. Xutil.o: ftp.h 
  302. Xutil.o: ftprc.h 
  303. Xutil.o: defaults.h 
  304. Xutil.o: copyright.h 
  305. END_OF_FILE
  306.   if test 6637 -ne `wc -c <'Makefile'`; then
  307.     echo shar: \"'Makefile'\" unpacked with wrong size!
  308.   fi
  309.   # end of 'Makefile'
  310. fi
  311. if test -f 'getpass.h' -a "${1}" != "-c" ; then 
  312.   echo shar: Will not clobber existing file \"'getpass.h'\"
  313. else
  314.   echo shar: Extracting \"'getpass.h'\" \(278 characters\)
  315.   sed "s/^X//" >'getpass.h' <<'END_OF_FILE'
  316. X/* Getpass.h */
  317. X
  318. X#ifndef _getpass_h_
  319. X#define _getpass_h_
  320. X
  321. X/*  $RCSfile: getpass.h,v $
  322. X *  $Revision: 14020.11 $
  323. X *  $Date: 93/05/21 05:45:36 $
  324. X */
  325. X
  326. X#define kMaxPassLen 127
  327. X
  328. Xchar *Getpass(char *prompt);
  329. Xvoid echo(FILE *fp, int on);
  330. X
  331. X#endif    /* _getpass_h_ */
  332. X
  333. X/* eof Getpass.h */
  334. END_OF_FILE
  335.   if test 278 -ne `wc -c <'getpass.h'`; then
  336.     echo shar: \"'getpass.h'\" unpacked with wrong size!
  337.   fi
  338.   # end of 'getpass.h'
  339. fi
  340. if test -f 'ncftp.1' -a "${1}" != "-c" ; then 
  341.   echo shar: Will not clobber existing file \"'ncftp.1'\"
  342. else
  343.   echo shar: Extracting \"'ncftp.1'\" \(33759 characters\)
  344.   sed "s/^X//" >'ncftp.1' <<'END_OF_FILE'
  345. X.\"-------
  346. X.\" Man page portability notes
  347. X.\"
  348. X.\" These are some notes on conventions to maintain for greatest
  349. X.\" portability of this man page to various other versions of
  350. X.\" nroff.
  351. X.\"
  352. X.\" When you want a \ to appear in the output, use \e in the man page.
  353. X.\" (NOTE this comes up in the rc grammar, where to print out '\n' the
  354. X.\" man page must contain '\en'.)
  355. X.\"
  356. X.\" Evidently not all versions of nroff allow the omission of the
  357. X.\" terminal " on a macro argument.  Thus what could be written
  358. X.\"
  359. X.\" .Cr "exec >[2] err.out
  360. X.\"
  361. X.\" in true nroffs must be written
  362. X.\"
  363. X.\" .Cr "exec >[2] err.out"
  364. X.\"
  365. X.\" instead.
  366. X.\"
  367. X.\" Use symbolic font names (e.g. R, I, B) instead of the standard
  368. X.\" font positions 1, 2, 3.  Note that for Xf to work the standard
  369. X.\" font names must be single characters.
  370. X.\"
  371. X.\" Note that sentences should end at the end of a line.  nroff and
  372. X.\" troff will supply the correct intersentence spacing, but only if
  373. X.\" the sentences end at the end of a line.  Explicit spaces, if given,
  374. X.\" are apparently honored and the normal intersentence spacing is
  375. X.\" supressed.
  376. X.\"
  377. X.\" DaviD W. Sanderson
  378. X.\"-------
  379. X.\" Dd    distance to space vertically before a "display"
  380. X.\" These are what n/troff use for interparagraph distance
  381. X.\"-------
  382. X.if t .nr Dd .4v
  383. X.if n .nr Dd 1v
  384. X.\"-------
  385. X.\" Sp    space down the interparagraph distance
  386. X.\"-------
  387. X.de Sp
  388. X.sp \\n(Ddu
  389. X..
  390. X.\"-------
  391. X.\" Ds    begin a display, indented .5 inches from the surrounding text.
  392. X.\"
  393. X.\" Note that uses of Ds and De may NOT be nested.
  394. X.\"-------
  395. X.de Ds
  396. X.Sp
  397. X.in +0.5i
  398. X.nf
  399. X..
  400. X.\"-------
  401. X.\" De    end a display (no trailing vertical spacing)
  402. X.\"-------
  403. X.de De
  404. X.fi
  405. X.in
  406. X..
  407. X.TH NcFTP 1 "" NCEMRSoft
  408. X.\"-------
  409. X.SH "NAME"
  410. X.\"-------
  411. XNcFTP \(em Internet file transfer program
  412. X.\"-------
  413. X.SH "SYNOPSIS"
  414. X.\"-------
  415. X.B ncftp
  416. X.RI [ "program options" ]
  417. X.RI [[ "open options" ]
  418. X.IR hostname [\c
  419. X.B :\c
  420. X.IR pathname ]]
  421. X.\"-------
  422. X.SH "DESCRIPTION"
  423. X.\"-------
  424. X.I NcFTP
  425. Xis a user interface to the Internet standard
  426. X.IR "File Transfer Protocol" .
  427. XThis program allows a user to transfer files to and from a remote network
  428. Xsite, and offers additional features that are not found in the standard
  429. Xinterface,
  430. X.IR ftp .
  431. X.\"-------
  432. X.SH "FEATURES"
  433. X.\"-------
  434. XProgram options will be explained later in this document.
  435. XLet's get down to business and go over the features
  436. Xthat make this program worthwhile.
  437. X.PP
  438. XHere is the list of section headers; I have my $MANPAGER environment
  439. Xvariable set to use
  440. X.RB `` "less \-i" ''
  441. Xso that I can skip to the section I
  442. Xwant (otherwise,
  443. X.BI / regex
  444. Xcommands to the pager won't match the section
  445. Xheaders because of the formatting codes;
  446. Xthe
  447. X.RB `` \-i ''
  448. Xcan search through the formatting codes)
  449. X.Ds
  450. XEstablishing the remote connection
  451. XFormat of the RC file
  452. XThe Recent-sites file
  453. XRedialing a busy remote site
  454. XSupplying a sitename from your shell's command line
  455. XUsing Colon-mode
  456. XUsing FTP-cat and FTP-more mode
  457. XSupplying a port number with the open command
  458. XDisplaying and changing program variables
  459. XProgram variables
  460. XListing a remote directory
  461. XViewing a remote directory with your pager
  462. XRedisplaying the last directory listing
  463. XFetching files from the remote host
  464. XViewing a remote file with your pager
  465. XCreating a message file on the remote host
  466. XLooking up site names and addresses
  467. XChecking the configuration of the program
  468. XUsing the command shell
  469. XCustomizing the prompt
  470. XKeeping a log of your file transfers
  471. XProgram options
  472. XA sample RC file
  473. X.De
  474. X.\"-------
  475. X.SH "Establishing the remote connection"
  476. X.\"-------
  477. XJust opening a connection to a remote server was inconvenient enough in the
  478. Xstock
  479. X.I ftp
  480. Xprogram to justify writing this program.
  481. XHere at
  482. X.IR NCEMRSoft ,
  483. Xwe want to do our business as quickly and painlessly as possible.
  484. XWe'd
  485. Xrather save time and wear and tear on our metacarpals than bother typing
  486. Xentire site names, usernames, and email addresses masquerading as passwords,
  487. Xand setting binary mode.
  488. X.PP
  489. XWe made all connections anonymous by default, and we automatically send our
  490. Xemail address for the password on those connections.
  491. XWe allowed for site
  492. Xnames to be abbreviated.
  493. X.PP
  494. XFor each commonly accessed site, you can put an entry in your program
  495. Xpreferences file (let's call it the ``ncftprc file'' or ``RC file'' for short).
  496. XTo open the site, from the command shell all you do is type:
  497. X.Ds
  498. Xopen wuarchive.wustl.edu
  499. X.De
  500. X.PP
  501. Xor
  502. X.Ds
  503. Xo wuarchive.wustl.edu
  504. X.De
  505. X.PP
  506. XAs promised, you can abbreviate that further.
  507. XJust use any abbreviation that
  508. Xwould match only the site you had in mind.
  509. XFor the previous example, you
  510. Xcould try:
  511. X.Ds
  512. Xo wuarc
  513. Xo wustl
  514. Xo stl
  515. Xo wu
  516. X.De
  517. X.PP
  518. XAny of those abbreviations would open wuarchive.wustl.edu anonymously,
  519. Xsending your anon-password (usually set to your email address) as the
  520. Xpassword.
  521. XKeep in mind that the program tries opening the first site
  522. Xthat matches the abbreviation you supplied.
  523. XSo:
  524. X.Ds
  525. Xo w
  526. X.De
  527. X.PP
  528. Xmight match a site named bowser.nintendo.jp if that site appeared before
  529. Xyour entry for wuarchive.wustl.edu.
  530. X.PP
  531. XMost of the time we open remote sites anonymously, but
  532. Xthere are times where you need to specifically open a site with an actual
  533. Xusername and password.
  534. XLet's say my partner, Phil Dietz, wants to FTP
  535. Xsomething out of my account.
  536. XPerhaps he wants to fetch the latest version
  537. Xof the source code to
  538. X.I NcFTP
  539. Xso he can optimize something or add a new feature behind my back.
  540. XSince the
  541. Xprogram opens remote sites anonymously by default (actually, you can change
  542. Xthis behavior; more on that later), he would have to specify a flag to the
  543. X.I open
  544. Xcommand so he can supply my username and password.
  545. XHe would try:
  546. X.Ds
  547. Xo \-u sphygmomanometer.unl.edu
  548. X.De
  549. X.PP
  550. Xor, more likely:
  551. X.Ds
  552. Xo \-u sph
  553. X.De
  554. X.PP
  555. XThen the program would prompt him for a username (login, whatever) and a
  556. Xpassword:
  557. X.Ds
  558. XLogin Name (pdietz): mgleason
  559. XPassword: ********
  560. X.De
  561. X.PP
  562. XIf he got it right, he could raid my stuff.
  563. XIf not, he'd probably drop
  564. Xme an email asking me to quit changing my password so often.
  565. X.PP
  566. XThere are even times where you want to FTP from your own account, like if
  567. Xyou are debugging an FTP client you wrote.
  568. XAt this prompt:
  569. X.Ds
  570. XLogin Name (mgleason):
  571. X.De
  572. X.PP
  573. XI could just hit return to tell the program that I want ``mgleason'' as my
  574. Xusername, then I would enter my password.
  575. X.\"-------
  576. X.SH "Format of the RC file"
  577. X.\"-------
  578. XThis release of the program is somewhat compatible with the stock
  579. X.I ftp
  580. Xprogram's
  581. X.B ".netrc"
  582. Xfile.
  583. XHowever, I can promise you that in the near future the program will
  584. Xuse a new format, so don't invest too much time in it.
  585. X.PP
  586. XThe RC file can be named
  587. X.RB `` ncftprc '',
  588. X.RB `` netrc '',
  589. Xor
  590. X.RB `` .ncftprc '',
  591. Xbut it is usually named
  592. X.RB `` .netrc ''
  593. Xso it can be used with the stock
  594. X.I ftp
  595. Xprogram.
  596. X.I NcFTP
  597. Xlooks in the current working directory for any of those files, and then in
  598. Xyour home directory, and after that it gives up (which is OK, because RC
  599. Xfiles aren't mandatory).
  600. X.PP
  601. XThe file usually starts with
  602. X.I #set
  603. Xand
  604. X.I #unset
  605. Xcommands that do things
  606. Xto the programs variables.
  607. XThe reason for the ``#'' is so the stock
  608. X.I ftp
  609. Xprogram will think they are comments.
  610. XYou might have this appearing as
  611. Xthe first few lines in your RC file (I'll explain later):
  612. X.Ds
  613. X#set debug 1
  614. X#set pager "less \-EMi"
  615. X#unset startup\-msg
  616. X.De
  617. X.PP
  618. XAfter those, you put in machine entries for each of your favorite sites.
  619. XLet's put in an entry for wuarchive.wustl.edu.
  620. XFirst you would put:
  621. X.Ds
  622. Xmachine wuarchive.wustl.edu
  623. X.De
  624. X.PP
  625. XThen you could put in your username, password, and account if you like:
  626. X.Ds
  627. Xuser anonymous
  628. Xpassword \-mgleason@cse.unl.edu
  629. Xaccount wuarc.does.not.use.accounts
  630. X.De
  631. X.PP
  632. XFollowing that, you would add the startup macro that is run
  633. Xeach time you connect to wuarchive.
  634. XYou must start it with this line:
  635. X.Ds
  636. Xmacdef init
  637. X.De
  638. X.PP
  639. XThen put in the commands you want to do:
  640. X.Ds
  641. Xcd /graphics/gif
  642. Xls \-lt
  643. X.De
  644. X.PP
  645. XAfter that, you end the macro with a blank line (important!).
  646. XThe finished machine entry would look like the following.
  647. XTo make the transition to the impending new format less painful,
  648. XI recommend you adhere to this format:
  649. X.ta 6m +6m
  650. X.Ds
  651. Xmachine wuarchive.wustl.edu
  652. X    user anonymous
  653. X    password \-mgleason@cse.unl.edu
  654. X    account wuarc.does.not.use.accounts
  655. X    macdef init
  656. X        cd /graphics/gif
  657. X        ls \-lt
  658. X.RI \t( "mandatory blank line to end the macro" )
  659. X.De
  660. X.PP
  661. XOf course, if all you want to do is open wuarchive anonymously, you
  662. Xneedn't bother with the ``user'', ``password'', and ``account'' lines.
  663. XYou may want to put them in if you plan on using the stock
  664. X.I ftp
  665. Xprogram, though.
  666. XTry something like this:
  667. X.ta 6m +6m
  668. X.Ds
  669. Xmachine wuarchive.wustl.edu
  670. X    macdef init
  671. X        cd /graphics/gif
  672. X        ls \-lt
  673. X.RI \t( "mandatory blank line to end the macro" )
  674. X.De
  675. X.PP
  676. XYou can tell the program to not run the startup macro if you supply
  677. X.B "\-i"
  678. Xto the
  679. X.I open
  680. Xcommand.
  681. X.PP
  682. XReally, you should only bother adding entries for sites that you want to
  683. Xrun startup macros upon connection.
  684. XThe next section explains why.
  685. X.\"-------
  686. X.SH "The Recent-sites file"
  687. X.\"-------
  688. XEach time you open a site, the program saves the name of the site and the
  689. Xlast directory you were in to the
  690. X.I recent-sites file
  691. Xwhich is named
  692. X.B ".ncrecent"
  693. Xand placed in your home directory.
  694. XThe program saves a
  695. Xpredetermined number of these sites in the file, and when it reaches the
  696. Xlimit, it discards the oldest entry so it can add a new one.
  697. X.PP
  698. XYou can just go ahead and use the name of the site you want with the
  699. X.I open
  700. Xcommand if you know it is in the
  701. X.I recent\-file
  702. X(and you can abbreviate the
  703. Xname, just like those in the RC file).
  704. XBut if you cannot remember what the
  705. Xname of the site you want, all you do is run the
  706. X.I open
  707. Xcommand with
  708. Xno site parameter:
  709. X.Ds
  710. Xopen
  711. X.De
  712. X.PP
  713. XThis will pop up a list of the sites in the
  714. X.IR "recent-file" ,
  715. Xand sites in your RC file.
  716. XAt the open prompt, just type the name (or an
  717. Xabbreviation of that name) or the number preceding the site name to open
  718. Xthat site.
  719. XAfter opening the site you wanted, the program sets the remote
  720. Xworking directory to the same one you left in the last time you called.
  721. X.PP
  722. XIf you don't like the idea of having the sites you called stored on disk,
  723. Xyou can turn this feature off using an
  724. X.I unset
  725. Xcommand, explained later.
  726. X.\"-------
  727. X.SH "Redialing a busy remote site"
  728. X.\"-------
  729. XSome remote sites limit the number of leeches, er, anonymous connections
  730. Xat a time to reduce the load on the host computer.
  731. XYou can use the
  732. X.I open
  733. Xcommand's redial feature to keep attempting connections until you get on,
  734. Xalthough that is not a very polite thing to do.
  735. XThe simplest way to do
  736. Xthis would be to just supply the
  737. X.B \-r
  738. Xoption:
  739. X.Ds
  740. Xopen \-r wuarc
  741. X.De
  742. X.PP
  743. XThere are also options you can use to tweak redial.
  744. XThe
  745. X.B \-d
  746. Xflag sets
  747. Xthe delay between dials, and the
  748. X.B \-g
  749. Xflag sets a limit on how many dials
  750. Xshould be attempting before giving up.
  751. XIf you don't supply
  752. X.B \-g
  753. Xthe program will dial a day and forever (which my Number Theory professor,
  754. XDr. Mientka, says is longer than forever and a day)
  755. Xuntil it connects successfully, or until you get sick of waiting and hit the
  756. Xinterrupt key (usually ^C).
  757. X.PP
  758. XThis example dials wuarchive every ten minutes, giving up after twenty
  759. Xattempts.
  760. XNote that the redial delay is specified in seconds:
  761. X.Ds
  762. Xopen \-r \-d 600 \-g 20 wuarc
  763. X.De
  764. X.PP
  765. XPlease be considerate when you use redialing, so you won't tax the network.
  766. XSite administrators can and do get angry when they get flooded with
  767. Xconnections.
  768. X.\"-------
  769. X.SH "Supplying a sitename from your shell's command line"
  770. X.\"-------
  771. XWhen you run the program:
  772. X.Ds
  773. Xncftp
  774. X.De
  775. X.PP
  776. Xby itself does nothing and waits for you to type commands to the program's
  777. Xown shell.
  778. XJust like the stock
  779. X.I ftp
  780. Xprogram, you can supply a site name
  781. Xon the command line:
  782. X.Ds
  783. Xncftp wuarchive.wustl.edu
  784. X.De
  785. X.PP
  786. XYou can also use abbreviations as usual:
  787. X.Ds
  788. Xncftp wuarc
  789. X.De
  790. X.PP
  791. XThis is equivalent to running the program, then issuing an
  792. X.I open
  793. Xcommand to open wuarchive.
  794. X.\"-------
  795. X.SH "Using Colon-mode"
  796. X.\"-------
  797. XThe
  798. X.I open
  799. Xcommand is not a one-trick pony.
  800. XAnother option is what I call
  801. X.IR "colon-mode" .
  802. XThis feature is used (most of the time) from your shell's
  803. Xcommand line.
  804. X.PP
  805. XIn ancient times, way back during the Disco era, you could use a program
  806. Xcalled
  807. X.I tftp
  808. Xto fetch a file using the Internet standard
  809. X.I Trivial File Transfer Protocol.
  810. XYou could use that program to do something like this
  811. Xfrom within its shell:
  812. X.Ds
  813. Xget wuarchive.wustl.edu:/graphics/gif/README
  814. X.De
  815. X.PP
  816. Xand that would call wuarchive and fetch the
  817. X.B README
  818. Xfile.
  819. X.PP
  820. XYou can use this program to do the same thing from your shell's command
  821. Xline:
  822. X.Ds
  823. Xcsh> ncftp wuarchive.wustl.edu:/graphics/gif/README
  824. Xcsh> head README
  825. X.De
  826. X.PP
  827. XThis tells your shell, in this case the ``c-shell'' to run
  828. X.IR NcFTP ,
  829. Xwhich
  830. Xwould open wuarchive, fetch
  831. X.B /graphics/gif/README
  832. Xand write the file
  833. X.B ./README
  834. Xin the current working directory, and then exits.
  835. XThis is nice if you don't
  836. Xwant to browse around the remote site, and you know exactly want you want.
  837. XIt would also come in handy in shell scripts, where you don't want to
  838. Xenter the command shell, and might not want the program to spew output.
  839. X.PP
  840. XYou can use
  841. X.I colon-mode
  842. Xto set the starting remote working directory also:
  843. X.Ds
  844. Xcsh> ncftp wuarchive.wustl.edu:/graphics/gif
  845. X.De
  846. X.PP
  847. XThis would run the program, open wuarchive, and
  848. X.I cd
  849. Xto the gif directory, then run the program's command shell so you can
  850. Xbrowse.
  851. X.PP
  852. X.I Colon-mode
  853. Xis also available from within the program's command shell.
  854. XAt a prompt you can do stuff like this:
  855. X.Ds
  856. Xncftp> open wuarchive.wustl.edu:/graphics/gif/README
  857. Xncftp> o wuarc:/graphics/gif
  858. X.De
  859. X.\"-------
  860. X.SH "Using FTP-cat and FTP-more mode"
  861. X.\"-------
  862. XThere are times where you might not want the program to write a
  863. X.I colon-mode
  864. Xfile in the current working directory, or perhaps you want to pipe the
  865. Xoutput of a remote file into something else.
  866. X.I Colon-mode
  867. Xhas options to
  868. Xdo this.
  869. XIt was inspired by the guy who wrote the
  870. X.I ftpcat
  871. Xperl script.
  872. XThe
  873. X.B \-c
  874. Xoption tells the program to write on the standard
  875. Xoutput stream.
  876. XThe
  877. X.B \-m
  878. Xoption pipes the file into your pager (like
  879. X.IR more ")"
  880. XOf course this won't work if the thing you give
  881. X.I colon-mode
  882. Xis a directory!  This example just dumps a remote file to stdout:
  883. X.Ds
  884. Xcsh> ncftp \-c wuarc:/graphics/gif/README
  885. X\&...
  886. Xcsh>
  887. X.De
  888. X.PP
  889. XThis example redirects a remote file into a different
  890. Xlocation:
  891. X.Ds
  892. Xcsh> ncftp \-c wu:/README > ~pdietz/thesis.tex
  893. X.De
  894. X.PP
  895. XThis one shows how to use a pipeline:
  896. X.Ds
  897. Xcsh> ncftp \-c wuarc:/README | tail | wc \-l
  898. X10
  899. Xcsh>
  900. X.De
  901. X.PP
  902. XThis shows how to page a remote file:
  903. X.Ds
  904. Xcsh> ncftp \-m wuarc:/graphics/gif/README
  905. X\&...
  906. Xcsh>
  907. X.De
  908. X.\"-------
  909. X.SH "Supplying a port number with the open command"
  910. X.\"-------
  911. XThis option just didn't fit anywhere else, so to finish out the open command,
  912. X.B \-p
  913. Xlets you supply a port number if you have to
  914. X.I ftp
  915. Xto a site using an nonstandard port number.
  916. XPersonally, I have yet to use this feature, but it is
  917. Xthere for compatibility with the stock
  918. X.I ftp
  919. Xprogram.
  920. X.\"-------
  921. X.SH "Displaying and changing program variables"
  922. X.\"-------
  923. XNow I'll explain the commands unique to
  924. X.IR NcFTP .
  925. XThe others should perform the
  926. Xsame as they would in the stock
  927. X.I ftp
  928. Xprogram;
  929. Xconsult the man page for it if you want those explained,
  930. Xor use the
  931. X.I help
  932. Xcommand for a brief blurb.
  933. X.PP
  934. XThe
  935. X.I show
  936. Xcommand is used to display program variables and their values.
  937. X.Ds
  938. Xshow all
  939. X.De
  940. X.PP
  941. Xor
  942. X.Ds
  943. Xshow
  944. X.De
  945. X.PP
  946. Xwould display all the variables with their values.
  947. X.Ds
  948. X.RI show " var1 var2 ... varN"
  949. X.De
  950. X.PP
  951. Xwould display each specified variable and its value.
  952. X.PP
  953. XThe
  954. X.I set
  955. Xcommand changes the value of a program variable.
  956. XIts syntax is:
  957. X.Ds
  958. X.RI set " varname value"
  959. X.De
  960. X.PP
  961. XFor Boolean or Integer variables,
  962. X.Ds
  963. X.RI set " varname"
  964. X.De
  965. X.PP
  966. Xwould set the value of the variable
  967. X.I varname
  968. Xto
  969. X.B 1
  970. X.RB ( true ).
  971. X.PP
  972. XThe
  973. X.I unset
  974. Xcommand can be used to set the variable to its default value,
  975. Xor for Boolean and Integer variables, set the value of the variable to
  976. X.B 0
  977. X.RB ( false ).
  978. XFor String variables, you can use this to set the value to an
  979. Xempty string.
  980. X.PP
  981. XYou can use any of those three commands in both the command shell,
  982. Xor in the RC file with a ``#'' prepended.
  983. X.\"-------
  984. X.SH "Program variables"
  985. X.\"-------
  986. XEach variable can be one of the following types:
  987. X.TP
  988. XBoolean:
  989. XCan be
  990. X.RB `` on ''
  991. Xor
  992. X.RB `` off ''
  993. X(you can also use
  994. X.RB `` 1 ''
  995. Xor
  996. X.RB `` 0 '').
  997. X.TP
  998. XInteger:
  999. XCan be any positive or negative number, or
  1000. X.BR 0 .
  1001. X.TP
  1002. XString:
  1003. XIs a string of characters.
  1004. XIf the string needs to have a space
  1005. Xin it, make sure you surround the whole string with double quotes in a
  1006. X.I set
  1007. Xcommand.
  1008. X.PP
  1009. XVariables follow.
  1010. XSome variables are explained later in the relevant sections.
  1011. X.TP
  1012. X.IR anon\-open " (Boolean)"
  1013. XTells whether the default login mode is anonymous if
  1014. Xon, or if off, will prompt for a username/password.
  1015. XYou can always override this by using either
  1016. X.B \-a
  1017. Xor
  1018. X.B \-u
  1019. Xwith the
  1020. X.I open
  1021. Xcommand.
  1022. X.TP
  1023. X.IR anon\-password " (String)"
  1024. XSends this as the password when you login anonymously.
  1025. XBy default this is your email address.
  1026. X.TP
  1027. X.IR ansi\-escapes " (Boolean)"
  1028. XIf on, the program can use boldface, underline,
  1029. Xand inverse text.
  1030. X.TP
  1031. X.IR auto\-binary " (Boolean)"
  1032. XIf on, sets the transfer type to binary mode
  1033. Ximmediately after connection.
  1034. X.TP
  1035. X.IR debug " (Integer)"
  1036. XSets the debugging level.
  1037. X.TP
  1038. X.IR gateway\-login " (String)"
  1039. XTells which username to use when logging in to
  1040. Xyour firewall gateway host.
  1041. X.TP
  1042. X.IR gateway\-host " (String)"
  1043. XThe site which is acting as your firewall gateway,
  1044. Xor empty if you aren't using one.
  1045. X.TP
  1046. X.IR local\-dir " (String)"
  1047. XThe current local working directory.
  1048. XI like to set this from my RC file,
  1049. Xso all my files go into my download directory.
  1050. X.TP
  1051. X.IR logfile " (String)"
  1052. XThe name of your personal transfer log, or empty
  1053. Xif you aren't using a transfer log.
  1054. X.TP
  1055. X.IR logsize " (Integer)"
  1056. XThe maximum ceiling of your log file, before the program
  1057. Xremoves old entries.
  1058. X.TP
  1059. X.IR mprompt " (Boolean)"
  1060. XIf on, prompts for each remote file expanded from a
  1061. Xwildcard globbing expression.
  1062. X.TP
  1063. X.IR netrc " (String, Read-only)"
  1064. XTells you the name of the RC file in use.
  1065. X.TP
  1066. X.IR pager " (String)"
  1067. XThe pathname and flags of the program used to display
  1068. Xoutput one screenful at a time.
  1069. XThe default is the value of your $PAGER
  1070. Xenvironment variable.
  1071. X.TP
  1072. X.IR prompt " (String)"
  1073. XThe prompt specification that expands into the prompt.
  1074. X.TP
  1075. X.IR progress\-reports " (Integer)"
  1076. XWhich progress meter to use, or
  1077. X.B 0
  1078. Xif you don't want progress reports during file transfers.
  1079. XSet it to
  1080. X.B 1
  1081. Xfor a simple percentage meter;
  1082. X.B 2
  1083. Xfor a fancy bar graph indicator;
  1084. X.B 3
  1085. Xto print just the number of kilobytes transferred; or
  1086. X.B 4
  1087. Xto print one dot for each 10% transferred, if you
  1088. Xwant to avoid the use of backspaces.  Note that the program
  1089. Xmay use a different meter depending on how cooperative the
  1090. Xremote host is, and what you have the
  1091. X.I ansi\-escapes
  1092. Xvariable set to.
  1093. X.TP
  1094. X.IR recent\-list " (Boolean)"
  1095. XIf on, uses and updates the
  1096. X.I recent\-file.
  1097. X.TP
  1098. X.IR remote\-is\-unix " (Boolean)"
  1099. XSet automatically by the program upon connection,
  1100. Xyou may need to use this in a startup macro if the program guessed
  1101. Xthat a remote site was UNIX when it really is not.
  1102. X.TP
  1103. X.IR startup\-msg " (Boolean)"
  1104. XIf on, prints the opening message and tip.
  1105. X.TP
  1106. X.IR tips " (Boolean)"
  1107. XIf on, prints a tip on how to use the program better each
  1108. Xtime you run the program.
  1109. X.TP
  1110. X.IR type " (String)"
  1111. XThe name of the file transfer mode in use,
  1112. Xsuch as
  1113. X.RB `` binary ''
  1114. Xor
  1115. X.RB `` ascii ''.
  1116. X.TP
  1117. X.IR verbose " (String/Integer)"
  1118. XControls the amount of output spewed by the program.
  1119. XYou can supply either the first character of the name of the
  1120. Xverbosity level, or its number:
  1121. X.RS
  1122. X.TP
  1123. X.IR "Q" "uiet (\-1)"
  1124. XWon't print any output at all, even if an error occurs.
  1125. X.TP
  1126. X.IR "E" "rrors Only (0)"
  1127. XNo output, except when errors occur.
  1128. X.TP
  1129. X.IR "T" "erse (1)"
  1130. XPrints errors, and useful output from the remote host.
  1131. X.TP
  1132. X.IR "V" "erbose (2)"
  1133. XPrints everything, even junk output from the remote end.
  1134. X.RE
  1135. X.\"-------
  1136. X.SH "Listing a remote directory"
  1137. X.\"-------
  1138. XThe
  1139. X.I ls
  1140. Xand
  1141. X.I dir
  1142. Xcommands perform in a similar manner to those of the
  1143. Xstock
  1144. X.I ftp
  1145. Xprogram.
  1146. X.PP
  1147. XThe
  1148. X.I ls
  1149. Xcommand sends the FTP command ``NLST'' for you.
  1150. XThis command has been set so that it defaults
  1151. Xto always listing files in columns (this is the
  1152. X.B \-C
  1153. Xoption given to the UNIX
  1154. X.I ls
  1155. Xcommand) and appending
  1156. Xmetacharacters to each item name (this is the
  1157. X.B \-F
  1158. Xoption), so you can
  1159. Xsee which items are directories, files, links, etcetera.
  1160. XIf you don't want
  1161. Xyour items columnized, you can try using the
  1162. X.B \-1
  1163. Xoption with
  1164. X.I ls
  1165. Xto print one item per line.
  1166. X.PP
  1167. XThe
  1168. X.I dir
  1169. Xcommand sends the FTP command ``LIST'' for you, which instead
  1170. Xof printing just item names, it prints item sizes, owners, dates, and
  1171. Xpermissions as well.
  1172. XThis command is equivalent to
  1173. X.RB `` "ls \-l" ''
  1174. Xon most remote systems.
  1175. X.PP
  1176. XThe usage for both commands is the same.
  1177. XHere is the one for
  1178. X.IR ls :
  1179. X.PP
  1180. X.RS
  1181. X.B ls
  1182. X.RI [ \-flags ]
  1183. X.RI [ "directory and file names" ]
  1184. X.RI [ redirection ]
  1185. X.RE
  1186. X.PP
  1187. XNote that in this program, you can supply both flags and items to list in
  1188. Xthe same command.
  1189. XThe stock version of
  1190. X.I ftp
  1191. Xdoesn't let you do this:
  1192. X.Ds
  1193. Xls \-lrt /info\-mac/help
  1194. X.De
  1195. X.PP
  1196. XAnother thing that the program does which the others should have done is
  1197. Xlet you supply more than one item:
  1198. X.Ds
  1199. Xls \-lrt /info\-mac/help /pub /info\-mac/README
  1200. X.De
  1201. X.PP
  1202. XYou can also redirect the output into a file, or pipe it into something.
  1203. XThis example shows how to list the contents of the current remote directory,
  1204. Xand save the output into a file in the current local directory:
  1205. X.Ds
  1206. Xls \-t >ls.out
  1207. X.De
  1208. X.PP
  1209. XNote that for this to work, there must be no whitespace between the ``>''
  1210. Xand the filename, unlike your shell command line which allows for extra
  1211. Xwhitespace.
  1212. XThis will be (actually, is) fixed in a future version of the
  1213. Xprogram.
  1214. X.PP
  1215. XThese examples show how to use a pipe:
  1216. X.Ds
  1217. Xls \-t |tail
  1218. Xdir \-t "|less \-CM"
  1219. Xls \-t "|tail | wc"
  1220. X.De
  1221. X.PP
  1222. XLike the redirection example, there must be no whitespace between the first
  1223. Xpipe character and the rest of the stuff.
  1224. XThe trick is that it has to
  1225. Xappear as one argument to the commands.
  1226. XThe second and third examples
  1227. Xillustrate the use of double quotes to squeeze extra parameters in.
  1228. XThe second example can be done without all that typing.
  1229. XSee the descriptions of the
  1230. X.I pdir
  1231. Xand
  1232. X.I pls
  1233. Xcommands below.
  1234. X.\"-------
  1235. X.SH "Viewing a remote directory with your pager"
  1236. X.\"-------
  1237. XDidn't you hate it when you listed a remote directory, only to have most of
  1238. Xthe stuff scrolled off your terminal before you could read it?
  1239. XThe
  1240. X.I pls
  1241. Xand
  1242. X.I pdir
  1243. Xcommands take care of this for you.
  1244. XAs you might have guessed,
  1245. Xthey perform exactly like their regular counterparts,
  1246. Xonly you view them with your pager.
  1247. XThe pager to use is controlled by the
  1248. X.I pager
  1249. Xprogram variable.
  1250. X.\"-------
  1251. X.SH "Redisplaying the last directory listing"
  1252. X.\"-------
  1253. XThe program saves the listing into a local buffer,
  1254. Xso if you need to see it again (probably forgot about
  1255. X.IR pdir )
  1256. Xyou can use the
  1257. X.I redir
  1258. Xand
  1259. X.I predir
  1260. Xcommands for this.
  1261. X.\"-------
  1262. X.SH "Fetching files from the remote host"
  1263. X.\"-------
  1264. XThe
  1265. X.I get
  1266. Xand
  1267. X.I mget
  1268. Xretrieve remote files for you.
  1269. XThe usage for
  1270. X.I get
  1271. Xis:
  1272. X.Ds
  1273. Xget remote\-file [local\-file or redirection]
  1274. X.De
  1275. X.PP
  1276. XTo fetch
  1277. X.B /pub/README
  1278. Xand write it as a file named
  1279. X.BR ./junk/readme ,
  1280. Xtry:
  1281. X.Ds
  1282. Xget /pub/README ./junk/readme
  1283. X.De
  1284. X.PP
  1285. XTo fetch
  1286. X.B /pub/README
  1287. Xand write it as
  1288. X.BR ./README ,
  1289. Xjust do:
  1290. X.Ds
  1291. Xget /pub/README
  1292. X.De
  1293. X.PP
  1294. XThis lets you fetch a file using its whole pathname, and write a copy of
  1295. Xit in the current directory, without having to bother with typing a local
  1296. Xfilename.
  1297. XIn the unlikely event that you have write permission to a
  1298. Xdirectory called
  1299. X.B /pub
  1300. Xon your local machine, it would write
  1301. X.RB `` README ''
  1302. Xin that directory.
  1303. X.PP
  1304. XMost of the time the file you want will be in the current remote directory,
  1305. Xso you can just do these:
  1306. X.Ds
  1307. Xget README
  1308. Xget README ./junk/readme
  1309. X.De
  1310. X.PP
  1311. XYou can also use a redirection for
  1312. X.IR get ,
  1313. Xjust like you can with the
  1314. X.IR ls ", " dir ", and " redir
  1315. Xcommands.
  1316. XAs described earlier, you have
  1317. Xto conform to the format below for this release of the program:
  1318. X.Ds
  1319. Xget README >/dev/null
  1320. Xget README |head
  1321. Xget README "|head \-8"
  1322. Xget README "|less \-EMi"
  1323. X.De
  1324. X.PP
  1325. XThe last example is facilitated by the
  1326. X.I page
  1327. Xcommand described later.
  1328. X.PP
  1329. XThe
  1330. X.I get
  1331. Xcommand can also use a wildcard expression in an attempt to
  1332. Xmatch exactly one remote file.
  1333. XI call it ``Poor Man's File Completion.''
  1334. XIf you've done a remote listing, and you decide you want to download a
  1335. Xfile by the name of
  1336. X.RB `` obnoxiouslylongpackagename.tar.Z '',
  1337. Xyou can use
  1338. X``PMFC'' to save some keystrokes.
  1339. XChoose an expression that will only
  1340. Xmatch that one file, then use it with
  1341. X.IR get :
  1342. X.Ds
  1343. Xget obn*.Z a.tar.Z
  1344. X.De
  1345. X.PP
  1346. XIf your pattern was unique,
  1347. X.I get
  1348. Xwill fetch that file only.
  1349. XIf the pattern matched more than one file, the program will bitch and moan.
  1350. X.PP
  1351. XThe
  1352. X.I mget
  1353. Xcommand is used to fetch many files at a time.
  1354. XThe difference between
  1355. X.I get
  1356. Xand
  1357. X.I mget
  1358. Xis that
  1359. X.I get
  1360. Xlets you write only one file,
  1361. Xbut you can put it in a different directory, while
  1362. X.I mget
  1363. Xfetches many files,
  1364. Xalways writing them in the current local directory.
  1365. XThis example fetches several remote files at once:
  1366. X.Ds
  1367. Xmget a.file.Z b.file.Z c.tar d.tar.Z
  1368. X.De
  1369. X.PP
  1370. XThe
  1371. X.I mget
  1372. Xcommand, and its ugly sisters,
  1373. X.I mput
  1374. Xand
  1375. X.I mdelete
  1376. Xlet you use wildcard expressions.
  1377. XI could have done the previous example as:
  1378. X.Ds
  1379. Xmget *.Z c.tar
  1380. X.De
  1381. X.PP
  1382. Xinstead.
  1383. XThe ``m'' commands will verify each file,
  1384. Xif you have the program variable
  1385. X.I mprompt
  1386. Xset.
  1387. X.\"-------
  1388. X.SH "Viewing a remote file with your pager"
  1389. X.\"-------
  1390. XIf you would like to read a file on the remote host without saving a copy
  1391. Xof it on your machine, you can use the
  1392. X.I page
  1393. X(or
  1394. X.I more
  1395. Xif you wish) command:
  1396. X.Ds
  1397. Xpage README
  1398. Xpage obn*README
  1399. Xpage README.Z
  1400. X.De
  1401. X.PP
  1402. XThe second example show that you can use ``PMFC'' like you can for
  1403. X.IR get.
  1404. XThe third example will work also, because if the program knows how to
  1405. Xdecompress the file, it will do so before feeding it to your pager.
  1406. XAs stated earlier,
  1407. Xyou can change the program to use to page by setting the program variable
  1408. X.IR pager.
  1409. X.\"-------
  1410. X.SH "Creating a message file on the remote host"
  1411. X.\"-------
  1412. XUse the
  1413. X.I create
  1414. Xan empty file on the remote site.
  1415. XSometimes it is necessary to leave a note if you can't get in touch
  1416. Xwith the remote site's administrator.
  1417. XFor example if a file is corrupted, you could try:
  1418. X.Ds
  1419. Xcreate Foo.tar_is_corrupt
  1420. X.De
  1421. X.PP
  1422. Xin hopes that the original uploader will replace it.
  1423. X.\"-------
  1424. X.SH "Looking up site names and addresses"
  1425. X.\"-------
  1426. XYou can use the program's builtin
  1427. X.RI mini- nslookup
  1428. Xfacility.
  1429. XIf you wanted to know the site's IP number, but only knew the name you
  1430. Xcould do:
  1431. X.Ds
  1432. Xlookup cse.unl.edu
  1433. X.De
  1434. X.PP
  1435. XThis would spit out IP number for that site, in this case ``129.93.1.12''.
  1436. XIf you needed to know what a site's name was, but only knew the IP number,
  1437. Xtry:
  1438. X.Ds
  1439. Xlookup 129.93.1.12
  1440. X.De
  1441. X.PP
  1442. XThis would spit out the name for that site, in this case ``cse.unl.edu''.
  1443. X.\"-------
  1444. X.SH "Checking the configuration of the program"
  1445. X.\"-------
  1446. XUse the
  1447. X.I version
  1448. Xcommand to print version and compilation information about the program.
  1449. XThis will also tell you which optional features are
  1450. Xcompiled into the program, such as logging to the system log and which
  1451. Xcommand line editor (if any) has been installed.
  1452. X.PP
  1453. XThe author's email address is listed, and if you need to report something,
  1454. Xsend the output of this command along with your message.
  1455. X.\"-------
  1456. X.SH "Using the command shell"
  1457. X.\"-------
  1458. XJust like the stock
  1459. X.I ftp
  1460. Xprogram, you type commands to it until you get
  1461. Xbored and hit either ^D or type the
  1462. X.I quit
  1463. Xcommand.
  1464. X.PP
  1465. XThe program supports links to popular command line editing libraries.
  1466. XIf the person who compiled it went to the effort, you will be able to
  1467. Xedit the command line with arrow keys and other editing commands, and also
  1468. Xscroll up and down in the command line history, usually with the up and
  1469. Xdown arrows.
  1470. XYou can check the
  1471. X.I version
  1472. Xcommand to see if either
  1473. X``GETLINE'' or ``READLINE'' are installed.
  1474. X.\"-------
  1475. X.SH "Customizing the prompt"
  1476. X.\"-------
  1477. XYou can set the shell's prompt string to whatever you like.
  1478. XYou can use several metacharacters that expand into something each prompt.
  1479. XThe
  1480. X.RB `` % ''
  1481. Xflags are passed to
  1482. X.IR strftime (3),
  1483. Xso you can put the date or time in the prompt formatted as you like it:
  1484. X.Ds
  1485. Xset prompt "%I:%M ncftp>"
  1486. X.De
  1487. X.PP
  1488. XThat would insert the current time in the prompt.
  1489. X.PP
  1490. XThe
  1491. X.RB `` @ ''
  1492. Xflags are expanded by the program itself.
  1493. XHere's the list of them.
  1494. X.PP
  1495. XIf you have an ANSI-compatible terminal, or you have the program variable
  1496. X.I ansi\-escapes
  1497. Xset, you can use
  1498. X.BR @B ,
  1499. X.BR @I ,
  1500. Xand
  1501. X.B @U
  1502. Xto turn on boldface,
  1503. Xinverse, and underline text respectively (otherwise they won't insert
  1504. Xanything).
  1505. XYou can also use
  1506. X.B @R
  1507. Xto turn on inverse (reverse) text.
  1508. X.B @P
  1509. Xsets the text back to plain text.
  1510. X.PP
  1511. X.B @D
  1512. XInserts the full path of the current remote directory.
  1513. XThe
  1514. X.B @J
  1515. Xflag is similar except it inserts only the directory name.
  1516. X.PP
  1517. X.B @H
  1518. XInserts the name of the remote host.
  1519. X.B @C
  1520. Xinserts the host and current
  1521. Xdirectory path in
  1522. X.I "colon-mode"
  1523. Xformat, such as
  1524. X``cse.unl.edu:/pub/mgleason'', or ``(not connected)''.
  1525. XThe
  1526. X.B @c
  1527. Xflag is similar, only it will insert ``cse.unl.edu:/pub/mgleason'' and a
  1528. Xnewline if connected, otherwise it prints nothing.
  1529. XThe default prompt uses
  1530. Xthis flag to print a two line prompt when connected and a one line prompt
  1531. Xwhen not connected.
  1532. X.PP
  1533. X.BR @E " or " @!
  1534. Xinserts the event number (how many commands you've typed).
  1535. X.PP
  1536. X.B @M
  1537. Xinserts ``(Mail)\0'' if mail has arrived since running the program.
  1538. X.PP
  1539. X.B @N
  1540. Xinserts a newline character.
  1541. X.\"-------
  1542. X.SH "Keeping a log of your file transfers"
  1543. X.\"-------
  1544. XYou can have the program keep a personal log file.
  1545. XI find it is useful so I can see where I got a certain file,
  1546. Xor what the name of that site was I called two weeks ago.
  1547. X.PP
  1548. XTo use a log, add:
  1549. X.Ds
  1550. X#set logfile ~/.ftplog
  1551. X.De
  1552. X.PP
  1553. X(or whatever you want to name the log) to your RC file.
  1554. XI don't want my log growing too large and using up all my disk space,
  1555. Xso I also have:
  1556. X.Ds
  1557. X#set logsize 10240
  1558. X.De
  1559. X.PP
  1560. Xin my RC file.
  1561. XIf you set the limit on the maximum log size, the program will
  1562. Xkeep the log file at or below that size, discarding old entries.
  1563. X.PP
  1564. XNote that this is different from having SYSLOG appear in the
  1565. X.I version
  1566. Xcommand's output.
  1567. XWhen this is on, your actions are recorded to the system
  1568. Xlog, so your system administrator can make sure you aren't doing anything
  1569. X``bad.''
  1570. X.\"-------
  1571. X.SH "Program options"
  1572. X.\"-------
  1573. XRemember that you can treat the command line like an
  1574. X.I open
  1575. Xcommand,
  1576. Xso all lowercase options are passed to the
  1577. X.I open
  1578. Xcommand, and the
  1579. Xuppercase options are handled by the main program.
  1580. XThe uppercase options
  1581. Xare described below; refer to the
  1582. X.I open
  1583. Xcommand for descriptions of its options.
  1584. X.TP
  1585. X.BI \-D " x"
  1586. Xsets the debugging level to
  1587. X.IR x .
  1588. X.TP
  1589. X.B \-H
  1590. Xruns the
  1591. X.I version
  1592. Xcommand and exits, so you can save the output of
  1593. Xit to use when you need to mail me something.
  1594. X.TP
  1595. X.B \-I
  1596. Xtoggles the mprompt variable; this is provided for compatibility with
  1597. X.RB `` "ftp \-i" ''.
  1598. X.TP
  1599. X.B \-N
  1600. Xdisables reading of the RC file;
  1601. Xthis is provided for compatibility with
  1602. X.RB `` "ftp \-n" ''.
  1603. X.TP
  1604. X.BI \-V " x"
  1605. Xsets verbosity to level
  1606. X.I x
  1607. X.RB ( \-1 ,
  1608. X.BR 0 ,
  1609. X.BR 1 ,
  1610. X.BR 2 )
  1611. Xor
  1612. X.RB ( quiet ,
  1613. X.BR errs ,
  1614. X.BR terse ,
  1615. X.BR verbose ).
  1616. XSee the description of the
  1617. X.I verbose
  1618. Xprogram variable for more information.
  1619. X.PP
  1620. XHere are some example command lines.
  1621. XAgain, see the description of the
  1622. X.I open
  1623. Xcommand (especially
  1624. X.IR "colon-mode" " and " "FTP\-cat mode" ")"
  1625. Xand all its functions for more information.
  1626. X.PP
  1627. XThis just enters the
  1628. X.I NcFTP
  1629. Xcommand shell:
  1630. X.Ds
  1631. Xcsh> ncftp
  1632. X.De
  1633. X.PP
  1634. XThis fetches
  1635. X.B CONTENTS
  1636. Xand then quits:
  1637. X.Ds
  1638. Xcsh> ncftp cse.unl.edu:/pub/mgleason/CONTENTS
  1639. X.De
  1640. X.PP
  1641. XSome others examples, with open options and main program options mixed in:
  1642. X.Ds
  1643. Xcsh> ncftp \-V quiet \-u ftp.unl.edu
  1644. Xcsh> ncftp \-c cse.unl.edu:/pub/mgleason/CONTENTS
  1645. Xcsh> ncftp \-D 2 \-r \-d 120 \-g 10 \-N ftp.unl.edu
  1646. X.De
  1647. X.\"-------
  1648. X.SH "A sample RC file"
  1649. X.\"-------
  1650. XHere is a sample RC file:
  1651. X.ta 6m +6m
  1652. X.Ds
  1653. X#set logfile ~/.ftplog
  1654. X#set progress\-reports 2
  1655. X#set local\-dir /usr/tmp/zz
  1656. X#set prompt "@B@E @UNcFTP@P @B@M@D@P \->"
  1657. X.sp
  1658. Xmachine sumex\-aim.stanford.edu
  1659. X    macdef init
  1660. X        cd /info\-mac
  1661. X        get ./help/recent\-files.txt "|grep \-v '.abs' > sumex"
  1662. X        !less sumex
  1663. X        pwd
  1664. X.sp
  1665. X# This site is in here just so I can use ``apple''
  1666. X# as an abbreviation.
  1667. Xmachine ftp.apple.com
  1668. X.sp
  1669. X# NcFTP will only ask for your password:
  1670. Xmachine cse.unl.edu
  1671. X    login mgleason
  1672. X.sp
  1673. X# You can supply a login and a password:
  1674. Xmachine fake.machine.unl.edu
  1675. X    login mgleason
  1676. X    password mypass
  1677. X    macdef init
  1678. X    cd ./foo/bar
  1679. X.sp
  1680. X# If an antiquated non-UNIX machine doesn't use
  1681. X# the "SYST" command, you may need to unset
  1682. X# remote\-is\-unix, if the remote host complains
  1683. X# about ``ls \-CF''.
  1684. Xmachine some.vms.unl.edu
  1685. X    macdef init
  1686. X    unset remote\-is\-unix
  1687. X.sp
  1688. X.De
  1689. X.\"-------
  1690. X.SH "AUTHORS"
  1691. X.\"-------
  1692. X.I NcFTP
  1693. Xwas written by Mike Gleason,
  1694. X.I NCEMRSoft
  1695. X(mgleason@cse.unl.edu), and based on code by the authors of the
  1696. X.I ftp
  1697. Xfrom the BSD 4.3 distribution.
  1698. X.I NcFTP
  1699. Xis copyrighted 1992, 1993 by NCEMRSoft
  1700. Xand 1985, 1989 by the Regents of California.
  1701. X.PP
  1702. XIdeas and some code contributed by Phil Dietz,
  1703. X.I NCEMRSoft
  1704. X(pdietz@cse.unl.edu).
  1705. XTesting and debugging done by Phil and
  1706. XKok Hon Yin (hkok@cse.unl.edu).
  1707. X.PP
  1708. XExtensive man page formatting work
  1709. Xby DaviD W. Sanderson (dws@ssec.wisc.edu).
  1710. X.\"-------
  1711. X.SH "BUGS"
  1712. X.\"-------
  1713. XCorrect execution of many commands depends upon proper behavior
  1714. Xby the remote server.
  1715. X.PP
  1716. XThe remote server may drop the connection if you take a long time to
  1717. Xpage remote files.
  1718. X.PP
  1719. XTermcap padding is not correctly displayed.
  1720. X.PP
  1721. XThere are no such sites named
  1722. X.I bowser.nintendo.jp
  1723. Xor
  1724. X.IR sphygmomanometer.unl.edu .
  1725. X.\"-------
  1726. X.SH "SEE ALSO"
  1727. X.\"-------
  1728. X.IR strftime (3),
  1729. X.IR ftpd (8),
  1730. X.IR ftp (1),
  1731. X.IR nslookup (1),
  1732. X.IR compress (1),
  1733. X.IR gzip (1),
  1734. X.IR zcat (1),
  1735. X.IR fsp (1),
  1736. X.IR archie (1),
  1737. X.IR tftp (1).
  1738. END_OF_FILE
  1739.   if test 33759 -ne `wc -c <'ncftp.1'`; then
  1740.     echo shar: \"'ncftp.1'\" unpacked with wrong size!
  1741.   fi
  1742.   # end of 'ncftp.1'
  1743. fi
  1744. if test -f 'open.c' -a "${1}" != "-c" ; then 
  1745.   echo shar: Will not clobber existing file \"'open.c'\"
  1746. else
  1747.   echo shar: Extracting \"'open.c'\" \(16566 characters\)
  1748.   sed "s/^X//" >'open.c' <<'END_OF_FILE'
  1749. X/* open.c */
  1750. X
  1751. X/*  $RCSfile: open.c,v $
  1752. X *  $Revision: 1.1 $
  1753. X *  $Date: 93/07/09 11:27:07 $
  1754. X */
  1755. X
  1756. X#include "sys.h"
  1757. X
  1758. X#include <netdb.h>
  1759. X#include <netinet/in.h>
  1760. X#include <arpa/ftp.h>
  1761. X
  1762. X#include <errno.h>
  1763. X
  1764. X#include "util.h"
  1765. X#include "open.h"
  1766. X#include "cmds.h"
  1767. X#include "ftp.h"
  1768. X#include "ftprc.h"
  1769. X#include "main.h"
  1770. X#include "defaults.h"
  1771. X#include "copyright.h"
  1772. X
  1773. X/* open.c globals */
  1774. Xint                    remote_is_unix;        /* TRUE if remote host is unix. */
  1775. Xint                    auto_binary = dAUTOBINARY;
  1776. Xint                    anon_open = dANONOPEN;
  1777. X                                        /* Anonymous logins by default? */
  1778. Xint                    connected = 0;        /* TRUE if connected to server */
  1779. X                                        /* If TRUE, set binary each connection. */
  1780. XHostname            hostname;            /* Name of current host */
  1781. X#ifdef GATEWAY
  1782. Xstring                gateway;            /* node name of firewall gateway */
  1783. Xstring                gate_login;            /* login at firewall gateway */
  1784. X#endif
  1785. X
  1786. X/* open.c externs */
  1787. Xextern char                    *reply_string, *line, *Optarg, *margv[];
  1788. Xextern int                    Optind, margc, verbose, macnum;
  1789. Xextern long                    eventnumber;
  1790. Xextern struct servent        serv;
  1791. Xextern FILE                    *cout;
  1792. Xextern string                anon_password;
  1793. X
  1794. X/* Given a pointer to an OpenOptions (structure containing all variables
  1795. X * that can be set from the command line), this routine makes sure all
  1796. X * the variables have valid values by setting them to their defaults.
  1797. X */
  1798. X 
  1799. Xvoid InitOpenOptions(OpenOptions *openopt)
  1800. X{
  1801. X    /* How do you want to open a site if neither -a or -u are given?
  1802. X     * anon_open is true (default to anonymous login), unless
  1803. X     * defaults.h was edited to set dANONOPEN to 0 instead.
  1804. X     */
  1805. X    openopt->openmode = anon_open ? openImplicitAnon : openImplicitUser;
  1806. X
  1807. X    /* Normally you don't want to ignore the entry in your netrc. */
  1808. X    openopt->ignore_rc = 0;
  1809. X
  1810. X    /* Set the default delay if the user specifies redial mode without
  1811. X     * specifying the redial delay.
  1812. X     */
  1813. X    openopt->redial_delay = dREDIALDELAY;
  1814. X
  1815. X    /* Normally, you only want to try once. If you specify redial mode,
  1816. X     * this is changed.
  1817. X     */
  1818. X    openopt->max_dials = 1;
  1819. X    
  1820. X    /* You don't want to cat the file to stdout by default. */
  1821. X    openopt->ftpcat = NO_FTPCAT;
  1822. X
  1823. X    /* Setup the port number to try. */
  1824. X#ifdef dFTP_PORT
  1825. X    /* If dFTP_PORT is defined, we use a different port number by default
  1826. X     * than the one supplied in the servent structure.
  1827. X     */
  1828. X    openopt->port = dFTP_PORT;
  1829. X    /* Make sure the correct byte order is supplied! */
  1830. X    openopt->port = htons(openopt->port);
  1831. X#else
  1832. X    /* Use the port number supplied by the operating system's servent
  1833. X     * structure.
  1834. X     */
  1835. X    openopt->port = serv.s_port;
  1836. X#endif
  1837. X
  1838. X    /* We are not in colon-mode (yet). */
  1839. X    openopt->colonmodepath[0] = 0;
  1840. X
  1841. X    /* Set the hostname to a null string, since there is no default host. */
  1842. X    openopt->hostname[0] = 0;
  1843. X    
  1844. X    /* Set the opening directory path to a null string. */
  1845. X    openopt->cdpath[0] = 0;
  1846. X}    /* InitOpenOptions */
  1847. X
  1848. X
  1849. X
  1850. X
  1851. X/* This is responsible for parsing the command line and setting variables
  1852. X * in the OpenOptions structure according to the user's flags.
  1853. X */
  1854. X
  1855. Xint GetOpenOptions(int argc, char **argv, OpenOptions *openopt)
  1856. X{
  1857. X    int                    opt;
  1858. X    char                *cp;
  1859. X
  1860. X    /* First setup the openopt variables. */
  1861. X    InitOpenOptions(openopt);
  1862. X
  1863. X    /* Tell Getopt() that we want to start over with a new command. */
  1864. X    Getopt_Reset();
  1865. X    while ((opt = Getopt(argc, argv, "aiup:rd:g:cm")) >= 0) {
  1866. X        switch (opt) {        
  1867. X            case 'a':
  1868. X                /* User wants to open anonymously. */
  1869. X                openopt->openmode = openExplicitAnon;
  1870. X                break;
  1871. X                
  1872. X            case 'u':
  1873. X                /* User wants to open with a login and password. */
  1874. X                openopt->openmode = openExplicitUser;
  1875. X                break;
  1876. X                
  1877. X            case 'i':
  1878. X                /* User wants to ignore the entry in the netrc. */
  1879. X                openopt->ignore_rc = 1;
  1880. X                break;
  1881. X                
  1882. X            case 'p':
  1883. X                /* User supplied a port number different from the default
  1884. X                 * ftp port.
  1885. X                 */
  1886. X                openopt->port = atoi(Optarg);
  1887. X                if (openopt->port <= 0) {
  1888. X                    /* Probably never happen, but just in case. */
  1889. X                    (void) printf("%s: bad port number (%s).\n", argv[0], Optarg);
  1890. X                    goto usage;
  1891. X                }
  1892. X                /* Must ensure that the port is in the correct byte order! */
  1893. X                openopt->port = htons(openopt->port);
  1894. X                break;
  1895. X                
  1896. X            case 'd':
  1897. X                /* User supplied a delay (in seconds) that differs from
  1898. X                 * the default.
  1899. X                 */
  1900. X                openopt->redial_delay = atoi(Optarg);
  1901. X                break;
  1902. X                
  1903. X            case 'g':
  1904. X                /* User supplied an upper-bound on the number of redials
  1905. X                 * to try.
  1906. X                 */
  1907. X                openopt->max_dials = atoi(Optarg);
  1908. X                break;
  1909. X
  1910. X            case 'r':
  1911. X                openopt->max_dials = -1;
  1912. X                break;
  1913. X
  1914. X            case 'm':
  1915. X                /* ftpcat mode is only available from your shell command-line,
  1916. X                 * not from the ncftp shell.  Do that yourself with 'more zz'.
  1917. X                 */
  1918. X                if (eventnumber == 0L) {
  1919. X                    /* If eventnumber is zero, then we were called directly
  1920. X                     * from main(), and before the ftp shell has started.
  1921. X                     */
  1922. X                    openopt->ftpcat = FTPMORE;
  1923. X                    /* ftpcat mode is really ftpmore mode. */
  1924. X                    break;
  1925. X                } else {
  1926. X                    fprintf(stderr,
  1927. X"You can only use this form of colon-mode (-m) from your shell command line.\n\
  1928. XTry 'ncftp -m wuarchive.wustl.edu:/README'\n");
  1929. X                    goto usage;
  1930. X                }
  1931. X                break;
  1932. X
  1933. X            case 'c':
  1934. X                /* ftpcat mode is only available from your shell command-line,
  1935. X                 * not from the ncftp shell.  Do that yourself with 'get zz -'.
  1936. X                 */
  1937. X                if (eventnumber == 0L) {
  1938. X                    /* If eventnumber is zero, then we were called directly
  1939. X                     * from main(), and before the ftp shell has started.
  1940. X                     */
  1941. X                    openopt->ftpcat = FTPCAT;
  1942. X                    break;
  1943. X                } else {
  1944. X                    fprintf(stderr,
  1945. X"You can only use ftpcat/colon-mode from your shell command line.\n\
  1946. XTry 'ncftp -c wuarchive.wustl.edu:/README > file.'\n");
  1947. X                    goto usage;
  1948. X                }
  1949. X                break;
  1950. X                
  1951. X            default:
  1952. X            usage:
  1953. X                return USAGE;
  1954. X        }
  1955. X    }
  1956. X
  1957. X    if (argv[Optind] == NULL) {
  1958. X        /* No host was supplied.  Print out the list of sites we know
  1959. X         * about and ask the user for one.
  1960. X         */
  1961. X        PrintSiteList();
  1962. X        (void) Gets("(site to open) ", openopt->hostname, sizeof(openopt->hostname));
  1963. X        /* Make sure the user just didn't hit return, in which case we
  1964. X         * just give up and go home.
  1965. X         */
  1966. X        if (openopt->hostname[0] == 0)
  1967. X            goto usage;
  1968. X    } else {
  1969. X        /* The user gave us a host to open.
  1970. X         *
  1971. X         * First, check to see if they gave us a colon-mode path
  1972. X         * along with the hostname.
  1973. X         */
  1974. X        if ((cp = index(argv[Optind], ':')) != NULL) {
  1975. X            *cp++ = 0;
  1976. X            (void) Strncpy(openopt->colonmodepath, cp);
  1977. X        }    
  1978. X        (void) Strncpy(openopt->hostname, argv[Optind]);
  1979. X    }
  1980. X    return NOERR;
  1981. X}    /* GetOpenOptions */
  1982. X
  1983. X
  1984. X
  1985. X
  1986. X/* This examines the format of the string stored in the hostname
  1987. X * field of the OpenOptions, and sees if has to strip out a colon-mode
  1988. X * pathname (to store in the colonmodepath field).  Since colon-mode
  1989. X * is run quietly (without any output being generated), we init the
  1990. X * login_verbosity variable here to quiet if we are running colon-mode.
  1991. X */
  1992. Xint CheckForColonMode(OpenOptions *openopt, int *login_verbosity)
  1993. X{
  1994. X    /* Usually the user doesn't supply hostname in colon-mode format,
  1995. X     * and wants to interactively browse the remote host, so set the
  1996. X     * login_verbosity to whatever it is set to now.
  1997. X     */
  1998. X    *login_verbosity = verbose;
  1999. X
  2000. X    if (openopt->colonmodepath[0] != 0) {
  2001. X        /* But if the user does use colon-mode, we want to do our business
  2002. X         * and leave, without all the login messages, etc., so set
  2003. X         * login_verbosity to quiet so we won't print anything until
  2004. X         * we finish.  Colon-mode can be specified from the shell command
  2005. X         * line, so we would like to be able to execute ncftp as a one
  2006. X         * line command from the shell without spewing gobs of output.
  2007. X         */
  2008. X        *login_verbosity = V_QUIET;
  2009. X    } else if (openopt->ftpcat != 0) {
  2010. X        /* User specified ftpcat mode, but didn't supply the host:file. */
  2011. X        (void) fprintf(stderr, "You didn't use colon mode correctly.\n\
  2012. XIf you use -c or -m, you need to do something like this:\n\
  2013. X    ncftp -c wuarchive.wustl.edu:/pub/README (to cat this file to stdout).\n");
  2014. X        return USAGE;
  2015. X    }
  2016. X    return NOERR;
  2017. X}    /* CheckForColonMode */
  2018. X
  2019. X
  2020. X
  2021. X
  2022. X/* All this short routine does is to hookup a socket to either the
  2023. X * remote host or the firewall gateway host.
  2024. X */
  2025. Xint HookupToRemote(OpenOptions *openopt)
  2026. X{
  2027. X    int hErr;
  2028. X
  2029. X#ifdef GATEWAY
  2030. X    /* Try connecting to the gateway host. */
  2031. X    if (*gateway) {
  2032. X        hErr = hookup(gateway, openopt->port);
  2033. X        (void) Strncpy(hostname, openopt->hostname);
  2034. X    } else
  2035. X#endif
  2036. X        hErr = hookup(openopt->hostname, openopt->port);
  2037. X    
  2038. X    return hErr;
  2039. X}    /* HookupToRemote */
  2040. X
  2041. X
  2042. X
  2043. X
  2044. Xvoid CheckRemoteSystemType(int force_binary)
  2045. X{
  2046. X    int tmpverbose;
  2047. X    char *cp, c;
  2048. X
  2049. X    /* As of this writing, UNIX is pretty much standard. */
  2050. X    remote_is_unix = 1;
  2051. X
  2052. X    /* Do a SYSTem command quietly. */
  2053. X    tmpverbose = verbose;
  2054. X    verbose = V_QUIET;
  2055. X    if (command("SYST") == COMPLETE) {
  2056. X        if (tmpverbose == V_VERBOSE) {        
  2057. X            /* Find the system type embedded in the reply_string,
  2058. X             * and separate it from the rest of the junk.
  2059. X             */
  2060. X            cp = index(reply_string+4, ' ');
  2061. X            if (cp == NULL)
  2062. X                cp = index(reply_string+4, '\r');
  2063. X            if (cp) {
  2064. X                if (cp[-1] == '.')
  2065. X                    cp--;
  2066. X                c = *cp;
  2067. X                *cp = '\0';
  2068. X            }
  2069. X
  2070. X            (void) printf("Remote system type is %s.\n",
  2071. X                reply_string+4);
  2072. X            if (cp)
  2073. X                *cp = c;
  2074. X        }
  2075. X        remote_is_unix = !strncmp(reply_string + 4, "UNIX", (size_t) 4);
  2076. X    }
  2077. X
  2078. X    /* Set to binary mode if any of the following are true:
  2079. X     * (a) The user has auto-binary set;
  2080. X     * (b) The user is using colon-mode (force_binary);
  2081. X     * (c) The reply-string from SYST said it was UNIX with 8-bit chars.
  2082. X     */
  2083. X    if (auto_binary || force_binary
  2084. X        || !strncmp(reply_string, "215 UNIX Type: L8", (size_t) 17)) {
  2085. X        (void) _settype("binary");
  2086. X        if (tmpverbose > V_TERSE)
  2087. X            (void) printf("Using binary mode to transfer files.\n");
  2088. X    }
  2089. X
  2090. X    /* Print a warning for that (extremely) rare Tenex machine. */
  2091. X    if (tmpverbose >= V_ERRS && 
  2092. X        !strncmp(reply_string, "215 TOPS20", (size_t) 10)) {
  2093. X        (void) _settype("tenex");
  2094. X        (void) printf("Using tenex mode to transfer files.\n");
  2095. X    }
  2096. X    verbose = tmpverbose;
  2097. X}    /* CheckRemoteSystemType */
  2098. X
  2099. X
  2100. X
  2101. X/* This is called if the user opened the host with a file appended to
  2102. X * the host's name, like "wuarchive.wustl.edu:/pub/readme," or
  2103. X * "wuarchive.wustl.edu:/pub."  In the former case, we open wuarchive,
  2104. X * and fetch "readme."  In the latter case, we open wuarchive, then set
  2105. X * the current remote directory to "/pub."  If we are fetching a file,
  2106. X * we can do some other tricks if "ftpcat mode" is enabled.  This mode
  2107. X * must be selected from your shell's command line, and this allows you
  2108. X * to use the program as a one-liner to pipe a remote file into something,
  2109. X * like "ncftp -c wu:/pub/README | wc."  If the user uses ftpcat mode,
  2110. X * the program immediately quits instead of going into it's own command
  2111. X * shell.
  2112. X */
  2113. Xvoid ColonMode(OpenOptions *openopt)
  2114. X{
  2115. X    int tmpverbose;
  2116. X
  2117. X    /* How do we tell if colonmodepath is a file or a directory?
  2118. X     * We first try cd'ing to the path first.  If we can, then it
  2119. X     * was a directory.  If we could not, we'll assume it was a file.
  2120. X     */
  2121. X
  2122. X    /* Shut up, so cd won't print 'foobar: Not a directory.' */
  2123. X    tmpverbose = verbose;
  2124. X    verbose = V_QUIET;
  2125. X
  2126. X    /* If we are using ftpcat|more mode, or we couldn't cd to the
  2127. X     * colon-mode path (then it must be a file to fetch), then
  2128. X     * we need to fetch a file.
  2129. X     */
  2130. X    if (openopt->ftpcat || ! _cd(openopt->colonmodepath)) {
  2131. X        /* We call the appropriate fetching routine, so we have to
  2132. X         * have the argc and argv set up correctly.  To do this,
  2133. X         * we just make an entire command line, then let makeargv()
  2134. X         * convert it to argv/argc.
  2135. X         */
  2136. X        if (openopt->ftpcat == FTPCAT)
  2137. X            (void) sprintf(line, "get %s -", openopt->colonmodepath);
  2138. X        else if (openopt->ftpcat == FTPMORE)
  2139. X            (void) sprintf(line, "more %s", openopt->colonmodepath);
  2140. X        else {
  2141. X            /* Regular colon-mode, where we fetch the file, putting the
  2142. X             * copy in the current local directory.
  2143. X             */
  2144. X            (void) sprintf(line, "mget %s", openopt->colonmodepath);
  2145. X        }
  2146. X        makeargv();
  2147. X
  2148. X        /* Turn on messaging if we aren't catting. */
  2149. X        if (openopt->ftpcat == 0)
  2150. X            verbose = tmpverbose;
  2151. X        
  2152. X        /* get() also handles 'more'. */
  2153. X        if (openopt->ftpcat)
  2154. X            (void) get(margc, margv);
  2155. X        else
  2156. X            (void) mget(margc, margv);
  2157. X
  2158. X        /* If we were invoked from the command line, quit
  2159. X         * after we got this file.
  2160. X         */
  2161. X        if (eventnumber == 0L) {
  2162. X            (void) quit(0, NULL);
  2163. X        }
  2164. X    }
  2165. X    verbose = tmpverbose;
  2166. X}    /* ColonMode */
  2167. X
  2168. X
  2169. X
  2170. X
  2171. X/* Given a properly set up OpenOptions, we try connecting to the site,
  2172. X * redialing if necessary, and do some initialization steps so the user
  2173. X * can send commands.
  2174. X */
  2175. Xint Open(OpenOptions *openopt)
  2176. X{
  2177. X    int                    hErr;
  2178. X    int                    dials;
  2179. X    char                *ruser, *rpass, *racct;
  2180. X    int                    siteInRC;
  2181. X    char                *user, *pass, *acct;    
  2182. X    int                    login_verbosity, oldv;
  2183. X
  2184. X    macnum = 0;     /* Reset macros. */
  2185. X
  2186. X    /* If the hostname supplied is in the form host.name.str:/path/file,
  2187. X     * then colon mode was used, and we need to fix the hostname to be
  2188. X     * just the hostname, copy the /path/file to colonmode path, and init
  2189. X     * the login_verbosity variable.
  2190. X     */
  2191. X    if (CheckForColonMode(openopt, &login_verbosity) == USAGE)
  2192. X        return USAGE;
  2193. X
  2194. X    /* If the hostname supplied was an abbreviation, such as just
  2195. X     * "wu" (wuarchive.wustl.edu), look through the list of sites
  2196. X     * we know about and get the whole name.  We also would like
  2197. X     * the path we want to start out in, if it is available.
  2198. X     */
  2199. X    GetFullSiteName(openopt->hostname, openopt->cdpath);
  2200. X
  2201. X#ifdef GATEWAY
  2202. X    /* Make sure the gateway host name is a full name and not an
  2203. X     * abbreviation.
  2204. X     */
  2205. X    if (*gateway)
  2206. X        GetFullSiteName(gateway, NULL);
  2207. X#endif
  2208. X
  2209. X    ruser = rpass = racct = NULL;
  2210. X    /* This also loads the init macro. */
  2211. X    siteInRC = ruserpass2(openopt->hostname, &ruser, &rpass, &racct);
  2212. X    if (ISANONOPEN(openopt->openmode)) {
  2213. X        user = "anonymous";
  2214. X        pass = anon_password;
  2215. X    } else {
  2216. X        user = NULL;
  2217. X        pass = NULL;
  2218. X    }
  2219. X    acct = NULL;
  2220. X    
  2221. X    if (siteInRC && !openopt->ignore_rc) {
  2222. X        acct = racct;
  2223. X        if (ruser != NULL) {
  2224. X            /* We were given a username.  If we were given explicit
  2225. X             * instructions from the command line, follow those and
  2226. X             * ignore what the RC had.  Otherwise if no -a or -u
  2227. X             * was specified, we use whatever was in the RC.
  2228. X             */
  2229. X            if (ISIMPLICITOPEN(openopt->openmode)) {
  2230. X                user = ruser;
  2231. X                pass = rpass;
  2232. X            }
  2233. X        }        
  2234. X    }
  2235. X
  2236. X    for (
  2237. X            dials = 0;
  2238. X            openopt->max_dials < 0 || dials < openopt->max_dials;
  2239. X            dials++)
  2240. X    {
  2241. X        if (dials > 0) {
  2242. X            /* If this is the second dial or higher, sleep a bit. */
  2243. X            (void) sleep(openopt->redial_delay);
  2244. X            (void) fprintf(stderr, "Retry Number: %d\n", dials + 1);
  2245. X        }
  2246. X
  2247. X        if ((hErr = HookupToRemote(openopt)) == -2)    
  2248. X            /* Recoverable, so we can try re-dialing. */
  2249. X            continue;
  2250. X        else if (hErr == NOERR) {
  2251. X            /* We were hookup'd successfully. */
  2252. X            connected = 1;
  2253. X
  2254. X        oldv = verbose;  verbose = login_verbosity;
  2255. X        
  2256. X#ifdef GATEWAY
  2257. X            if (*gateway) {
  2258. X                if ((Login(
  2259. X                    user,
  2260. X                    pass,
  2261. X                    acct,
  2262. X                    (!openopt->ignore_rc && !openopt->colonmodepath[0])
  2263. X                ) != NOERR) || cout == NULL)
  2264. X                    goto nextdial;        /* error! */
  2265. X            }
  2266. X#endif
  2267. X
  2268. X#ifdef GATEWAY
  2269. X            if (!*gateway) {
  2270. X#endif
  2271. X                /* We don't want to run the init macro for colon-mode. */
  2272. X                if ((Login(
  2273. X                        user,
  2274. X                        pass,
  2275. X                        acct,
  2276. X                        (!openopt->ignore_rc && !openopt->colonmodepath[0])
  2277. X                    ) != NOERR) || cout == NULL)
  2278. X                {
  2279. X                    goto nextdial;        /* error! */
  2280. X                }
  2281. X#ifdef GATEWAY
  2282. X            }
  2283. X#endif
  2284. X
  2285. X            verbose = oldv;
  2286. X
  2287. X            /* We need to check for unix and see if we should set binary
  2288. X             * mode automatically.
  2289. X             */
  2290. X            CheckRemoteSystemType(openopt->colonmodepath[0] != (char)0);
  2291. X
  2292. X            if (openopt->colonmodepath[0]) {
  2293. X                ColonMode(openopt);
  2294. X            } else if (openopt->cdpath[0]) {
  2295. X                /* If we didn't have a colon-mode path, we try setting
  2296. X                 * the current remote directory to cdpath.  cdpath is
  2297. X                 * usually the last directory we were in the previous
  2298. X                 * time we called this site.
  2299. X                 */
  2300. X                (void) _cd(openopt->cdpath);
  2301. X            } else {
  2302. X                /* Freshen 'cwd' variable for the prompt. 
  2303. X                 * We have to do atleast one 'cd' so our variable
  2304. X                 * cwd (which is saved by _cd()) is set to something
  2305. X                 * valid.
  2306. X                 */
  2307. X                (void) _cd(NULL);
  2308. X            }
  2309. X            break;    /* we are connected, so break the redial loop. */
  2310. X            /* end if we are connected */
  2311. X        } else {
  2312. X            /* Irrecoverable error, so don't bother redialing. */
  2313. X            /* The error message should have already been printed
  2314. X             * from Hookup().
  2315. X             */
  2316. X            break;
  2317. X        }
  2318. Xnextdial: continue;    /* Try re-dialing. */
  2319. X    }
  2320. X    return (NOERR);
  2321. X}    /* Open */
  2322. X
  2323. X
  2324. X
  2325. X/* This stub is called by our command parser. */
  2326. Xint cmdOpen(int argc, char **argv)
  2327. X{
  2328. X    OpenOptions            openopt;
  2329. X
  2330. X    /* If there is already a site open, close that one so we can
  2331. X     * open a new one.
  2332. X     */
  2333. X    if (connected && NOT_VQUIET && hostname[0]) {
  2334. X        (void) printf("Closing %s...\n", hostname);
  2335. X        (void) disconnect(0, NULL);
  2336. X    }
  2337. X
  2338. X    if ((GetOpenOptions(argc, argv, &openopt) == USAGE) ||
  2339. X        (Open(&openopt) == USAGE))
  2340. X        return USAGE;
  2341. X    return NOERR;
  2342. X}    /* cmdOpen */
  2343. X
  2344. X/* eof open.c */
  2345. END_OF_FILE
  2346.   if test 16566 -ne `wc -c <'open.c'`; then
  2347.     echo shar: \"'open.c'\" unpacked with wrong size!
  2348.   fi
  2349.   # end of 'open.c'
  2350. fi
  2351. echo shar: End of archive 3 \(of 6\).
  2352. cp /dev/null ark3isdone
  2353. MISSING=""
  2354. for I in 1 2 3 4 5 6 ; do
  2355.     if test ! -f ark${I}isdone ; then
  2356.     MISSING="${MISSING} ${I}"
  2357.     fi
  2358. done
  2359. if test "${MISSING}" = "" ; then
  2360.     echo You have unpacked all 6 archives.
  2361.     rm -f ark[1-9]isdone
  2362. else
  2363.     echo You still must unpack the following archives:
  2364.     echo "        " ${MISSING}
  2365. fi
  2366. exit 0
  2367. exit 0 # Just in case...
  2368.