510Connectbot: src/org/tn5250j/framework/tn5250/tnvt.java annotate

annotate src/org/tn5250j/framework/tn5250/tnvt.java @ 186:61a90cb1938d

setfield positions the cursor properly as if the characters were typed

author	Carl Byington <carl@five-ten-sg.com>
date	Wed, 02 Jul 2014 15:03:06 -0700
parents	6eab98e58bed
children	3e68cb17c0b6

rev	line source
3 e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	1 /**
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	2 * Title: tnvt.java
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	3 * Copyright: Copyright (c) 2001 Company:
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	4 *
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	5 * @author Kenneth J. Pouncey
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	6 * @version 0.5
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	7 *
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	8 * Description:
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	9 *
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	10 * This program is free software; you can redistribute it and/or modify it under
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	11 * the terms of the GNU General Public License as published by the Free Software
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	12 * Foundation; either version 2, or (at your option) any later version.
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	13 *
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	14 * This program is distributed in the hope that it will be useful, but WITHOUT
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	15 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	16 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	17 * details.
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	18 *
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	19 * You should have received a copy of the GNU General Public License along with
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	20 * this software; see the file COPYING. If not, write to the Free Software
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	22 *
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	23 */
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	24 package org.tn5250j.framework.tn5250;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	25
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	26 import static org.tn5250j.TN5250jConstants.AID_HELP;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	27 import static org.tn5250j.TN5250jConstants.AID_PRINT;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	28 import static org.tn5250j.TN5250jConstants.CMD_CLEAR_FORMAT_TABLE;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	29 import static org.tn5250j.TN5250jConstants.CMD_CLEAR_UNIT;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	30 import static org.tn5250j.TN5250jConstants.CMD_CLEAR_UNIT_ALTERNATE;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	31 import static org.tn5250j.TN5250jConstants.CMD_READ_INPUT_FIELDS;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	32 import static org.tn5250j.TN5250jConstants.CMD_READ_MDT_FIELDS;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	33 import static org.tn5250j.TN5250jConstants.CMD_READ_MDT_IMMEDIATE_ALT;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	34 import static org.tn5250j.TN5250jConstants.CMD_READ_SCREEN_IMMEDIATE;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	35 import static org.tn5250j.TN5250jConstants.CMD_READ_SCREEN_TO_PRINT;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	36 import static org.tn5250j.TN5250jConstants.CMD_RESTORE_SCREEN;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	37 import static org.tn5250j.TN5250jConstants.CMD_ROLL;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	38 import static org.tn5250j.TN5250jConstants.CMD_SAVE_SCREEN;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	39 import static org.tn5250j.TN5250jConstants.CMD_WRITE_ERROR_CODE;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	40 import static org.tn5250j.TN5250jConstants.CMD_WRITE_ERROR_CODE_TO_WINDOW;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	41 import static org.tn5250j.TN5250jConstants.CMD_WRITE_STRUCTURED_FIELD;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	42 import static org.tn5250j.TN5250jConstants.CMD_WRITE_TO_DISPLAY;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	43 import static org.tn5250j.TN5250jConstants.NR_REQUEST_ERROR;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	44 import static org.tn5250j.TN5250jConstants.PF1;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	45 import static org.tn5250j.TN5250jConstants.PF10;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	46 import static org.tn5250j.TN5250jConstants.PF11;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	47 import static org.tn5250j.TN5250jConstants.PF12;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	48 import static org.tn5250j.TN5250jConstants.PF13;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	49 import static org.tn5250j.TN5250jConstants.PF14;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	50 import static org.tn5250j.TN5250jConstants.PF15;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	51 import static org.tn5250j.TN5250jConstants.PF16;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	52 import static org.tn5250j.TN5250jConstants.PF17;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	53 import static org.tn5250j.TN5250jConstants.PF18;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	54 import static org.tn5250j.TN5250jConstants.PF19;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	55 import static org.tn5250j.TN5250jConstants.PF2;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	56 import static org.tn5250j.TN5250jConstants.PF20;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	57 import static org.tn5250j.TN5250jConstants.PF21;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	58 import static org.tn5250j.TN5250jConstants.PF22;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	59 import static org.tn5250j.TN5250jConstants.PF23;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	60 import static org.tn5250j.TN5250jConstants.PF24;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	61 import static org.tn5250j.TN5250jConstants.PF3;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	62 import static org.tn5250j.TN5250jConstants.PF4;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	63 import static org.tn5250j.TN5250jConstants.PF5;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	64 import static org.tn5250j.TN5250jConstants.PF6;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	65 import static org.tn5250j.TN5250jConstants.PF7;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	66 import static org.tn5250j.TN5250jConstants.PF8;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	67 import static org.tn5250j.TN5250jConstants.PF9;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	68
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	69 import java.io.BufferedInputStream;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	70 import java.io.BufferedOutputStream;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	71 import java.io.ByteArrayOutputStream;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	72 import java.io.IOException;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	73 import java.io.InputStream;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	74 import java.io.OutputStream;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	75 import java.net.Socket;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	76 import java.util.Arrays;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	77 import java.util.Properties;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	78 import java.util.concurrent.ArrayBlockingQueue;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	79 import java.util.concurrent.BlockingQueue;
99 eda03b809f48 move blocking test from socket read to queue take Carl Byington <carl@five-ten-sg.com> parents: 91 diff changeset	80 import java.util.concurrent.TimeUnit;
3 e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	81 import javax.net.ssl.SSLSocket;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	82
71 7ae9b0c382ec use 5250 encryption config entry Carl Byington <carl@five-ten-sg.com> parents: 69 diff changeset	83 import android.content.Intent;
7ae9b0c382ec use 5250 encryption config entry Carl Byington <carl@five-ten-sg.com> parents: 69 diff changeset	84 import android.net.Uri;
7ae9b0c382ec use 5250 encryption config entry Carl Byington <carl@five-ten-sg.com> parents: 69 diff changeset	85 import android.util.Log;
7ae9b0c382ec use 5250 encryption config entry Carl Byington <carl@five-ten-sg.com> parents: 69 diff changeset	86
24 d1c549560aff adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 23 diff changeset	87 import com.five_ten_sg.connectbot.R;
119 6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	88 import com.five_ten_sg.connectbot.bean.HostBean;
8 3b760b39962a adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 6 diff changeset	89 import com.five_ten_sg.connectbot.service.TerminalBridge;
3b760b39962a adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 6 diff changeset	90 import com.five_ten_sg.connectbot.service.TerminalManager;
71 7ae9b0c382ec use 5250 encryption config entry Carl Byington <carl@five-ten-sg.com> parents: 69 diff changeset	91 import de.mud.terminal.vt320;
8 3b760b39962a adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 6 diff changeset	92
3 e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	93 import org.tn5250j.TN5250jConstants;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	94 import org.tn5250j.encoding.CharMappings;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	95 import org.tn5250j.encoding.ICodePage;
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	96 import org.tn5250j.framework.transport.SocketConnector;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	97
3 e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	98
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	99 public final class tnvt implements Runnable {
26 9ae1c889a64c adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 25 diff changeset	100 private static final String TAG = "tnvt";
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	101 // negotiating commands
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	102 private static final byte IAC = (byte) - 1; // 255 FF
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	103 private static final byte DONT = (byte) - 2; //254 FE
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	104 private static final byte DO = (byte) - 3; //253 FD
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	105 private static final byte WONT = (byte) - 4; //252 FC
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	106 private static final byte WILL = (byte) - 5; //251 FB
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	107 private static final byte SB = (byte) - 6; //250 Sub Begin FA
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	108 private static final byte SE = (byte) - 16; //240 Sub End F0
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	109 private static final byte EOR = (byte) - 17; //239 End of Record EF
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	110 private static final byte TERMINAL_TYPE = (byte) 24; // 18
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	111 private static final byte OPT_END_OF_RECORD = (byte) 25; // 19
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	112 private static final byte TRANSMIT_BINARY = (byte) 0; // 0
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	113 private static final byte QUAL_IS = (byte) 0; // 0
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	114 private static final byte TIMING_MARK = (byte) 6; // 6
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	115 private static final byte NEW_ENVIRONMENT = (byte) 39; // 27
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	116 private static final byte IS = (byte) 0; // 0
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	117 private static final byte SEND = (byte) 1; // 1
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	118 private static final byte INFO = (byte) 2; // 2
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	119 private static final byte VAR = (byte) 0; // 0
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	120 private static final byte VALUE = (byte) 1; // 1
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	121 private static final byte NEGOTIATE_ESC = (byte) 2; // 2
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	122 private static final byte USERVAR = (byte) 3; // 3
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	123
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	124 // miscellaneous
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	125 private static final byte ESC = 0x04; // 04
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	126
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	127 private Socket sock;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	128 public BufferedInputStream bin;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	129 public BufferedOutputStream bout;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	130 private final BlockingQueue<Object> dsq = new ArrayBlockingQueue<Object>(25);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	131 private Stream5250 bk;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	132 private DataStreamProducer producer;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	133 protected Screen5250 screen52;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	134 private boolean waitingForInput;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	135 private boolean invited;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	136 private boolean negotiated = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	137 private Thread me;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	138 private Thread pthread;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	139 private int readType;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	140 private boolean enhanced = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	141 private boolean cursorOn = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	142 private String hostname = "";
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	143 private int port = 23;
99 eda03b809f48 move blocking test from socket read to queue take Carl Byington <carl@five-ten-sg.com> parents: 91 diff changeset	144 private vt320 buffer;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	145 private boolean connected = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	146 private boolean support132 = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	147 private ByteArrayOutputStream baosp = null;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	148 private ByteArrayOutputStream baosrsp = null;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	149 private int devSeq = -1;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	150 private String devName;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	151 private String devNameUsed;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	152 private KbdTypesCodePages kbdTypesCodePage;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	153 // WVL - LDC : TR.000300 : Callback scenario from 5250
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	154 private boolean scan; // = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	155 private static int STRSCAN = 1;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	156 // WVL - LDC : 05/08/2005 : TFX.006253 - support STRPCCMD
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	157 private boolean strpccmd; // = false;
119 6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	158 private String encryption;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	159 private String user;
125 6eab98e58bed add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 120 diff changeset	160 private String password = null;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	161 private String library;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	162 private String initialMenu;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	163 private String program;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	164 private boolean keepTrucking = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	165 private boolean pendingUnlock = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	166 private boolean[] dataIncluded;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	167 protected ICodePage codePage;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	168 private boolean firstScreen;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	169 private String sslType;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	170 private WTDSFParser sfParser;
8 3b760b39962a adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 6 diff changeset	171 private TerminalBridge bridge;
3b760b39962a adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 6 diff changeset	172 private TerminalManager manager;
3 e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	173
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	174
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	175
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	176 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	177 * @param screen52
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	178 * @param enhanced
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	179 * @param support132
10 e773d0952613 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 8 diff changeset	180 * @param bridge
e773d0952613 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 8 diff changeset	181 * @param manager
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	182 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	183 public tnvt(Screen5250 screen52, boolean enhanced, boolean support132, TerminalBridge bridge, TerminalManager manager) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	184 this.screen52 = screen52;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	185 this.support132 = support132;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	186 this.enhanced = enhanced;
8 3b760b39962a adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 6 diff changeset	187 this.bridge = bridge;
3b760b39962a adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 6 diff changeset	188 this.manager = manager;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	189 setCodePage("37");
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	190 dataIncluded = new boolean[24];
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	191 baosp = new ByteArrayOutputStream();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	192 baosrsp = new ByteArrayOutputStream();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	193 }
3 e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	194
10 e773d0952613 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 8 diff changeset	195 public void showURL(String url) {
e773d0952613 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 8 diff changeset	196 if (url.indexOf("://") < 0) url = "http://" + url;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	197
10 e773d0952613 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 8 diff changeset	198 Intent intent = new Intent(Intent.ACTION_VIEW, Uri.parse(url));
e773d0952613 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 8 diff changeset	199 manager.startActivity(intent);
e773d0952613 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 8 diff changeset	200 }
e773d0952613 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 8 diff changeset	201
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	202 public String getHostName() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	203 return hostname;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	204 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	205
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	206 public void setDeviceName(String name) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	207 devName = name;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	208 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	209
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	210 public String getDeviceName() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	211 return devName;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	212 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	213
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	214 public String getAllocatedDeviceName() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	215 return devNameUsed;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	216 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	217
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	218 public boolean isConnected() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	219 return connected;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	220 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	221
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	222 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	223 * @return true when SSL is used and socket is connected.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	224 * @see {@link #isConnected()}
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	225 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	226 public boolean isSslSocket() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	227 if (this.connected && this.sock != null && this.sock instanceof SSLSocket) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	228 return true;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	229 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	230 else {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	231 return false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	232 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	233 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	234
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	235 public final void setProxy(String proxyHost, String proxyPort) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	236 Properties systemProperties = System.getProperties();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	237 systemProperties.put("socksProxySet", "true");
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	238 systemProperties.put("socksProxyHost", proxyHost);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	239 systemProperties.put("socksProxyPort", proxyPort);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	240 System.setProperties(systemProperties);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	241 Log.i(TAG, " socks set ");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	242 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	243
120 dcac61b6f2e6 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 119 diff changeset	244 private String fixer(String value, String def) {
dcac61b6f2e6 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 119 diff changeset	245 if ((value == null) \|\| (value.length() == 0)) return def;
119 6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	246 return value;
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	247 }
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	248
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	249 public final boolean connect(HostBean host, String homeDirectory, vt320 buffer) {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	250 try {
119 6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	251 this.hostname = host.getHostname();
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	252 this.port = host.getPort();
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	253 this.buffer = buffer;
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	254 this.encryption = fixer(host.getEncryption5250(), "NONE");
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	255 this.user = host.getUsername();
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	256 this.library = host.getLibrary();
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	257 this.initialMenu = host.getInitialMenu();
6969d6cebcd7 add more 5250 config items Carl Byington <carl@five-ten-sg.com> parents: 112 diff changeset	258 this.program = host.getProgram();
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	259
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	260 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	261 screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	262 ScreenOIA.OIA_LEVEL_INPUT_INHIBITED, "X - Connecting");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	263 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	264 catch (Exception exc) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	265 Log.w(TAG, "setStatus(ON) " + exc.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	266 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	267
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	268 SocketConnector sc = new SocketConnector();
91 33eb63352be5 remove 5250 configuration Carl Byington <carl@five-ten-sg.com> parents: 71 diff changeset	269 sock = sc.createSocket(hostname, port, encryption, homeDirectory, bridge, manager);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	270
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	271 if (sock == null) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	272 Log.w(TAG, "I did not get a socket");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	273 disconnect();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	274 return false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	275 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	276
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	277 connected = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	278 // used for JDK1.3
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	279 sock.setKeepAlive(true);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	280 sock.setTcpNoDelay(true);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	281 sock.setSoLinger(false, 0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	282 InputStream in = sock.getInputStream();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	283 OutputStream out = sock.getOutputStream();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	284 bin = new BufferedInputStream(in, 8192);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	285 bout = new BufferedOutputStream(out);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	286 byte abyte0[];
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	287
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	288 while (negotiate(abyte0 = readNegotiations()));
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	289
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	290 negotiated = true;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	291
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	292 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	293 screen52.setCursorActive(false);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	294 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	295 catch (Exception excc) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	296 Log.w(TAG, "setCursorOff " + excc.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	297 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	298
99 eda03b809f48 move blocking test from socket read to queue take Carl Byington <carl@five-ten-sg.com> parents: 91 diff changeset	299 producer = new DataStreamProducer(this, bin, dsq, abyte0);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	300 pthread = new Thread(producer);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	301 // pthread.setPriority(pthread.MIN_PRIORITY);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	302 pthread.setPriority(Thread.NORM_PRIORITY);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	303 // pthread.setPriority(Thread.NORM_PRIORITY / 2);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	304 pthread.start();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	305
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	306 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	307 screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_NOTINHIBITED,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	308 ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	309 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	310 catch (Exception exc) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	311 Log.w(TAG, "setStatus(OFF) " + exc.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	312 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	313
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	314 keepTrucking = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	315 me = new Thread(this);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	316 me.start();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	317 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	318 catch (Exception exception) {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	319 if (exception.getMessage() == null)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	320 exception.printStackTrace();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	321
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	322 Log.w(TAG, "connect() " + exception.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	323
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	324 if (sock == null)
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	325 Log.w(TAG, "I did not get a socket");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	326
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	327 disconnect();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	328 return false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	329 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	330
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	331 return true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	332 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	333
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	334 public final boolean disconnect() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	335 if (!connected) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	336 screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	337 ScreenOIA.OIA_LEVEL_INPUT_INHIBITED, "X - Disconnected");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	338 return false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	339 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	340
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	341 if (me != null && me.isAlive()) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	342 me.interrupt();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	343 keepTrucking = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	344 pthread.interrupt();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	345 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	346
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	347 screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	348 ScreenOIA.OIA_LEVEL_INPUT_INHIBITED, "X - Disconnected");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	349 screen52.getOIA().setKeyBoardLocked(false);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	350 pendingUnlock = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	351
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	352 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	353 if (sock != null) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	354 Log.i(TAG, "Closing socket");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	355 sock.close();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	356 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	357
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	358 if (bin != null) bin.close();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	359
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	360 if (bout != null) bout.close();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	361
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	362 connected = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	363 firstScreen = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	364 // WVL - LDC : TR.000345 : properly disconnect and clear screen
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	365 // Is this the right place to set screen realestate on disconnect?
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	366 //controller.getScreen().clearAll();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	367 screen52.goto_XY(0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	368 screen52.setCursorActive(false);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	369 screen52.clearAll();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	370 screen52.restoreScreen();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	371 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	372 catch (Exception exception) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	373 Log.w(TAG, exception.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	374 connected = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	375 devSeq = -1;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	376 return false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	377 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	378
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	379 devSeq = -1;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	380 return true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	381 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	382
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	383 private final ByteArrayOutputStream appendByteStream(byte abyte0[]) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	384 ByteArrayOutputStream bytearrayoutputstream = new ByteArrayOutputStream();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	385
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	386 for (int i = 0; i < abyte0.length; i++) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	387 bytearrayoutputstream.write(abyte0[i]);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	388
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	389 if (abyte0[i] == -1)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	390 bytearrayoutputstream.write(-1);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	391 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	392
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	393 return bytearrayoutputstream;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	394 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	395
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	396 private final byte[] readNegotiations() throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	397 int i = bin.read();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	398
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	399 if (i < 0) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	400 throw new IOException("Connection closed.");
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	401 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	402 else {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	403 int j = bin.available();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	404 byte abyte0[] = new byte[j + 1];
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	405 abyte0[0] = (byte) i;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	406 bin.read(abyte0, 1, j);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	407 return abyte0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	408 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	409 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	410
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	411 private final void writeByte(byte abyte0[]) throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	412 bout.write(abyte0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	413 bout.flush();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	414 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	415
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	416 // private final void writeByte(byte byte0) throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	417 //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	418 // bout.write(byte0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	419 // bout.flush();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	420 // }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	421
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	422 public final void sendHeartBeat() throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	423 byte[] b = { (byte) 0xff, (byte) 0xf1 };
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	424 bout.write(b);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	425 bout.flush();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	426 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	427
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	428 private final void readImmediate(int readType) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	429 if (screen52.isStatusErrorCode()) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	430 screen52.restoreErrorLine();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	431 screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	432 Screen5250.STATUS_VALUE_OFF, null);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	433 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	434
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	435 if (!enhanced) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	436 screen52.setCursorActive(false);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	437 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	438
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	439 // screen52.setStatus(Screen5250.STATUS_SYSTEM,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	440 // Screen5250.STATUS_VALUE_ON, null);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	441 screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	442 ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	443 screen52.getOIA().setKeyBoardLocked(true);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	444 pendingUnlock = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	445 invited = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	446 screen52.getScreenFields().readFormatTable(baosp, readType, codePage);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	447
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	448 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	449 writeGDS(0, 3, baosp.toByteArray());
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	450 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	451 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	452 Log.w(TAG, ioe.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	453 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	454 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	455
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	456 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	457 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	458
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	459 public final boolean sendAidKey(int aid) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	460 if (screen52.isStatusErrorCode()) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	461 screen52.restoreErrorLine();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	462 screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	463 Screen5250.STATUS_VALUE_OFF, null);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	464 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	465
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	466 if (!enhanced) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	467 screen52.setCursorActive(false);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	468 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	469
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	470 // screen52.setStatus(Screen5250.STATUS_SYSTEM,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	471 // Screen5250.STATUS_VALUE_ON, null);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	472 screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	473 ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	474 screen52.getOIA().setKeyBoardLocked(true);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	475 pendingUnlock = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	476 invited = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	477 baosp.write(screen52.getCurrentRow());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	478 baosp.write(screen52.getCurrentCol());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	479 baosp.write(aid);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	480
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	481 if (dataIncluded(aid))
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	482 screen52.getScreenFields().readFormatTable(baosp, readType,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	483 codePage);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	484
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	485 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	486 writeGDS(0, 3, baosp.toByteArray());
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	487 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	488 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	489 Log.w(TAG, ioe.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	490 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	491 return false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	492 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	493
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	494 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	495 return true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	496 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	497
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	498 private boolean dataIncluded(int aid) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	499 switch (aid) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	500 case PF1:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	501 return !dataIncluded[0];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	502
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	503 case PF2:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	504 return !dataIncluded[1];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	505
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	506 case PF3:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	507 return !dataIncluded[2];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	508
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	509 case PF4:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	510 return !dataIncluded[3];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	511
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	512 case PF5:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	513 return !dataIncluded[4];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	514
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	515 case PF6:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	516 return !dataIncluded[5];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	517
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	518 case PF7:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	519 return !dataIncluded[6];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	520
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	521 case PF8:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	522 return !dataIncluded[7];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	523
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	524 case PF9:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	525 return !dataIncluded[8];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	526
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	527 case PF10:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	528 return !dataIncluded[9];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	529
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	530 case PF11:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	531 return !dataIncluded[10];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	532
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	533 case PF12:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	534 return !dataIncluded[11];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	535
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	536 case PF13:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	537 return !dataIncluded[12];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	538
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	539 case PF14:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	540 return !dataIncluded[13];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	541
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	542 case PF15:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	543 return !dataIncluded[14];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	544
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	545 case PF16:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	546 return !dataIncluded[15];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	547
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	548 case PF17:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	549 return !dataIncluded[16];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	550
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	551 case PF18:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	552 return !dataIncluded[17];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	553
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	554 case PF19:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	555 return !dataIncluded[18];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	556
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	557 case PF20:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	558 return !dataIncluded[19];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	559
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	560 case PF21:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	561 return !dataIncluded[20];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	562
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	563 case PF22:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	564 return !dataIncluded[21];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	565
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	566 case PF23:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	567 return !dataIncluded[22];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	568
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	569 case PF24:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	570 return !dataIncluded[23];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	571
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	572 default:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	573 return true;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	574 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	575 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	576
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	577 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	578 * Help request -
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	579 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	580 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	581 * See notes inside method
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	582 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	583 public final void sendHelpRequest() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	584 // Client sends header 000D12A0000004000003####F3FFEF
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	585 // operation code 3
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	586 // row - first ##
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	587 // column - second ##
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	588 // F3 - Help Aid Key
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	589 // System.out.println("Help request sent");
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	590 baosp.write(screen52.getCurrentRow());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	591 baosp.write(screen52.getCurrentCol());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	592 baosp.write(AID_HELP);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	593
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	594 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	595 writeGDS(0, 3, baosp.toByteArray());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	596 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	597 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	598 Log.w(TAG, ioe.getMessage());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	599 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	600
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	601 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	602 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	603
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	604 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	605 * Attention Key -
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	606 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	607 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	608 * See notes inside method
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	609 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	610 public final void sendAttentionKey() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	611 // Client sends header 000A12A000004400000FFEF
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	612 // 0x40 -> 01000000
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	613 //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	614 // flags
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	615 // bit 0 - ERR
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	616 // bit 1 - ATN Attention
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	617 // bits 2-4 - reserved
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	618 // bit 5 - SRQ system request
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	619 // bit 6 - TRQ Test request key
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	620 // bit 7 - HLP
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	621
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	622 // System.out.println("Attention key sent");
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	623 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	624 writeGDS(0x40, 0, null);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	625 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	626 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	627 Log.w(TAG, ioe.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	628 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	629 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	630
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	631 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	632 * Opens a dialog and asks the user before sending a request
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	633 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	634 * @see {@link #systemRequest(String)}
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	635 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	636 public final void systemRequest() {
23 cfcb8d9859a8 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: 20 diff changeset	637 String ask = manager.res.getString(R.string.prompt_sys_request);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	638 String sysreq = bridge.promptHelper.requestStringPrompt(null, ask);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	639 systemRequest(sysreq);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	640 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	641
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	642 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	643 * @param sr - system request option
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	644 * @see {@link #systemRequest(String)}
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	645 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	646 public final void systemRequest(char sr) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	647 systemRequest(Character.toString(sr));
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	648 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	649
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	650 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	651 * System request, taken from the rfc1205, 5250 Telnet interface section 4.3
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	652 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	653 * @param sr system request option (allowed to be null, but than nothing happens)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	654 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	655 public final void systemRequest(String sr) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	656 byte[] bytes = null;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	657
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	658 if ((sr != null) && (sr.length() > 0)) {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	659 // XXX: Not sure, if this is a sufficient check for 'clear dataq'
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	660 if (sr.charAt(0) == '2') {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	661 dsq.clear();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	662 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	663
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	664 for (int i = 0, l = sr.length(); i < l; i++) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	665 baosp.write(codePage.uni2ebcdic(sr.charAt(i)));
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	666 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	667
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	668 bytes = baosp.toByteArray();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	669 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	670
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	671 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	672 writeGDS(4, 0, bytes);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	673 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	674 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	675 Log.i(TAG, ioe.getMessage());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	676 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	677
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	678 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	679 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	680
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	681 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	682 * Cancel Invite - taken from the rfc1205 - 5250 Telnet interface section
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	683 * 4.3
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	684 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	685 * See notes inside method
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	686 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	687 public final void cancelInvite() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	688 // screen52.setStatus(Screen5250.STATUS_SYSTEM,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	689 // Screen5250.STATUS_VALUE_ON, null);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	690 screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	691 ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	692
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	693 // from rfc1205 section 4.3
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	694 // Server: Sends header with the 000A12A0 00000400 000AFFEF
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	695 // Opcode = Cancel Invite.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	696
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	697 // Client: sends header with the 000A12A0 00000400 000AFFEF
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	698 // Opcode = Cancel Invite to
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	699 // indicate that the work station is
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	700 // no longer invited.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	701 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	702 writeGDS(0, 10, null);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	703 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	704 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	705 Log.w(TAG, ioe.getMessage());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	706 }
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	707 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	708
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	709 public final void hostPrint(int aid) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	710 if (screen52.isStatusErrorCode()) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	711 screen52.restoreErrorLine();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	712 screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	713 Screen5250.STATUS_VALUE_OFF, null);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	714 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	715
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	716 screen52.setCursorActive(false);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	717 // screen52.setStatus(Screen5250.STATUS_SYSTEM,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	718 // Screen5250.STATUS_VALUE_ON, null);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	719 screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_SYSTEM_WAIT,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	720 ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	721 // From client access ip capture
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	722 // it seems to use an operation code of 3 and 4
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	723 // also note that the flag field that says reserved is being sent as
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	724 // well
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	725 // with a value of 0x80
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	726 //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	727 // I have tried with not setting these flags and sending with 3 or 1
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	728 // there is no effect and I still get a host print screen. Go figure
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	729 //0000: 000D 12A0 0000 0400 8003 1407 F6FFEF
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	730 //0000: 000D 12A0 0000 0400 8001 110E F6FFEF
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	731 //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	732 // Client sends header 000D12A0000004000003####F6FFEF
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	733 // operation code 3
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	734 // row - first ##
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	735 // column - second ##
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	736 // F6 - Print Aid Key
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	737 baosp.write(screen52.getCurrentRow());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	738 baosp.write(screen52.getCurrentCol());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	739 baosp.write(AID_PRINT); // aid key
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	740
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	741 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	742 writeGDS(0, 3, baosp.toByteArray());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	743 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	744 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	745 Log.w(TAG, ioe.getMessage());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	746 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	747
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	748 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	749 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	750
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	751 public final void toggleDebug() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	752 producer.toggleDebug(codePage);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	753 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	754
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	755 // write gerneral data stream
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	756 private final void writeGDS(int flags, int opcode, byte abyte0[])
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	757 throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	758 // Added to fix for JDK 1.4 this was null coming from another method.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	759 // There was a weird keyRelease event coming from another panel when
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	760 // using a key instead of the mouse to select button.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	761 // The other method was fixed as well but this check should be here
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	762 // anyway.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	763 if (bout == null)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	764 return;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	765
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	766 int length;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	767
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	768 if (abyte0 != null)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	769 length = abyte0.length + 10;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	770 else
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	771 length = 10;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	772
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	773 // refer to rfc1205 - 5250 Telnet interface
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	774 // Section 3. Data Stream Format
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	775 // Logical Record Length - 16 bits
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	776 baosrsp.write(length >> 8); // Length LL
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	777 baosrsp.write(length & 0xff); // LL
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	778 // Record Type - 16 bits
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	779 // It should always be set to '12A0'X to indicate the
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	780 // General Data Stream (GDS) record type.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	781 baosrsp.write(18); // 0x12
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	782 baosrsp.write(160); // 0xA0
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	783 // the next 16 bits are not used
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	784 baosrsp.write(0); // 0x00
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	785 baosrsp.write(0); // 0x00
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	786 // The second part is meant to be variable in length
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	787 // currently this portion is 4 octets long (1 byte or 8 bits for us ;-O)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	788 baosrsp.write(4); // 0x04
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	789 baosrsp.write(flags); // flags
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	790 // bit 0 - ERR
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	791 // bit 1 - ATN Attention
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	792 // bits 2-4 - reserved
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	793 // bit 5 - SRQ system request
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	794 // bit 6 - TRQ Test request key
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	795 // bit 7 - HLP
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	796 baosrsp.write(0); // reserved - set to 0x00
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	797 baosrsp.write(opcode); // opcode
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	798
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	799 if (abyte0 != null)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	800 baosrsp.write(abyte0, 0, abyte0.length);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	801
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	802 baosrsp = appendByteStream(baosrsp.toByteArray());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	803 // make sure we indicate no more to be sent
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	804 baosrsp.write(IAC);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	805 baosrsp.write(EOR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	806 baosrsp.writeTo(bout);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	807 // byte[] b = new byte[baosrsp.size()];
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	808 // b = baosrsp.toByteArray();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	809 // dump(b);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	810 bout.flush();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	811 // baos = null;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	812 baosrsp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	813 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	814
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	815 protected final int getOpCode() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	816 return bk.getOpCode();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	817 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	818
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	819 // private final void sendNotify() throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	820 //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	821 // writeGDS(0, 0, null);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	822 // }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	823
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	824 protected boolean[] getActiveAidKeys() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	825 boolean aids[] = new boolean[dataIncluded.length];
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	826 System.arraycopy(dataIncluded, 0, aids, 0, dataIncluded.length);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	827 return aids;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	828 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	829
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	830 private final void setInvited() {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	831 Log.d(TAG, "invited");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	832
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	833 if (!screen52.isStatusErrorCode())
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	834 screen52.getOIA().setInputInhibited(ScreenOIA.INPUTINHIBITED_NOTINHIBITED,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	835 ScreenOIA.OIA_LEVEL_INPUT_INHIBITED);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	836
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	837 invited = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	838 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	839
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	840 // WVL - LDC : 05/08/2005 : TFX.006253 - Support STRPCCMD
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	841 private void strpccmd() {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	842 try {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	843 int str = 11;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	844 char c;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	845 ScreenPlanes planes = screen52.getPlanes();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	846 c = planes.getChar(str);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	847 boolean waitFor = !(c == 'a');
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	848 StringBuffer command = new StringBuffer();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	849
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	850 for (int i = str + 1; i < 132; i++) {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	851 c = planes.getChar(i);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	852
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	853 if (Character.isISOControl(c))
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	854 c = ' ';
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	855
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	856 command.append(c);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	857 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	858
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	859 String cmd = command.toString().trim();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	860 run(cmd, waitFor);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	861 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	862 finally {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	863 strpccmd = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	864 screen52.sendKeys(TN5250jConstants.MNEMONIC_ENTER);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	865 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	866 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	867
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	868 // WVL - LDC : 05/08/2005 : TFX.006253 - Support STRPCCMD
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	869 private void run(String cmd, boolean waitFor) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	870 try {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	871 Log.d(TAG, "RUN cmd = " + cmd);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	872 Log.d(TAG, "RUN wait = " + waitFor);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	873 Runtime r = Runtime.getRuntime();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	874 Process p = r.exec(cmd);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	875
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	876 if (waitFor) {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	877 int result = p.waitFor();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	878 Log.d(TAG, "RUN result = " + result);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	879 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	880 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	881 catch (Throwable t) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	882 Log.e(TAG, "exception", t);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	883 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	884 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	885
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	886
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	887 // WVL - LDC : TR.000300 : Callback scenario from 5250
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	888 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	889 * Activate or deactivate the command scanning behaviour.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	890 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	891 * @param scan
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	892 * if true, scanning is enabled; disabled otherwise.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	893 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	894 * @see scan4Cmd()
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	895 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	896 public void setScanningEnabled(boolean scan) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	897 this.scan = scan;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	898 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	899
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	900 // WVL - LDC : TR.000300 : Callback scenario from 5250
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	901 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	902 * Checks whether command scanning is enabled.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	903 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	904 * @return true is command scanning is enabled; false otherwise.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	905 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	906 public boolean isScanningEnabled() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	907 return this.scan;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	908 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	909
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	910 // WVL - LDC : TR.000300 : Callback scenario from 5250
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	911 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	912 * When command scanning is activated, the terminal reads the first and
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	913 * second character in the datastream (the zero position allows to
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	914 * devisualize the scan stream). If the sequence <code>#!</code> is
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	915 * encountered and if this sequence is <strong>not </strong> followed by a
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	916 * blank character, the {@link parseCommand(ScreenChar[])}is called.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	917 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	918 private void scan() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	919 // System.out.println("Checking command : " +
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	920 // screen52.screen[1].getChar() + screen52.screen[2].getChar());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	921 // ScreenChar[] screen = screen52.screen;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	922 ScreenPlanes planes = screen52.getPlanes();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	923
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	924 if ((planes.getChar(STRSCAN) == '#')
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	925 && (planes.getChar(STRSCAN + 1) == '!')
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	926 && (planes.getChar(STRSCAN + 2) != ' ')) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	927 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	928 parseCommand();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	929 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	930 catch (Throwable t) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	931 Log.i(TAG, "Exec cmd: " + t.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	932 t.printStackTrace();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	933 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	934 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	935 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	936
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	937 // WVL - LDC : TR.000300 : Callback scenario from 5250
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	938 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	939 * The screen is parsed starting from second position until a white space is
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	940 * encountered. When found the Session#execCommand(String, int) is
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	941 * called with the parsed string. The position immediately following the
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	942 * encountered white space, separating the command from the rest of the
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	943 * screen, is passed as starting index.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	944 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	945 * Note that the character at the starting position can potentially be a
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	946 * white space itself. The starting position in <code>execCommand</code>
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	947 * provided to make the scanning sequence more flexible. We'd like for
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	948 * example to embed also a <code>+</code> or <code>-</code> sign to
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	949 * indicate whether the tnvt should trigger a repaint or not. This would
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	950 * allow the flashing of command sequences without them becoming visible.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	951 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	952 * <ul>
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	953 * <li><strong>PRE </strong> The screen character at position
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	954 * <code>STRSCAN + 2</code> is not a white space.</li>
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	955 * </ul>
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	956 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	957 private void parseCommand() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	958 // Search for the command i.e. the first token in the stream
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	959 // after the #! sequence separated by a space from the rest
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	960 // of the screen.
32 b086dd794dba start tn5250 integration Carl Byington <carl@five-ten-sg.com> parents: 29 diff changeset	961 char[] screen = screen52.getScreenAsChars();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	962
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	963 for (int s = STRSCAN + 2, i = s; i < screen.length; i++) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	964 if (screen[i] == ' ') {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	965 String command = new String(screen, s, i - s);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	966 // Skip all white spaces between the command and the rest of
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	967 // the screen.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	968 //for (; (i < screen.length) && (screen[i] == ' '); i++);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	969 String remainder = new String(screen, i + 1, screen.length
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	970 - (i + 1));
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	971 //controller.fireScanned(command, remainder);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	972 Log.i(TAG, "trying to run " + command + " " + remainder);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	973 break;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	974 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	975 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	976 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	977
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	978 public void run() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	979 if (enhanced) sfParser = new WTDSFParser(this);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	980
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	981 bk = new Stream5250();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	982
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	983 while (keepTrucking) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	984 try {
99 eda03b809f48 move blocking test from socket read to queue take Carl Byington <carl@five-ten-sg.com> parents: 91 diff changeset	985 Object e = dsq.poll(0L, TimeUnit.SECONDS);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	986
99 eda03b809f48 move blocking test from socket read to queue take Carl Byington <carl@five-ten-sg.com> parents: 91 diff changeset	987 if (e == null) {
eda03b809f48 move blocking test from socket read to queue take Carl Byington <carl@five-ten-sg.com> parents: 91 diff changeset	988 buffer.testChanged();
eda03b809f48 move blocking test from socket read to queue take Carl Byington <carl@five-ten-sg.com> parents: 91 diff changeset	989 e = dsq.take();
eda03b809f48 move blocking test from socket read to queue take Carl Byington <carl@five-ten-sg.com> parents: 91 diff changeset	990 };
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	991
99 eda03b809f48 move blocking test from socket read to queue take Carl Byington <carl@five-ten-sg.com> parents: 91 diff changeset	992 bk.initialize((byte[])e);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	993 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	994 catch (InterruptedException ie) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	995 Log.w(TAG, " vt thread interrupted and stopping ");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	996 keepTrucking = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	997 continue;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	998 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	999
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1000 // lets play nicely with the others on the playground
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1001 // me.yield();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1002 Thread.yield();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1003 invited = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1004 screen52.setCursorActive(false);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1005
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1006 // System.out.println("operation code: " + bk.getOpCode());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1007 if (bk == null)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1008 continue;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1009
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1010 switch (bk.getOpCode()) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1011 case 00:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1012 Log.d(TAG, "No operation");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1013 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1014
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1015 case 1:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1016 Log.d(TAG, "Invite Operation");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1017 parseIncoming();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1018 // screen52.setKeyboardLocked(false);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1019 pendingUnlock = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1020 cursorOn = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1021 setInvited();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1022 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1023
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1024 case 2:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1025 Log.d(TAG, "Output Only");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1026 parseIncoming();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1027 screen52.updateDirty();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1028 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1029
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1030 case 3:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1031 Log.d(TAG, "Put/Get Operation");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1032 parseIncoming();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1033 setInvited();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1034
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1035 if (!firstScreen) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1036 firstScreen = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1037 //controller.fireSessionChanged(TN5250jConstants.STATE_CONNECTED);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1038 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1039
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1040 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1041
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1042 case 4:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1043 Log.d(TAG, "Save Screen Operation");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1044 parseIncoming();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1045 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1046
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1047 case 5:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1048 Log.d(TAG, "Restore Screen Operation");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1049 parseIncoming();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1050 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1051
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1052 case 6:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1053 Log.d(TAG, "Read Immediate");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1054 sendAidKey(0);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1055 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1056
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1057 case 7:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1058 Log.d(TAG, "Reserved");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1059 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1060
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1061 case 8:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1062 Log.d(TAG, "Read Screen Operation");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1063
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1064 try {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1065 readScreen();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1066 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1067 catch (IOException ex) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1068 Log.w(TAG, ex.getMessage());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1069 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1070
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1071 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1072
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1073 case 9:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1074 Log.d(TAG, "Reserved");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1075 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1076
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1077 case 10:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1078 Log.d(TAG, "Cancel Invite Operation");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1079 cancelInvite();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1080 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1081
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1082 case 11:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1083 Log.d(TAG, "Turn on message light");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1084 screen52.getOIA().setMessageLightOn();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1085 screen52.setCursorActive(true);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1086 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1087
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1088 case 12:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1089 Log.d(TAG, "Turn off Message light");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1090 screen52.getOIA().setMessageLightOff();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1091 screen52.setCursorActive(true);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1092 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1093
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1094 default:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1095 break;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1096 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1097
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1098 if (screen52.isUsingGuiInterface())
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1099 screen52.drawFields();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1100
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1101 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1102 if (!strpccmd) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1103 screen52.updateDirty();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1104 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1105 else {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1106 strpccmd();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1107 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1108 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1109 catch (Exception exd) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1110 Log.w(TAG, " tnvt.run: " + exd.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1111 exd.printStackTrace();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1112 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1113
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1114 if (pendingUnlock && !screen52.isStatusErrorCode()) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1115 screen52.getOIA().setKeyBoardLocked(false);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1116 pendingUnlock = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1117 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1118
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1119 if (cursorOn && !screen52.getOIA().isKeyBoardLocked()) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1120 screen52.setCursorActive(true);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1121 cursorOn = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1122 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1123
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1124 // lets play nicely with the others on the playground
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1125 //me.yield();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1126 Thread.yield();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1127 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1128 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1129
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1130 public void dumpStuff() {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1131 Log.d(TAG, " Pending unlock " + pendingUnlock);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1132 Log.d(TAG, " Status Error " + screen52.isStatusErrorCode());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1133 Log.d(TAG, " Keyboard Locked " + screen52.getOIA().isKeyBoardLocked());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1134 Log.d(TAG, " Cursor On " + cursorOn);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1135 Log.d(TAG, " Cursor Active " + screen52.cursorActive);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1136 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1137
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1138
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1139 private final void readScreen() throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1140 int rows = screen52.getRows();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1141 int cols = screen52.getColumns();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1142 byte abyte0[] = new byte[rows * cols];
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1143 fillScreenArray(abyte0, rows, cols);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1144 writeGDS(0, 0, abyte0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1145 abyte0 = null;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1146 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1147
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1148 private final void fillScreenArray(byte[] sa, int rows, int cols) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1149 int la = 32;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1150 int sac = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1151 int len = rows * cols;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1152 ScreenPlanes planes = screen52.planes;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1153
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1154 for (int y = 0; y < len; y++) { // save the screen data
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1155 if (planes.isAttributePlace(y)) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1156 la = planes.getCharAttr(y);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1157 sa[sac++] = (byte) la;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1158 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1159 else {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1160 if (planes.getCharAttr(y) != la) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1161 la = planes.getCharAttr(y);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1162 sac--;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1163 sa[sac++] = (byte) la;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1164 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1165
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1166 //LDC: Check to see if it is an displayable character. If not,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1167 // do not convert the character.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1168 // The characters on screen are in unicode
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1169 //sa[sac++] =
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1170 // (byte)codePage.uni2ebcdic(screen52.screen[y].getChar());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1171 char ch = planes.getChar(y);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1172 byte byteCh = (byte) ch;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1173
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1174 if (isDataUnicode(ch))
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1175 byteCh = codePage.uni2ebcdic(ch);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1176
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1177 sa[sac++] = byteCh;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1178 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1179 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1180 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1181
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1182 private final void fillRegenerationBuffer(ByteArrayOutputStream sc, int rows, int cols)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1183 throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1184 int la = 32;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1185 int sac = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1186 int len = rows * cols;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1187 ScreenPlanes planes = screen52.planes;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1188 byte[] sa = new byte[len];
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1189
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1190 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1191 boolean guiExists = sfParser != null && sfParser.isGuisExists();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1192
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1193 for (int y = 0; y < len; y++) { // save the screen data
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1194 if (guiExists) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1195 byte[] guiSeg = sfParser.getSegmentAtPos(y);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1196
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1197 if (guiSeg != null) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1198 //Log.i(TAG," gui saved at " + y + " - " + screen52.getRow(y) + "," +
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1199 // screen52.getCol(y));
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1200 byte[] gsa = new byte[sa.length + guiSeg.length + 2];
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1201 System.arraycopy(sa, 0, gsa, 0, sa.length);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1202 System.arraycopy(guiSeg, 0, gsa, sac + 2, guiSeg.length);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1203 sa = new byte[gsa.length];
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1204 System.arraycopy(gsa, 0, sa, 0, gsa.length);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1205 sa[sac++] = (byte)0x04;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1206 sa[sac++] = (byte)0x11;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1207 sac += guiSeg.length;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1208 //y--;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1209 // continue;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1210 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1211 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1212
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1213 if (planes.isAttributePlace(y)) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1214 la = planes.getCharAttr(y);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1215 sa[sac++] = (byte) la;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1216 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1217 else {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1218 if (planes.getCharAttr(y) != la) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1219 la = planes.getCharAttr(y);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1220 sac--;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1221 sa[sac++] = (byte) la;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1222 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1223
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1224 //LDC: Check to see if it is an displayable character. If not,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1225 // do not convert the character.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1226 // The characters on screen are in unicode
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1227 //sa[sac++] =
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1228 // (byte)codePage.uni2ebcdic(screen52.screen[y].getChar());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1229 char ch = planes.getChar(y);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1230 byte byteCh = (byte) ch;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1231
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1232 if (isDataUnicode(ch))
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1233 byteCh = codePage.uni2ebcdic(ch);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1234
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1235 sa[sac++] = byteCh;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1236 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1237 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1238 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1239 catch (Exception exc) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1240 Log.i(TAG, exc.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1241 exc.printStackTrace();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1242 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1243
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1244 sc.write(sa);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1245 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1246
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1247 public final void saveScreen() throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1248 ByteArrayOutputStream sc = new ByteArrayOutputStream();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1249 sc.write(4);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1250 sc.write(0x12); // 18
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1251 sc.write(0); // 18
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1252 sc.write(0); // 18
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1253 sc.write((byte) screen52.getRows()); // store the current size
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1254 sc.write((byte) screen52.getColumns()); // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1255 int cp = screen52.getCurrentPos(); // save off current position
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1256 // fix below submitted by Mitch Blevins
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1257 //int cp = screen52.getScreenFields().getCurrentFieldPos();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1258 // save off current position
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1259 sc.write((byte)(cp >> 8 & 0xff)); // ""
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1260 sc.write((byte)(cp & 0xff)); // ""
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1261 sc.write((byte)(screen52.homePos >> 8 & 0xff)); // save home pos
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1262 sc.write((byte)(screen52.homePos & 0xff)); // ""
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1263 int rows = screen52.getRows(); // store the current size
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1264 int cols = screen52.getColumns(); // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1265 // byte[] sa = new byte[rows * cols];
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1266 fillRegenerationBuffer(sc, rows, cols);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1267 // fillScreenArray(sa, rows, cols);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1268 //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1269 // sc.write(sa);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1270 // sa = null;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1271 int sizeFields = screen52.getScreenFields().getSize();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1272 sc.write((byte)(sizeFields >> 8 & 0xff)); // ""
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1273 sc.write((byte)(sizeFields & 0xff)); // ""
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1274
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1275 if (sizeFields > 0) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1276 int x = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1277 int s = screen52.getScreenFields().getSize();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1278 ScreenField sf = null;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1279
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1280 while (x < s) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1281 sf = screen52.getScreenFields().getField(x);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1282 sc.write((byte) sf.getAttr()); // attribute
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1283 int sp = sf.startPos();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1284 sc.write((byte)(sp >> 8 & 0xff)); // ""
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1285 sc.write((byte)(sp & 0xff)); // ""
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1286
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1287 if (sf.mdt)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1288 sc.write((byte) 1);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1289 else
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1290 sc.write((byte) 0);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1291
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1292 sc.write((byte)(sf.getLength() >> 8 & 0xff)); // ""
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1293 sc.write((byte)(sf.getLength() & 0xff)); // ""
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1294 sc.write((byte) sf.getFFW1() & 0xff);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1295 sc.write((byte) sf.getFFW2() & 0xff);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1296 sc.write((byte) sf.getFCW1() & 0xff);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1297 sc.write((byte) sf.getFCW2() & 0xff);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1298 Log.d(TAG, "Saved ");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1299 Log.d(TAG, sf.toString());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1300 x++;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1301 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1302
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1303 sf = null;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1304 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1305
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1306 // The following two lines of code looks to have caused all sorts of
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1307 // problems so for now we have commented them out.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1308 // screen52.getScreenFields().setCurrentField(null); // set it to null
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1309 // for GC ?
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1310 // screen52.clearTable();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1311
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1312 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1313 writeGDS(0, 3, sc.toByteArray());
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1314 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1315 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1316 Log.w(TAG, ioe.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1317 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1318
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1319 sc = null;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1320 Log.d(TAG, "Save Screen end ");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1321 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1322
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1323 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1324 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1325 * @throws IOException
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1326 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1327 public final void restoreScreen() throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1328 int which = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1329 ScreenPlanes planes = screen52.planes;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1330
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1331 try {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1332 Log.d(TAG, "Restore ");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1333 bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1334 bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1335 int rows = bk.getNextByte() & 0xff;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1336 int cols = bk.getNextByte() & 0xff;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1337 int pos = bk.getNextByte() << 8 & 0xff00; // current position
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1338 pos \|= bk.getNextByte() & 0xff;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1339 int hPos = bk.getNextByte() << 8 & 0xff00; // home position
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1340 hPos \|= bk.getNextByte() & 0xff;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1341
29 017eeed8332c start tn5250 integration Carl Byington <carl@five-ten-sg.com> parents: 27 diff changeset	1342 if ((rows != screen52.getRows()) \|\| (cols != screen52.getColumns()))
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1343 screen52.setRowsCols(rows, cols);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1344
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1345 screen52.clearAll(); // initialize what we currenty have
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1346
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1347 if (sfParser != null && sfParser.isGuisExists())
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1348 sfParser.clearGuiStructs();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1349
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1350 int b = 32;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1351 int la = 32;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1352 int len = rows * cols;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1353
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1354 for (int y = 0; y < len; y++) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1355 b = bk.getNextByte();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1356
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1357 if (b == 0x04) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1358 Log.i(TAG, " gui restored at " + y + " - " + screen52.getRow(y) + "," +
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1359 screen52.getCol(y));
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1360 int command = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1361 byte[] seg = bk.getSegment();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1362
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1363 if (seg.length > 0) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1364 screen52.goto_XY(y);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1365 sfParser.parseWriteToDisplayStructuredField(seg);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1366 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1367
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1368 y--;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1369 // screen52.goto_XY(y);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1370 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1371 else {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1372 // b = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1373 if (planes.isUseGui(y))
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1374 continue;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1375
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1376 if (isAttribute(b)) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1377 planes.setScreenCharAndAttr(y, planes.getChar(y), b, true);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1378 la = b;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1379 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1380 else {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1381 //LDC - 12/02/2003 - Check to see if it is an displayable
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1382 // character. If not,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1383 // do not convert the character.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1384 // The characters on screen are in unicode
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1385 char ch = (char) b;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1386
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1387 if (isDataEBCDIC(b))
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1388 ch = codePage.ebcdic2uni(b);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1389
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1390 planes.setScreenCharAndAttr(y, ch, la, false);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1391 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1392 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1393 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1394
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1395 int numFields = bk.getNextByte() << 8 & 0xff00;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1396 numFields \|= bk.getNextByte() & 0xff;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1397 Log.d(TAG, "number of fields " + numFields);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1398
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1399 if (numFields > 0) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1400 int x = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1401 int attr = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1402 int fPos = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1403 int fLen = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1404 int ffw1 = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1405 int ffw2 = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1406 int fcw1 = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1407 int fcw2 = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1408 boolean mdt = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1409 ScreenField sf = null;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1410
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1411 while (x < numFields) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1412 attr = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1413 fPos = bk.getNextByte() << 8 & 0xff00;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1414 fPos \|= bk.getNextByte() & 0xff;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1415
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1416 if (bk.getNextByte() == 1)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1417 mdt = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1418 else
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1419 mdt = false;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1420
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1421 fLen = bk.getNextByte() << 8 & 0xff00;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1422 fLen \|= bk.getNextByte() & 0xff;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1423 ffw1 = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1424 ffw2 = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1425 fcw1 = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1426 fcw2 = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1427 sf = screen52.getScreenFields().setField(attr,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1428 screen52.getRow(fPos), screen52.getCol(fPos), fLen,
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1429 ffw1, ffw2, fcw1, fcw2);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1430
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1431 while (fLen-- > 0) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1432 // now we set the field plane attributes
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1433 planes.setScreenFieldAttr(fPos++, ffw1);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1434 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1435
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1436 if (mdt) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1437 sf.setMDT();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1438 screen52.getScreenFields().setMasterMDT();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1439 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1440
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1441 Log.d(TAG, "/nRestored ");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1442 Log.d(TAG, sf.toString());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1443 x++;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1444 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1445 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1446
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1447 // Redraw the gui fields if we are in gui mode
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1448 if (screen52.isUsingGuiInterface())
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1449 screen52.drawFields();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1450
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1451 screen52.restoreScreen(); // display the screen
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1452 // The position was saved with currentPos which 1,1 offset of the
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1453 // screen position.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1454 // The setPendingInsert is the where the cursor position will be
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1455 // displayed after the restore.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1456 screen52.setPendingInsert(true, screen52.getRow(pos + cols), screen52
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1457 .getCol(pos + cols));
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1458 // We need to offset the pos by -1 since the position is 1,1 based
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1459 // and the goto_XY is 0,0 based.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1460 screen52.goto_XY(pos - 1);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1461 screen52.isInField();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1462 // // Redraw the gui fields if we are in gui mode
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1463 // if (screen52.isUsingGuiInterface())
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1464 // screen52.drawFields();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1465 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1466 catch (Exception e) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1467 Log.w(TAG, "error restoring screen " + which + " with "
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1468 + e.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1469 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1470 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1471
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1472 public final boolean waitingForInput() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1473 return waitingForInput;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1474 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1475
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1476 private void parseIncoming() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1477 boolean done = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1478 boolean error = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1479
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1480 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1481 while (bk.hasNext() && !done) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1482 byte b = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1483
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1484 switch (b) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1485 case 0:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1486 case 1:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1487 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1488
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1489 case CMD_SAVE_SCREEN: // 0x02 2 Save Screen
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1490 case 3: // 0x03 3 Save Partial Screen
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1491 Log.d(TAG, "save screen partial");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1492 saveScreen();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1493 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1494
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1495 case ESC: // ESCAPE
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1496 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1497
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1498 case 7: // audible bell
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1499 manager.playBeep();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1500 bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1501 bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1502 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1503
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1504 case CMD_WRITE_TO_DISPLAY: // 0x11 17 write to display
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1505 error = writeToDisplay(true);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1506
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1507 // WVL - LDC : TR.000300 : Callback scenario from 5250
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1508 // Only scan when WRITE_TO_DISPLAY operation (i.e. refill
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1509 // screen buffer)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1510 // has been issued!
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1511 if (scan)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1512 scan();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1513
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1514 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1515
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1516 case CMD_RESTORE_SCREEN: // 0x12 18 Restore Screen
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1517 case 13: // 0x13 19 Restore Partial Screen
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1518 Log.d(TAG, "restore screen partial");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1519 restoreScreen();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1520 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1521
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1522 case CMD_CLEAR_UNIT_ALTERNATE: // 0x20 32 clear unit alternate
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1523 int param = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1524
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1525 if (param != 0) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1526 Log.d(TAG, " clear unit alternate error "
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1527 + Integer.toHexString(param));
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1528 sendNegResponse(NR_REQUEST_ERROR, 03, 01, 05,
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1529 " clear unit alternate not supported");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1530 done = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1531 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1532 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1533 if (screen52.getRows() != 27)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1534 screen52.setRowsCols(27, 132);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1535
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1536 screen52.clearAll();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1537
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1538 if (sfParser != null && sfParser.isGuisExists())
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1539 sfParser.clearGuiStructs();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1540 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1541
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1542 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1543
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1544 case CMD_WRITE_ERROR_CODE: // 0x21 33 Write Error Code
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1545 writeErrorCode();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1546 error = writeToDisplay(false);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1547 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1548
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1549 case CMD_WRITE_ERROR_CODE_TO_WINDOW: // 0x22 34
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1550 // Write Error Code to window
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1551 writeErrorCodeToWindow();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1552 error = writeToDisplay(false);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1553 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1554
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1555 case CMD_READ_SCREEN_IMMEDIATE: // 0x62 98
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1556 case CMD_READ_SCREEN_TO_PRINT: // 0x66 102 read screen to print
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1557 readScreen();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1558 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1559
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1560 case CMD_CLEAR_UNIT: // 64 0x40 clear unit
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1561 if (screen52.getRows() != 24)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1562 screen52.setRowsCols(24, 80);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1563
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1564 screen52.clearAll();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1565
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1566 if (sfParser != null && sfParser.isGuisExists())
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1567 sfParser.clearGuiStructs();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1568
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1569 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1570
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1571 case CMD_CLEAR_FORMAT_TABLE: // 80 0x50 Clear format table
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1572 screen52.clearTable();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1573 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1574
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1575 case CMD_READ_INPUT_FIELDS: //0x42 66 read input fields
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1576 case CMD_READ_MDT_FIELDS: // 0x52 82 read MDT Fields
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1577 bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1578 bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1579 readType = b;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1580 screen52.goHome();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1581 // do nothing with the cursor here it is taken care of
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1582 // in the main loop.
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1583 //////////////// screen52.setCursorOn();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1584 waitingForInput = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1585 pendingUnlock = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1586 // screen52.setKeyboardLocked(false);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1587 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1588
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1589 case CMD_READ_MDT_IMMEDIATE_ALT: // 0x53 83
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1590 readType = b;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1591 // screen52.goHome();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1592 // waitingForInput = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1593 // screen52.setKeyboardLocked(false);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1594 readImmediate(readType);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1595 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1596
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1597 case CMD_WRITE_STRUCTURED_FIELD: // 243 0xF3 -13 Write
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1598 // structured field
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1599 writeStructuredField();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1600 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1601
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1602 case CMD_ROLL: // 0x23 35 Roll Not sure what it does right now
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1603 int updown = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1604 int topline = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1605 int bottomline = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1606 screen52.rollScreen(updown, topline, bottomline);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1607 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1608
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1609 default:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1610 done = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1611 sendNegResponse(NR_REQUEST_ERROR, 03, 01, 01,
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1612 "parseIncoming");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1613 break;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1614 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1615
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1616 if (error)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1617 done = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1618 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1619 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1620 catch (Exception exc) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1621 Log.w(TAG, "incoming " + exc.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1622 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1623 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1624
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1625 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1626 * This routine handles sending negative responses back to the host.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1627 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1628 * You can find a description of the types of responses to be sent back by
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1629 * looking at section 12.4 of the 5250 Functions Reference manual
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1630 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1631 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1632 * @param cat
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1633 * @param modifier
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1634 * @param uByte1
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1635 * @param uByte2
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1636 * @param from
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1637 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1638 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1639 protected void sendNegResponse(int cat, int modifier, int uByte1,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1640 int uByte2, String from) {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1641 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1642 int os = bk.getByteOffset(-1) & 0xf0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1643 int cp = (bk.getCurrentPos() - 1);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1644 Log.i(TAG, "invalid " + from + " command " + os
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1645 + " at pos " + cp);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1646 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1647 catch (Exception e) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1648 Log.w(TAG, "Send Negative Response error " + e.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1649 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1650
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1651 baosp.write(cat);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1652 baosp.write(modifier);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1653 baosp.write(uByte1);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1654 baosp.write(uByte2);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1655
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1656 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1657 writeGDS(128, 0, baosp.toByteArray());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1658 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1659 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1660 Log.w(TAG, ioe.getMessage());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1661 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1662
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1663 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1664 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1665
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1666 public void sendNegResponse2(int ec) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1667 screen52.setPrehelpState(true, true, false);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1668 baosp.write(0x00);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1669 baosp.write(ec);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1670
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1671 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1672 writeGDS(1, 0, baosp.toByteArray());
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1673 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1674 catch (IOException ioe) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1675 Log.w(TAG, ioe.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1676 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1677
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1678 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1679 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1680
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1681 private boolean writeToDisplay(boolean controlsExist) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1682 boolean error = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1683 boolean done = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1684 int attr;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1685 byte control0 = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1686 byte control1 = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1687 int saRows = screen52.getRows();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1688 int saCols = screen52.getColumns();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1689
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1690 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1691 if (controlsExist) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1692 control0 = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1693 control1 = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1694 processCC0(control0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1695 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1696
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1697 while (bk.hasNext() && !done) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1698 // pos = bk.getCurrentPos();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1699 // int rowc = screen52.getCurrentRow();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1700 // int colc = screen52.getCurrentCol();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1701 byte bytebk = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1702
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1703 switch (bytebk) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1704 case 1: // SOH - Start of Header Order
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1705 Log.d(TAG, "SOH - Start of Header Order");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1706 error = processSOH();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1707 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1708
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1709 case 02: // RA - Repeat to address
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1710 Log.d(TAG, "RA - Repeat to address");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1711 int row = screen52.getCurrentRow();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1712 int col = screen52.getCurrentCol();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1713 int toRow = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1714 int toCol = bk.getNextByte() & 0xff;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1715
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1716 if (toRow >= row) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1717 int repeat = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1718
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1719 // a little intelligence here I hope
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1720 if (row == 1 && col == 2 && toRow == screen52.getRows()
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1721 && toCol == screen52.getColumns())
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1722 screen52.clearScreen();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1723 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1724 if (repeat != 0) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1725 //LDC - 13/02/2003 - convert it to unicode
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1726 repeat = codePage.ebcdic2uni(repeat);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1727 //repeat = getASCIIChar(repeat);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1728 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1729
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1730 int times = ((toRow * screen52.getColumns()) + toCol)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1731 - ((row * screen52.getColumns()) + col);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1732
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1733 while (times-- >= 0) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1734 screen52.setChar(repeat);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1735 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1736 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1737 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1738 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1739 sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x23,
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1740 " RA invalid");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1741 error = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1742 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1743
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1744 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1745
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1746 case 03: // EA - Erase to address
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1747 Log.d(TAG, "EA - Erase to address");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1748 int EArow = screen52.getCurrentRow();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1749 int EAcol = screen52.getCurrentCol();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1750 int toEARow = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1751 int toEACol = bk.getNextByte() & 0xff;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1752 int EALength = bk.getNextByte() & 0xff;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1753
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1754 while (--EALength > 0) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1755 bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1756 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1757
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1758 char EAAttr = (char) 0;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1759
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1760 // a little intelligence here I hope
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1761 if (EArow == 1 && EAcol == 2
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1762 && toEARow == screen52.getRows()
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1763 && toEACol == screen52.getColumns())
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1764 screen52.clearScreen();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1765 else {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1766 int times = ((toEARow * screen52.getColumns()) + toEACol)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1767 - ((EArow * screen52.getColumns()) + EAcol);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1768
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1769 while (times-- >= 0) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1770 screen52.setChar(EAAttr);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1771 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1772 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1773
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1774 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1775
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1776 case 04: // Command - Escape
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1777 Log.d(TAG, "Command - Escape");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1778 done = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1779 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1780
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1781 case 16: // TD - Transparent Data
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1782 Log.d(TAG, "TD - Transparent Data");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1783 int j = (bk.getNextByte() & 0xff) << 8 \| bk.getNextByte()
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1784 & 0xff; // length
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1785 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1786
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1787 case 17: // SBA - set buffer address order (row column)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1788 //Log.d(TAG,"SBA - set buffer address order (row column)");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1789 int saRow = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1790 int saCol = bk.getNextByte() & 0xff;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1791
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1792 // make sure it is in bounds
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1793 if (saRow >= 0 && saRow <= screen52.getRows() && saCol >= 0
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1794 && saCol <= screen52.getColumns()) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1795 screen52.setCursor(saRow, saCol); // now set screen
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1796 // position for output
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1797 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1798 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1799 sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x22,
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1800 "invalid row/col order" + " saRow = " + saRow
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1801 + " saRows = " + screen52.getRows()
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1802 + " saCol = " + saCol);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1803 error = true;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1804 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1805
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1806 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1807
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1808 case 18: // WEA - Extended Attribute
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1809 Log.d(TAG, "WEA - Extended Attribute");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1810 bk.getNextByte();
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1811 bk.getNextByte();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1812 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1813
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1814 case 19: // IC - Insert Cursor
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1815 Log.d(TAG, "IC - Insert Cursor");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1816 int icX = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1817 int icY = bk.getNextByte() & 0xff;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1818
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1819 if (icX >= 0 && icX <= saRows && icY >= 0 && icY <= saCols) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1820 Log.d(TAG, " IC " + icX + " " + icY);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1821 screen52.setPendingInsert(true, icX, icY);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1822 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1823 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1824 sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x22,
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1825 " IC/IM position invalid ");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1826 error = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1827 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1828
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1829 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1830
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1831 case 20: // MC - Move Cursor
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1832 Log.d(TAG, "MC - Move Cursor");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1833 int imcX = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1834 int imcY = bk.getNextByte() & 0xff;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1835
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1836 if (imcX >= 0 && imcX <= saRows && imcY >= 0
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1837 && imcY <= saCols) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1838 Log.d(TAG, " MC " + imcX + " " + imcY);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1839 screen52.setPendingInsert(false, imcX, imcY);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1840 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1841 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1842 sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x22,
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1843 " IC/IM position invalid ");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1844 error = true;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1845 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1846
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1847 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1848
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1849 case 21: // WTDSF - Write To Display Structured Field order
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1850 Log.d(TAG, "WTDSF - Write To Display Structured Field order");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1851 byte[] seg = bk.getSegment();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1852 error = sfParser.parseWriteToDisplayStructuredField(seg);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1853 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1854
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1855 case 29: // SF - Start of Field
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1856 Log.d(TAG, "SF - Start of Field");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1857 int fcw1 = 0;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1858 int fcw2 = 0;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1859 int ffw1 = 0;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1860 int ffw0 = bk.getNextByte() & 0xff; // FFW
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1861
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1862 if ((ffw0 & 0x40) == 0x40) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1863 ffw1 = bk.getNextByte() & 0xff; // FFW 1
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1864 fcw1 = bk.getNextByte() & 0xff; // check for field
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1865
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1866 // control word
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1867
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1868 // check if the first fcw1 is an 0x81 if it is then get
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1869 // the next pair for checking
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1870 if (fcw1 == 0x81) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1871 bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1872 fcw1 = bk.getNextByte() & 0xff; // check for field
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1873 // control word
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1874 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1875
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1876 if (!isAttribute(fcw1)) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1877 fcw2 = bk.getNextByte() & 0xff; // FCW 2
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1878 attr = bk.getNextByte() & 0xff; // attribute field
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1879
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1880 while (!isAttribute(attr)) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1881 Log.i(TAG, Integer.toHexString(fcw1) + " "
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1882 + Integer.toHexString(fcw2)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1883 + " ");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1884 Log.i(TAG, Integer.toHexString(attr)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1885 + " "
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1886 + Integer.toHexString(bk
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1887 .getNextByte() & 0xff));
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1888 attr = bk.getNextByte() & 0xff; // attribute field
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1889 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1890 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1891 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1892 attr = fcw1; // attribute of field
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1893 fcw1 = 0;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1894 }
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1895 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1896 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1897 attr = ffw0;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1898 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1899
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1900 int fLength = (bk.getNextByte() & 0xff) << 8
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1901 \| bk.getNextByte() & 0xff;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1902 screen52.addField(attr, fLength, ffw0, ffw1, fcw1, fcw2);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1903 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1904
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1905 // WVL - LDC : 05/08/2005 : TFX.006253 - Support STRPCCMD
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1906 case -128: //STRPCCMD
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1907 // if (screen52.getCurrentPos() == 82) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1908 Log.d(TAG, "STRPCCMD got a -128 command at " + screen52.getCurrentPos());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1909 StringBuffer value = new StringBuffer();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1910 int b;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1911 char c;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1912 int[] pco = new int[9];
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1913 int[] pcoOk = {0xfc, 0xd7, 0xc3, 0xd6, 0x40, 0x83, 0x80, 0xa1, 0x80};
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1914
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1915 for (int i = 0; i < 9; i++) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1916 b = bk.getNextByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1917 pco[i] = ((b & 0xff));
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1918 c = codePage.ebcdic2uni(b);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1919 value.append(c);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1920 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1921
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1922 // Check "PCO-String"
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1923 if (Arrays.equals(pco, pcoOk)) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1924 strpccmd = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1925 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1926
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1927 // we return in the stream to have all chars
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1928 // arrive at the screen for later processing
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1929 for (int i = 0; i < 9; i++)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1930 bk.setPrevByte();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1931
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1932 //}
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1933 // no break: so every chars arrives
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1934 // on the screen for later parsing
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1935 //break;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1936
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1937 default: // all others must be output to screen
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1938 //Log.d(TAG,"all others must be output to screen");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1939 byte byte0 = bk.getByteOffset(-1);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1940
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1941 if (isAttribute(byte0)) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1942 screen52.setAttr(byte0);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1943 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1944 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1945 if (!screen52.isStatusErrorCode()) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1946 if (!isDataEBCDIC(byte0)) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1947 // if (byte0 == 255) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1948 // sendNegResponse(NR_REQUEST_ERROR,0x05,0x01,0x42,
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1949 // " Attempt to send FF to screen");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1950 // }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1951 // else
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1952 screen52.setChar(byte0);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1953 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1954 else
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1955 //LDC - 13/02/2003 - Convert it to unicode
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1956 //screen52.setChar(getASCIIChar(byte0));
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1957 screen52.setChar(codePage.ebcdic2uni(byte0));
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1958 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1959 else {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1960 if (byte0 == 0)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1961 screen52.setChar(byte0);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1962 else
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1963 //LDC - 13/02/2003 - Convert it to unicode
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1964 //screen52.setChar(getASCIIChar(byte0));
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1965 screen52.setChar(codePage.ebcdic2uni(byte0));
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1966 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1967 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1968
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1969 break;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1970 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1971
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1972 if (error)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1973 done = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1974 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1975 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1976 catch (Exception e) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1977 Log.w(TAG, "write to display " + e.getMessage());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1978 e.printStackTrace();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1979 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1980
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1981 ;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1982
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1983 processCC1(control1);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1984
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1985 return error;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1986 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1987
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1988 private boolean processSOH() throws Exception {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1989 int l = bk.getNextByte(); // length
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	1990 Log.d(TAG, " byte 0 " + l);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1991
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1992 if (l > 0 && l <= 7) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1993 bk.getNextByte(); // flag byte 2
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1994 bk.getNextByte(); // reserved
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1995 bk.getNextByte(); // resequence fields
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1996 screen52.clearTable();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1997
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1998 // well that is the first time I have seen this. This fixes a
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	1999 // problem with S/36 command line. Finally got it.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2000 if (l <= 3) return false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2001
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2002 screen52.setErrorLine(bk.getNextByte()); // error row
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2003 int byte1 = 0;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2004
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2005 if (l >= 5) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2006 byte1 = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2007 dataIncluded[23] = (byte1 & 0x80) == 0x80;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2008 dataIncluded[22] = (byte1 & 0x40) == 0x40;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2009 dataIncluded[21] = (byte1 & 0x20) == 0x20;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2010 dataIncluded[20] = (byte1 & 0x10) == 0x10;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2011 dataIncluded[19] = (byte1 & 0x8) == 0x8;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2012 dataIncluded[18] = (byte1 & 0x4) == 0x4;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2013 dataIncluded[17] = (byte1 & 0x2) == 0x2;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2014 dataIncluded[16] = (byte1 & 0x1) == 0x1;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2015 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2016
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2017 if (l >= 6) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2018 byte1 = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2019 dataIncluded[15] = (byte1 & 0x80) == 0x80;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2020 dataIncluded[14] = (byte1 & 0x40) == 0x40;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2021 dataIncluded[13] = (byte1 & 0x20) == 0x20;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2022 dataIncluded[12] = (byte1 & 0x10) == 0x10;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2023 dataIncluded[11] = (byte1 & 0x8) == 0x8;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2024 dataIncluded[10] = (byte1 & 0x4) == 0x4;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2025 dataIncluded[9] = (byte1 & 0x2) == 0x2;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2026 dataIncluded[8] = (byte1 & 0x1) == 0x1;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2027 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2028
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2029 if (l >= 7) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2030 byte1 = bk.getNextByte();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2031 dataIncluded[7] = (byte1 & 0x80) == 0x80;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2032 dataIncluded[6] = (byte1 & 0x40) == 0x40;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2033 dataIncluded[5] = (byte1 & 0x20) == 0x20;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2034 dataIncluded[4] = (byte1 & 0x10) == 0x10;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2035 dataIncluded[3] = (byte1 & 0x8) == 0x8;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2036 dataIncluded[2] = (byte1 & 0x4) == 0x4;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2037 dataIncluded[1] = (byte1 & 0x2) == 0x2;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2038 dataIncluded[0] = (byte1 & 0x1) == 0x1;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2039 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2040
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2041 return false;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2042 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2043 else {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2044 sendNegResponse(NR_REQUEST_ERROR, 0x05, 0x01, 0x2B,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2045 "invalid SOH length");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2046 return true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2047 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2048 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2049
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2050 private void processCC0(byte byte0) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2051 Log.d(TAG, " Control byte0 " + Integer.toBinaryString(byte0 & 0xff));
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2052 boolean lockKeyboard = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2053 boolean resetMDT = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2054 boolean resetMDTAll = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2055 boolean nullMDT = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2056 boolean nullAll = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2057
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2058 // Bits 3 to 6 are reserved and should be set to '0000'
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2059 // 0xE0 = '11100000' - only the first 3 bits are tested
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2060 if ((byte0 & 0xE0) == 0x00) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2061 lockKeyboard = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2062 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2063
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2064 // '00100000' = 0x20 /32 -- just lock keyboard
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2065 // '01000000' = 0x40 /64
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2066 // '01100000' = 0x60 /96
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2067 // '10000000' = 0x80 /128
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2068 // '10100000' = 0xA0 /160
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2069 // '11000000' = 0xC0 /192
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2070 // '11100000' = 0xE0 /224
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2071
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2072 switch (byte0 & 0xE0) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2073 case 0x40:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2074 resetMDT = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2075 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2076
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2077 case 0x60:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2078 resetMDTAll = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2079 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2080
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2081 case 0x80:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2082 nullMDT = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2083 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2084
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2085 case 0xA0:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2086 resetMDT = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2087 nullAll = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2088 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2089
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2090 case 0xC0:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2091 resetMDT = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2092 nullMDT = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2093 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2094
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2095 case 0xE0:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2096 resetMDTAll = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2097 nullAll = true;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2098 break;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2099 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2100
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2101 if (lockKeyboard) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2102 screen52.getOIA().setKeyBoardLocked(true);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2103 pendingUnlock = false;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2104 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2105 else
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2106 pendingUnlock = false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2107
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2108 if (resetMDT \|\| resetMDTAll \|\| nullMDT \|\| nullAll) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2109 ScreenField sf;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2110 int f = screen52.getScreenFields().getSize();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2111
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2112 for (int x = 0; x < f; x++) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2113 sf = screen52.getScreenFields().getField(x);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2114
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2115 if (!sf.isBypassField()) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2116 if ((nullMDT && sf.mdt) \|\| nullAll) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2117 sf.setFieldChar((char) 0x0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2118 screen52.drawField(sf);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2119 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2120 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2121
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2122 if (resetMDTAll \|\| (resetMDT && !sf.isBypassField()))
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2123 sf.resetMDT();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2124 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2125
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2126 sf = null;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2127 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2128 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2129
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2130 private void processCC1(byte byte1) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2131 Log.d(TAG, " Control byte1 " + Integer.toBinaryString(byte1 & 0xff));
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2132
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2133 if ((byte1 & 0x04) == 0x04) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2134 manager.playBeep();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2135 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2136
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2137 if ((byte1 & 0x02) == 0x02) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2138 screen52.getOIA().setMessageLightOff();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2139 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2140
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2141 if ((byte1 & 0x01) == 0x01) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2142 screen52.getOIA().setMessageLightOn();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2143 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2144
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2145 if ((byte1 & 0x01) == 0x01 && (byte1 & 0x02) == 0x02) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2146 screen52.getOIA().setMessageLightOn();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2147 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2148
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2149 // reset blinking cursor seems to control whether to set or not set the
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2150 // the cursor position. No documentation for this just testing and
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2151 // looking at the bit settings of this field. This was a pain in the
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2152 // ass!
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2153 //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2154 // if it is off '0' then keep existing cursor positioning information
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2155 // if it is on '1' then reset the cursor positioning information
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2156 // * Note * unless we receive bit 4 on at the same time
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2157 // this seems to work so far
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2158 if ((byte1 & 0x20) == 0x20 && (byte1 & 0x08) == 0x00) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2159 screen52.setPendingInsert(false);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2160 Log.d(TAG, " WTD position no move");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2161 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2162 else {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2163 screen52.setPendingInsert(true);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2164 Log.d(TAG, " WTD position move to home" + screen52.homePos + " row "
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2165 + screen52.getRow(screen52.homePos) + " col "
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2166 + screen52.getCol(screen52.homePos));
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2167 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2168
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2169 // in enhanced mode we sometimes only receive bit 6 turned on which
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2170 // is reset blinking cursor
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2171 if ((byte1 & 0x20) == 0x20 && enhanced) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2172 cursorOn = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2173 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2174
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2175 if (!screen52.isStatusErrorCode() && (byte1 & 0x08) == 0x08) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2176 // screen52.setStatus(screen52.STATUS_SYSTEM,screen52.STATUS_VALUE_OFF,null);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2177 cursorOn = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2178 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2179
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2180 if ((byte1 & 0x20) == 0x20 && (byte1 & 0x08) == 0x00) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2181 screen52.setPendingInsert(false, 1, 1);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2182 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2183 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2184
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2185 private boolean isAttribute(int byte0) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2186 int byte1 = byte0 & 0xff;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2187 return (byte1 & 0xe0) == 0x20;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2188 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2189
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2190 //LDC - 12/02/2003 - Function name changed from isData to isDataEBCDIC
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2191 private boolean isDataEBCDIC(int byte0) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2192 int byte1 = byte0 & 0xff;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2193
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2194 // here it should always be less than 255
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2195 if (byte1 >= 64 && byte1 < 255)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2196 return true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2197 else
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2198 return false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2199 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2200
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2201 //LDC - 12/02/2003 - Test if the unicode character is a displayable
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2202 // character.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2203 // The first 32 characters are non displayable characters
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2204 // This is normally the inverse of isDataEBCDIC (That's why there is a
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2205 // check on 255 -> 0xFFFF
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2206 private boolean isDataUnicode(int byte0) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2207 return (((byte0 < 0) \|\| (byte0 >= 32)) && (byte0 != 0xFFFF));
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2208 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2209
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2210 private void writeStructuredField() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2211 boolean done = false;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2212
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2213 try {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2214 int length = ((bk.getNextByte() & 0xff) << 8 \| (bk.getNextByte() & 0xff));
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2215
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2216 while (bk.hasNext() && !done) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2217 switch (bk.getNextByte()) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2218 case -39: // SOH - Start of Header Order
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2219 switch (bk.getNextByte()) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2220 case 112: // 5250 Query
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2221 bk.getNextByte(); // get null required field
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2222 sendQueryResponse();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2223 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2224
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2225 default:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2226 Log.d(TAG, "invalid structured field sub command "
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2227 + bk.getByteOffset(-1));
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2228 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2229 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2230
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2231 break;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2232
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2233 default:
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2234 Log.d(TAG, "invalid structured field command "
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2235 + bk.getByteOffset(-1));
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2236 break;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2237 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2238 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2239 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2240 catch (Exception e) {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2241 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2242
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2243 ;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2244 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2245
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2246 private final void writeErrorCode() throws Exception {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2247 screen52.setCursor(screen52.getErrorLine(), 1); // Skip the control byte
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2248 screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2249 Screen5250.STATUS_VALUE_ON, null);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2250 screen52.saveErrorLine();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2251 cursorOn = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2252 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2253
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2254 private final void writeErrorCodeToWindow() throws Exception {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2255 int fromCol = bk.getNextByte() & 0xff; // from column
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2256 int toCol = bk.getNextByte() & 0xff; // to column
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2257 screen52.setCursor(screen52.getErrorLine(), fromCol); // Skip the control
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2258 // byte
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2259 screen52.setStatus(Screen5250.STATUS_ERROR_CODE,
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2260 Screen5250.STATUS_VALUE_ON, null);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2261 screen52.saveErrorLine();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2262 cursorOn = true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2263 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2264
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2265 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2266 * Method sendQueryResponse
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2267 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2268 * The query command is used to obtain information about the capabilities of
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2269 * the 5250 display.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2270 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2271 * The Query command must follow an Escape (0x04) and Write Structured Field
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2272 * command (0xF3).
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2273 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2274 * This section is modeled after the rfc1205 - 5250 Telnet Interface section
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2275 * 5.3
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2276 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2277 * @throws IOException
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2278 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2279 private final void sendQueryResponse() throws IOException {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2280 Log.i(TAG, "sending query response");
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2281 byte abyte0[] = new byte[64];
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2282 abyte0[0] = 0; // Cursor Row/column (set to zero)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2283 abyte0[1] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2284 abyte0[2] = -120; // X'88' inbound write structure Field aid
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2285
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2286 if (enhanced == true) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2287 abyte0[3] = 0; // 0x003D (61) length of query response
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2288 abyte0[4] = 64; // "" see note below ?????????
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2289 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2290 else {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2291 abyte0[3] = 0; // 0x003A (58) length of query response
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2292 abyte0[4] = 58; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2293 // the length between 58 and 64 seems to cause
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2294 // different formatting codes to be sent from
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2295 // the host ???????????????? why ???????
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2296 // Well the why can be found in the manual if
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2297 // read a little more ;-)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2298 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2299
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2300 abyte0[5] = -39; // command class 0xD9
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2301 abyte0[6] = 112; // Command type query 0x70
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2302 abyte0[7] = -128; // 0x80 Flag byte
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2303 abyte0[8] = 6; // Controller Hardware Class
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2304 abyte0[9] = 0; // 0x0600 - Other WSF or another 5250 Emulator
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2305 abyte0[10] = 1; // Controller Code Level
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2306 abyte0[11] = 1; // Version 1 Rel 1.0
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2307 abyte0[12] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2308 abyte0[13] = 0; // 13 - 28 are reserved so set to 0x00
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2309 abyte0[14] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2310 abyte0[15] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2311 abyte0[16] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2312 abyte0[17] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2313 abyte0[18] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2314 abyte0[19] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2315 abyte0[20] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2316 abyte0[21] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2317 abyte0[22] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2318 abyte0[23] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2319 abyte0[24] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2320 abyte0[25] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2321 abyte0[26] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2322 abyte0[27] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2323 abyte0[28] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2324 abyte0[29] = 1; // Device type - 0x01 5250 Emulator
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2325 abyte0[30] = codePage.uni2ebcdic('5'); // Device type character
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2326 abyte0[31] = codePage.uni2ebcdic('2'); // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2327 abyte0[32] = codePage.uni2ebcdic('5'); // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2328 abyte0[33] = codePage.uni2ebcdic('1'); // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2329 abyte0[34] = codePage.uni2ebcdic('0'); // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2330 abyte0[35] = codePage.uni2ebcdic('1'); // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2331 abyte0[36] = codePage.uni2ebcdic('1'); // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2332 abyte0[37] = 2; // Keyboard Id - 0x02 Standard Keyboard
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2333 abyte0[38] = 0; // extended keyboard id
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2334 abyte0[39] = 0; // reserved
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2335 abyte0[40] = 0; // 40 - 43 Display Serial Number
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2336 abyte0[41] = 36; //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2337 abyte0[42] = 36; //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2338 abyte0[43] = 0; //
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2339 abyte0[44] = 1; // Maximum number of display fields - 256
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2340 abyte0[45] = 0; // 0x0100
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2341 abyte0[46] = 0; // 46 -48 Reserved set to 0x00
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2342 abyte0[47] = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2343 abyte0[48] = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2344 abyte0[49] = 1; // 49 - 53 Controller Display Capability
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2345 abyte0[50] = 17; // see rfc - tired of typing :-)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2346 abyte0[51] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2347 abyte0[52] = 0; // ""
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2348
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2349 // 53
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2350 // Bit 0-2: B'000' - no graphics capability
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2351 // B'001' - 5292-2 style graphics
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2352 // Bit 3-7: B '00000' = reserved (it seems for Client access)
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2353
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2354 if (enhanced == true) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2355 // abyte0[53] = 0x5E; // 0x5E turns on ehnhanced mode
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2356 // abyte0[53] = 0x27; // 0x5E turns on ehnhanced mode
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2357 abyte0[53] = 0x7; // 0x5E turns on ehnhanced mode
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2358 Log.i(TAG, "enhanced options");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2359 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2360 else
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2361 abyte0[53] = 0x0; // 0x0 is normal emulation
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2362
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2363 abyte0[54] = 24; // 54 - 60 Reserved set to 0x00
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2364 // 54 - I found out is used for enhanced user
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2365 // interface level 3. Bit 4 allows headers
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2366 // and footers for windows
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2367 abyte0[54] = 8; // 54 - 60 Reserved set to 0x00
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2368 // 54 - I found out is used for enhanced user
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2369 // interface level 3. Bit 4 allows headers
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2370 // and footers for windows
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2371 abyte0[55] = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2372 abyte0[56] = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2373 abyte0[57] = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2374 abyte0[58] = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2375 abyte0[59] = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2376 abyte0[60] = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2377 abyte0[61] = 0; // gridlines are not supported
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2378 abyte0[62] = 0; // gridlines are not supported
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2379 abyte0[63] = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2380 writeGDS(0, 0, abyte0); // now tell them about us
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2381 abyte0 = null;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2382 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2383
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2384 protected final boolean negotiate(byte abyte0[]) throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2385 int i = 0;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2386
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2387 // from server negotiations
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2388 if (abyte0[i] == IAC) { // -1
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2389 while (i < abyte0.length && abyte0[i++] == -1)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2390
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2391 // while(i < abyte0.length && (abyte0[i] == -1 \|\| abyte0[i++] == 0x20))
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2392 switch (abyte0[i++]) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2393 // we will not worry about what it WONT do
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2394 case WONT: // -4
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2395 default:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2396 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2397
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2398 case DO: //-3
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2399
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2400 // not sure why but since moving to V5R2 we are receiving a
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2401 // DO with no option when connecting a second session with
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2402 // device name. Can not find the cause at all. If anybody
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2403 // is interested please debug this until then this works.
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2404 if (i < abyte0.length) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2405 switch (abyte0[i]) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2406 case TERMINAL_TYPE: // 24
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2407 baosp.write(IAC);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2408 baosp.write(WILL);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2409 baosp.write(TERMINAL_TYPE);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2410 writeByte(baosp.toByteArray());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2411 baosp.reset();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2412 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2413
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2414 case OPT_END_OF_RECORD: // 25
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2415 baosp.write(IAC);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2416 baosp.write(WILL);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2417 baosp.write(OPT_END_OF_RECORD);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2418 writeByte(baosp.toByteArray());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2419 baosp.reset();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2420 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2421
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2422 case TRANSMIT_BINARY: // 0
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2423 baosp.write(IAC);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2424 baosp.write(WILL);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2425 baosp.write(TRANSMIT_BINARY);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2426 writeByte(baosp.toByteArray());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2427 baosp.reset();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2428 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2429
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2430 case TIMING_MARK: // 6 rfc860
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2431 // System.out.println("Timing Mark Received and notifying " +
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2432 // "the server that we will not do it");
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2433 baosp.write(IAC);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2434 baosp.write(WONT);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2435 baosp.write(TIMING_MARK);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2436 writeByte(baosp.toByteArray());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2437 baosp.reset();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2438 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2439
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2440 case NEW_ENVIRONMENT: // 39 rfc1572, rfc4777
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2441 // allways send new environment vars ...
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2442 baosp.write(IAC);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2443 baosp.write(WILL);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2444 baosp.write(NEW_ENVIRONMENT);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2445 writeByte(baosp.toByteArray());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2446 baosp.reset();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2447 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2448
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2449 default: // every thing else we will not do at this time
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2450 baosp.write(IAC);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2451 baosp.write(WONT);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2452 baosp.write(abyte0[i]); // either
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2453 writeByte(baosp.toByteArray());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2454 baosp.reset();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2455 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2456 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2457 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2458
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2459 i++;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2460 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2461
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2462 case WILL:
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2463 switch (abyte0[i]) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2464 case OPT_END_OF_RECORD: // 25
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2465 baosp.write(IAC);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2466 baosp.write(DO);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2467 baosp.write(OPT_END_OF_RECORD);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2468 writeByte(baosp.toByteArray());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2469 baosp.reset();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2470 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2471
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2472 case TRANSMIT_BINARY: // '\0'
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2473 baosp.write(IAC);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2474 baosp.write(DO);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2475 baosp.write(TRANSMIT_BINARY);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2476 writeByte(baosp.toByteArray());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2477 baosp.reset();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2478 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2479 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2480
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2481 i++;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2482 break;
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2483
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2484 case SB: // -6
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2485 if (abyte0[i] == NEW_ENVIRONMENT && abyte0[i + 1] == 1) {
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2486 negNewEnvironment();
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2487
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2488 while (++i < abyte0.length && abyte0[i + 1] != IAC);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2489 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2490
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2491 if (abyte0[i] == TERMINAL_TYPE && abyte0[i + 1] == 1) {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2492 baosp.write(IAC);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2493 baosp.write(SB);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2494 baosp.write(TERMINAL_TYPE);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2495 baosp.write(QUAL_IS);
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2496
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2497 if (!support132)
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2498 baosp.write("IBM-3179-2".getBytes());
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2499 else
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2500 baosp.write("IBM-3477-FC".getBytes());
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2501
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2502 baosp.write(IAC);
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2503 baosp.write(SE);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2504 writeByte(baosp.toByteArray());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2505 baosp.reset();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2506 i++;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2507 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2508
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2509 i++;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2510 break;
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2511 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2512
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2513 return true;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2514 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2515 else {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2516 return false;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2517 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2518 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2519
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2520 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2521 * Negotiate new environment string for device name
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2522 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2523 * @throws IOException
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2524 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2525 private void negNewEnvironment() throws IOException {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2526 baosp.write(IAC);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2527 baosp.write(SB);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2528 baosp.write(NEW_ENVIRONMENT);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2529 baosp.write(IS);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2530
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2531 // http://tools.ietf.org/html/rfc4777
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2532
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2533 if (kbdTypesCodePage != null) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2534 baosp.write(USERVAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2535 baosp.write("KBDTYPE".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2536 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2537 baosp.write(kbdTypesCodePage.kbdType.getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2538 baosp.write(USERVAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2539 baosp.write("CODEPAGE".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2540 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2541 baosp.write(kbdTypesCodePage.codepage.getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2542 baosp.write(USERVAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2543 baosp.write("CHARSET".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2544 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2545 baosp.write(kbdTypesCodePage.charset.getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2546 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2547
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2548 if (devName != null) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2549 baosp.write(USERVAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2550 baosp.write("DEVNAME".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2551 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2552 baosp.write(negDeviceName().getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2553 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2554
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2555 if (user != null) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2556 baosp.write(VAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2557 baosp.write("USER".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2558 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2559 baosp.write(user.getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2560
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2561 if (password != null) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2562 baosp.write(USERVAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2563 baosp.write("IBMRSEED".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2564 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2565 baosp.write(NEGOTIATE_ESC);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2566 baosp.write(0x0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2567 baosp.write(0x0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2568 baosp.write(0x0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2569 baosp.write(0x0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2570 baosp.write(0x0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2571 baosp.write(0x0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2572 baosp.write(0x0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2573 baosp.write(0x0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2574 baosp.write(USERVAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2575 baosp.write("IBMSUBSPW".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2576 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2577 baosp.write(password.getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2578 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2579
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2580 if (library != null) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2581 baosp.write(USERVAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2582 baosp.write("IBMCURLIB".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2583 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2584 baosp.write(library.getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2585 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2586
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2587 if (initialMenu != null) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2588 baosp.write(USERVAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2589 baosp.write("IBMIMENU".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2590 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2591 baosp.write(initialMenu.getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2592 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2593
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2594 if (program != null) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2595 baosp.write(USERVAR);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2596 baosp.write("IBMPROGRAM".getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2597 baosp.write(VALUE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2598 baosp.write(program.getBytes());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2599 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2600 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2601
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2602 baosp.write(IAC);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2603 baosp.write(SE);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2604 writeByte(baosp.toByteArray());
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2605 baosp.reset();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2606 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2607
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2608 /**
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2609 * This will negotiate a device name with controller. if the sequence is
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2610 * less than zero then it will send the device name as specified. On each
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2611 * unsuccessful attempt a sequential number is appended until we find one or
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2612 * the controller says no way.
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2613 *
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2614 * @return String
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2615 */
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2616 private String negDeviceName() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2617 if (devSeq++ == -1) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2618 devNameUsed = devName;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2619 return devName;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2620 }
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2621 else {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2622 StringBuffer sb = new StringBuffer(devName + devSeq);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2623 int ei = 1;
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2624
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2625 while (sb.length() > 10) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2626 sb.setLength(0);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2627 sb.append(devName.substring(0, devName.length() - ei++));
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2628 sb.append(devSeq);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2629 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2630
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2631 devNameUsed = sb.toString();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2632 return devNameUsed;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2633 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2634 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2635
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2636 public final void setCodePage(String cp) {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2637 codePage = CharMappings.getCodePage(cp);
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2638 cp = cp.toLowerCase();
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2639
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2640 for (KbdTypesCodePages kbdtyp : KbdTypesCodePages.values()) {
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2641 if (("cp" + kbdtyp.codepage).equals(cp) \|\| kbdtyp.ccsid.equals(cp)) {
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2642 kbdTypesCodePage = kbdtyp;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2643 break;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2644 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2645 }
112 77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2646
77ac18bc1b2f cleanup java formatting Carl Byington <carl@five-ten-sg.com> parents: 103 diff changeset	2647 Log.i(TAG, "Chose keyboard mapping " + kbdTypesCodePage.toString() + " for code page " + cp);
25 5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2648 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2649
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2650 public final ICodePage getCodePage() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2651 return codePage;
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2652 }
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2653
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2654 public void signalBell() {
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2655 manager.playBeep();
5949eb469a79 adding tn5250 files, native android logging Carl Byington <carl@five-ten-sg.com> parents: 24 diff changeset	2656 }
3 e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	2657
e8d2a24e85c6 adding tn5250 files Carl Byington <carl@five-ten-sg.com> parents: diff changeset	2658 }

Mercurial > 510Connectbot

annotate src/org/tn5250j/framework/tn5250/tnvt.java @ 186:61a90cb1938d