KDICKEY@cmsa.gmr.com (06/25/91)
Hello, Does anyone know of a TN3270 implementation for the Apollo operating system? Thanks, Keith Dickey kdickey@cmsa.gmr.com General Motors Research Laboratories
obrennan@CC3.CC.UMR.EDU (obrennan) (06/25/91)
You can obtain TN3270 from UUNET.UU.NET under anonymous FTP.
I have found that depending on the version of Domain/OS, it
may or may not run in an Apollo DM window. I have always had
success running it in an XTERM window. As a matter of fact,
XTERM works nicely because you can choose your own colors, fonts
and number of rows (24, 32, 43 are supported by the IBM systems).
You will need to setup the default key mapping in /etc/map3270
(map3270 is part of the distribution). I couldn't map all of the
DM keys, but here is the file at the point I gave up; actually,
most of the keys ARE mapped:
--------------------------------------------------------------------
#
# Copyright (c) 1987 Regents of the University of California.
# All rights reserved. The Berkeley software License Agreement
# specifies the terms and conditions for redistribution.
#
# @(#)map3270 1.1 (Berkeley) 11/20/87
#
#
# /etc/map3270 (/usr/new/etc/map3270 before migration)
# mail corrections and additions to "termcap"
#
# this file contains mappings between characters entered from the keyboard,
# and 3270 keys, for use by programs (like tn3270) doing 3270 emulation
# from unix.
#
# inside the single quotes, a caret ("^") introduces a control character
# sequence (rub out = ^?, by the way). also inside the single quotes,
# a backslash ('\') introduces an escaped character. Also, \n, \r, \t,
# are all as in c, and \E is another way of representing escape.
#
# NOTE that while we are defining lots of function, much of that
# function (ie: local editing keys) may not yet be available from
# tn3270.
apollo_15_color {
enter = '^m';
clear = '^c';
tab = '^i';
btab = '^b';
left = '^h' | '\EOD';
right = '^l' | '\EOC';
up = '^k' | '\EOA';
down = '^j' | '\EOB';
home = '\EOn';
delete = '^?';
eeof = '^e';
einp = '^w' | '\E[M';
insrt = '\E ' | '\E[4h';
# pf keys
pfk1 = '\E1'; pfk2 = '\EOP' | '\E2'; pfk3 = '\EOQ' | '\E3';
pfk4 = '\EOR' | '\E4'; pfk5 = '\EOS' | '\E5'; pfk6 = '\EOq' | '\E6';
pfk7 = '\EOr' | '\E7'; pfk8 = '\E8'; pfk9 = '\E9';
pfk10 = '\E0'; pfk11 = '\E!'; pfk12 = '\EOw' | '\E@';
pfk13 = '\EOx' | '\E#'; pfk14 = '\EOy' | '\E$'; pfk15 = '\EOm' | '\E%';
pfk16 = '\EOs' | '\E\^';pfk17 = '\EOM' | '\E&'; pfk18 = '\E*';
pfk19 = '\E('; pfk20 = '\E)'; pfk21 = '^pf21';
pfk22 = '^pf22'; pfk23 = '^pf23'; pfk24 = '^pf24';
# program attention keys
pa1 = '^p1' | '\E-';
pa2 = '^p2' | '\E=';
pa3 = '^p3';
# local control keys
escape = '^]'; # escape to telnet command mode
master_reset = '^g';
# local editing keys
settab = '\E;';
deltab = '\E\'';
clrtab = '\E:';
setmrg = '\E,';
sethom = '\E.';
coltab = '\E\E[B';
colbak = '\E\E[A';
indent = '\E\E[C';
undent = '\E\E[D';
}
xterm {
enter = '^m';
clear = '^c';
tab = '^i';
btab = '^b';
left = '^h' | '\EOD';
right = '^l' | '\EOC';
up = '^k' | '\EOA';
down = '^j' | '\EOB';
home = '\EOn';
delete = '^?';
eeof = '^e';
einp = '^w' | '\E[M';
insrt = '\E ' | '\E[4h';
# pf keys
pfk1 = '\E[11~' | '\E1'; pfk2 = '\E[12~' | '\E2'; pfk3 = '\E[13~' | '\E3';
pfk4 = '\E[14~' | '\E4'; pfk5 = '\E[15~' | '\E5'; pfk6 = '\E[17~' | '\E6';
pfk7 = '\E[18~' | '\E7'; pfk8 = '\E[19~' | '\E8'; pfk9 = '\E[20~' | '\E9';
pfk10 = '\E0'; pfk11 = '\E!'; pfk12 = '\E@';
pfk13 = '\E#'; pfk14 = '\E$'; pfk15 = '\E%';
pfk16 = '\E\^';pfk17 = '\E&'; pfk18 = '\E*';
pfk19 = '\E('; pfk20 = '\E)'; pfk21 = '^pf21';
pfk22 = '^pf22'; pfk23 = '^pf23'; pfk24 = '^pf24';
# program attention keys
pa1 = '^p1' | '\E-';
pa2 = '^p2' | '\E=';
pa3 = '^p3';
# local control keys
escape = '^]'; # escape to telnet command mode
master_reset = '^g';
# local editing keys
settab = '\E;';
deltab = '\E\'';
clrtab = '\E:';
setmrg = '\E,';
sethom = '\E.';
coltab = '\E\E[B';
colbak = '\E\E[A';
indent = '\E\E[C';
undent = '\E\E[D';
}
---------------------------------------------------------------------
There is more to the file, but these are the only definitions we use
Hope this helps...
Gerry O'Brennan
Programmer/Analyst II
Computing Services
University of Missouri - Rolla
------------------------------
obrennan@apollo.cc.umr.edu
c0022@umrvmb.umr.edu
------------------------------