home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / sys / sgi / 16100 < prev    next >
Encoding:
Internet Message Format  |  1992-11-08  |  15.9 KB

  1. Xref: sparky comp.sys.sgi:16100 comp.mail.elm:3210
  2. Newsgroups: comp.sys.sgi,comp.mail.elm
  3. Path: sparky!uunet!charon.amdahl.com!pacbell.com!ames!elroy.jpl.nasa.gov!usc!wupost!gumby!yale!yale.edu!news.yale.edu!neutron!dcs
  4. From: dcs@neutron.chem.yale.edu (Dave Schweisguth)
  5. Subject: SGI Workspace support for Elm
  6. Message-ID: <1992Nov7.004153.22771@news.yale.edu>
  7. Sender: news@news.yale.edu (USENET News System)
  8. Nntp-Posting-Host: neutron.chem.yale.edu
  9. Organization: Yale University
  10. X-Newsreader: TIN [version 1.1 PL6]
  11. Date: Sat, 7 Nov 1992 00:41:53 GMT
  12. Lines: 440
  13.  
  14. This is not deja vu, it's a repost. Enclosed is a Workspace support
  15. package for the very cool but until now "non-graphical" Elm mailer.
  16.  
  17. Tom Barton of SGI found a problem with the install procedure: if you do a
  18. 'make install-personal' and one of the _system-wide_ ftr directories has no
  19. ftr files, you lose. The problem is in SGI's
  20. /usr/lib/filetype/Makefile.personal. A fixed version is now included and
  21. automatically used by the top-level Makefile. So here we go again:
  22.  
  23. #! /bin/sh
  24. # This is a shell archive.  Remove anything before this line, then unpack
  25. # it by saving it into a file and typing "sh file".  To overwrite existing
  26. # files, type "sh file -c".  You can also feed this as standard input via
  27. # unshar, or by typing "sh <file", e.g..  If this archive is complete, you
  28. # will see the following message at the end:
  29. #        "End of shell archive."
  30. # Contents:  elm-ws-support elm-ws-support/Makefile
  31. #   elm-ws-support/Makefile.personal elm-ws-support/README
  32. #   elm-ws-support/README.tag elm-ws-support/elm.ftr
  33. #   elm-ws-support/elm.wsrc
  34. # Wrapped by dcs@neutron on Fri Nov  6 14:50:44 1992
  35. PATH=/bin:/usr/bin:/usr/ucb ; export PATH
  36. if test ! -d 'elm-ws-support' ; then
  37.     echo shar: Creating directory \"'elm-ws-support'\"
  38.     mkdir 'elm-ws-support'
  39. fi
  40. if test -f 'elm-ws-support/Makefile' -a "${1}" != "-c" ; then 
  41.   echo shar: Will not clobber existing file \"'elm-ws-support/Makefile'\"
  42. else
  43. echo shar: Extracting \"'elm-ws-support/Makefile'\" \(2013 characters\)
  44. sed "s/^X//" >'elm-ws-support/Makefile' <<'END_OF_FILE'
  45. X# Makefile for sgi-workspace support installation.
  46. X
  47. X# SGI-proofing
  48. X
  49. XSHELL    = /bin/sh
  50. X
  51. X# Directories for system-wide installation
  52. X
  53. XDEST    = /usr/local/bin
  54. XFTDIR    = /usr/lib/filetype
  55. XWSDIR    = /usr/lib/workspace
  56. X
  57. X# Directories for personal installation
  58. X
  59. XPDEST    = $(HOME)/bin
  60. XPFTDIR    = $(HOME)/.workspace
  61. XPWSDIR    = $(HOME)/.workspace
  62. X
  63. X# Etc.
  64. X
  65. XELMTAG    = 780000
  66. X
  67. X# Targets
  68. X
  69. Xdefault:
  70. X    @echo "There's nothing to compile. 'make' one of these targets:"
  71. X    @echo ""
  72. X    @echo "  install-system"
  73. X    @echo "  remove-system"
  74. X    @echo "  install-personal"
  75. X    @echo "  remove-personal"
  76. X    @echo ""
  77. X
  78. Xinstall-system:         $(FTDIR)/workspace.ctr tag-system $(WSDIR)/elm.wsrc
  79. X
  80. X$(FTDIR)/workspace.ctr:        $(FTDIR)/local/elm.ftr
  81. X                cd $(FTDIR); make
  82. X
  83. X$(FTDIR)/local/elm.ftr:        elm.ftr
  84. X                if [ ! -d $(FTDIR)/local ]; then mkdir $(FTDIR)/local; fi
  85. X                cp elm.ftr $(FTDIR)/local/elm.ftr
  86. X
  87. Xtag-system:            $(DEST)/elm
  88. X                /usr/sbin/tag $(ELMTAG) $(DEST)/elm
  89. X
  90. X$(WSDIR)/elm.wsrc:        always
  91. X                sed s@DEST@$(DEST)@ elm.wsrc > $(WSDIR)/elm.wsrc
  92. X
  93. Xremove-system:
  94. X                rm -f $(FTDIR)/local/elm.ftr $(WSDIR)/elm.wsrc
  95. X                cd $(FTDIR); make
  96. X                /usr/sbin/tag -c $(DEST)/elm
  97. X
  98. Xinstall-personal:         $(PFTDIR)/workspace.ctr tag-personal $(PWSDIR)/database
  99. X
  100. X$(PFTDIR)/workspace.ctr:    $(PFTDIR)/local/elm.ftr
  101. X                cd $(PFTDIR); make -f $(PWD)/Makefile.personal
  102. X
  103. X$(PFTDIR)/local/elm.ftr:    elm.ftr
  104. X                if [ ! -d $(PFTDIR)/local ]; then mkdir $(PFTDIR)/local; fi
  105. X                cp elm.ftr $(PFTDIR)/local/elm.ftr
  106. X
  107. Xtag-personal:            $(PDEST)/elm
  108. X                /usr/sbin/tag $(ELMTAG) $(PDEST)/elm
  109. X
  110. X$(PWSDIR)/database:        always
  111. X                sed s@DEST@$(PDEST)@ elm.wsrc >> $(PWSDIR)/database
  112. X
  113. Xremove-personal:
  114. X                rm -f $(PFTDIR)/local/elm.ftr
  115. X                if [ -d $(PFTDIR)/local -a ! -r $(PFTDIR)/local/* ]; then rmdir $(PFTDIR)/local; fi
  116. X                if [ -r $(PFTDIR)/default/* -o -r $(PFTDIR)/system/* -o -r $(PFTDIR)/install/* -o -r $(PFTDIR)/local/* ]; then \
  117. X                  cd $(PFTDIR); make -f $(PWD)/Makefile.personal; \
  118. X                else \
  119. X                  cd $(PFTDIR); make -f $(PWD)/Makefile.personal clean; \
  120. X                fi
  121. X                /usr/sbin/tag -c $(PDEST)/elm
  122. X
  123. Xalways:
  124. END_OF_FILE
  125. if test 2013 -ne `wc -c <'elm-ws-support/Makefile'`; then
  126.     echo shar: \"'elm-ws-support/Makefile'\" unpacked with wrong size!
  127. fi
  128. # end of 'elm-ws-support/Makefile'
  129. fi
  130. if test -f 'elm-ws-support/Makefile.personal' -a "${1}" != "-c" ; then 
  131.   echo shar: Will not clobber existing file \"'elm-ws-support/Makefile.personal'\"
  132. else
  133. echo shar: Extracting \"'elm-ws-support/Makefile.personal'\" \(1669 characters\)
  134. sed "s/^X//" >'elm-ws-support/Makefile.personal' <<'END_OF_FILE'
  135. X#
  136. X# Run this makefile from within your $HOME/.workspace in order to rebuild
  137. X# the compiled type rule (*.ctr) files from the file type rule (*.ftr)
  138. X# files.
  139. X#
  140. X# Ftr files which locally override:          Should be put into:
  141. X#    Locally written file type rule files        $HOME/.workspace/local
  142. X#    Vendor written file type rule files         $HOME/.workspace/install
  143. X#    Standard SGI file type rules                $HOME/.workspace/system
  144. X#    The basic set of file type rules            $HOME/.workspace/default
  145. X#
  146. X# Good luck and happy .ftr'ing!
  147. X#
  148. X
  149. XSHELL= /bin/sh
  150. XFTR= /usr/sbin/ftr
  151. XTARGETS = workspace.ctr 
  152. X
  153. Xdefault all:    $(TARGETS)
  154. X    @echo " "
  155. X    @echo Done building your personal workspace.ctr file
  156. X
  157. Xworkspace.ctr:    always
  158. X    (cd /usr/lib/filetype/local; if [ -r *.ftr ]; then $(FTR) *.ftr -o /tmp/local.ctr; fi)
  159. X    (cd /usr/lib/filetype/install; if [ -r *.ftr ]; then $(FTR) *.ftr -o /tmp/install.ctr; fi)
  160. X    (cd /usr/lib/filetype/system; $(FTR) *.ftr -o /tmp/system.ctr)
  161. X    (cd /usr/lib/filetype/default; $(FTR) *.ftr -o /tmp/default.ctr)
  162. X    @dirs=""; \
  163. X    for i in . \
  164. X        local \
  165. X        /tmp/local.ctr \
  166. X        install \
  167. X        /tmp/install.ctr \
  168. X        system  \
  169. X        /tmp/system.ctr  \
  170. X        default \
  171. X        /tmp/default.ctr; \
  172. X        do \
  173. X        if [ -d $${i} ]; then \
  174. X            for j in $${i}/*.ftr ; \
  175. X                do \
  176. X                if [ -r $${j} ] ; then \
  177. X                    dirs="$${dirs} $${j}"; \
  178. X                fi ; \
  179. X            done; \
  180. X        else  case $${i} in \
  181. X            *.ctr) if [ -r $${i} ]; then dirs="$${dirs} $${i}"; fi ;; \
  182. X             esac; \
  183. X        fi; \
  184. X    done; \
  185. X    echo /usr/sbin/ftr $${dirs} -o workspace.ctr ; \
  186. X    rm -f $@; \
  187. X    /usr/sbin/ftr $${dirs} -o $@
  188. X    rm -f /tmp/local.ctr /tmp/install.ctr /tmp/system.ctr /tmp/default.ctr
  189. X
  190. Xalways:
  191. Xclean clobber :
  192. X    rm -f $(TARGETS)
  193. END_OF_FILE
  194. if test 1669 -ne `wc -c <'elm-ws-support/Makefile.personal'`; then
  195.     echo shar: \"'elm-ws-support/Makefile.personal'\" unpacked with wrong size!
  196. fi
  197. # end of 'elm-ws-support/Makefile.personal'
  198. fi
  199. if test -f 'elm-ws-support/README' -a "${1}" != "-c" ; then 
  200.   echo shar: Will not clobber existing file \"'elm-ws-support/README'\"
  201. else
  202. echo shar: Extracting \"'elm-ws-support/README'\" \(3092 characters\)
  203. sed "s/^X//" >'elm-ws-support/README' <<'END_OF_FILE'
  204. XThis package links Elm with Silicon Graphics' Workspace.
  205. X
  206. XRequirements:
  207. X
  208. X  IRIX 4.0.1 or greater
  209. X  Elm
  210. X
  211. XInstallation:
  212. X
  213. X  1) Build Elm and install it either publically or in your own binaries
  214. X     directory.
  215. X  2) Look at the Makefile and make sure that the directories near the top are
  216. X     correct. (They should be, except perhaps for the location of Elm.)
  217. X  3) To install in your own .workspace directory, 'make install-personal'.
  218. X     To install publically, 'su' to root and 'make install-system'.
  219. X
  220. X  Three things happen during installation: 1) three new icons are added to
  221. X  the Workspace, 2) the Elm executable is 'tag'ged so the Workspace can
  222. X  identify it, and 3) the Elm and mailbox icons are moved to the blue
  223. X  Workspace window for easy access.
  224. X
  225. XRemoval:
  226. X
  227. X  If you don't like it, do 'make remove-system' or 'make remove-personal'.
  228. X
  229. XUsage:
  230. X
  231. X  The Elm icon behaves much like the Mail icon. The mailbox and mailfile
  232. X  icons have been changed to use Elm rather than Mail. Here are the details:
  233. X
  234. X  The Elm icon
  235. X  ------------
  236. X
  237. X  Open opens an Elm window.
  238. X  Alt-open prompts you for a recipient and opens an Elm window in send-only
  239. X    mode.
  240. X  Dropping a mailfile onto Elm opens an Elm window for that mailfile.
  241. X  Dropping a non-mailfile onto Elm prompts you for a recipient and sends the
  242. X    file without opening a window.
  243. X
  244. X  The mailbox icon
  245. X  ----------------
  246. X
  247. X  Open runs a mailbox. When mail arrives and you click on the mailbox, an Elm
  248. X    an Elm window will open.
  249. X  Alt-open prompts you for an alternative mailbox command. This isn't
  250. X    too useful, but you can fool with the latitude and longitude.
  251. X
  252. X  The mailfile icon
  253. X  -----------------
  254. X
  255. X  Open opens an Elm window for that mailfile.
  256. X  Alt-open opens an editor window for that mailfile.
  257. X  Dropping a mailfile onto another mailfile concatenates the files.
  258. X  Dropping a non-mailfile onto a mailfile doesn't do anything.
  259. X  Printing a mailfile sends it to the printer. Zowie!
  260. X
  261. X  Note that you can "open" an icon by double-clicking on it or selecting it
  262. X  and choosing "Open" from the right-button popup, and you can "alt-open" an
  263. X  icon by holding down Alt and doing either of the foregoing. You can drop
  264. X  multiple icons on another icon by selecting the icons you want to drop,
  265. X  then dragging and dropping, or by selecting the icons you want to drop and
  266. X  the icon you want to drop them on, then opening the group. Sensible things
  267. X  will usually happen when you do any of the above.
  268. X
  269. XNotes:
  270. X
  271. X  /usr/lib/filetype/Makefile.personal doesn't work if /usr/lib/filetype/local
  272. X  is empty. This package uses a fixed version of that file.
  273. X
  274. XMiscellany:
  275. X
  276. X  1) No rights reserved.
  277. X
  278. X  2) This package might destroy mail critical to your career. I take
  279. X     absolutely no responsibility whatsoever for that sort of thing.
  280. X
  281. X  3) Large chunks of the .ftr file are copied straight out of what is
  282. X     probably copyrighted SGI software. I trust they'll be cool about it.
  283. X
  284. X  4) Direct all correspondence, questions, etc. to Dave Schweisguth, aka
  285. X     dcs@neutron.chem.yale.edu. I would like to hear about problems or
  286. X     improvements.
  287. X
  288. X  5) Enjoy.
  289. END_OF_FILE
  290. if test 3092 -ne `wc -c <'elm-ws-support/README'`; then
  291.     echo shar: \"'elm-ws-support/README'\" unpacked with wrong size!
  292. fi
  293. # end of 'elm-ws-support/README'
  294. fi
  295. if test -f 'elm-ws-support/README.tag' -a "${1}" != "-c" ; then 
  296.   echo shar: Will not clobber existing file \"'elm-ws-support/README.tag'\"
  297. else
  298. echo shar: Extracting \"'elm-ws-support/README.tag'\" \(1480 characters\)
  299. sed "s/^X//" >'elm-ws-support/README.tag' <<'END_OF_FILE'
  300. XHere's the note I got from the SGI workspace folk (workspacetags@sgi.com):
  301. X
  302. X===============================================================================
  303. X
  304. XFrom: lindi@rugrat.esd.sgi.com (Lindi Lake)
  305. XDate: Fri, 30 Oct 1992 14:47:43 -0800
  306. XIn-Reply-To: dcs@neutron.chem.yale.edu (Dave Schweisguth)
  307. X        "Requesting tag(s) for Elm mail package" (Oct 22,  9:32am)
  308. XTo: dcs (Dave Schweisguth)
  309. XSubject: Re: Requesting tag(s) for Elm mail package
  310. X
  311. XHi Dave,
  312. X
  313. XI have given you tag #0078-XXXX.  /the X's can be any number 0-9 or any
  314. Xletter A-F.  If I can be of any other help please let me know.
  315. X
  316. XLindi
  317. X
  318. XOn Oct 22,  9:32am, Dave Schweisguth wrote:
  319. X> Subject: Requesting tag(s) for Elm mail package
  320. X> Hi (Ms. Zeller?),
  321. X>
  322. X> I have set up an ftr file for the public-domain Elm package. I'm currently
  323. X> using Octal: 0105114115  Decimal: 18126925  Hex: 0x114984d for the tag (the
  324. X> octal number spells out e-l-m) but it couldn't hurt to go official. I'd like
  325. X> to know if anyone has requested a block of tags for Elm. If not, I'd like to
  326. X> request one myself. I presently only need a single tag, but Elm includes a
  327. X> dozen or so executables so it couldn't hurt to leave room for expansion.
  328. X>
  329. X> Thanks,
  330. X>
  331. X> --
  332. X> | Dave Schweisguth   Yale MB&B & Chemistry   Net: dcs@neutron.chem.yale.edu |
  333. X> | Lab phone: 203-432-5208     Fax: 203-432-6144    Home phone: 203-624-3866 |
  334. X
  335. X===============================================================================
  336. X
  337. XI'm using 780000 for the Elm executable.
  338. END_OF_FILE
  339. if test 1480 -ne `wc -c <'elm-ws-support/README.tag'`; then
  340.     echo shar: \"'elm-ws-support/README.tag'\" unpacked with wrong size!
  341. fi
  342. # end of 'elm-ws-support/README.tag'
  343. fi
  344. if test -f 'elm-ws-support/elm.ftr' -a "${1}" != "-c" ; then 
  345.   echo shar: Will not clobber existing file \"'elm-ws-support/elm.ftr'\"
  346. else
  347. echo shar: Extracting \"'elm-ws-support/elm.ftr'\" \(2791 characters\)
  348. sed "s/^X//" >'elm-ws-support/elm.ftr' <<'END_OF_FILE'
  349. XTYPE elmExecutable
  350. X    MATCH    tag == 780000;
  351. X    LEGEND    Elm Mail command
  352. X    SUPERTYPE    Executable
  353. X    CMD OPEN    if [ "$RESTTYPE" = "MailFile" ]
  354. X                then
  355. X                    for i in $REST
  356. X                    do
  357. X            xwsh -name Elm -e $LEADER -f $i
  358. X                    done
  359. X                elif [ -n "$REST" ]
  360. X                then
  361. X                launch -m 'To whom would you like to send the file(s)?' -h "cat $REST | elm -s \"$SELECTED\"" -t "> /dev/null"
  362. X                else
  363. X                    xwsh -name Elm -e $LEADER
  364. X                fi
  365. X    CMD ALTOPEN    launch -m 'To whom would you like to send a message?' -h 'xwsh -name Elm -e /usr/local/bin/elm'
  366. X    CMD DROP    if [ "$SELECTEDTYPE" = "MailFile" ]
  367. X        then
  368. X            for i in $SELECTED
  369. X            do
  370. X                    xwsh -name Elm -e $TARGET -f $i
  371. X            done
  372. X        else
  373. X                launch -m 'To whom would you like to send the file(s)?' -h "cat $SELECTED | elm -s \"$SELECTED\"" -t "> /dev/null"
  374. X        fi
  375. X    ICON    {
  376. X        if (opened) {
  377. X            include("/usr/lib/filetype/iconlib/generic.exec.open.fti");
  378. X        } else {
  379. X            include("/usr/lib/filetype/iconlib/generic.exec.closed.fti");
  380. X        }
  381. X        include("/usr/lib/filetype/system/iconlib/MailExecutable.fti");
  382. X    }
  383. X
  384. XTYPE MailBoxExecutable
  385. X    MATCH    tag == 0x101a;
  386. X    LEGEND    Mailbox
  387. X    SUPERTYPE    Executable
  388. X    CMD OPEN    $LEADER -L 45 -M 75 -m "xwsh -xrm XWsh\*autoFork:false -name Elm -e /usr/local/bin/elm"
  389. X    CMD ALTOPEN    launch -c $LEADER $REST -L 45 -M 75 -m \"xwsh -xrm XWsh\\\*autoFork:false -name Elm -e /usr/local/bin/elm\"
  390. X    BOUNDS    -155, -260, 285, 180
  391. X    ICON    {
  392. X        include("/usr/lib/filetype/system/iconlib/mailbox.background.fti");
  393. X    if (opened) {
  394. X        include("/usr/lib/filetype/system/iconlib/mailbox.open.fti");
  395. X    } else {
  396. X        include("/usr/lib/filetype/system/iconlib/mailbox.closed.fti");
  397. X    }
  398. X    include("/usr/lib/filetype/system/iconlib/mailbox.shell.fti");
  399. X    if (opened) {
  400. X        include("/usr/lib/filetype/system/iconlib/mailbox.flag.up.fti");
  401. X    } else {
  402. X        include("/usr/lib/filetype/system/iconlib/mailbox.flag.down.fti");
  403. X    }
  404. X    }
  405. X
  406. XTYPE MailFile
  407. X    MATCH    ascii && string(0,5) == "From ";
  408. X    LEGEND    mail file
  409. X    SUPERTYPE    Ascii
  410. X    CMD OPEN    for i in $LEADER $REST; do xwsh -name Elm -e elm -f $i; done
  411. X    CMD ALTOPEN    $WINEDITOR $LEADER $REST
  412. X    CMD DROP    if [ "$SELECTEDTYPE" = "MailFile" ]
  413. X        then
  414. X            cat $SELECTED >> $TARGET
  415. X        else
  416. X            inform "Non-mail files cannot be appended to mail files."
  417. X        fi
  418. X    CMD PRINT    routeprint -g -t $LEADERTYPE $LEADER $REST
  419. X    ICON    {
  420. X        include("/usr/lib/filetype/system/iconlib/MailFile.shadow.fti");
  421. X        if (opened) {
  422. X            include("/usr/lib/filetype/system/iconlib/MailFile.open.fti");
  423. X        } else {
  424. X            include("/usr/lib/filetype/system/iconlib/MailFile.closed.fti");
  425. X        }
  426. X    }
  427. END_OF_FILE
  428. if test 2791 -ne `wc -c <'elm-ws-support/elm.ftr'`; then
  429.     echo shar: \"'elm-ws-support/elm.ftr'\" unpacked with wrong size!
  430. fi
  431. # end of 'elm-ws-support/elm.ftr'
  432. fi
  433. if test -f 'elm-ws-support/elm.wsrc' -a "${1}" != "-c" ; then 
  434.   echo shar: Will not clobber existing file \"'elm-ws-support/elm.wsrc'\"
  435. else
  436. echo shar: Extracting \"'elm-ws-support/elm.wsrc'\" \(103 characters\)
  437. sed "s/^X//" >'elm-ws-support/elm.wsrc' <<'END_OF_FILE'
  438. XDEST/elm 0 450 651 0 719760158 elmExecutable
  439. X/usr/sbin/mailbox 0 570 651 0 718653300 MailBoxExecutable
  440. END_OF_FILE
  441. if test 103 -ne `wc -c <'elm-ws-support/elm.wsrc'`; then
  442.     echo shar: \"'elm-ws-support/elm.wsrc'\" unpacked with wrong size!
  443. fi
  444. # end of 'elm-ws-support/elm.wsrc'
  445. fi
  446. echo shar: End of shell archive.
  447. exit 0
  448.  
  449. Cheers,
  450.  
  451. --
  452. | Dave Schweisguth   Yale MB&B & Chemistry   Net: dcs@neutron.chem.yale.edu |
  453. | Lab phone: 203-432-5208     Fax: 203-432-6144    Home phone: 203-624-3866 |
  454.