1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
|
#!/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...:
|
