Re: STRPCCMD
Christian Geisert <[email protected]> Fri, 14 Dec 2007 11:13:00 +0100
| Newsgroups | gmane.comp.java.tn5250j.general |
|---|---|
| Organization | ISU GmbH |
| Message-ID | <[email protected]> |
Richard Houston schrieb: > Thanks Christian, > > I am having issues patching the file I get a malformed patch error. Would > you consider just sending me your tnvt.java file? Sure .. .attached. > Here is the error: > > rich@little-wraith:~/tn5250j$ patch > src/org/tn5250j/framework/tn5250/tnvt.java > /home/rich/Desktop/tn5250j.diff > patching file src/org/tn5250j/framework/tn5250/tnvt.java > Hunk #2 FAILED at 91. > Hunk #3 FAILED at 921. > Hunk #4 FAILED at 1194. > Hunk #5 FAILED at 1205. > Hunk #6 FAILED at 1917. > patch: **** malformed patch at line 120: screen52.getCurrentPos()); Mmmh ... works for me with latest from cvs repository Just did a fresh checkout and appliedt the patch without a problem: cvs -d:pserver:[email protected]:/cvsroot/tn5250j co tn5250j cd tn5250j patch -p0 <~/tmp/patch_tn5250j_pco-20071210-ok2.diff patching file src/org/tn5250j/framework/tn5250/tnvt.java -- Christian ------------------------------------------------------------------------- SF.Net email is sponsored by: Check out the new SourceForge.net Marketplace. It's the best place to buy or sell services for just about anything Open Source. http://ad.doubleclick.net/clk;164216239;13503038;w?http://sf.net/marketplace _______________________________________________ Tn5250j-general mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/tn5250j-general
tnvt.java
(text/x-java, 80.2 KB)
/**
* Title: tnvt.java
* Copyright: Copyright (c) 2001 Company:
*
* @author Kenneth J. Pouncey
* @version 0.5
*
* Description:
*
* This program is free software; you can redistribute it and/or modify it under
* the terms of the GNU General Public License as published by the Free Software
* Foundation; either version 2, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful, but WITHOUT
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
* FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
* details.
*
* You should have received a copy of the GNU General Public License along with
* this software; see the file COPYING. If not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*/
package org.tn5250j.framework.tn5250;
import java.awt.BorderLayout;
import java.awt.Toolkit;
import java.awt.event.WindowAdapter;
import java.awt.event.WindowEvent;
import java.io.BufferedInputStream;
import java.io.BufferedOutputStream;
import java.io.ByteArrayOutputStream;
import java.io.FileOutputStream;
import java.io.IOException;
import java.io.InputStream;
import java.io.OutputStream;
import java.net.Socket;
import java.util.Properties;
import java.util.Arrays;
import javax.swing.JDialog;
import javax.swing.JLabel;
import javax.swing.JOptionPane;
import javax.swing.JPanel;
import javax.swing.JTextField;
import javax.swing.SwingUtilities;
import org.tn5250j.encoding.CharMappings;
import org.tn5250j.encoding.CodePage;
import org.tn5250j.framework.Tn5250jController;
import org.tn5250j.framework.Tn5250jEvent;
import org.tn5250j.framework.Tn5250jKeyEvents;
import org.tn5250j.tools.logging.TN5250jLogFactory;
import org.tn5250j.tools.logging.TN5250jLogger;
import org.tn5250j.framework.transport.SocketConnector;
import org.tn5250j.TN5250jConstants;
import org.tn5250j.Session5250;
public final class tnvt implements Runnable, TN5250jConstants {
Socket sock;
BufferedInputStream bin;
BufferedOutputStream bout;
DataStreamQueue dsq;
Stream5250 bk;
DataStreamProducer producer;
protected Screen5250 screen52;
private boolean waitingForInput;
boolean invited;
private boolean dumpBytes = false;
private boolean negotiated = false;
private Thread me;
private Thread pthread;
private int readType;
private boolean enhanced = true;
private Session5250 controller;
private boolean cursorOn = false;
private String session = "";
private int port = 23;
private boolean connected = false;
private boolean support132 = true;
ByteArrayOutputStream baosp = null;
ByteArrayOutputStream baosrsp = null;
byte[] saveStream;
private boolean proxySet = false;
private String proxyHost = null;
private String proxyPort = "1080";
private int devSeq = -1;
private String devName;
private String devNameUsed;
// WVL - LDC : TR.000300 : Callback scenario from 5250
private boolean scan; // = false;
private static int STRSCAN = 1;
// WVL - LDC : 05/08/2005 : TFX.006253 - support STRPCCMD
private boolean strpccmd; // = false;
private String user;
private String password;
private String library;
private String initialMenu;
private String program;
private boolean keepTrucking = true;
private boolean pendingUnlock = false;
private boolean[] dataIncluded;
protected CodePage codePage;
private FileOutputStream fw;
private BufferedOutputStream dw;
private boolean firstScreen;
private String sslType;
WTDSFParser sfParser;
private TN5250jLogger log = TN5250jLogFactory.getLogger(this.getClass());
public tnvt(Session5250 session,Screen5250 screen52) {
this(session,screen52, false, false);
}
public tnvt(Session5250 session, Screen5250 screen52, boolean type, boolean support132) {
controller = session;
log.info(" new session -> " + controller.getSessionName());
enhanced = type;
this.support132 = support132;
setCodePage("37");
this.screen52 = screen52;
dataIncluded = new boolean[24];
if (System.getProperties().containsKey("SESSION_CONNECT_USER")) {
user = System.getProperties().getProperty("SESSION_CONNECT_USER");
if (System.getProperties().containsKey("SESSION_CONNECT_PASSWORD"))
password = System.getProperties().getProperty(
"SESSION_CONNECT_PASSWORD");
if (System.getProperties().containsKey("SESSION_CONNECT_LIBRARY"))
library = System.getProperties().getProperty(
"SESSION_CONNECT_LIBRARY");
if (System.getProperties().containsKey("SESSION_CONNECT_MENU"))
initialMenu = System.getProperties().getProperty(
"SESSION_CONNECT_MENU");
if (System.getProperties().containsKey("SESSION_CONNECT_PROGRAM"))
program = System.getProperties().getProperty(
"SESSION_CONNECT_PROGRAM");
}
baosp = new ByteArrayOutputStream();
baosrsp = new ByteArrayOutputStream();
}
public String getHostName() {
return session;
}
public void setSSLType(String type) {
sslType = type;
}
public void setDeviceName(String name) {
devName = name;
}
public String getDeviceName() {
return devName;
}
public String getAllocatedDeviceName() {
return devNameUsed;
}
public boolean isConnected() {
return connected;
}
public final void setProxy(String proxyHost, String proxyPort) {
this.proxyHost = proxyHost;
this.proxyPort = proxyPort;
proxySet = true;
Properties systemProperties = System.getProperties();
systemProperties.put("socksProxySet", "true");
systemProperties.put("socksProxyHost", proxyHost);
systemProperties.put("socksProxyPort", proxyPort);
System.setProperties(systemProperties);
log.info(" socks set ");
}
public final boolean connect() {
return connect(session, port);
}
public final boolean connect(String s, int port) {
// We will now see if there are any bypass signon parameters to be
// processed. The system properties override these parameters so
// have precidence if specified.
Properties props = controller.getConnectionProperties();
if (user == null && props.containsKey("SESSION_CONNECT_USER")) {
user = props.getProperty("SESSION_CONNECT_USER");
log.info(" user -> " + user + " " + controller.getSessionName());
if (props.containsKey("SESSION_CONNECT_PASSWORD"))
password = props.getProperty("SESSION_CONNECT_PASSWORD");
if (props.containsKey("SESSION_CONNECT_LIBRARY"))
library = props.getProperty("SESSION_CONNECT_LIBRARY");
if (props.containsKey("SESSION_CONNECT_MENU"))
initialMenu = props.getProperty("SESSION_CONNECT_MENU");
if (props.containsKey("SESSION_CONNECT_PROGRAM"))
program = props.getProperty("SESSION_CONNECT_PROGRAM");
}
try {
session = s;
this.port = port;
try {
SwingUtilities.invokeAndWait(new Runnable() {
public void run() {
screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
ScreenOIA.OIA_LEVEL_INPUT_INHIBITED,"X - Connecting");
}
});
} catch (Exception exc) {
log.warn("setStatus(ON) " + exc.getMessage());
}
// sock = new Socket(s, port);
//smk - For SSL compability
SocketConnector sc = new SocketConnector();
if (sslType != null)
sc.setSSLType(sslType);
sock = sc.createSocket(s, port);
if (sock == null) {
log.warn("I did not get a socket");
disconnect();
return false;
}
connected = true;
// used for JDK1.3
sock.setKeepAlive(true);
sock.setTcpNoDelay(true);
sock.setSoLinger(false, 0);
InputStream in = sock.getInputStream();
OutputStream out = sock.getOutputStream();
bin = new BufferedInputStream(in, 8192);
bout = new BufferedOutputStream(out);
byte abyte0[];
while (negotiate(abyte0 = readNegotiations()))
;
negotiated = true;
try {
screen52.setCursorActive(false);
} catch (Exception excc) {
log.warn("setCursorOff " + excc.getMessage());
}
;
dsq = new DataStreamQueue();
producer = new DataStreamProducer(this, bin, dsq, abyte0);
pthread = new Thread(producer);
// pthread.setPriority(pthread.MIN_PRIORITY);
pthread.setPriority(Thread.NORM_PRIORITY);
// pthread.setPriority(Thread.NORM_PRIORITY / 2);
pthread.start();
try {
SwingUtilities.invokeAndWait(new Runnable() {
public void run() {
screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_NOTINHIBITED,
ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
}
});
} catch (Exception exc) {
log.warn("setStatus(OFF) " + exc.getMessage());
}
keepTrucking = true;
me = new Thread(this);
me.start();
} catch (Exception exception) {
if (exception.getMessage() == null)
exception.printStackTrace();
log.warn("connect() " + exception.getMessage());
if (sock == null)
log.warn("I did not get a socket");
disconnect();
return false;
}
return true;
}
public final boolean disconnect() {
// Added by LUC - LDC to fix a null pointer exception.
if (!connected) {
screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
ScreenOIA.OIA_LEVEL_INPUT_INHIBITED,"X - Disconnected");
return false;
}
if (me != null && me.isAlive()) {
me.interrupt();
keepTrucking = false;
pthread.interrupt();
}
screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
ScreenOIA.OIA_LEVEL_INPUT_INHIBITED,"X - Disconnected");
screen52.getOIA().setKeyBoardLocked(false);
pendingUnlock = false;
try {
if (sock != null) {
log.info("Closing socket");
sock.close();
}
if (bin != null)
bin.close();
if (bout != null)
bout.close();
connected = false;
firstScreen = false;
// WVL - LDC : TR.000345 : properly disconnect and clear screen
// Is this the right place to set screen realestate on disconnect?
//controller.getScreen().clearAll();
screen52.goto_XY(0);
screen52.setCursorActive(false);
screen52.clearAll();
screen52.restoreScreen();
controller.fireSessionChanged(TN5250jConstants.STATE_DISCONNECTED);
} catch (Exception exception) {
log.warn(exception.getMessage());
connected = false;
devSeq = -1;
return false;
}
devSeq = -1;
return true;
}
private final ByteArrayOutputStream appendByteStream(byte abyte0[]) {
ByteArrayOutputStream bytearrayoutputstream = new ByteArrayOutputStream();
for (int i = 0; i < abyte0.length; i++) {
bytearrayoutputstream.write(abyte0[i]);
if (abyte0[i] == -1)
bytearrayoutputstream.write(-1);
}
return bytearrayoutputstream;
}
private final byte[] readNegotiations() throws IOException {
int i = bin.read();
if (i < 0) {
throw new IOException("Connection closed.");
} else {
int j = bin.available();
byte abyte0[] = new byte[j + 1];
abyte0[0] = (byte) i;
bin.read(abyte0, 1, j);
return abyte0;
}
}
private final void writeByte(byte abyte0[]) throws IOException {
bout.write(abyte0);
bout.flush();
}
private final void writeByte(byte byte0) throws IOException {
bout.write(byte0);
bout.flush();
}
public final void sendHeartBeat() throws IOException {
byte[] b = { (byte) 0xff, (byte) 0xf1 };
bout.write(b);
bout.flush();
}
private final void readImmediate(int readType) {
if (screen52.isStatusErrorCode()) {
screen52.restoreErrorLine();
screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
Screen5250.STATUS_VALUE_OFF, null);
}
if (!enhanced) {
screen52.setCursorActive(false);
}
// screen52.setStatus(Screen5250.STATUS_SYSTEM,
// Screen5250.STATUS_VALUE_ON, null);
screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
screen52.getOIA().setKeyBoardLocked(true);
pendingUnlock = false;
invited = false;
screen52.getScreenFields().readFormatTable(baosp, readType, codePage);
try {
writeGDS(0, 3, baosp.toByteArray());
} catch (IOException ioe) {
log.warn(ioe.getMessage());
baosp.reset();
}
baosp.reset();
}
public final boolean sendAidKey(int aid) {
if (screen52.isStatusErrorCode()) {
screen52.restoreErrorLine();
screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
Screen5250.STATUS_VALUE_OFF, null);
}
if (!enhanced) {
screen52.setCursorActive(false);
}
// screen52.setStatus(Screen5250.STATUS_SYSTEM,
// Screen5250.STATUS_VALUE_ON, null);
screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
screen52.getOIA().setKeyBoardLocked(true);
pendingUnlock = false;
invited = false;
baosp.write(screen52.getCurrentRow());
baosp.write(screen52.getCurrentCol());
baosp.write(aid);
if (dataIncluded(aid))
screen52.getScreenFields().readFormatTable(baosp, readType,
codePage);
try {
writeGDS(0, 3, baosp.toByteArray());
} catch (IOException ioe) {
log.warn(ioe.getMessage());
baosp.reset();
return false;
}
baosp.reset();
return true;
}
private boolean dataIncluded(int aid) {
switch (aid) {
case PF1:
return !dataIncluded[0];
case PF2:
return !dataIncluded[1];
case PF3:
return !dataIncluded[2];
case PF4:
return !dataIncluded[3];
case PF5:
return !dataIncluded[4];
case PF6:
return !dataIncluded[5];
case PF7:
return !dataIncluded[6];
case PF8:
return !dataIncluded[7];
case PF9:
return !dataIncluded[8];
case PF10:
return !dataIncluded[9];
case PF11:
return !dataIncluded[10];
case PF12:
return !dataIncluded[11];
case PF13:
return !dataIncluded[12];
case PF14:
return !dataIncluded[13];
case PF15:
return !dataIncluded[14];
case PF16:
return !dataIncluded[15];
case PF17:
return !dataIncluded[16];
case PF18:
return !dataIncluded[17];
case PF19:
return !dataIncluded[18];
case PF20:
return !dataIncluded[19];
case PF21:
return !dataIncluded[20];
case PF22:
return !dataIncluded[21];
case PF23:
return !dataIncluded[22];
case PF24:
return !dataIncluded[23];
default:
return true;
}
}
/**
* Help request -
*
*
* See notes inside method
*/
public final void sendHelpRequest() {
// Client sends header 000D12A0000004000003####F3FFEF
// operation code 3
// row - first ##
// column - second ##
// F3 - Help Aid Key
// System.out.println("Help request sent");
baosp.write(screen52.getCurrentRow());
baosp.write(screen52.getCurrentCol());
baosp.write(AID_HELP);
try {
writeGDS(0, 3, baosp.toByteArray());
} catch (IOException ioe) {
log.warn(ioe.getMessage());
}
baosp.reset();
}
/**
* Attention Key -
*
*
* See notes inside method
*/
public final void sendAttentionKey() {
// Client sends header 000A12A000004400000FFEF
// 0x40 -> 01000000
//
// flags
// bit 0 - ERR
// bit 1 - ATN Attention
// bits 2-4 - reserved
// bit 5 - SRQ system request
// bit 6 - TRQ Test request key
// bit 7 - HLP
// System.out.println("Attention key sent");
try {
writeGDS(0x40, 0, null);
} catch (IOException ioe) {
log.warn(ioe.getMessage());
}
}
public final void systemRequest() {
systemRequest(' ');
}
/**
* System request - taken from the rfc1205 - 5250 Telnet interface section
* 4.3
*
* See notes inside method
*
* @param sr -
* system request option
*/
public final void systemRequest(char sr) {
if (sr == ' ') {
JPanel srp = new JPanel();
srp.setLayout(new BorderLayout());
JLabel jl = new JLabel("Enter alternate job");
final JTextField sro = new JTextField();
srp.add(jl, BorderLayout.NORTH);
srp.add(sro, BorderLayout.CENTER);
Object[] message = new Object[1];
message[0] = srp;
String[] options = { "SysReq", "Cancel" };
final JOptionPane pane = new JOptionPane(
message, // the dialog message array
JOptionPane.QUESTION_MESSAGE, // message type
JOptionPane.DEFAULT_OPTION, // option type
null, // optional icon, use null to use the default icon
options, // options string array, will be made into
// buttons//
options[0]); // option that should be made into a default
// button
// create a dialog wrapping the pane
final JDialog dialog = pane.createDialog(null, // parent frame
"System Request" // dialog title
);
// add the listener that will set the focus to
// the desired option
dialog.addWindowListener(new WindowAdapter() {
public void windowOpened(WindowEvent e) {
super.windowOpened(e);
// now we're setting the focus to the desired component
// it's not the best solution as it depends on internals
// of the OptionPane class, but you can use it temporarily
// until the bug gets fixed
// also you might want to iterate here thru the set of
// the buttons and pick one to call requestFocus() for it
sro.requestFocus();
}
});
dialog.setVisible(true);
// now we can process the value selected
Object o = pane.getValue();
// but only if it is a String
if (o instanceof String) {
String value = (String) o;
if (value.equals(options[0])) {
// from rfc1205 section 4.3
// Client sends header with the 000A12A0000004040000FFEF
// System Request bit set.
//
// if we wanted to send an option with it we would need to
// send
// it at the end such as the following
//
// byte abyte0[] = new byte[1]; or number of bytes in option
// abyte0[0] = codePage.uni2ebcdic(option);
// System.out.println("SYSRQS sent");
// send option along with system request
if (sro.getText().length() > 0) {
for (int x = 0; x < sro.getText().length(); x++) {
// System.out.println(sro.getText().charAt(x));
if (sro.getText().charAt(0) == '2') {
// System.out.println("dataq cleared");
dsq.clear();
}
baosp.write(codePage.uni2ebcdic(sro.getText()
.charAt(x)));
}
try {
writeGDS(4, 0, baosp.toByteArray());
} catch (IOException ioe) {
log.warn(ioe.getMessage());
}
baosp.reset();
} else { // no option sent with system request
try {
writeGDS(4, 0, null);
} catch (IOException ioe) {
log.warn(ioe.getMessage());
}
}
}
}
// controller.requestFocus();
} else {
baosp.write(codePage.uni2ebcdic(sr));
try {
writeGDS(4, 0, baosp.toByteArray());
} catch (IOException ioe) {
baosp.reset();
log.warn(ioe.getMessage());
}
baosp.reset();
}
}
public final void systemRequest(String sr)
{
byte[] bytes = null;
if ( (sr != null) && (sr.length() != 0))
{
for (int i = 0, l = sr.length(); i < l; i++)
{
baosp.write(codePage.uni2ebcdic(sr.charAt(i)));
}
bytes = baosp.toByteArray();
// baosp.reset();
}
try
{
writeGDS(4, 0, bytes);
}
catch (IOException ioe)
{
log.info(ioe.getMessage());
}
baosp.reset();
}
/**
* Cancel Invite - taken from the rfc1205 - 5250 Telnet interface section
* 4.3
*
* See notes inside method
*/
public final void cancelInvite() {
// screen52.setStatus(Screen5250.STATUS_SYSTEM,
// Screen5250.STATUS_VALUE_ON, null);
screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
// from rfc1205 section 4.3
// Server: Sends header with the 000A12A0 00000400 000AFFEF
// Opcode = Cancel Invite.
// Client: sends header with the 000A12A0 00000400 000AFFEF
// Opcode = Cancel Invite to
// indicate that the work station is
// no longer invited.
try {
writeGDS(0, 10, null);
} catch (IOException ioe) {
log.warn(ioe.getMessage());
}
}
public final void hostPrint(int aid) {
if (screen52.isStatusErrorCode()) {
screen52.restoreErrorLine();
screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
Screen5250.STATUS_VALUE_OFF, null);
}
screen52.setCursorActive(false);
// screen52.setStatus(Screen5250.STATUS_SYSTEM,
// Screen5250.STATUS_VALUE_ON, null);
screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
// From client access ip capture
// it seems to use an operation code of 3 and 4
// also note that the flag field that says reserved is being sent as
// well
// with a value of 0x80
//
// I have tried with not setting these flags and sending with 3 or 1
// there is no effect and I still get a host print screen. Go figure
//0000: 000D 12A0 0000 0400 8003 1407 F6FFEF
//0000: 000D 12A0 0000 0400 8001 110E F6FFEF
//
// Client sends header 000D12A0000004000003####F6FFEF
// operation code 3
// row - first ##
// column - second ##
// F6 - Print Aid Key
baosp.write(screen52.getCurrentRow());
baosp.write(screen52.getCurrentCol());
baosp.write(AID_PRINT); // aid key
try {
writeGDS(0, 3, baosp.toByteArray());
} catch (IOException ioe) {
log.warn(ioe.getMessage());
}
baosp.reset();
}
public final void toggleDebug() {
producer.toggleDebug(codePage);
}
// write gerneral data stream
private final void writeGDS(int flags, int opcode, byte abyte0[])
throws IOException {
// Added to fix for JDK 1.4 this was null coming from another method.
// There was a weird keyRelease event coming from another panel when
// using a key instead of the mouse to select button.
// The other method was fixed as well but this check should be here
// anyway.
if (bout == null)
return;
int length;
if (abyte0 != null)
length = abyte0.length + 10;
else
length = 10;
// refer to rfc1205 - 5250 Telnet interface
// Section 3. Data Stream Format
// Logical Record Length - 16 bits
baosrsp.write(length >> 8); // Length LL
baosrsp.write(length & 0xff); // LL
// Record Type - 16 bits
// It should always be set to '12A0'X to indicate the
// General Data Stream (GDS) record type.
baosrsp.write(18); // 0x12
baosrsp.write(160); // 0xA0
// the next 16 bits are not used
baosrsp.write(0); // 0x00
baosrsp.write(0); // 0x00
// The second part is meant to be variable in length
// currently this portion is 4 octets long (1 byte or 8 bits for us ;-O)
baosrsp.write(4); // 0x04
baosrsp.write(flags); // flags
// bit 0 - ERR
// bit 1 - ATN Attention
// bits 2-4 - reserved
// bit 5 - SRQ system request
// bit 6 - TRQ Test request key
// bit 7 - HLP
baosrsp.write(0); // reserved - set to 0x00
baosrsp.write(opcode); // opcode
if (abyte0 != null)
baosrsp.write(abyte0, 0, abyte0.length);
baosrsp = appendByteStream(baosrsp.toByteArray());
// make sure we indicate no more to be sent
baosrsp.write(IAC);
baosrsp.write(EOR);
baosrsp.writeTo(bout);
// byte[] b = new byte[baosrsp.size()];
// b = baosrsp.toByteArray();
// dump(b);
bout.flush();
// baos = null;
baosrsp.reset();
}
protected final int getOpCode() {
return bk.getOpCode();
}
private final void sendNotify() throws IOException {
writeGDS(0, 0, null);
}
protected boolean[] getActiveAidKeys() {
boolean aids[] = new boolean[dataIncluded.length];
System.arraycopy(dataIncluded,0,aids,0,dataIncluded.length);
return aids;
}
private final void setInvited() {
log.debug("invited");
if (!screen52.isStatusErrorCode())
screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_NOTINHIBITED,
ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
invited = true;
}
// WVL - LDC : 05/08/2005 : TFX.006253 - Support STRPCCMD
private void strpccmd()
{
try
{
int str = 11;
char c;
ScreenPlanes planes = screen52.getPlanes();
c = planes.getChar(str);
boolean waitFor = !(c == 'a');
StringBuffer command = new StringBuffer();
for (int i = str+1; i < 132; i++)
{
c = planes.getChar(i);
if (Character.isISOControl(c))
c = ' ';
command.append(c);
}
String cmd = command.toString().trim();
run(cmd, waitFor);
}
finally
{
strpccmd = false;
screen52.sendKeys(screen52.MNEMONIC_ENTER);
}
}
// WVL - LDC : 05/08/2005 : TFX.006253 - Support STRPCCMD
private void run(String cmd, boolean waitFor)
{
try
{
log.debug("RUN cmd = " + cmd);
log.debug("RUN wait = " + waitFor);
Runtime r = Runtime.getRuntime();
Process p = r.exec(cmd);
if (waitFor)
{
int result = p.waitFor();
log.debug("RUN result = " + result);
}
}
catch (Throwable t)
{
log.error(t);
}
}
// WVL - LDC : TR.000300 : Callback scenario from 5250
/**
* Activate or deactivate the command scanning behaviour.
*
* @param scan
* if true, scanning is enabled; disabled otherwise.
*
* @see scan4Cmd()
*/
public void setScanningEnabled(boolean scan) {
this.scan = scan;
}
// WVL - LDC : TR.000300 : Callback scenario from 5250
/**
* Checks whether command scanning is enabled.
*
* @return true is command scanning is enabled; false otherwise.
*/
public boolean isScanningEnabled() {
return this.scan;
}
// WVL - LDC : TR.000300 : Callback scenario from 5250
/**
* When command scanning is activated, the terminal reads the first and
* second character in the datastream (the zero position allows to
* devisualize the scan stream). If the sequence <code>#!</code> is
* encountered and if this sequence is <strong>not </strong> followed by a
* blank character, the {@link parseCommand(ScreenChar[])}is called.
*/
private void scan() {
// System.out.println("Checking command : " +
// screen52.screen[1].getChar() + screen52.screen[2].getChar());
// ScreenChar[] screen = screen52.screen;
ScreenPlanes planes = screen52.getPlanes();
if ((planes.getChar(STRSCAN) == '#')
&& (planes.getChar(STRSCAN + 1) == '!')
&& (planes.getChar(STRSCAN + 2) != ' ')) {
try {
parseCommand();
} catch (Throwable t) {
log.info("Exec cmd: " + t.getMessage());
t.printStackTrace();
}
}
}
// WVL - LDC : TR.000300 : Callback scenario from 5250
/**
* The screen is parsed starting from second position until a white space is
* encountered. When found the {@link Session#execCommand(String, int)}is
* called with the parsed string. The position immediately following the
* encountered white space, separating the command from the rest of the
* screen, is passed as starting index.
*
* Note that the character at the starting position can potentially be a
* white space itself. The starting position in <code>execCommand</code>
* provided to make the scanning sequence more flexible. We'd like for
* example to embed also a <code>+</code> or <code>-</code> sign to
* indicate whether the tnvt should trigger a repaint or not. This would
* allow the flashing of command sequences without them becoming visible.
*
* <ul>
* <li><strong>PRE </strong> The screen character at position
* <code>STRSCAN + 2</code> is not a white space.</li>
* </ul>
*/
private void parseCommand() {
// Search for the command i.e. the first token in the stream
// after the #! sequence separated by a space from the rest
// of the screen.
char[] screen = screen52.getScreenAsAllChars();
for (int s = STRSCAN + 2, i = s; i < screen.length; i++) {
if (screen[i] == ' ') {
String command = new String(screen, s, i - s);
// Skip all white spaces between the command and the rest of
// the screen.
//for (; (i < screen.length) && (screen[i] == ' '); i++);
String remainder = new String(screen, i + 1, screen.length
- (i + 1));
// System.out.println("Sensing action command in the input! = "
// + command);
controller.scanned(command, remainder);
break;
}
}
}
public void run() {
if (enhanced)
sfParser = new WTDSFParser(this);
bk = new Stream5250();
while (keepTrucking) {
try {
// bk = (Stream5250) dsq.get();
bk.initialize((byte[]) dsq.get());
} catch (InterruptedException ie) {
log.warn(" vt thread interrupted and stopping ");
keepTrucking = false;
continue;
}
// lets play nicely with the others on the playground
// me.yield();
Thread.yield();
invited = false;
screen52.setCursorActive(false);
// System.out.println("operation code: " + bk.getOpCode());
if (bk == null)
continue;
switch (bk.getOpCode()) {
case 00:
log.debug("No operation");
break;
case 1:
log.debug("Invite Operation");
parseIncoming();
// screen52.setKeyboardLocked(false);
pendingUnlock = true;
cursorOn = true;
setInvited();
break;
case 2:
log.debug("Output Only");
parseIncoming();
// System.out.println(screen52.dirty);
screen52.updateDirty();
// invited = true;
break;
case 3:
log.debug("Put/Get Operation");
parseIncoming();
// inviteIt =true;
setInvited();
if (!firstScreen) {
firstScreen = true;
controller.fireSessionChanged(TN5250jConstants.STATE_CONNECTED);
}
break;
case 4:
log.debug("Save Screen Operation");
parseIncoming();
break;
case 5:
log.debug("Restore Screen Operation");
parseIncoming();
break;
case 6:
log.debug("Read Immediate");
sendAidKey(0);
break;
case 7:
log.debug("Reserved");
break;
case 8:
log.debug("Read Screen Operation");
try {
readScreen();
} catch (IOException ex) {
log.warn(ex.getMessage());
}
break;
case 9:
log.debug("Reserved");
break;
case 10:
log.debug("Cancel Invite Operation");
cancelInvite();
break;
case 11:
log.debug("Turn on message light");
screen52.getOIA().setMessageLightOn();
screen52.setCursorActive(true);
break;
case 12:
log.debug("Turn off Message light");
screen52.getOIA().setMessageLightOff();
screen52.setCursorActive(true);
break;
default:
break;
}
if (screen52.isUsingGuiInterface())
screen52.drawFields();
// if (screen52.screen[0][1].getChar() == '#' &&
// screen52.screen[0][2].getChar() == '!')
// execCmd();
// else {
// if (screen52.isHotSpots()) {
// screen52.checkHotSpots();
// }
try {
if (!strpccmd) {
// SwingUtilities.invokeAndWait(
// new Runnable () {
// public void run() {
// screen52.updateDirty();
// }
// }
// );
screen52.updateDirty();
// controller.validate();
// log.debug("update dirty");
} else {
strpccmd();
}
} catch (Exception exd) {
log.warn(" tnvt.run: " + exd.getMessage());
exd.printStackTrace();
}
if (pendingUnlock && !screen52.isStatusErrorCode()) {
screen52.getOIA().setKeyBoardLocked(false);
pendingUnlock = false;
}
if (cursorOn && !screen52.getOIA().isKeyBoardLocked()) {
screen52.setCursorActive(true);
cursorOn = false;
}
// lets play nicely with the others on the playground
//me.yield();
Thread.yield();
}
}
public void dumpStuff() {
if (log.isDebugEnabled()) {
log.debug(" Pending unlock " + pendingUnlock);
log.debug(" Status Error " + screen52.isStatusErrorCode());
log.debug(" Keyboard Locked " + screen52.getOIA().isKeyBoardLocked());
log.debug(" Cursor On " + cursorOn);
log.debug(" Cursor Active " + screen52.cursorActive);
}
}
// private final void execCmd() {
// String name = "";
// String argString = "";
//
// StringBuffer sb = new StringBuffer();
// sb.append(screen52.screen[0][3].getChar());
// sb.append(screen52.screen[0][4].getChar());
// sb.append(screen52.screen[0][5].getChar());
// sb.append(screen52.screen[0][6].getChar());
//
// System.out.println("command = " + sb);
// int x = 8;
// sb.setLength(0);
// while (screen52.screen[0][x].getChar() > ' ') {
// sb.append(screen52.screen[0][x].getChar());
// x++;
// }
// name = sb.toString();
// System.out.println("name = " + name);
//
// sb.setLength(0);
// x++;
// while (screen52.screen[0][x].getChar() >= ' ') {
// sb.append(screen52.screen[0][x].getChar());
// x++;
// }
// argString = sb.toString();
// System.out.println("args = " + argString);
//
// sendAidKey(AID_ENTER);
//
// try {
//
// Class c = Class.forName(name);
// String args1[] = {argString};
// String args2[] = {};
//
// Method m = c.getMethod("main",
// new Class[] { args1.getClass() });
// m.setAccessible(true);
// int mods = m.getModifiers();
// if (m.getReturnType() !=
// void.class || !Modifier.isStatic(mods) ||
// !Modifier.isPublic(mods)) {
//
// throw new NoSuchMethodException("main");
// }
// try {
// if (argString.length() > 0)
// m.invoke(null, new Object[] { args1 });
// else
// m.invoke(null, new Object[] { args2 });
// }
// catch (IllegalAccessException e) {
// // This should not happen, as we have
// // disabled access checks
// System.out.println("iae " + e.getMessage());
//
// }
// }
// catch (ClassNotFoundException cnfe) {
// System.out.println("cnfe " + cnfe.getMessage());
// }
// catch (NoSuchMethodException nsmf) {
// System.out.println("nsmf " + nsmf.getMessage());
// }
// catch (InvocationTargetException ite) {
// System.out.println("ite " + ite.getMessage());
// }
// // catch (IllegalAccessException iae) {
// // System.out.println("iae " + iae.getMessage());
// // }
// // catch (InstantiationException ie) {
// // System.out.println("ie " + ie.getMessage());
// // }
// // try {
// //
// // Runtime rt = Runtime.getRuntime();
// // Process proc = rt.exec("notepad");
// // int exitVal = proc.exitValue();
// // }
// // catch (Throwable t) {
// //
// // t.printStackTrace();
// // }
// }
private final void readScreen() throws IOException {
int rows = screen52.getRows();
int cols = screen52.getColumns();
boolean att = false;
int off = 0;
byte abyte0[] = new byte[rows * cols];
fillScreenArray(abyte0, rows, cols);
writeGDS(0, 0, abyte0);
abyte0 = null;
}
private final void fillScreenArray(byte[] sa, int rows, int cols) {
int la = 32;
int sac = 0;
int len = rows * cols;
ScreenPlanes planes = screen52.planes;
for (int y = 0; y < len; y++) { // save the screen data
if (planes.isAttributePlace(y)) {
la = planes.getCharAttr(y);
sa[sac++] = (byte) la;
} else {
if (planes.getCharAttr(y) != la) {
la = planes.getCharAttr(y);
sac--;
sa[sac++] = (byte) la;
}
//LDC: Check to see if it is an displayable character. If not,
// do not convert the character.
// The characters on screen are in unicode
//sa[sac++] =
// (byte)codePage.uni2ebcdic(screen52.screen[y].getChar());
char ch = planes.getChar(y);
byte byteCh = (byte) ch;
if (isDataUnicode(ch))
byteCh = this.uni2ebcdic(ch);
sa[sac++] = byteCh;
}
}
}
private final void fillRegenerationBuffer(ByteArrayOutputStream sc, int rows, int cols)
throws IOException {
int la = 32;
int sac = 0;
int len = rows * cols;
ScreenPlanes planes = screen52.planes;
byte[] sa = new byte[len];
try {
boolean guiExists = sfParser != null && sfParser.isGuisExists();
for (int y = 0; y < len; y++) { // save the screen data
if (guiExists) {
byte[] guiSeg = sfParser.getSegmentAtPos(y);
if (guiSeg != null) {
//log.info(" gui saved at " + y + " - " + screen52.getRow(y) + "," +
// screen52.getCol(y));
byte[] gsa = new byte[sa.length + guiSeg.length + 2];
System.arraycopy(sa,0,gsa,0,sa.length);
System.arraycopy(guiSeg,0,gsa,sac+2,guiSeg.length);
sa = new byte[gsa.length];
System.arraycopy(gsa,0,sa,0,gsa.length);
sa[sac++] = (byte)0x04;
sa[sac++] = (byte)0x11;
sac += guiSeg.length;
//y--;
// continue;
}
}
if (planes.isAttributePlace(y)) {
la = planes.getCharAttr(y);
sa[sac++] = (byte) la;
} else {
if (planes.getCharAttr(y) != la) {
la = planes.getCharAttr(y);
sac--;
sa[sac++] = (byte) la;
}
//LDC: Check to see if it is an displayable character. If not,
// do not convert the character.
// The characters on screen are in unicode
//sa[sac++] =
// (byte)codePage.uni2ebcdic(screen52.screen[y].getChar());
char ch = planes.getChar(y);
byte byteCh = (byte) ch;
if (isDataUnicode(ch))
byteCh = this.uni2ebcdic(ch);
sa[sac++] = byteCh;
}
}
}
catch(Exception exc) {
log.info(exc.getMessage());
exc.printStackTrace();
}
sc.write(sa);
}
public final void saveScreen() throws IOException {
ByteArrayOutputStream sc = new ByteArrayOutputStream();
sc.write(4);
sc.write(0x12); // 18
sc.write(0); // 18
sc.write(0); // 18
sc.write((byte) screen52.getRows()); // store the current size
sc.write((byte) screen52.getColumns()); // ""
int cp = screen52.getCurrentPos(); // save off current position
// fix below submitted by Mitch Blevins
//int cp = screen52.getScreenFields().getCurrentFieldPos();
// save off current position
sc.write((byte) (cp >> 8 & 0xff)); // ""
sc.write((byte) (cp & 0xff)); // ""
sc.write((byte) (screen52.homePos >> 8 & 0xff)); // save home pos
sc.write((byte) (screen52.homePos & 0xff)); // ""
int rows = screen52.getRows(); // store the current size
int cols = screen52.getColumns(); // ""
// byte[] sa = new byte[rows * cols];
fillRegenerationBuffer(sc,rows,cols);
// fillScreenArray(sa, rows, cols);
//
// sc.write(sa);
// sa = null;
int sizeFields = screen52.getScreenFields().getSize();
sc.write((byte) (sizeFields >> 8 & 0xff)); // ""
sc.write((byte) (sizeFields & 0xff)); // ""
if (sizeFields > 0) {
int x = 0;
int s = screen52.getScreenFields().getSize();
ScreenField sf = null;
while (x < s) {
sf = screen52.getScreenFields().getField(x);
sc.write((byte) sf.getAttr()); // attribute
int sp = sf.startPos();
sc.write((byte) (sp >> 8 & 0xff)); // ""
sc.write((byte) (sp & 0xff)); // ""
if (sf.mdt)
sc.write((byte) 1);
else
sc.write((byte) 0);
sc.write((byte) (sf.getLength() >> 8 & 0xff)); // ""
sc.write((byte) (sf.getLength() & 0xff)); // ""
sc.write((byte) sf.getFFW1() & 0xff);
sc.write((byte) sf.getFFW2() & 0xff);
sc.write((byte) sf.getFCW1() & 0xff);
sc.write((byte) sf.getFCW2() & 0xff);
log.debug("Saved ");
log.debug(sf.toString());
x++;
}
sf = null;
}
// The following two lines of code looks to have caused all sorts of
// problems so for now we have commented them out.
// screen52.getScreenFields().setCurrentField(null); // set it to null
// for GC ?
// screen52.clearTable();
try {
writeGDS(0, 3, sc.toByteArray());
} catch (IOException ioe) {
log.warn(ioe.getMessage());
}
sc = null;
log.debug("Save Screen end ");
}
/**
*
* @throws IOException
*/
public final void restoreScreen() throws IOException {
int which = 0;
ScreenPlanes planes = screen52.planes;
try {
log.debug("Restore ");
bk.getNextByte();
bk.getNextByte();
int rows = bk.getNextByte() & 0xff;
int cols = bk.getNextByte() & 0xff;
int pos = bk.getNextByte() << 8 & 0xff00; // current position
pos |= bk.getNextByte() & 0xff;
int hPos = bk.getNextByte() << 8 & 0xff00; // home position
hPos |= bk.getNextByte() & 0xff;
if (rows != screen52.getRows())
screen52.setRowsCols(rows, cols);
screen52.clearAll(); // initialize what we currenty have
if (sfParser != null && sfParser.isGuisExists())
sfParser.clearGuiStructs();
int b = 32;
int la = 32;
int len = rows * cols;
for (int y = 0; y < len; y++) {
b = bk.getNextByte();
if (b == 0x04) {
log.info(" gui restored at " + y + " - " + screen52.getRow(y) + "," +
screen52.getCol(y));
int command = bk.getNextByte();
byte[] seg = bk.getSegment();
if (seg.length > 0) {
screen52.goto_XY(y);
sfParser.parseWriteToDisplayStructuredField(seg);
}
y--;
// screen52.goto_XY(y);
}
else {
// b = bk.getNextByte();
if (planes.isUseGui(y))
continue;
if (isAttribute(b)) {
planes.setScreenCharAndAttr(y, planes.getChar(y), b, true);
la = b;
}
else {
//LDC - 12/02/2003 - Check to see if it is an displayable
// character. If not,
// do not convert the character.
// The characters on screen are in unicode
char ch = (char) b;
if (isDataEBCDIC(b))
ch = ebcdic2uni(b);
planes.setScreenCharAndAttr(y, ch, la, false);
}
}
}
int numFields = bk.getNextByte() << 8 & 0xff00;
numFields |= bk.getNextByte() & 0xff;
log.debug("number of fields " + numFields);
if (numFields > 0) {
int x = 0;
int attr = 0;
int fPos = 0;
int fLen = 0;
int ffw1 = 0;
int ffw2 = 0;
int fcw1 = 0;
int fcw2 = 0;
boolean mdt = false;
ScreenField sf = null;
while (x < numFields) {
attr = bk.getNextByte();
fPos = bk.getNextByte() << 8 & 0xff00;
fPos |= bk.getNextByte() & 0xff;
if (bk.getNextByte() == 1)
mdt = true;
else
mdt = false;
fLen = bk.getNextByte() << 8 & 0xff00;
fLen |= bk.getNextByte() & 0xff;
ffw1 = bk.getNextByte();
ffw2 = bk.getNextByte();
fcw1 = bk.getNextByte();
fcw2 = bk.getNextByte();
sf = screen52.getScreenFields().setField(attr,
screen52.getRow(fPos), screen52.getCol(fPos), fLen,
ffw1, ffw2, fcw1, fcw2);
while (fLen-- > 0) {
// now we set the field plane attributes
planes.setScreenFieldAttr(fPos++,ffw1);
}
if (mdt) {
sf.setMDT();
screen52.getScreenFields().setMasterMDT();
}
if (log.isDebugEnabled()) {
log.debug("/nRestored ");
log.debug(sf.toString());
}
x++;
}
}
// Redraw the gui fields if we are in gui mode
if (screen52.isUsingGuiInterface())
screen52.drawFields();
screen52.restoreScreen(); // display the screen
// The position was saved with currentPos which 1,1 offset of the
// screen position.
// The setPendingInsert is the where the cursor position will be
// displayed after the restore.
screen52.setPendingInsert(true, screen52.getRow(pos + cols), screen52
.getCol(pos + cols));
// We need to offset the pos by -1 since the position is 1,1 based
// and the goto_XY is 0,0 based.
screen52.goto_XY(pos - 1);
screen52.isInField();
// // Redraw the gui fields if we are in gui mode
// if (screen52.isUsingGuiInterface())
// screen52.drawFields();
} catch (Exception e) {
log.warn("error restoring screen " + which + " with "
+ e.getMessage());
}
}
public final boolean waitingForInput() {
return waitingForInput;
}
private void parseIncoming() {
boolean controlChars = false;
byte control0;
byte control1;
boolean done = false;
boolean error = false;
try {
while (bk.hasNext() && !done) {
byte b = bk.getNextByte();
switch (b) {
case 0:
case 1:
break;
case CMD_SAVE_SCREEN: // 0x02 2 Save Screen
case 3: // 0x03 3 Save Partial Screen
log.debug("save screen partial");
saveScreen();
break;
case ESC: // ESCAPE
break;
case 7: // audible bell
Toolkit.getDefaultToolkit().beep();
bk.getNextByte();
bk.getNextByte();
break;
case CMD_WRITE_TO_DISPLAY: // 0x11 17 write to display
error = writeToDisplay(true);
// WVL - LDC : TR.000300 : Callback scenario from 5250
// Only scan when WRITE_TO_DISPLAY operation (i.e. refill
// screen buffer)
// has been issued!
if (scan)
scan();
break;
case CMD_RESTORE_SCREEN: // 0x12 18 Restore Screen
case 13: // 0x13 19 Restore Partial Screen
log.debug("restore screen partial");
restoreScreen();
break;
case CMD_CLEAR_UNIT_ALTERNATE: // 0x20 32 clear unit alternate
int param = bk.getNextByte();
if (param != 0) {
log.debug(" clear unit alternate error "
+ Integer.toHexString(param));
sendNegResponse(NR_REQUEST_ERROR, 03, 01, 05,
" clear unit alternate not supported");
done = true;
} else {
if (screen52.getRows() != 27)
screen52.setRowsCols(27, 132);
screen52.clearAll();
if (sfParser != null && sfParser.isGuisExists())
sfParser.clearGuiStructs();
}
break;
case CMD_WRITE_ERROR_CODE: // 0x21 33 Write Error Code
writeErrorCode();
error = writeToDisplay(false);
break;
case CMD_WRITE_ERROR_CODE_TO_WINDOW: // 0x22 34
// Write Error Code to window
writeErrorCodeToWindow();
error = writeToDisplay(false);
break;
case CMD_READ_SCREEN_IMMEDIATE: // 0x62 98
case CMD_READ_SCREEN_TO_PRINT: // 0x66 102 read screen to print
readScreen();
break;
case CMD_CLEAR_UNIT: // 64 0x40 clear unit
if (screen52.getRows() != 24)
screen52.setRowsCols(24, 80);
screen52.clearAll();
if (sfParser != null && sfParser.isGuisExists())
sfParser.clearGuiStructs();
break;
case CMD_CLEAR_FORMAT_TABLE: // 80 0x50 Clear format table
screen52.clearTable();
break;
case CMD_READ_INPUT_FIELDS: //0x42 66 read input fields
case CMD_READ_MDT_FIELDS: // 0x52 82 read MDT Fields
bk.getNextByte();
bk.getNextByte();
readType = b;
screen52.goHome();
// do nothing with the cursor here it is taken care of
// in the main loop.
//////////////// screen52.setCursorOn();
waitingForInput = true;
pendingUnlock = true;
// screen52.setKeyboardLocked(false);
break;
case CMD_READ_MDT_IMMEDIATE_ALT: // 0x53 83
readType = b;
// screen52.goHome();
// waitingForInput = true;
// screen52.setKeyboardLocked(false);
readImmediate(readType);
break;
case CMD_WRITE_STRUCTURED_FIELD: // 243 0xF3 -13 Write
// structured field
writeStructuredField();
break;
case CMD_ROLL: // 0x23 35 Roll Not sure what it does right now
int updown = bk.getNextByte();
int topline = bk.getNextByte();
int bottomline = bk.getNextByte();
screen52.rollScreen(updown, topline, bottomline);
break;
default:
done = true;
sendNegResponse(NR_REQUEST_ERROR, 03, 01, 01,
"parseIncoming");
break;
}
if (error)
done = true;
}
// BEGIN FRAMEWORK
// I took this out for debugging a problem
// ScreenField[] a = this.screen52.getScreenFields().getFields();
// if (log.isDebugEnabled()) {
// for (int x = 0; x < a.length; x++) {
// log.debug(a[x].toString());
// }
// }
//
// String strokes = this.screen52.getKeys();
// if (!strokes.equals("")) {
// Tn5250jKeyEvents e = new Tn5250jKeyEvents(this.screen52,
// strokes);
// //from the previous screen.
// Tn5250jController.getCurrent().handleEvent(e);
// }
//
// Tn5250jEvent event = new Tn5250jEvent(screen52);
// Tn5250jController.getCurrent().handleEvent(event);
//
// //END FRAMEWORK
} catch (Exception exc) {
log.warn("incoming " + exc.getMessage());
}
;
}
/**
* This routine handles sending negative responses back to the host.
*
* You can find a description of the types of responses to be sent back by
* looking at section 12.4 of the 5250 Functions Reference manual
*
*
* @param cat
* @param modifier
* @param uByte1
* @param uByte2
* @param from
*
*/
protected void sendNegResponse(int cat, int modifier, int uByte1,
int uByte2, String from) {
try {
int os = bk.getByteOffset(-1) & 0xf0;
int cp = (bk.getCurrentPos() - 1);
log.info("invalid " + from + " command " + os
+ " at pos " + cp);
} catch (Exception e) {
log.warn("Send Negative Response error " + e.getMessage());
}
baosp.write(cat);
baosp.write(modifier);
baosp.write(uByte1);
baosp.write(uByte2);
try {
writeGDS(128, 0, baosp.toByteArray());
} catch (IOException ioe) {
log.warn(ioe.getMessage());
}
baosp.reset();
}
public void sendNegResponse2(int ec) {
screen52.setPrehelpState(true, true, false);
baosp.write(0x00);
baosp.write(ec);
try {
writeGDS(1, 0, baosp.toByteArray());
} catch (IOException ioe) {
log.warn(ioe.getMessage());
}
baosp.reset();
}
private boolean writeToDisplay(boolean controlsExist) {
int pos = 0;
boolean error = false;
boolean done = false;
int attr;
byte nextOne;
byte control0 = 0;
byte control1 = 0;
int saRows = screen52.getRows();
int saCols = screen52.getColumns();
try {
if (controlsExist) {
control0 = bk.getNextByte();
control1 = bk.getNextByte();
processCC0(control0);
}
while (bk.hasNext() && !done) {
// pos = bk.getCurrentPos();
// int rowc = screen52.getCurrentRow();
// int colc = screen52.getCurrentCol();
byte bytebk = bk.getNextByte();
switch (bytebk) {
case 1: // SOH - Start of Header Order
log.debug("SOH - Start of Header Order");
error = processSOH();
break;
case 02: // RA - Repeat to address
log.debug("RA - Repeat to address");
int row = screen52.getCurrentRow();
int col = screen52.getCurrentCol();
int toRow = bk.getNextByte();
int toCol = bk.getNextByte() & 0xff;
if (toRow >= row) {
int repeat = bk.getNextByte();
// a little intelligence here I hope
if (row == 1 && col == 2 && toRow == screen52.getRows()
&& toCol == screen52.getColumns())
screen52.clearScreen();
else {
if (repeat != 0) {
//LDC - 13/02/2003 - convert it to unicode
repeat = this.ebcdic2uni(repeat);
//repeat = getASCIIChar(repeat);
}
int times = ((toRow * screen52.getColumns()) + toCol)
- ((row * screen52.getColumns()) + col);
while (times-- >= 0) {
screen52.setChar(repeat);
}
}
} else {
sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x23,
" RA invalid");
error = true;
}
break;
case 03: // EA - Erase to address
log.debug("EA - Erase to address");
int EArow = screen52.getCurrentRow();
int EAcol = screen52.getCurrentCol();
int toEARow = bk.getNextByte();
int toEACol = bk.getNextByte() & 0xff;
int EALength = bk.getNextByte() & 0xff;
while (--EALength > 0) {
bk.getNextByte();
}
char EAAttr = (char) 0;
// a little intelligence here I hope
if (EArow == 1 && EAcol == 2
&& toEARow == screen52.getRows()
&& toEACol == screen52.getColumns())
screen52.clearScreen();
else {
int times = ((toEARow * screen52.getColumns()) + toEACol)
- ((EArow * screen52.getColumns()) + EAcol);
while (times-- >= 0) {
screen52.setChar(EAAttr);
}
}
break;
case 04: // Command - Escape
log.debug("Command - Escape");
done = true;
break;
case 16: // TD - Transparent Data
log.debug("TD - Transparent Data");
int j = (bk.getNextByte() & 0xff) << 8 | bk.getNextByte()
& 0xff; // length
break;
case 17: // SBA - set buffer address order (row column)
log.debug("SBA - set buffer address order (row column)");
int saRow = bk.getNextByte();
int saCol = bk.getNextByte() & 0xff;
// make sure it is in bounds
if (saRow >= 0 && saRow <= screen52.getRows() && saCol >= 0
&& saCol <= screen52.getColumns()) {
screen52.setCursor(saRow, saCol); // now set screen
// position for output
} else {
sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x22,
"invalid row/col order" + " saRow = " + saRow
+ " saRows = " + screen52.getRows()
+ " saCol = " + saCol);
error = true;
}
break;
case 18: // WEA - Extended Attribute
log.debug("WEA - Extended Attribute");
bk.getNextByte();
bk.getNextByte();
break;
case 19: // IC - Insert Cursor
log.debug("IC - Insert Cursor");
int icX = bk.getNextByte();
int icY = bk.getNextByte() & 0xff;
if (icX >= 0 && icX <= saRows && icY >= 0 && icY <= saCols) {
log.debug(" IC " + icX + " " + icY);
screen52.setPendingInsert(true, icX, icY);
} else {
sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x22,
" IC/IM position invalid ");
error = true;
}
break;
case 20: // MC - Move Cursor
log.debug("MC - Move Cursor");
int imcX = bk.getNextByte();
int imcY = bk.getNextByte() & 0xff;
if (imcX >= 0 && imcX <= saRows && imcY >= 0
&& imcY <= saCols) {
log.debug(" MC " + imcX + " " + imcY);
screen52.setPendingInsert(false, imcX, imcY);
} else {
sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x22,
" IC/IM position invalid ");
error = true;
}
break;
case 21: // WTDSF - Write To Display Structured Field order
log
.debug("WTDSF - Write To Display Structured Field order");
byte[] seg = bk.getSegment();
error = sfParser.parseWriteToDisplayStructuredField(seg);
// error = writeToDisplayStructuredField();
break;
case 29: // SF - Start of Field
log.debug("SF - Start of Field");
int fcw1 = 0;
int fcw2 = 0;
int ffw1 = 0;
int ffw0 = bk.getNextByte() & 0xff; // FFW
if ((ffw0 & 0x40) == 0x40) {
ffw1 = bk.getNextByte() & 0xff; // FFW 1
fcw1 = bk.getNextByte() & 0xff; // check for field
// control word
// check if the first fcw1 is an 0x81 if it is then get
// the
// next pair for checking
if (fcw1 == 0x81) {
bk.getNextByte();
fcw1 = bk.getNextByte() & 0xff; // check for field
// control word
}
if (!isAttribute(fcw1)) {
fcw2 = bk.getNextByte() & 0xff; // FCW 2
attr = bk.getNextByte() & 0xff; // attribute field
while (!isAttribute(attr)) {
log.info(Integer.toHexString(fcw1) + " "
+ Integer.toHexString(fcw2)
+ " ");
log.info(Integer.toHexString(attr)
+ " "
+ Integer.toHexString(bk
.getNextByte() & 0xff));
// bk.getNextByte();
attr = bk.getNextByte() & 0xff; // attribute
// field
}
} else {
attr = fcw1; // attribute of field
fcw1 = 0;
}
} else {
attr = ffw0;
}
int fLength = (bk.getNextByte() & 0xff) << 8
| bk.getNextByte() & 0xff;
screen52.addField(attr, fLength, ffw0, ffw1, fcw1, fcw2);
break;
// WVL - LDC : 05/08/2005 : TFX.006253 - Support STRPCCMD
case -128: //STRPCCMD
// if (screen52.getCurrentPos() == 82) {
log.debug("STRPCCMD got a -128 command at " + screen52.getCurrentPos());
StringBuffer value = new StringBuffer();
int b;
char c;
int[] pco = new int[9];
int[] pcoOk = {0xfc, 0xd7, 0xc3, 0xd6, 0x40, 0x83, 0x80, 0xa1, 0x80};
for (int i = 0; i < 9; i++)
{
b = bk.getNextByte();
pco[i] = ((b & 0xff));
c = ebcdic2uni(b);
value.append(c);
}
// Check "PCO-String"
if (Arrays.equals(pco, pcoOk)) {
strpccmd = true;
}
// we return in the stream to have all chars
// arrive at the screen for later processing
for (int i = 0; i < 9; i++)
bk.setPrevByte();
//}
// no break: so every chars arrives
// on the screen for later parsing
//break;
default: // all others must be output to screen
log.debug("all others must be output to screen");
byte byte0 = bk.getByteOffset(-1);
if (isAttribute(byte0)) {
screen52.setAttr(byte0);
} else {
if (!screen52.isStatusErrorCode()) {
if (!isDataEBCDIC(byte0)) {
// if (byte0 == 255) {
// sendNegResponse(NR_REQUEST_ERROR,0x05,0x01,0x42,
// " Attempt to send FF to screen");
// }
// else
screen52.setChar(byte0);
} else
//LDC - 13/02/2003 - Convert it to unicode
//screen52.setChar(getASCIIChar(byte0));
screen52.setChar(codePage.ebcdic2uni(byte0));
} else {
if (byte0 == 0)
screen52.setChar(byte0);
else
//LDC - 13/02/2003 - Convert it to unicode
//screen52.setChar(getASCIIChar(byte0));
screen52.setChar(codePage.ebcdic2uni(byte0));
}
}
break;
}
if (error)
done = true;
}
}
catch (Exception e) {
log.warn("write to display " + e.getMessage());
e.printStackTrace();
}
;
processCC1(control1);
return error;
}
private boolean processSOH() throws Exception {
int l = bk.getNextByte(); // length
log.debug(" byte 0 " + l);
if (l > 0 && l <= 7) {
bk.getNextByte(); // flag byte 2
bk.getNextByte(); // reserved
bk.getNextByte(); // resequence fields
screen52.clearTable();
// well that is the first time I have seen this. This fixes a
// problem
// with S/36 command line. Finally got it.
if (l <= 3)
return false;
screen52.setErrorLine(bk.getNextByte()); // error row
int byte1 = 0;
if (l >= 5) {
byte1 = bk.getNextByte();
dataIncluded[23] = (byte1 & 0x80) == 0x80;
dataIncluded[22] = (byte1 & 0x40) == 0x40;
dataIncluded[21] = (byte1 & 0x20) == 0x20;
dataIncluded[20] = (byte1 & 0x10) == 0x10;
dataIncluded[19] = (byte1 & 0x8) == 0x8;
dataIncluded[18] = (byte1 & 0x4) == 0x4;
dataIncluded[17] = (byte1 & 0x2) == 0x2;
dataIncluded[16] = (byte1 & 0x1) == 0x1;
}
if (l >= 6) {
byte1 = bk.getNextByte();
dataIncluded[15] = (byte1 & 0x80) == 0x80;
dataIncluded[14] = (byte1 & 0x40) == 0x40;
dataIncluded[13] = (byte1 & 0x20) == 0x20;
dataIncluded[12] = (byte1 & 0x10) == 0x10;
dataIncluded[11] = (byte1 & 0x8) == 0x8;
dataIncluded[10] = (byte1 & 0x4) == 0x4;
dataIncluded[9] = (byte1 & 0x2) == 0x2;
dataIncluded[8] = (byte1 & 0x1) == 0x1;
}
if (l >= 7) {
byte1 = bk.getNextByte();
dataIncluded[7] = (byte1 & 0x80) == 0x80;
dataIncluded[6] = (byte1 & 0x40) == 0x40;
dataIncluded[5] = (byte1 & 0x20) == 0x20;
dataIncluded[4] = (byte1 & 0x10) == 0x10;
dataIncluded[3] = (byte1 & 0x8) == 0x8;
dataIncluded[2] = (byte1 & 0x4) == 0x4;
dataIncluded[1] = (byte1 & 0x2) == 0x2;
dataIncluded[0] = (byte1 & 0x1) == 0x1;
}
if (log.isDebugEnabled()) {
if (l >= 5)
log.debug(" byte 5 "
+ Integer.toBinaryString(bk.getNextByte()));
if (l >= 6)
log.debug(" byte 6 "
+ Integer.toBinaryString(bk.getNextByte()));
if (l == 7)
log.debug(" byte 7 "
+ Integer.toBinaryString(bk.getNextByte()));
}
return false;
} else {
sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x2B,
"invalid SOH length");
return true;
}
}
private void processCC0(byte byte0) {
log.debug(" Control byte0 " + Integer.toBinaryString(byte0 & 0xff));
boolean lockKeyboard = true;
boolean resetMDT = false;
boolean resetMDTAll = false;
boolean nullMDT = false;
boolean nullAll = false;
// Bits 3 to 6 are reserved and should be set to '0000'
// 0xE0 = '11100000' - only the first 3 bits are tested
if ((byte0 & 0xE0) == 0x00) {
lockKeyboard = false;
}
// '00100000' = 0x20 /32 -- just lock keyboard
// '01000000' = 0x40 /64
// '01100000' = 0x60 /96
// '10000000' = 0x80 /128
// '10100000' = 0xA0 /160
// '11000000' = 0xC0 /192
// '11100000' = 0xE0 /224
switch (byte0 & 0xE0) {
case 0x40:
resetMDT = true;
break;
case 0x60:
resetMDTAll = true;
break;
case 0x80:
nullMDT = true;
break;
case 0xA0:
resetMDT = true;
nullAll = true;
break;
case 0xC0:
resetMDT = true;
nullMDT = true;
break;
case 0xE0:
resetMDTAll = true;
nullAll = true;
break;
}
if (lockKeyboard) {
screen52.getOIA().setKeyBoardLocked(true);
pendingUnlock = false;
} else
pendingUnlock = false;
if (resetMDT || resetMDTAll || nullMDT || nullAll) {
ScreenField sf;
int f = screen52.getScreenFields().getSize();
for (int x = 0; x < f; x++) {
sf = screen52.getScreenFields().getField(x);
if (!sf.isBypassField()) {
if ((nullMDT && sf.mdt) || nullAll) {
sf.setFieldChar((char) 0x0);
screen52.drawField(sf);
}
}
if (resetMDTAll || (resetMDT && !sf.isBypassField()))
sf.resetMDT();
}
sf = null;
}
}
private void processCC1(byte byte1) {
log.debug(" Control byte1 " + Integer.toBinaryString(byte1 & 0xff));
if ((byte1 & 0x04) == 0x04) {
Toolkit.getDefaultToolkit().beep();
}
if ((byte1 & 0x02) == 0x02) {
screen52.getOIA().setMessageLightOff();
}
if ((byte1 & 0x01) == 0x01) {
screen52.getOIA().setMessageLightOn();
}
if ((byte1 & 0x01) == 0x01 && (byte1 & 0x02) == 0x02) {
screen52.getOIA().setMessageLightOn();
}
// reset blinking cursor seems to control whether to set or not set the
// the cursor position. No documentation for this just testing and
// looking at the bit settings of this field. This was a pain in the
// ass!
//
// if it is off '0' then keep existing cursor positioning information
// if it is on '1' then reset the cursor positioning information
// *** Note *** unless we receive bit 4 on at the same time
// this seems to work so far
if ((byte1 & 0x20) == 0x20 && (byte1 & 0x08) == 0x00) {
screen52.setPendingInsert(false);
log.debug(" WTD position no move");
} else {
screen52.setPendingInsert(true);
log.debug(" WTD position move to home" + screen52.homePos + " row "
+ screen52.getRow(screen52.homePos) + " col "
+ screen52.getCol(screen52.homePos));
}
// in enhanced mode we sometimes only receive bit 6 turned on which
// is reset blinking cursor
if ((byte1 & 0x20) == 0x20 && enhanced) {
cursorOn = true;
}
if (!screen52.isStatusErrorCode() && (byte1 & 0x08) == 0x08) {
// screen52.setStatus(screen52.STATUS_SYSTEM,screen52.STATUS_VALUE_OFF,null);
cursorOn = true;
}
if ((byte1 & 0x20) == 0x20 && (byte1 & 0x08) == 0x00) {
screen52.setPendingInsert(false, 1, 1);
}
}
private boolean isAttribute(int byte0) {
int byte1 = byte0 & 0xff;
return (byte1 & 0xe0) == 0x20;
}
//LDC - 12/02/2003 - Function name changed from isData to isDataEBCDIC
private boolean isDataEBCDIC(int byte0) {
int byte1 = byte0 & 0xff;
// here it should always be less than 255
if (byte1 >= 64 && byte1 < 255)
return true;
else
return false;
}
//LDC - 12/02/2003 - Test if the unicode character is a displayable
// character.
// The first 32 characters are non displayable characters
// This is normally the inverse of isDataEBCDIC (That's why there is a
// check on 255 -> 0xFFFF
private boolean isDataUnicode(int byte0) {
return (((byte0 < 0) || (byte0 >= 32)) && (byte0 != 0xFFFF));
}
private void writeStructuredField() {
boolean done = false;
int nextone;
try {
int length = ((bk.getNextByte() & 0xff) << 8 | (bk.getNextByte() & 0xff));
while (bk.hasNext() && !done) {
switch (bk.getNextByte()) {
case -39: // SOH - Start of Header Order
switch (bk.getNextByte()) {
case 112: // 5250 Query
bk.getNextByte(); // get null required field
sendQueryResponse();
break;
default:
log.debug("invalid structured field sub command "
+ bk.getByteOffset(-1));
break;
}
break;
default:
log.debug("invalid structured field command "
+ bk.getByteOffset(-1));
break;
}
}
} catch (Exception e) {
}
;
}
private final void writeErrorCode() throws Exception {
screen52.setCursor(screen52.getErrorLine(), 1); // Skip the control byte
screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
Screen5250.STATUS_VALUE_ON, null);
screen52.saveErrorLine();
cursorOn = true;
}
private final void writeErrorCodeToWindow() throws Exception {
int fromCol = bk.getNextByte() & 0xff; // from column
int toCol = bk.getNextByte() & 0xff; // to column
screen52.setCursor(screen52.getErrorLine(), fromCol); // Skip the control
// byte
screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
Screen5250.STATUS_VALUE_ON, null);
screen52.saveErrorLine();
cursorOn = true;
}
/**
* Method sendQueryResponse
*
* The query command is used to obtain information about the capabilities of
* the 5250 display.
*
* The Query command must follow an Escape (0x04) and Write Structured Field
* command (0xF3).
*
* This section is modeled after the rfc1205 - 5250 Telnet Interface section
* 5.3
*
* @throws IOException
*/
private final void sendQueryResponse() throws IOException {
log.info("sending query response");
byte abyte0[] = new byte[64];
abyte0[0] = 0; // Cursor Row/column (set to zero)
abyte0[1] = 0; // ""
abyte0[2] = -120; // X'88' inbound write structure Field aid
if (enhanced == true) {
abyte0[3] = 0; // 0x003D (61) length of query response
abyte0[4] = 64; // "" see note below ?????????
} else {
abyte0[3] = 0; // 0x003A (58) length of query response
abyte0[4] = 58; // ""
// the length between 58 and 64 seems to cause
// different formatting codes to be sent from
// the host ???????????????? why ???????
// Well the why can be found in the manual if
// read a little more ;-)
}
abyte0[5] = -39; // command class 0xD9
abyte0[6] = 112; // Command type query 0x70
abyte0[7] = -128; // 0x80 Flag byte
abyte0[8] = 6; // Controller Hardware Class
abyte0[9] = 0; // 0x0600 - Other WSF or another 5250 Emulator
abyte0[10] = 1; // Controller Code Level
abyte0[11] = 1; // Version 1 Rel 1.0
abyte0[12] = 0; // ""
abyte0[13] = 0; // 13 - 28 are reserved so set to 0x00
abyte0[14] = 0; // ""
abyte0[15] = 0; // ""
abyte0[16] = 0; // ""
abyte0[17] = 0; // ""
abyte0[18] = 0; // ""
abyte0[19] = 0; // ""
abyte0[20] = 0; // ""
abyte0[21] = 0; // ""
abyte0[22] = 0; // ""
abyte0[23] = 0; // ""
abyte0[24] = 0; // ""
abyte0[25] = 0; // ""
abyte0[26] = 0; // ""
abyte0[27] = 0; // ""
abyte0[28] = 0; // ""
abyte0[29] = 1; // Device type - 0x01 5250 Emulator
abyte0[30] = codePage.uni2ebcdic('5'); // Device type character
abyte0[31] = codePage.uni2ebcdic('2'); // ""
abyte0[32] = codePage.uni2ebcdic('5'); // ""
abyte0[33] = codePage.uni2ebcdic('1'); // ""
abyte0[34] = codePage.uni2ebcdic('0'); // ""
abyte0[35] = codePage.uni2ebcdic('1'); // ""
abyte0[36] = codePage.uni2ebcdic('1'); // ""
abyte0[37] = 2; // Keyboard Id - 0x02 Standard Keyboard
abyte0[38] = 0; // extended keyboard id
abyte0[39] = 0; // reserved
abyte0[40] = 0; // 40 - 43 Display Serial Number
abyte0[41] = 36; //
abyte0[42] = 36; //
abyte0[43] = 0; //
abyte0[44] = 1; // Maximum number of display fields - 256
abyte0[45] = 0; // 0x0100
abyte0[46] = 0; // 46 -48 Reserved set to 0x00
abyte0[47] = 0;
abyte0[48] = 0;
abyte0[49] = 1; // 49 - 53 Controller Display Capability
abyte0[50] = 17; // see rfc - tired of typing :-)
abyte0[51] = 0; // ""
abyte0[52] = 0; // ""
// 53
// Bit 0-2: B'000' - no graphics capability
// B'001' - 5292-2 style graphics
// Bit 3-7: B '00000' = reserved (it seems for Client access)
if (enhanced == true) {
// abyte0[53] = 0x5E; // 0x5E turns on ehnhanced mode
// abyte0[53] = 0x27; // 0x5E turns on ehnhanced mode
abyte0[53] = 0x7; // 0x5E turns on ehnhanced mode
log.info("enhanced options");
} else
abyte0[53] = 0x0; // 0x0 is normal emulation
abyte0[54] = 24; // 54 - 60 Reserved set to 0x00
// 54 - I found out is used for enhanced user
// interface level 3. Bit 4 allows headers
// and footers for windows
abyte0[54] = 8; // 54 - 60 Reserved set to 0x00
// 54 - I found out is used for enhanced user
// interface level 3. Bit 4 allows headers
// and footers for windows
abyte0[55] = 0;
abyte0[56] = 0;
abyte0[57] = 0;
abyte0[58] = 0;
abyte0[59] = 0;
abyte0[60] = 0;
abyte0[61] = 0; // gridlines are not supported
abyte0[62] = 0; // gridlines are not supported
abyte0[63] = 0;
writeGDS(0, 0, abyte0); // now tell them about us
abyte0 = null;
}
protected final boolean negotiate(byte abyte0[]) throws IOException {
int i = 0;
// from server negotiations
if(abyte0[i] == IAC) { // -1
while(i < abyte0.length && abyte0[i++] == -1)
// while(i < abyte0.length && (abyte0[i] == -1 || abyte0[i++] == 0x20))
switch(abyte0[i++]) {
// we will not worry about what it WONT do
case WONT: // -4
default:
break;
case DO: //-3
// not sure why but since moving to V5R2 we are receiving a
// DO with no option when connecting a second session with
// device name. Can not find the cause at all. If anybody
// is interested please debug this until then this works.
if (i < abyte0.length) {
switch(abyte0[i]) {
case TERMINAL_TYPE: // 24
baosp.write(IAC);
baosp.write(WILL);
baosp.write(TERMINAL_TYPE);
writeByte(baosp.toByteArray());
baosp.reset();
break;
case OPT_END_OF_RECORD: // 25
baosp.write(IAC);
baosp.write(WILL);
baosp.write(OPT_END_OF_RECORD);
writeByte(baosp.toByteArray());
baosp.reset();
break;
case TRANSMIT_BINARY: // 0
baosp.write(IAC);
baosp.write(WILL);
baosp.write(TRANSMIT_BINARY);
writeByte(baosp.toByteArray());
baosp.reset();
break;
case TIMING_MARK: // 6 rfc860
// System.out.println("Timing Mark Received and notifying " +
// "the server that we will not do it");
baosp.write(IAC);
baosp.write(WONT);
baosp.write(TIMING_MARK);
writeByte(baosp.toByteArray());
baosp.reset();
break;
case NEW_ENVIRONMENT: // 39 rfc1572
if (devName == null && user == null) {
baosp.write(IAC);
baosp.write(WONT);
baosp.write(NEW_ENVIRONMENT);
writeByte(baosp.toByteArray());
baosp.reset();
}
else {
baosp.write(IAC);
baosp.write(WILL);
baosp.write(NEW_ENVIRONMENT);
writeByte(baosp.toByteArray());
baosp.reset();
}
break;
default: // every thing else we will not do at this time
baosp.write(IAC);
baosp.write(WONT);
baosp.write(abyte0[i]); // either
writeByte(baosp.toByteArray());
baosp.reset();
break;
}
}
i++;
break;
case WILL:
switch(abyte0[i]) {
case OPT_END_OF_RECORD: // 25
baosp.write(IAC);
baosp.write(DO);
baosp.write(OPT_END_OF_RECORD);
writeByte(baosp.toByteArray());
baosp.reset();
break;
case TRANSMIT_BINARY: // '\0'
baosp.write(IAC);
baosp.write(DO);
baosp.write(TRANSMIT_BINARY);
writeByte(baosp.toByteArray());
baosp.reset();
break;
}
i++;
break;
case SB: // -6
if(abyte0[i] == NEW_ENVIRONMENT && abyte0[i + 1] == 1) {
negNewEnvironment();
while (++i < abyte0.length && abyte0[i + 1] != IAC);
}
if(abyte0[i] == TERMINAL_TYPE && abyte0[i + 1] == 1) {
baosp.write(IAC);
baosp.write(SB);
baosp.write(TERMINAL_TYPE);
baosp.write(QUAL_IS);
if(!support132)
baosp.write("IBM-3179-2".getBytes());
else
baosp.write("IBM-3477-FC".getBytes());
baosp.write(IAC);
baosp.write(SE);
writeByte(baosp.toByteArray());
baosp.reset();
i++;
}
i++;
break;
}
return true;
}
else {
return false;
}
}
/**
* Negotiate new environment string for device name
*
* @throws IOException
*/
private void negNewEnvironment() throws IOException {
baosp.write(IAC);
baosp.write(SB);
baosp.write(NEW_ENVIRONMENT);
baosp.write(IS);
if (devName != null) {
baosp.write(USERVAR);
baosp.write("DEVNAME".getBytes());
baosp.write(VALUE);
baosp.write(negDeviceName().getBytes());
}
if (user != null) {
baosp.write(VAR);
baosp.write("USER".getBytes());
baosp.write(VALUE);
baosp.write(user.getBytes());
if (password != null) {
baosp.write(USERVAR);
baosp.write("IBMRSEED".getBytes());
baosp.write(VALUE);
baosp.write(NEGOTIATE_ESC);
baosp.write(0x0);
baosp.write(0x0);
baosp.write(0x0);
baosp.write(0x0);
baosp.write(0x0);
baosp.write(0x0);
baosp.write(0x0);
baosp.write(0x0);
baosp.write(USERVAR);
baosp.write("IBMSUBSPW".getBytes());
baosp.write(VALUE);
baosp.write(password.getBytes());
}
if (library != null) {
baosp.write(USERVAR);
baosp.write("IBMCURLIB".getBytes());
baosp.write(VALUE);
baosp.write(library.getBytes());
}
if (initialMenu != null) {
baosp.write(USERVAR);
baosp.write("IBMIMENU".getBytes());
baosp.write(VALUE);
baosp.write(initialMenu.getBytes());
}
if (program != null) {
baosp.write(USERVAR);
baosp.write("IBMPROGRAM".getBytes());
baosp.write(VALUE);
baosp.write(program.getBytes());
}
}
baosp.write(IAC);
baosp.write(SE);
writeByte(baosp.toByteArray());
baosp.reset();
}
/**
* This will negotiate a device name with controller. if the sequence is
* less than zero then it will send the device name as specified. On each
* unsuccessful attempt a sequential number is appended until we find one or
* the controller says no way.
*
* @return String
*/
private String negDeviceName() {
if (devSeq++ == -1) {
devNameUsed = devName;
return devName;
} else {
StringBuffer sb = new StringBuffer(devName + devSeq);
int ei = 1;
while (sb.length() > 10) {
sb.setLength(0);
sb.append(devName.substring(0, devName.length() - ei++));
sb.append(devSeq);
}
devNameUsed = sb.toString();
return devNameUsed;
}
}
public final void setCodePage(String cp) {
codePage = CharMappings.getCodePage(cp);
}
public final CodePage getCodePage() {
return codePage;
}
// public final Dimension getPreferredSize() {
// return screen52.getPreferredSize();
// }
/**
* KJP - 20/02/2003 taken out
*/
// public byte getEBCDIC(int index) {
// return codePage.getEBCDIC(index);
//
// }
//
/**
* KJP - 20/02/2003 taken out
*/
// public char getEBCDICChar(int index) {
// return codePage.getEBCDICChar(index);
//
// }
// /**
// * LDC - 13/02/2003 -
// // * @deprecated
// */
// public byte getASCII(int index) {
// return codePage.getASCII(index);
//
// }
//
// /**
// * LDC - 13/02/2003 -
// // * @deprecated
// */
// public char getASCIIChar(int index) {
// return codePage.getASCIIChar(index);
// }
public char ebcdic2uni(int index) {
return codePage.ebcdic2uni(index);
}
public byte uni2ebcdic(char index) {
return codePage.uni2ebcdic(index);
}
// public void dumpScreen() {
//
// for (int y = 0; y < screen52.getRows(); y++) {
// System.out.print("row :" + (y + 1) + " ");
//
// // for (int x = 0; x < screen52.getCols(); x++) {
// // System.out.println("row " + (y + 1) + " col " + (x + 1) + " "
// // + screen52.screen[y * x].toString());
// // implement this part to create a string from a character.
// // for (int x = 0; x < screen52.getCols(); x++) {
// // System.out.println("row " + (y + 1) + " col " + (x + 1) + " "
// // + screen52.planes.getChar(y * x).toString());
//
// }
// }
// }
// negotiating commands
private static final byte IAC = (byte) -1; // 255 FF
private static final byte DONT = (byte) -2; //254 FE
private static final byte DO = (byte) -3; //253 FD
private static final byte WONT = (byte) -4; //252 FC
private static final byte WILL = (byte) -5; //251 FB
private static final byte SB = (byte) -6; //250 Sub Begin FA
private static final byte SE = (byte) -16; //240 Sub End F0
private static final byte EOR = (byte) -17; //239 End of Record EF
private static final byte TERMINAL_TYPE = (byte) 24; // 18
private static final byte OPT_END_OF_RECORD = (byte) 25; // 19
private static final byte TRANSMIT_BINARY = (byte) 0; // 0
private static final byte QUAL_IS = (byte) 0; // 0
private static final byte TIMING_MARK = (byte) 6; // 6
private static final byte NEW_ENVIRONMENT = (byte) 39; // 27
private static final byte IS = (byte) 0; // 0
private static final byte SEND = (byte) 1; // 1
private static final byte INFO = (byte) 2; // 2
private static final byte VAR = (byte) 0; // 0
private static final byte VALUE = (byte) 1; // 1
private static final byte NEGOTIATE_ESC = (byte) 2; // 2
private static final byte USERVAR = (byte) 3; // 3
// miscellaneous
private static final byte ESC = 0x04; // 04
private static final char char0 = 0;
// private static final byte CMD_READ_IMMEDIATE_ALT = (byte)0x83; // 131
}