#!/bin/sh # Bear Access Launchpad based on pdmenu # This file by Randolph Chung <rc42@cornell.edu> 9/25/97 # Pdmenu is written by Joey Hess <joey@kitenet.net> # requires pdmenu version >= 1.2 # also uses several basic GNU utilities: date, grep, mkfifo and tail OLDTERM=$TERM X=OFF case "$1" in --no-x|-n) X=OFF ;; --with-x|-x) X=ON ;; esac export TERM=vt100 stty rows 24 # some CU telnet servers assume a 24 line display # So this is a hack... sue me :) LINE=`grep -n '^# ba4unix #' $0|cut -d: -f1` if [ "$X" = "ON" ]; then export browser=netscape export tn3270=x3270 export telnet="xterm -e telnet" else export browser=lynx export tn3270=tn3270 export telnet=telnet fi tail --lines=+$LINE "$0" | pdmenu - export TERM=$OLDTERM exit 0 # Do not delete or modify the next line # ba4unix # #Set a pleasing color scheme. color:desktop:white:blue color:title:black:lightgray color:base:black:lightgray color:menu:white:red #Define the main menu: #Not quite bear access... but ... menu:main:Bear Access for Unix exec:Bear Access for Unix help::$browser http://cslug.orie.cornell.edu/~lug/ba4unix/help.html group:Kerberos... exec::makemenu: \ echo "menu:kerb:Kerberos (`klist 2>&1|grep Principal:|cut -f2|tr A-Z a-z|sed -e 's/@cit.*//'`)"; \ echo "group:Get kerberos ticket"; \ echo "exec:::kinit"; \ echo "exit"; \ echo "endgroup"; \ echo "group:List kerberos tickets"; \ echo "exec:List kerberos tickets:display:klist 2>&1"; \ echo "exit"; \ echo "endgroup"; \ echo "group:Destroy kerberos tickets"; \ echo "exec::display:kdestroy 2>&1"; \ echo "exit"; \ echo "endgroup"; \ echo "nop"; \ echo "exit:Main Menu" show:::kerb remove:::kerb endgroup exec:Mail::pine -i exec:Traveler's Mail::$telnet tmail.mail.cornell.edu exec:CUInfo via web::$browser http://www.cornell.edu/ exec:CUInfo/WWW via Telnet::$telnet www.cornell.edu exec:World Wide Web::$browser exec:Network News::slrn -n -C show:Library resources...::library exec:Just the Facts::$telnet jtf.cit.cornell.edu 1240 exec:Course Technology Information::$browser http://instruct1.cit.cornell.edu/course.html exec:Career Services::$browser http://www.career.cornell.edu/ccs/ exec:Who I Am::$browser http://whoiam.cornell.edu/ exec:File Transfer (FTP)::ncftp show:Campus Hosts (Telnet)...::$telnet nop exit:Quit: menu:library:Library Resources:Library Resources exec:Library catalog::$tn3270 notis.library.cornell.edu show:Circulation Services...::lib_circ exec:Cornell Library Web::$browser http://www.library.cornell.edu/ exec:Cornell Library Web via telnet::$telnet gateway.library.cornell.edu 328 exec:Electronic Journals - WWW::$browser http://www.library.cornell.edu/library/ejournal.html exec:Mann Library Gateway::$browser http://mann.library.cornell.edu/no_javascript/gateway.html show:Abstracts and Indexes...::lib_index show:Cornell Library Catalogs...::lib_cat nop exit:_Main menu...: menu:lib_circ:Circulation Services exec:Booksout::$telnet gateway.library.cornell.edu 343 exec:Course Reserve::$telnet gateway.library.cornell.edu 344 exec:Renew, Recall, ILL and More!::$browser http://www.library.cornell.edu/library/forms.html nop exit:return to Library Resources...: menu:lib_index:Abstracts and Indexes exec:Abstracts & Indexes Linked to the Catalog::$telnet gateway.library.cornell.edu 333 exec:Avery Architectural Index::$telnet gateway.library.cornell.edu 304 exec:Bib. of the History of Art::$telnet gateway.library.cornell.edu 340 exec:Chemical Abstract Student Edition::$telnet gateway.library.cornell.edu 342 exec:Ei Compendex - WWW::$browser http://www.englib.cornell.edu/electronic_resources/compendex.html exec:Engineering Index (Eip)::$telnet gateway.library.cornell.edu 309 exec:English Short Title Catalog::$telnet gateway.library.cornell.edu 329 exec:Foreign Legal Periodicals::$telnet gateway.library.cornell.edu 310 exec:Hispanic Amer. Periodicals::$telnet gateway.library.cornell.edu 312 exec:Hist. of Science & Tech.::$telnet gateway.library.cornell.edu 313 exec:INSPEC::$telnet gateway.library.cornell.edu 317 exec:MathSci Net - WWW::$browser http://www.ams.org/mathscinet/ exec:Periodical Contents Index - WWW::$browser http://pci.chadwyck.com/ exec:RILM (Music Abstracts)::$telnet gateway.library.cornell.edu 341 exec:UnCover (Article Delivery)::$telnet gateway.library.cornell.edu 327 exec:Books in Print::$tn3270 cbsserv1.cbs.cornell.edu 1242 exec:Cornell Lecture Recordings 1975-1995::$telnet gopher2.cit.cornell.edu 301 nop exit:return to Library Resources...: menu:lib_cat:Library catalogs exec:Library catalog::$tn3270 notis.library.cornell.edu exec:CUL Experimental WWW Catalog::$browser http://www.library.cornell.edu/catalog/ exec:Cornell Medical College Catalog::$telnet gateway.library.cornell.edu 319 exec:CRL Catalog (Chicago)::$telnet gateway.library.cornell.edu 308 exec:OCLC (WorldCat)::$telnet gateway.library.cornell.edu 321 exec:RLIN/Eureka::$telnet gateway.library.cornell.edu 325 nop exit:Library resources...: menu:$telnet:Campus Hosts:Campus Hosts exec:GAEA (CISER)::$telnet gaea.ciser.cornell.edu exec:INSTRUCT1 ::$telnet instruct1.cit.cornell.edu exec:INSTRUCT2 ::$telnet instruct2.cit.cornell.edu exec:INSTRUCT3 ::$telnet instruct3.cit.cornell.edu exec:RSRCH1 ::$telnet rsrch1.cit.cornell.edu exec:SAFETYNET ::$telnet safetynet.cit.cornell.edu exec:CORNELLC ::$tn3270 cornellc.cit.cornell.edu exec:Telnet ::$telnet exec:TN3270 ::$tn3270 nop exit:Main menu...: