PageRenderTime 59ms CodeModel.GetById 16ms RepoModel.GetById 1ms app.codeStats 0ms

/lib/Vt102Emulation.cpp

https://gitlab.com/rmstoi/meego-terminal
C++ | 1113 lines | 657 code | 172 blank | 284 comment | 153 complexity | ec688f7e355233c3e182674a304d8acf MD5 | raw file
  1. /*
  2. This file is part of Konsole, an X terminal.
  3. Copyright (C) 1997,1998 by Lars Doelle <lars.doelle@on-line.de>
  4. Rewritten for QT4 by e_k <e_k at users.sourceforge.net>, Copyright (C)2008
  5. This program is free software; you can redistribute it and/or modify
  6. it under the terms of the GNU General Public License as published by
  7. the Free Software Foundation; either version 2 of the License, or
  8. (at your option) any later version.
  9. This program is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  12. GNU General Public License for more details.
  13. You should have received a copy of the GNU General Public License
  14. along with this program; if not, write to the Free Software
  15. Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  16. 02110-1301 USA.
  17. */
  18. // Own
  19. #include "Vt102Emulation.h"
  20. //#include <config-konsole.h>
  21. #if defined(__osf__) || defined(__APPLE__)
  22. #define AVOID_XKB
  23. #endif
  24. // this allows konsole to be compiled without XKB and XTEST extensions
  25. // even though it might be available on a particular system.
  26. #if defined(AVOID_XKB)
  27. #undef HAVE_XKB
  28. #endif
  29. // Standard
  30. #include <stdio.h>
  31. #include <unistd.h>
  32. #include <assert.h>
  33. // Qt
  34. #include <QtCore/QEvent>
  35. #include <QtGui/QKeyEvent>
  36. #include <QtCore/QByteRef>
  37. // KDE
  38. //#include <kdebug.h>
  39. //#include <klocale.h>
  40. // Konsole
  41. #include "KeyboardTranslator.h"
  42. #include "Screen.h"
  43. #if defined(HAVE_XKB)
  44. void scrolllock_set_off();
  45. void scrolllock_set_on();
  46. #endif
  47. using namespace Konsole;
  48. /* VT102 Terminal Emulation
  49. This class puts together the screens, the pty and the widget to a
  50. complete terminal emulation. Beside combining it's componentes, it
  51. handles the emulations's protocol.
  52. This module consists of the following sections:
  53. - Constructor/Destructor
  54. - Incoming Bytes Event pipeline
  55. - Outgoing Bytes
  56. - Mouse Events
  57. - Keyboard Events
  58. - Modes and Charset State
  59. - Diagnostics
  60. */
  61. /* ------------------------------------------------------------------------- */
  62. /* */
  63. /* Constructor / Destructor */
  64. /* */
  65. /* ------------------------------------------------------------------------- */
  66. Vt102Emulation::Vt102Emulation()
  67. : Emulation(),
  68. _titleUpdateTimer(new QTimer(this))
  69. {
  70. _titleUpdateTimer->setSingleShot(true);
  71. QObject::connect(_titleUpdateTimer , SIGNAL(timeout()) , this , SLOT(updateTitle()));
  72. initTokenizer();
  73. reset();
  74. }
  75. Vt102Emulation::~Vt102Emulation()
  76. {
  77. }
  78. void Vt102Emulation::clearEntireScreen()
  79. {
  80. _currentScreen->clearEntireScreen();
  81. bufferedUpdate();
  82. }
  83. void Vt102Emulation::reset()
  84. {
  85. //kDebug(1211)<<"Vt102Emulation::reset() resetToken()";
  86. resetToken();
  87. //kDebug(1211)<<"Vt102Emulation::reset() resetModes()";
  88. resetModes();
  89. //kDebug(1211)<<"Vt102Emulation::reset() resetCharSet()";
  90. resetCharset(0);
  91. //kDebug(1211)<<"Vt102Emulation::reset() reset screen0()";
  92. _screen[0]->reset();
  93. //kDebug(1211)<<"Vt102Emulation::reset() resetCharSet()";
  94. resetCharset(1);
  95. //kDebug(1211)<<"Vt102Emulation::reset() reset _screen 1";
  96. _screen[1]->reset();
  97. //kDebug(1211)<<"Vt102Emulation::reset() setCodec()";
  98. setCodec(LocaleCodec);
  99. //kDebug(1211)<<"Vt102Emulation::reset() done";
  100. bufferedUpdate();
  101. }
  102. /* ------------------------------------------------------------------------- */
  103. /* */
  104. /* Processing the incoming byte stream */
  105. /* */
  106. /* ------------------------------------------------------------------------- */
  107. /* Incoming Bytes Event pipeline
  108. This section deals with decoding the incoming character stream.
  109. Decoding means here, that the stream is first separated into `tokens'
  110. which are then mapped to a `meaning' provided as operations by the
  111. `Screen' class or by the emulation class itself.
  112. The pipeline proceeds as follows:
  113. - Tokenizing the ESC codes (onReceiveChar)
  114. - VT100 code page translation of plain characters (applyCharset)
  115. - Interpretation of ESC codes (tau)
  116. The escape codes and their meaning are described in the
  117. technical reference of this program.
  118. */
  119. // Tokens ------------------------------------------------------------------ --
  120. /*
  121. Since the tokens are the central notion if this section, we've put them
  122. in front. They provide the syntactical elements used to represent the
  123. terminals operations as byte sequences.
  124. They are encodes here into a single machine word, so that we can later
  125. switch over them easily. Depending on the token itself, additional
  126. argument variables are filled with parameter values.
  127. The tokens are defined below:
  128. - CHR - Printable characters (32..255 but DEL (=127))
  129. - CTL - Control characters (0..31 but ESC (= 27), DEL)
  130. - ESC - Escape codes of the form <ESC><CHR but `[]()+*#'>
  131. - ESC_DE - Escape codes of the form <ESC><any of `()+*#%'> C
  132. - CSI_PN - Escape codes of the form <ESC>'[' {Pn} ';' {Pn} C
  133. - CSI_PS - Escape codes of the form <ESC>'[' {Pn} ';' ... C
  134. - CSI_PR - Escape codes of the form <ESC>'[' '?' {Pn} ';' ... C
  135. - CSI_PE - Escape codes of the form <ESC>'[' '!' {Pn} ';' ... C
  136. - VT52 - VT52 escape codes
  137. - <ESC><Chr>
  138. - <ESC>'Y'{Pc}{Pc}
  139. - XTE_HA - Xterm hacks <ESC>`]' {Pn} `;' {Text} <BEL>
  140. note that this is handled differently
  141. The last two forms allow list of arguments. Since the elements of
  142. the lists are treated individually the same way, they are passed
  143. as individual tokens to the interpretation. Further, because the
  144. meaning of the parameters are names (althought represented as numbers),
  145. they are includes within the token ('N').
  146. */
  147. #define TY_CONSTR(T,A,N) ( ((((int)N) & 0xffff) << 16) | ((((int)A) & 0xff) << 8) | (((int)T) & 0xff) )
  148. #define TY_CHR( ) TY_CONSTR(0,0,0)
  149. #define TY_CTL(A ) TY_CONSTR(1,A,0)
  150. #define TY_ESC(A ) TY_CONSTR(2,A,0)
  151. #define TY_ESC_CS(A,B) TY_CONSTR(3,A,B)
  152. #define TY_ESC_DE(A ) TY_CONSTR(4,A,0)
  153. #define TY_CSI_PS(A,N) TY_CONSTR(5,A,N)
  154. #define TY_CSI_PN(A ) TY_CONSTR(6,A,0)
  155. #define TY_CSI_PR(A,N) TY_CONSTR(7,A,N)
  156. #define TY_VT52(A ) TY_CONSTR(8,A,0)
  157. #define TY_CSI_PG(A ) TY_CONSTR(9,A,0)
  158. #define TY_CSI_PE(A ) TY_CONSTR(10,A,0)
  159. // Tokenizer --------------------------------------------------------------- --
  160. /* The tokenizers state
  161. The state is represented by the buffer (pbuf, ppos),
  162. and accompanied by decoded arguments kept in (argv,argc).
  163. Note that they are kept internal in the tokenizer.
  164. */
  165. void Vt102Emulation::resetToken()
  166. {
  167. ppos = 0; argc = 0; argv[0] = 0; argv[1] = 0;
  168. }
  169. void Vt102Emulation::addDigit(int dig)
  170. {
  171. argv[argc] = 10*argv[argc] + dig;
  172. }
  173. void Vt102Emulation::addArgument()
  174. {
  175. argc = qMin(argc+1,MAXARGS-1);
  176. argv[argc] = 0;
  177. }
  178. void Vt102Emulation::pushToToken(int cc)
  179. {
  180. pbuf[ppos] = cc;
  181. ppos = qMin(ppos+1,MAXPBUF-1);
  182. }
  183. // Character Classes used while decoding
  184. #define CTL 1
  185. #define CHR 2
  186. #define CPN 4
  187. #define DIG 8
  188. #define SCS 16
  189. #define GRP 32
  190. #define CPS 64
  191. void Vt102Emulation::initTokenizer()
  192. { int i; quint8* s;
  193. for(i = 0; i < 256; i++) tbl[ i] = 0;
  194. for(i = 0; i < 32; i++) tbl[ i] |= CTL;
  195. for(i = 32; i < 256; i++) tbl[ i] |= CHR;
  196. for(s = (quint8*)"@ABCDGHILMPSTXZcdfry"; *s; s++) tbl[*s] |= CPN;
  197. // resize = \e[8;<row>;<col>t
  198. for(s = (quint8*)"t"; *s; s++) tbl[*s] |= CPS;
  199. for(s = (quint8*)"0123456789" ; *s; s++) tbl[*s] |= DIG;
  200. for(s = (quint8*)"()+*%" ; *s; s++) tbl[*s] |= SCS;
  201. for(s = (quint8*)"()+*#[]%" ; *s; s++) tbl[*s] |= GRP;
  202. resetToken();
  203. }
  204. /* Ok, here comes the nasty part of the decoder.
  205. Instead of keeping an explicit state, we deduce it from the
  206. token scanned so far. It is then immediately combined with
  207. the current character to form a scanning decision.
  208. This is done by the following defines.
  209. - P is the length of the token scanned so far.
  210. - L (often P-1) is the position on which contents we base a decision.
  211. - C is a character or a group of characters (taken from 'tbl').
  212. Note that they need to applied in proper order.
  213. */
  214. #define lec(P,L,C) (p == (P) && s[(L)] == (C))
  215. #define lun( ) (p == 1 && cc >= 32 )
  216. #define les(P,L,C) (p == (P) && s[L] < 256 && (tbl[s[(L)]] & (C)) == (C))
  217. #define eec(C) (p >= 3 && cc == (C))
  218. #define ees(C) (p >= 3 && cc < 256 && (tbl[ cc ] & (C)) == (C))
  219. #define eps(C) (p >= 3 && s[2] != '?' && s[2] != '!' && s[2] != '>' && cc < 256 && (tbl[ cc ] & (C)) == (C))
  220. #define epp( ) (p >= 3 && s[2] == '?' )
  221. #define epe( ) (p >= 3 && s[2] == '!' )
  222. #define egt( ) (p >= 3 && s[2] == '>' )
  223. #define Xpe (ppos>=2 && pbuf[1] == ']' )
  224. #define Xte (Xpe && cc == 7 )
  225. #define ces(C) ( cc < 256 && (tbl[ cc ] & (C)) == (C) && !Xte)
  226. #define ESC 27
  227. #define CNTL(c) ((c)-'@')
  228. // process an incoming unicode character
  229. void Vt102Emulation::receiveChar(int cc)
  230. {
  231. int i;
  232. if (cc == 127) return; //VT100: ignore.
  233. if (ces( CTL))
  234. { // DEC HACK ALERT! Control Characters are allowed *within* esc sequences in VT100
  235. // This means, they do neither a resetToken nor a pushToToken. Some of them, do
  236. // of course. Guess this originates from a weakly layered handling of the X-on
  237. // X-off protocol, which comes really below this level.
  238. if (cc == CNTL('X') || cc == CNTL('Z') || cc == ESC) resetToken(); //VT100: CAN or SUB
  239. if (cc != ESC) { tau( TY_CTL(cc+'@' ), 0, 0); return; }
  240. }
  241. pushToToken(cc); // advance the state
  242. int* s = pbuf;
  243. int p = ppos;
  244. if (getMode(MODE_Ansi)) // decide on proper action
  245. {
  246. if (lec(1,0,ESC)) { return; }
  247. if (lec(1,0,ESC+128)) { s[0] = ESC; receiveChar('['); return; }
  248. if (les(2,1,GRP)) { return; }
  249. if (Xte ) { XtermHack(); resetToken(); return; }
  250. if (Xpe ) { return; }
  251. if (lec(3,2,'?')) { return; }
  252. if (lec(3,2,'>')) { return; }
  253. if (lec(3,2,'!')) { return; }
  254. if (lun( )) { tau( TY_CHR(), applyCharset(cc), 0); resetToken(); return; }
  255. if (lec(2,0,ESC)) { tau( TY_ESC(s[1]), 0, 0); resetToken(); return; }
  256. if (les(3,1,SCS)) { tau( TY_ESC_CS(s[1],s[2]), 0, 0); resetToken(); return; }
  257. if (lec(3,1,'#')) { tau( TY_ESC_DE(s[2]), 0, 0); resetToken(); return; }
  258. if (eps( CPN)) { tau( TY_CSI_PN(cc), argv[0],argv[1]); resetToken(); return; }
  259. // resize = \e[8;<row>;<col>t
  260. if (eps( CPS)) { tau( TY_CSI_PS(cc, argv[0]), argv[1], argv[2]); resetToken(); return; }
  261. if (epe( )) { tau( TY_CSI_PE(cc), 0, 0); resetToken(); return; }
  262. if (ees( DIG)) { addDigit(cc-'0'); return; }
  263. if (eec( ';')) { addArgument(); return; }
  264. for (i=0;i<=argc;i++)
  265. if ( epp( )) { tau( TY_CSI_PR(cc,argv[i]), 0, 0); }
  266. else if(egt( )) { tau( TY_CSI_PG(cc ), 0, 0); } // spec. case for ESC]>0c or ESC]>c
  267. else if (cc == 'm' && argc - i >= 4 && (argv[i] == 38 || argv[i] == 48) && argv[i+1] == 2)
  268. { // ESC[ ... 48;2;<red>;<green>;<blue> ... m -or- ESC[ ... 38;2;<red>;<green>;<blue> ... m
  269. i += 2;
  270. tau( TY_CSI_PS(cc, argv[i-2]), COLOR_SPACE_RGB, (argv[i] << 16) | (argv[i+1] << 8) | argv[i+2]);
  271. i += 2;
  272. }
  273. else if (cc == 'm' && argc - i >= 2 && (argv[i] == 38 || argv[i] == 48) && argv[i+1] == 5)
  274. { // ESC[ ... 48;5;<index> ... m -or- ESC[ ... 38;5;<index> ... m
  275. i += 2;
  276. tau( TY_CSI_PS(cc, argv[i-2]), COLOR_SPACE_256, argv[i]);
  277. }
  278. else { tau( TY_CSI_PS(cc,argv[i]), 0, 0); }
  279. resetToken();
  280. }
  281. else // mode VT52
  282. {
  283. if (lec(1,0,ESC)) return;
  284. if (les(1,0,CHR)) { tau( TY_CHR( ), s[0], 0); resetToken(); return; }
  285. if (lec(2,1,'Y')) return;
  286. if (lec(3,1,'Y')) return;
  287. if (p < 4) { tau( TY_VT52(s[1] ), 0, 0); resetToken(); return; }
  288. tau( TY_VT52(s[1] ), s[2],s[3]); resetToken(); return;
  289. }
  290. }
  291. void Vt102Emulation::XtermHack()
  292. { int i,arg = 0;
  293. for (i = 2; i < ppos && '0'<=pbuf[i] && pbuf[i]<'9' ; i++)
  294. arg = 10*arg + (pbuf[i]-'0');
  295. if (pbuf[i] != ';') { ReportErrorToken(); return; }
  296. QChar *str = new QChar[ppos-i-2];
  297. for (int j = 0; j < ppos-i-2; j++) str[j] = pbuf[i+1+j];
  298. QString unistr(str,ppos-i-2);
  299. // arg == 1 doesn't change the title. In XTerm it only changes the icon name
  300. // (btw: arg=0 changes title and icon, arg=1 only icon, arg=2 only title
  301. // emit changeTitle(arg,unistr);
  302. _pendingTitleUpdates[arg] = unistr;
  303. _titleUpdateTimer->start(20);
  304. delete [] str;
  305. }
  306. void Vt102Emulation::updateTitle()
  307. {
  308. QListIterator<int> iter( _pendingTitleUpdates.keys() );
  309. while (iter.hasNext()) {
  310. int arg = iter.next();
  311. emit titleChanged( arg , _pendingTitleUpdates[arg] );
  312. }
  313. _pendingTitleUpdates.clear();
  314. }
  315. // Interpreting Codes ---------------------------------------------------------
  316. /*
  317. Now that the incoming character stream is properly tokenized,
  318. meaning is assigned to them. These are either operations of
  319. the current _screen, or of the emulation class itself.
  320. The token to be interpreteted comes in as a machine word
  321. possibly accompanied by two parameters.
  322. Likewise, the operations assigned to, come with up to two
  323. arguments. One could consider to make up a proper table
  324. from the function below.
  325. The technical reference manual provides more information
  326. about this mapping.
  327. */
  328. void Vt102Emulation::tau( int token, int p, int q )
  329. {
  330. #if 0
  331. int N = (token>>0)&0xff;
  332. int A = (token>>8)&0xff;
  333. switch( N )
  334. {
  335. case 0: printf("%c", (p < 128) ? p : '?');
  336. break;
  337. case 1: if (A == 'J') printf("\r");
  338. else if (A == 'M') printf("\n");
  339. else printf("CTL-%c ", (token>>8)&0xff);
  340. break;
  341. case 2: printf("ESC-%c ", (token>>8)&0xff);
  342. break;
  343. case 3: printf("ESC_CS-%c-%c ", (token>>8)&0xff, (token>>16)&0xff);
  344. break;
  345. case 4: printf("ESC_DE-%c ", (token>>8)&0xff);
  346. break;
  347. case 5: printf("CSI-PS-%c-%d", (token>>8)&0xff, (token>>16)&0xff );
  348. break;
  349. case 6: printf("CSI-PN-%c [%d]", (token>>8)&0xff, p);
  350. break;
  351. case 7: printf("CSI-PR-%c-%d", (token>>8)&0xff, (token>>16)&0xff );
  352. break;
  353. case 8: printf("VT52-%c", (token>>8)&0xff);
  354. break;
  355. case 9: printf("CSI-PG-%c", (token>>8)&0xff);
  356. break;
  357. case 10: printf("CSI-PE-%c", (token>>8)&0xff);
  358. break;
  359. }
  360. #endif
  361. switch (token)
  362. {
  363. case TY_CHR( ) : _currentScreen->ShowCharacter (p ); break; //UTF16
  364. // 127 DEL : ignored on input
  365. case TY_CTL('@' ) : /* NUL: ignored */ break;
  366. case TY_CTL('A' ) : /* SOH: ignored */ break;
  367. case TY_CTL('B' ) : /* STX: ignored */ break;
  368. case TY_CTL('C' ) : /* ETX: ignored */ break;
  369. case TY_CTL('D' ) : /* EOT: ignored */ break;
  370. case TY_CTL('E' ) : reportAnswerBack ( ); break; //VT100
  371. case TY_CTL('F' ) : /* ACK: ignored */ break;
  372. case TY_CTL('G' ) : emit stateSet(NOTIFYBELL);
  373. break; //VT100
  374. case TY_CTL('H' ) : _currentScreen->BackSpace ( ); break; //VT100
  375. case TY_CTL('I' ) : _currentScreen->Tabulate ( ); break; //VT100
  376. case TY_CTL('J' ) : _currentScreen->NewLine ( ); break; //VT100
  377. case TY_CTL('K' ) : _currentScreen->NewLine ( ); break; //VT100
  378. case TY_CTL('L' ) : _currentScreen->NewLine ( ); break; //VT100
  379. case TY_CTL('M' ) : _currentScreen->Return ( ); break; //VT100
  380. case TY_CTL('N' ) : useCharset ( 1); break; //VT100
  381. case TY_CTL('O' ) : useCharset ( 0); break; //VT100
  382. case TY_CTL('P' ) : /* DLE: ignored */ break;
  383. case TY_CTL('Q' ) : /* DC1: XON continue */ break; //VT100
  384. case TY_CTL('R' ) : /* DC2: ignored */ break;
  385. case TY_CTL('S' ) : /* DC3: XOFF halt */ break; //VT100
  386. case TY_CTL('T' ) : /* DC4: ignored */ break;
  387. case TY_CTL('U' ) : /* NAK: ignored */ break;
  388. case TY_CTL('V' ) : /* SYN: ignored */ break;
  389. case TY_CTL('W' ) : /* ETB: ignored */ break;
  390. case TY_CTL('X' ) : _currentScreen->ShowCharacter ( 0x2592); break; //VT100
  391. case TY_CTL('Y' ) : /* EM : ignored */ break;
  392. case TY_CTL('Z' ) : _currentScreen->ShowCharacter ( 0x2592); break; //VT100
  393. case TY_CTL('[' ) : /* ESC: cannot be seen here. */ break;
  394. case TY_CTL('\\' ) : /* FS : ignored */ break;
  395. case TY_CTL(']' ) : /* GS : ignored */ break;
  396. case TY_CTL('^' ) : /* RS : ignored */ break;
  397. case TY_CTL('_' ) : /* US : ignored */ break;
  398. case TY_ESC('D' ) : _currentScreen->index ( ); break; //VT100
  399. case TY_ESC('E' ) : _currentScreen->NextLine ( ); break; //VT100
  400. case TY_ESC('H' ) : _currentScreen->changeTabStop (true ); break; //VT100
  401. case TY_ESC('M' ) : _currentScreen->reverseIndex ( ); break; //VT100
  402. case TY_ESC('Z' ) : reportTerminalType ( ); break;
  403. case TY_ESC('c' ) : reset ( ); break;
  404. case TY_ESC('n' ) : useCharset ( 2); break;
  405. case TY_ESC('o' ) : useCharset ( 3); break;
  406. case TY_ESC('7' ) : saveCursor ( ); break;
  407. case TY_ESC('8' ) : restoreCursor ( ); break;
  408. case TY_ESC('=' ) : setMode (MODE_AppKeyPad); break;
  409. case TY_ESC('>' ) : resetMode (MODE_AppKeyPad); break;
  410. case TY_ESC('<' ) : setMode (MODE_Ansi ); break; //VT100
  411. case TY_ESC_CS('(', '0') : setCharset (0, '0'); break; //VT100
  412. case TY_ESC_CS('(', 'A') : setCharset (0, 'A'); break; //VT100
  413. case TY_ESC_CS('(', 'B') : setCharset (0, 'B'); break; //VT100
  414. case TY_ESC_CS(')', '0') : setCharset (1, '0'); break; //VT100
  415. case TY_ESC_CS(')', 'A') : setCharset (1, 'A'); break; //VT100
  416. case TY_ESC_CS(')', 'B') : setCharset (1, 'B'); break; //VT100
  417. case TY_ESC_CS('*', '0') : setCharset (2, '0'); break; //VT100
  418. case TY_ESC_CS('*', 'A') : setCharset (2, 'A'); break; //VT100
  419. case TY_ESC_CS('*', 'B') : setCharset (2, 'B'); break; //VT100
  420. case TY_ESC_CS('+', '0') : setCharset (3, '0'); break; //VT100
  421. case TY_ESC_CS('+', 'A') : setCharset (3, 'A'); break; //VT100
  422. case TY_ESC_CS('+', 'B') : setCharset (3, 'B'); break; //VT100
  423. case TY_ESC_CS('%', 'G') : setCodec (Utf8Codec ); break; //LINUX
  424. case TY_ESC_CS('%', '@') : setCodec (LocaleCodec ); break; //LINUX
  425. case TY_ESC_DE('3' ) : /* Double height line, top half */
  426. _currentScreen->setLineProperty( LINE_DOUBLEWIDTH , true );
  427. _currentScreen->setLineProperty( LINE_DOUBLEHEIGHT , true );
  428. break;
  429. case TY_ESC_DE('4' ) : /* Double height line, bottom half */
  430. _currentScreen->setLineProperty( LINE_DOUBLEWIDTH , true );
  431. _currentScreen->setLineProperty( LINE_DOUBLEHEIGHT , true );
  432. break;
  433. case TY_ESC_DE('5' ) : /* Single width, single height line*/
  434. _currentScreen->setLineProperty( LINE_DOUBLEWIDTH , false);
  435. _currentScreen->setLineProperty( LINE_DOUBLEHEIGHT , false);
  436. break;
  437. case TY_ESC_DE('6' ) : /* Double width, single height line*/
  438. _currentScreen->setLineProperty( LINE_DOUBLEWIDTH , true);
  439. _currentScreen->setLineProperty( LINE_DOUBLEHEIGHT , false);
  440. break;
  441. case TY_ESC_DE('8' ) : _currentScreen->helpAlign ( ); break;
  442. // resize = \e[8;<row>;<col>t
  443. case TY_CSI_PS('t', 8) : setImageSize( q /* colums */, p /* lines */ ); break;
  444. // change tab text color : \e[28;<color>t color: 0-16,777,215
  445. case TY_CSI_PS('t', 28) : emit changeTabTextColorRequest ( p ); break;
  446. case TY_CSI_PS('K', 0) : _currentScreen->clearToEndOfLine ( ); break;
  447. case TY_CSI_PS('K', 1) : _currentScreen->clearToBeginOfLine ( ); break;
  448. case TY_CSI_PS('K', 2) : _currentScreen->clearEntireLine ( ); break;
  449. case TY_CSI_PS('J', 0) : _currentScreen->clearToEndOfScreen ( ); break;
  450. case TY_CSI_PS('J', 1) : _currentScreen->clearToBeginOfScreen ( ); break;
  451. case TY_CSI_PS('J', 2) : _currentScreen->clearEntireScreen ( ); break;
  452. case TY_CSI_PS('g', 0) : _currentScreen->changeTabStop (false ); break; //VT100
  453. case TY_CSI_PS('g', 3) : _currentScreen->clearTabStops ( ); break; //VT100
  454. case TY_CSI_PS('h', 4) : _currentScreen-> setMode (MODE_Insert ); break;
  455. case TY_CSI_PS('h', 20) : setMode (MODE_NewLine ); break;
  456. case TY_CSI_PS('i', 0) : /* IGNORE: attached printer */ break; //VT100
  457. case TY_CSI_PS('l', 4) : _currentScreen-> resetMode (MODE_Insert ); break;
  458. case TY_CSI_PS('l', 20) : resetMode (MODE_NewLine ); break;
  459. case TY_CSI_PS('s', 0) : saveCursor ( ); break;
  460. case TY_CSI_PS('u', 0) : restoreCursor ( ); break;
  461. case TY_CSI_PS('m', 0) : _currentScreen->setDefaultRendition ( ); break;
  462. case TY_CSI_PS('m', 1) : _currentScreen-> setRendition (RE_BOLD ); break; //VT100
  463. case TY_CSI_PS('m', 4) : _currentScreen-> setRendition (RE_UNDERLINE); break; //VT100
  464. case TY_CSI_PS('m', 5) : _currentScreen-> setRendition (RE_BLINK ); break; //VT100
  465. case TY_CSI_PS('m', 7) : _currentScreen-> setRendition (RE_REVERSE ); break;
  466. case TY_CSI_PS('m', 10) : /* IGNORED: mapping related */ break; //LINUX
  467. case TY_CSI_PS('m', 11) : /* IGNORED: mapping related */ break; //LINUX
  468. case TY_CSI_PS('m', 12) : /* IGNORED: mapping related */ break; //LINUX
  469. case TY_CSI_PS('m', 22) : _currentScreen->resetRendition (RE_BOLD ); break;
  470. case TY_CSI_PS('m', 24) : _currentScreen->resetRendition (RE_UNDERLINE); break;
  471. case TY_CSI_PS('m', 25) : _currentScreen->resetRendition (RE_BLINK ); break;
  472. case TY_CSI_PS('m', 27) : _currentScreen->resetRendition (RE_REVERSE ); break;
  473. case TY_CSI_PS('m', 30) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 0); break;
  474. case TY_CSI_PS('m', 31) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 1); break;
  475. case TY_CSI_PS('m', 32) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 2); break;
  476. case TY_CSI_PS('m', 33) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 3); break;
  477. case TY_CSI_PS('m', 34) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 4); break;
  478. case TY_CSI_PS('m', 35) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 5); break;
  479. case TY_CSI_PS('m', 36) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 6); break;
  480. case TY_CSI_PS('m', 37) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 7); break;
  481. case TY_CSI_PS('m', 38) : _currentScreen->setForeColor (p, q); break;
  482. case TY_CSI_PS('m', 39) : _currentScreen->setForeColor (COLOR_SPACE_DEFAULT, 0); break;
  483. case TY_CSI_PS('m', 40) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 0); break;
  484. case TY_CSI_PS('m', 41) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 1); break;
  485. case TY_CSI_PS('m', 42) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 2); break;
  486. case TY_CSI_PS('m', 43) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 3); break;
  487. case TY_CSI_PS('m', 44) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 4); break;
  488. case TY_CSI_PS('m', 45) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 5); break;
  489. case TY_CSI_PS('m', 46) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 6); break;
  490. case TY_CSI_PS('m', 47) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 7); break;
  491. case TY_CSI_PS('m', 48) : _currentScreen->setBackColor (p, q); break;
  492. case TY_CSI_PS('m', 49) : _currentScreen->setBackColor (COLOR_SPACE_DEFAULT, 1); break;
  493. case TY_CSI_PS('m', 90) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 8); break;
  494. case TY_CSI_PS('m', 91) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 9); break;
  495. case TY_CSI_PS('m', 92) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 10); break;
  496. case TY_CSI_PS('m', 93) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 11); break;
  497. case TY_CSI_PS('m', 94) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 12); break;
  498. case TY_CSI_PS('m', 95) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 13); break;
  499. case TY_CSI_PS('m', 96) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 14); break;
  500. case TY_CSI_PS('m', 97) : _currentScreen->setForeColor (COLOR_SPACE_SYSTEM, 15); break;
  501. case TY_CSI_PS('m', 100) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 8); break;
  502. case TY_CSI_PS('m', 101) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 9); break;
  503. case TY_CSI_PS('m', 102) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 10); break;
  504. case TY_CSI_PS('m', 103) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 11); break;
  505. case TY_CSI_PS('m', 104) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 12); break;
  506. case TY_CSI_PS('m', 105) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 13); break;
  507. case TY_CSI_PS('m', 106) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 14); break;
  508. case TY_CSI_PS('m', 107) : _currentScreen->setBackColor (COLOR_SPACE_SYSTEM, 15); break;
  509. case TY_CSI_PS('n', 5) : reportStatus ( ); break;
  510. case TY_CSI_PS('n', 6) : reportCursorPosition ( ); break;
  511. case TY_CSI_PS('q', 0) : /* IGNORED: LEDs off */ break; //VT100
  512. case TY_CSI_PS('q', 1) : /* IGNORED: LED1 on */ break; //VT100
  513. case TY_CSI_PS('q', 2) : /* IGNORED: LED2 on */ break; //VT100
  514. case TY_CSI_PS('q', 3) : /* IGNORED: LED3 on */ break; //VT100
  515. case TY_CSI_PS('q', 4) : /* IGNORED: LED4 on */ break; //VT100
  516. case TY_CSI_PS('x', 0) : reportTerminalParms ( 2); break; //VT100
  517. case TY_CSI_PS('x', 1) : reportTerminalParms ( 3); break; //VT100
  518. case TY_CSI_PN('@' ) : _currentScreen->insertChars (p ); break;
  519. case TY_CSI_PN('A' ) : _currentScreen->cursorUp (p ); break; //VT100
  520. case TY_CSI_PN('B' ) : _currentScreen->cursorDown (p ); break; //VT100
  521. case TY_CSI_PN('C' ) : _currentScreen->cursorRight (p ); break; //VT100
  522. case TY_CSI_PN('D' ) : _currentScreen->cursorLeft (p ); break; //VT100
  523. case TY_CSI_PN('G' ) : _currentScreen->setCursorX (p ); break; //LINUX
  524. case TY_CSI_PN('H' ) : _currentScreen->setCursorYX (p, q); break; //VT100
  525. case TY_CSI_PN('I' ) : _currentScreen->Tabulate (p ); break;
  526. case TY_CSI_PN('L' ) : _currentScreen->insertLines (p ); break;
  527. case TY_CSI_PN('M' ) : _currentScreen->deleteLines (p ); break;
  528. case TY_CSI_PN('P' ) : _currentScreen->deleteChars (p ); break;
  529. case TY_CSI_PN('S' ) : _currentScreen->scrollUp (p ); break;
  530. case TY_CSI_PN('T' ) : _currentScreen->scrollDown (p ); break;
  531. case TY_CSI_PN('X' ) : _currentScreen->eraseChars (p ); break;
  532. case TY_CSI_PN('Z' ) : _currentScreen->backTabulate (p ); break;
  533. case TY_CSI_PN('c' ) : reportTerminalType ( ); break; //VT100
  534. case TY_CSI_PN('d' ) : _currentScreen->setCursorY (p ); break; //LINUX
  535. case TY_CSI_PN('f' ) : _currentScreen->setCursorYX (p, q); break; //VT100
  536. case TY_CSI_PN('r' ) : setMargins (p, q); break; //VT100
  537. case TY_CSI_PN('y' ) : /* IGNORED: Confidence test */ break; //VT100
  538. case TY_CSI_PR('h', 1) : setMode (MODE_AppCuKeys); break; //VT100
  539. case TY_CSI_PR('l', 1) : resetMode (MODE_AppCuKeys); break; //VT100
  540. case TY_CSI_PR('s', 1) : saveMode (MODE_AppCuKeys); break; //FIXME
  541. case TY_CSI_PR('r', 1) : restoreMode (MODE_AppCuKeys); break; //FIXME
  542. case TY_CSI_PR('l', 2) : resetMode (MODE_Ansi ); break; //VT100
  543. case TY_CSI_PR('h', 3) : clearScreenAndSetColumns(132); break; //VT100
  544. case TY_CSI_PR('l', 3) : clearScreenAndSetColumns(80); break; //VT100
  545. case TY_CSI_PR('h', 4) : /* IGNORED: soft scrolling */ break; //VT100
  546. case TY_CSI_PR('l', 4) : /* IGNORED: soft scrolling */ break; //VT100
  547. case TY_CSI_PR('h', 5) : _currentScreen-> setMode (MODE_Screen ); break; //VT100
  548. case TY_CSI_PR('l', 5) : _currentScreen-> resetMode (MODE_Screen ); break; //VT100
  549. case TY_CSI_PR('h', 6) : _currentScreen-> setMode (MODE_Origin ); break; //VT100
  550. case TY_CSI_PR('l', 6) : _currentScreen-> resetMode (MODE_Origin ); break; //VT100
  551. case TY_CSI_PR('s', 6) : _currentScreen-> saveMode (MODE_Origin ); break; //FIXME
  552. case TY_CSI_PR('r', 6) : _currentScreen->restoreMode (MODE_Origin ); break; //FIXME
  553. case TY_CSI_PR('h', 7) : _currentScreen-> setMode (MODE_Wrap ); break; //VT100
  554. case TY_CSI_PR('l', 7) : _currentScreen-> resetMode (MODE_Wrap ); break; //VT100
  555. case TY_CSI_PR('s', 7) : _currentScreen-> saveMode (MODE_Wrap ); break; //FIXME
  556. case TY_CSI_PR('r', 7) : _currentScreen->restoreMode (MODE_Wrap ); break; //FIXME
  557. case TY_CSI_PR('h', 8) : /* IGNORED: autorepeat on */ break; //VT100
  558. case TY_CSI_PR('l', 8) : /* IGNORED: autorepeat off */ break; //VT100
  559. case TY_CSI_PR('s', 8) : /* IGNORED: autorepeat on */ break; //VT100
  560. case TY_CSI_PR('r', 8) : /* IGNORED: autorepeat off */ break; //VT100
  561. case TY_CSI_PR('h', 9) : /* IGNORED: interlace */ break; //VT100
  562. case TY_CSI_PR('l', 9) : /* IGNORED: interlace */ break; //VT100
  563. case TY_CSI_PR('s', 9) : /* IGNORED: interlace */ break; //VT100
  564. case TY_CSI_PR('r', 9) : /* IGNORED: interlace */ break; //VT100
  565. case TY_CSI_PR('h', 12) : /* IGNORED: Cursor blink */ break; //att610
  566. case TY_CSI_PR('l', 12) : /* IGNORED: Cursor blink */ break; //att610
  567. case TY_CSI_PR('s', 12) : /* IGNORED: Cursor blink */ break; //att610
  568. case TY_CSI_PR('r', 12) : /* IGNORED: Cursor blink */ break; //att610
  569. case TY_CSI_PR('h', 25) : setMode (MODE_Cursor ); break; //VT100
  570. case TY_CSI_PR('l', 25) : resetMode (MODE_Cursor ); break; //VT100
  571. case TY_CSI_PR('s', 25) : saveMode (MODE_Cursor ); break; //VT100
  572. case TY_CSI_PR('r', 25) : restoreMode (MODE_Cursor ); break; //VT100
  573. case TY_CSI_PR('h', 41) : /* IGNORED: obsolete more(1) fix */ break; //XTERM
  574. case TY_CSI_PR('l', 41) : /* IGNORED: obsolete more(1) fix */ break; //XTERM
  575. case TY_CSI_PR('s', 41) : /* IGNORED: obsolete more(1) fix */ break; //XTERM
  576. case TY_CSI_PR('r', 41) : /* IGNORED: obsolete more(1) fix */ break; //XTERM
  577. case TY_CSI_PR('h', 47) : setMode (MODE_AppScreen); break; //VT100
  578. case TY_CSI_PR('l', 47) : resetMode (MODE_AppScreen); break; //VT100
  579. case TY_CSI_PR('s', 47) : saveMode (MODE_AppScreen); break; //XTERM
  580. case TY_CSI_PR('r', 47) : restoreMode (MODE_AppScreen); break; //XTERM
  581. case TY_CSI_PR('h', 67) : /* IGNORED: DECBKM */ break; //XTERM
  582. case TY_CSI_PR('l', 67) : /* IGNORED: DECBKM */ break; //XTERM
  583. case TY_CSI_PR('s', 67) : /* IGNORED: DECBKM */ break; //XTERM
  584. case TY_CSI_PR('r', 67) : /* IGNORED: DECBKM */ break; //XTERM
  585. // XTerm defines the following modes:
  586. // SET_VT200_MOUSE 1000
  587. // SET_VT200_HIGHLIGHT_MOUSE 1001
  588. // SET_BTN_EVENT_MOUSE 1002
  589. // SET_ANY_EVENT_MOUSE 1003
  590. //
  591. //Note about mouse modes:
  592. //There are four mouse modes which xterm-compatible terminals can support - 1000,1001,1002,1003
  593. //Konsole currently supports mode 1000 (basic mouse press and release) and mode 1002 (dragging the mouse).
  594. //TODO: Implementation of mouse modes 1001 (something called hilight tracking) and
  595. //1003 (a slight variation on dragging the mouse)
  596. //
  597. case TY_CSI_PR('h', 1000) : setMode (MODE_Mouse1000); break; //XTERM
  598. case TY_CSI_PR('l', 1000) : resetMode (MODE_Mouse1000); break; //XTERM
  599. case TY_CSI_PR('s', 1000) : saveMode (MODE_Mouse1000); break; //XTERM
  600. case TY_CSI_PR('r', 1000) : restoreMode (MODE_Mouse1000); break; //XTERM
  601. case TY_CSI_PR('h', 1001) : /* IGNORED: hilite mouse tracking */ break; //XTERM
  602. case TY_CSI_PR('l', 1001) : resetMode (MODE_Mouse1001); break; //XTERM
  603. case TY_CSI_PR('s', 1001) : /* IGNORED: hilite mouse tracking */ break; //XTERM
  604. case TY_CSI_PR('r', 1001) : /* IGNORED: hilite mouse tracking */ break; //XTERM
  605. case TY_CSI_PR('h', 1002) : setMode (MODE_Mouse1002); break; //XTERM
  606. case TY_CSI_PR('l', 1002) : resetMode (MODE_Mouse1002); break; //XTERM
  607. case TY_CSI_PR('s', 1002) : saveMode (MODE_Mouse1002); break; //XTERM
  608. case TY_CSI_PR('r', 1002) : restoreMode (MODE_Mouse1002); break; //XTERM
  609. case TY_CSI_PR('h', 1003) : setMode (MODE_Mouse1003); break; //XTERM
  610. case TY_CSI_PR('l', 1003) : resetMode (MODE_Mouse1003); break; //XTERM
  611. case TY_CSI_PR('s', 1003) : saveMode (MODE_Mouse1003); break; //XTERM
  612. case TY_CSI_PR('r', 1003) : restoreMode (MODE_Mouse1003); break; //XTERM
  613. case TY_CSI_PR('h', 1047) : setMode (MODE_AppScreen); break; //XTERM
  614. case TY_CSI_PR('l', 1047) : _screen[1]->clearEntireScreen(); resetMode(MODE_AppScreen); break; //XTERM
  615. case TY_CSI_PR('s', 1047) : saveMode (MODE_AppScreen); break; //XTERM
  616. case TY_CSI_PR('r', 1047) : restoreMode (MODE_AppScreen); break; //XTERM
  617. //FIXME: Unitoken: save translations
  618. case TY_CSI_PR('h', 1048) : saveCursor ( ); break; //XTERM
  619. case TY_CSI_PR('l', 1048) : restoreCursor ( ); break; //XTERM
  620. case TY_CSI_PR('s', 1048) : saveCursor ( ); break; //XTERM
  621. case TY_CSI_PR('r', 1048) : restoreCursor ( ); break; //XTERM
  622. //FIXME: every once new sequences like this pop up in xterm.
  623. // Here's a guess of what they could mean.
  624. case TY_CSI_PR('h', 1049) : saveCursor(); _screen[1]->clearEntireScreen(); setMode(MODE_AppScreen); break; //XTERM
  625. case TY_CSI_PR('l', 1049) : resetMode(MODE_AppScreen); restoreCursor(); break; //XTERM
  626. //FIXME: weird DEC reset sequence
  627. case TY_CSI_PE('p' ) : /* IGNORED: reset ( ) */ break;
  628. //FIXME: when changing between vt52 and ansi mode evtl do some resetting.
  629. case TY_VT52('A' ) : _currentScreen->cursorUp ( 1); break; //VT52
  630. case TY_VT52('B' ) : _currentScreen->cursorDown ( 1); break; //VT52
  631. case TY_VT52('C' ) : _currentScreen->cursorRight ( 1); break; //VT52
  632. case TY_VT52('D' ) : _currentScreen->cursorLeft ( 1); break; //VT52
  633. case TY_VT52('F' ) : setAndUseCharset (0, '0'); break; //VT52
  634. case TY_VT52('G' ) : setAndUseCharset (0, 'B'); break; //VT52
  635. case TY_VT52('H' ) : _currentScreen->setCursorYX (1,1 ); break; //VT52
  636. case TY_VT52('I' ) : _currentScreen->reverseIndex ( ); break; //VT52
  637. case TY_VT52('J' ) : _currentScreen->clearToEndOfScreen ( ); break; //VT52
  638. case TY_VT52('K' ) : _currentScreen->clearToEndOfLine ( ); break; //VT52
  639. case TY_VT52('Y' ) : _currentScreen->setCursorYX (p-31,q-31 ); break; //VT52
  640. case TY_VT52('Z' ) : reportTerminalType ( ); break; //VT52
  641. case TY_VT52('<' ) : setMode (MODE_Ansi ); break; //VT52
  642. case TY_VT52('=' ) : setMode (MODE_AppKeyPad); break; //VT52
  643. case TY_VT52('>' ) : resetMode (MODE_AppKeyPad); break; //VT52
  644. case TY_CSI_PG('c' ) : reportSecondaryAttributes( ); break; //VT100
  645. default : ReportErrorToken(); break;
  646. };
  647. }
  648. void Vt102Emulation::clearScreenAndSetColumns(int columnCount)
  649. {
  650. setImageSize(_currentScreen->getLines(),columnCount);
  651. clearEntireScreen();
  652. setDefaultMargins();
  653. _currentScreen->setCursorYX(0,0);
  654. }
  655. /* ------------------------------------------------------------------------- */
  656. /* */
  657. /* Terminal to Host protocol */
  658. /* */
  659. /* ------------------------------------------------------------------------- */
  660. /*
  661. Outgoing bytes originate from several sources:
  662. - Replies to Enquieries.
  663. - Mouse Events
  664. - Keyboard Events
  665. */
  666. /*!
  667. */
  668. void Vt102Emulation::sendString(const char* s , int length)
  669. {
  670. if ( length >= 0 )
  671. emit sendData(s,length);
  672. else
  673. emit sendData(s,strlen(s));
  674. }
  675. // Replies ----------------------------------------------------------------- --
  676. // This section copes with replies send as response to an enquiery control code.
  677. /*!
  678. */
  679. void Vt102Emulation::reportCursorPosition()
  680. { char tmp[20];
  681. sprintf(tmp,"\033[%d;%dR",_currentScreen->getCursorY()+1,_currentScreen->getCursorX()+1);
  682. sendString(tmp);
  683. }
  684. /*
  685. What follows here is rather obsolete and faked stuff.
  686. The correspondent enquieries are neverthenless issued.
  687. */
  688. /*!
  689. */
  690. void Vt102Emulation::reportTerminalType()
  691. {
  692. // Primary device attribute response (Request was: ^[[0c or ^[[c (from TT321 Users Guide))
  693. // VT220: ^[[?63;1;2;3;6;7;8c (list deps on emul. capabilities)
  694. // VT100: ^[[?1;2c
  695. // VT101: ^[[?1;0c
  696. // VT102: ^[[?6v
  697. if (getMode(MODE_Ansi))
  698. sendString("\033[?1;2c"); // I'm a VT100
  699. else
  700. sendString("\033/Z"); // I'm a VT52
  701. }
  702. void Vt102Emulation::reportSecondaryAttributes()
  703. {
  704. // Seconday device attribute response (Request was: ^[[>0c or ^[[>c)
  705. if (getMode(MODE_Ansi))
  706. sendString("\033[>0;115;0c"); // Why 115? ;)
  707. else
  708. sendString("\033/Z"); // FIXME I don't think VT52 knows about it but kept for
  709. // konsoles backward compatibility.
  710. }
  711. void Vt102Emulation::reportTerminalParms(int p)
  712. // DECREPTPARM
  713. { char tmp[100];
  714. sprintf(tmp,"\033[%d;1;1;112;112;1;0x",p); // not really true.
  715. sendString(tmp);
  716. }
  717. /*!
  718. */
  719. void Vt102Emulation::reportStatus()
  720. {
  721. sendString("\033[0n"); //VT100. Device status report. 0 = Ready.
  722. }
  723. /*!
  724. */
  725. #define ANSWER_BACK "" // This is really obsolete VT100 stuff.
  726. void Vt102Emulation::reportAnswerBack()
  727. {
  728. sendString(ANSWER_BACK);
  729. }
  730. // Mouse Handling ---------------------------------------------------------- --
  731. /*!
  732. Mouse clicks are possibly reported to the client
  733. application if it has issued interest in them.
  734. They are normally consumed by the widget for copy
  735. and paste, but may be propagated from the widget
  736. when gui->setMouseMarks is set via setMode(MODE_Mouse1000).
  737. `x',`y' are 1-based.
  738. `ev' (event) indicates the button pressed (0-2)
  739. or a general mouse release (3).
  740. eventType represents the kind of mouse action that occurred:
  741. 0 = Mouse button press or release
  742. 1 = Mouse drag
  743. */
  744. void Vt102Emulation::sendMouseEvent( int cb, int cx, int cy , int eventType )
  745. { char tmp[20];
  746. if ( cx<1 || cy<1 ) return;
  747. // normal buttons are passed as 0x20 + button,
  748. // mouse wheel (buttons 4,5) as 0x5c + button
  749. if (cb >= 4) cb += 0x3c;
  750. //Mouse motion handling
  751. if ( (getMode(MODE_Mouse1002) || getMode(MODE_Mouse1003)) && eventType == 1 )
  752. cb += 0x20; //add 32 to signify motion event
  753. sprintf(tmp,"\033[M%c%c%c",cb+0x20,cx+0x20,cy+0x20);
  754. sendString(tmp);
  755. }
  756. // Keyboard Handling ------------------------------------------------------- --
  757. #define encodeMode(M,B) BITS(B,getMode(M))
  758. #define encodeStat(M,B) BITS(B,((ev->modifiers() & (M)) == (M)))
  759. void Vt102Emulation::sendText( const QString& text )
  760. {
  761. if (!text.isEmpty()) {
  762. QKeyEvent event(QEvent::KeyPress,
  763. 0,
  764. Qt::NoModifier,
  765. text);
  766. sendKeyEvent(&event); // expose as a big fat keypress event
  767. }
  768. }
  769. void Vt102Emulation::sendKeyEvent( QKeyEvent* event )
  770. {
  771. Qt::KeyboardModifiers modifiers = event->modifiers();
  772. KeyboardTranslator::States states = KeyboardTranslator::NoState;
  773. // get current states
  774. if ( getMode(MODE_NewLine) ) states |= KeyboardTranslator::NewLineState;
  775. if ( getMode(MODE_Ansi) ) states |= KeyboardTranslator::AnsiState;
  776. if ( getMode(MODE_AppCuKeys)) states |= KeyboardTranslator::CursorKeysState;
  777. if ( getMode(MODE_AppScreen)) states |= KeyboardTranslator::AlternateScreenState;
  778. // lookup key binding
  779. if ( _keyTranslator )
  780. {
  781. KeyboardTranslator::Entry entry = _keyTranslator->findEntry(
  782. event->key() ,
  783. modifiers,
  784. states );
  785. // send result to terminal
  786. QByteArray textToSend;
  787. // special handling for the Alt (aka. Meta) modifier. pressing
  788. // Alt+[Character] results in Esc+[Character] being sent
  789. // (unless there is an entry defined for this particular combination
  790. // in the keyboard modifier)
  791. bool wantsAltModifier = entry.modifiers() & entry.modifierMask() & Qt::AltModifier;
  792. bool wantsAnyModifier = entry.state() & entry.stateMask() & KeyboardTranslator::AnyModifierState;
  793. if ( modifiers & Qt::AltModifier && !(wantsAltModifier || wantsAnyModifier)
  794. && !event->text().isEmpty() )
  795. {
  796. textToSend.prepend("\033");
  797. }
  798. if ( entry.command() != KeyboardTranslator::NoCommand )
  799. {
  800. if (entry.command() & KeyboardTranslator::EraseCommand)
  801. textToSend += getErase();
  802. // TODO command handling
  803. }
  804. else if ( !entry.text().isEmpty() )
  805. {
  806. textToSend += _codec->fromUnicode(entry.text(true,modifiers));
  807. }
  808. else
  809. textToSend += _codec->fromUnicode(event->text());
  810. sendData( textToSend.constData() , textToSend.length() );
  811. }
  812. else
  813. {
  814. // print an error message to the terminal if no key translator has been
  815. // set
  816. QString translatorError = ("No keyboard translator available. "
  817. "The information needed to convert key presses "
  818. "into characters to send to the terminal "
  819. "is missing.");
  820. reset();
  821. receiveData( translatorError.toAscii().constData() , translatorError.count() );
  822. }
  823. }
  824. /* ------------------------------------------------------------------------- */
  825. /* */
  826. /* VT100 Charsets */
  827. /* */
  828. /* ------------------------------------------------------------------------- */
  829. // Character Set Conversion ------------------------------------------------ --
  830. /*
  831. The processing contains a VT100 specific code translation layer.
  832. It's still in use and mainly responsible for the line drawing graphics.
  833. These and some other glyphs are assigned to codes (0x5f-0xfe)
  834. normally occupied by the latin letters. Since this codes also
  835. appear within control sequences, the extra code conversion
  836. does not permute with the tokenizer and is placed behind it
  837. in the pipeline. It only applies to tokens, which represent
  838. plain characters.
  839. This conversion it eventually continued in TerminalDisplay.C, since
  840. it might involve VT100 enhanced fonts, which have these
  841. particular glyphs allocated in (0x00-0x1f) in their code page.
  842. */
  843. #define CHARSET _charset[_currentScreen==_screen[1]]
  844. // Apply current character map.
  845. unsigned short Vt102Emulation::applyCharset(unsigned short c)
  846. {
  847. if (CHARSET.graphic && 0x5f <= c && c <= 0x7e) return vt100_graphics[c-0x5f];
  848. if (CHARSET.pound && c == '#' ) return 0xa3; //This mode is obsolete
  849. return c;
  850. }
  851. /*
  852. "Charset" related part of the emulation state.
  853. This configures the VT100 _charset filter.
  854. While most operation work on the current _screen,
  855. the following two are different.
  856. */
  857. void Vt102Emulation::resetCharset(int scrno)
  858. {
  859. _charset[scrno].cu_cs = 0;
  860. strncpy(_charset[scrno].charset,"BBBB",4);
  861. _charset[scrno].sa_graphic = false;
  862. _charset[scrno].sa_pound = false;
  863. _charset[scrno].graphic = false;
  864. _charset[scrno].pound = false;
  865. }
  866. void Vt102Emulation::setCharset(int n, int cs) // on both screens.
  867. {
  868. _charset[0].charset[n&3] = cs; useCharset(_charset[0].cu_cs);
  869. _charset[1].charset[n&3] = cs; useCharset(_charset[1].cu_cs);
  870. }
  871. void Vt102Emulation::setAndUseCharset(int n, int cs)
  872. {
  873. CHARSET.charset[n&3] = cs;
  874. useCharset(n&3);
  875. }
  876. void Vt102Emulation::useCharset(int n)
  877. {
  878. CHARSET.cu_cs = n&3;
  879. CHARSET.graphic = (CHARSET.charset[n&3] == '0');
  880. CHARSET.pound = (CHARSET.charset[n&3] == 'A'); //This mode is obsolete
  881. }
  882. void Vt102Emulation::setDefaultMargins()
  883. {
  884. _screen[0]->setDefaultMargins();
  885. _screen[1]->setDefaultMargins();
  886. }
  887. void Vt102Emulation::setMargins(int t, int b)
  888. {
  889. _screen[0]->setMargins(t, b);
  890. _screen[1]->setMargins(t, b);
  891. }
  892. /*! Save the cursor position and the rendition attribute settings. */
  893. void Vt102Emulation::saveCursor()
  894. {
  895. CHARSET.sa_graphic = CHARSET.graphic;
  896. CHARSET.sa_pound = CHARSET.pound; //This mode is obsolete
  897. // we are not clear about these
  898. //sa_charset = charsets[cScreen->_charset];
  899. //sa_charset_num = cScreen->_charset;
  900. _currentScreen->saveCursor();
  901. }
  902. /*! Restore the cursor position and the rendition attribute settings. */
  903. void Vt102Emulation::restoreCursor()
  904. {
  905. CHARSET.graphic = CHARSET.sa_graphic;
  906. CHARSET.pound = CHARSET.sa_pound; //This mode is obsolete
  907. _currentScreen->restoreCursor();
  908. }
  909. /* ------------------------------------------------------------------------- */
  910. /* */
  911. /*