tubtty.c
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:23k
源码类别:

嵌入式Linux

开发平台:

Unix_Linux

  1. /*
  2.  *  IBM/3270 Driver -- Copyright (C) 2000, 2001 UTS Global LLC
  3.  *
  4.  *  tubtty.c -- Linemode tty driver
  5.  *
  6.  *
  7.  *
  8.  *
  9.  *
  10.  *  Author:  Richard Hitt
  11.  */
  12. #include <linux/config.h>
  13. #include "tubio.h"
  14. /* Initialization & uninitialization for tubtty */
  15. int tty3270_init(void);
  16. void tty3270_fini(void);
  17. /* Interface routines from the upper tty layer to the tty driver */
  18. static int tty3270_open(struct tty_struct *, struct file *);
  19. static void tty3270_close(struct tty_struct *, struct file *);
  20. static int tty3270_write(struct tty_struct *, int,
  21.         const unsigned char *, int);
  22. static void tty3270_put_char(struct tty_struct *, unsigned char);
  23. static void tty3270_flush_chars(struct tty_struct *);
  24. static int tty3270_write_room(struct tty_struct *);
  25. static int tty3270_chars_in_buffer(struct tty_struct *);
  26. static int tty3270_ioctl(struct tty_struct *, struct file *,
  27. unsigned int cmd, unsigned long arg);
  28. static void tty3270_set_termios(struct tty_struct *, struct termios *);
  29. static void tty3270_hangup(struct tty_struct *);
  30. static void tty3270_flush_buffer(struct tty_struct *);
  31. static int tty3270_read_proc(char *, char **, off_t, int, int *, void *);
  32. static int tty3270_write_proc(struct file *, const char *,
  33. unsigned long, void *);
  34. /* tty3270 utility functions */
  35. static void tty3270_bh(void *);
  36.        void tty3270_sched_bh(tub_t *);
  37. static int tty3270_wait(tub_t *, long *);
  38.        void tty3270_int(tub_t *, devstat_t *);
  39.        int tty3270_try_logging(tub_t *);
  40. static void tty3270_start_input(tub_t *);
  41. static void tty3270_do_input(tub_t *);
  42. static void tty3270_do_enter(tub_t *, char *, int);
  43. static void tty3270_do_showi(tub_t *, char *, int);
  44.        int tty3270_io(tub_t *);
  45. static int tty3270_show_tube(int, char *, int);
  46. int tty3270_major = -1;
  47. struct tty_driver tty3270_driver;
  48. int tty3270_refcount;
  49. struct tty_struct *tty3270_table[TUBMAXMINS];
  50. struct termios *tty3270_termios[TUBMAXMINS];
  51. struct termios *tty3270_termios_locked[TUBMAXMINS];
  52. #ifdef CONFIG_TN3270_CONSOLE
  53. int con3270_major = -1;
  54. struct tty_driver con3270_driver;
  55. int con3270_refcount;
  56. struct tty_struct *con3270_table[1];
  57. struct termios *con3270_termios[1];
  58. struct termios *con3270_termios_locked[1];
  59. #endif /* CONFIG_TN3270_CONSOLE */
  60. int tty3270_proc_index;
  61. int tty3270_proc_data;
  62. int tty3270_proc_misc;
  63. enum tubwhat tty3270_proc_what;
  64. /*
  65.  * tty3270_init() -- Register the tty3270 driver
  66.  */
  67. int
  68. tty3270_init(void)
  69. {
  70. struct tty_driver *td = &tty3270_driver;
  71. int rc;
  72. /* Initialize for tty driver */
  73. td->magic = TTY_DRIVER_MAGIC;
  74. td->driver_name = "tty3270";
  75. td->name = "tty3270";
  76. td->major = IBM_TTY3270_MAJOR;
  77. td->minor_start = 0;
  78. td->num = TUBMAXMINS;
  79. td->type = TTY_DRIVER_TYPE_SYSTEM;
  80. td->subtype = SYSTEM_TYPE_TTY;
  81. td->init_termios = tty_std_termios;
  82. td->flags = TTY_DRIVER_RESET_TERMIOS;
  83. #ifdef CONFIG_DEVFS_FS
  84. td->flags |= TTY_DRIVER_NO_DEVFS;
  85. #endif
  86. td->refcount = &tty3270_refcount;
  87. td->table = tty3270_table;
  88. td->termios = tty3270_termios;
  89. td->termios_locked = tty3270_termios_locked;
  90. td->open = tty3270_open;
  91. td->close = tty3270_close;
  92. td->write = tty3270_write;
  93. td->put_char = tty3270_put_char;
  94. td->flush_chars = tty3270_flush_chars;
  95. td->write_room = tty3270_write_room;
  96. td->chars_in_buffer = tty3270_chars_in_buffer;
  97. td->ioctl = tty3270_ioctl;
  98. td->ioctl = NULL;
  99. td->set_termios = tty3270_set_termios;
  100. td->throttle = NULL;
  101. td->unthrottle = NULL;
  102. td->stop = NULL;
  103. td->start = NULL;
  104. td->hangup = tty3270_hangup;
  105. td->break_ctl = NULL;
  106. td->flush_buffer = tty3270_flush_buffer;
  107. td->set_ldisc = NULL;
  108. td->wait_until_sent = NULL;
  109. td->send_xchar = NULL;
  110. td->read_proc = tty3270_read_proc;
  111. td->write_proc = tty3270_write_proc;
  112. rc = tty_register_driver(td);
  113. if (rc) {
  114. printk(KERN_ERR "tty3270 registration failed with %dn", rc);
  115. } else {
  116. tty3270_major = IBM_TTY3270_MAJOR;
  117. if (td->proc_entry != NULL)
  118. td->proc_entry->mode = S_IRUGO | S_IWUGO;
  119. }
  120. #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,3,0))
  121. #ifdef CONFIG_TN3270_CONSOLE
  122. if (CONSOLE_IS_3270) {
  123. tty3270_con_driver = *td;
  124. td = &tty3270_con_driver;
  125. td->driver_name = "con3270";
  126. td->name = "con3270";
  127. td->major = MAJOR(S390_CONSOLE_DEV);
  128. td->minor_start = MINOR(S390_CONSOLE_DEV);
  129. td->num = 1;
  130. td->refcount = &con3270_refcount;
  131. td->table = con3270_table;
  132. td->termios = con3270_termios;
  133. td->termios_locked = con3270_termios_locked;
  134. rc = tty_register_driver(td);
  135. if (rc) {
  136. printk(KERN_ERR
  137.        "con3270 registration failed with %dn", rc);
  138. } else {
  139. con3270_major = MAJOR(S390_CONSOLE_DEV);
  140. if (td->proc_entry != NULL)
  141. td->proc_entry->mode = S_IRUGO | S_IWUGO;
  142. }
  143. }
  144. #endif /* ifdef CONFIG_TN3270_CONSOLE */
  145. #endif /* if LINUX_VERSION_CODE */
  146. return rc;
  147. }
  148. /*
  149.  * tty3270_fini() -- Uninitialize linemode tubes
  150.  */
  151. void
  152. tty3270_fini(void)
  153. {
  154. if (tty3270_major != -1) {
  155. tty_unregister_driver(&tty3270_driver);
  156. tty3270_major = -1;
  157. }
  158. #ifdef CONFIG_TN3270_CONSOLE
  159. if (CONSOLE_IS_3270 && con3270_major != -1) {
  160. tty_unregister_driver(&con3270_driver);
  161. con3270_major = -1;
  162. }
  163. #endif
  164. }
  165. static int 
  166. tty3270_open(struct tty_struct *tty, struct file *filp)
  167. {
  168. tub_t *tubp;
  169. long flags;
  170. int rc;
  171. int cmd;
  172. if ((tubp = TTY2TUB(tty)) == NULL) {
  173. return -ENODEV;
  174. }
  175. tub_inc_use_count();
  176. if ((rc = tty3270_wait(tubp, &flags)) != 0)
  177. goto do_fail;
  178. if (tubp->lnopen > 0) {
  179. tubp->lnopen++;
  180. TUBUNLOCK(tubp->irq, flags);
  181. return 0;
  182. }
  183. if (tubp->flags & TUB_OPEN_STET) {
  184. cmd = TBC_UPDLOG;
  185. } else {
  186. cmd = TBC_OPEN;
  187. tubp->flags &= ~TUB_SIZED;
  188. }
  189. if ((rc = tty3270_size(tubp, &flags)) != 0)
  190. goto do_fail;
  191. if ((rc = tty3270_rcl_init(tubp)) != 0)
  192. goto do_fail;
  193. if ((rc = tty3270_aid_init(tubp)) != 0)
  194. goto do_fail;
  195. if ((rc = tty3270_scl_init(tubp)) != 0)
  196. goto do_fail;
  197. tubp->mode = TBM_LN;
  198. tubp->intv = tty3270_int;
  199. tubp->tty = tty;
  200. tubp->lnopen = 1;
  201. tty->driver_data = tubp;
  202. tty->winsize.ws_row = tubp->geom_rows;
  203. tty->winsize.ws_col = tubp->geom_cols;
  204. tubp->tty_inattr = TF_INPUT;
  205. tubp->cmd = cmd;
  206. tty3270_build(tubp);
  207. TUBUNLOCK(tubp->irq, flags);
  208. return 0;
  209. do_fail:
  210. tty3270_scl_fini(tubp);
  211. tty3270_aid_fini(tubp);
  212. tty3270_rcl_fini(tubp);
  213. TUBUNLOCK(tubp->irq, flags);
  214. tub_dec_use_count();
  215. return rc;
  216. }
  217. static void
  218. tty3270_close(struct tty_struct *tty, struct file *filp)
  219. {
  220. tub_t *tubp;
  221. long flags;
  222. if ((tubp = tty->driver_data) == NULL)
  223. return;
  224. tty3270_wait(tubp, &flags);
  225. if (--tubp->lnopen > 0)
  226. goto do_return;
  227. tubp->tty = NULL;
  228. tty->driver_data = NULL;
  229. tty3270_aid_fini(tubp);
  230. tty3270_rcl_fini(tubp);
  231. tty3270_scl_fini(tubp);
  232. do_return:
  233. tub_dec_use_count();
  234. TUBUNLOCK(tubp->irq, flags);
  235. }
  236. static int 
  237. tty3270_write(struct tty_struct *tty, int fromuser,
  238. const unsigned char *buf, int count)
  239. {
  240. tub_t *tubp;
  241. long flags;
  242. bcb_t obcb;
  243. int rc = 0;
  244. if ((tubp = tty->driver_data) == NULL)
  245. return -1;
  246. #ifdef CONFIG_TN3270_CONSOLE
  247. if (CONSOLE_IS_3270 && tub3270_con_tubp == tubp)
  248. tub3270_con_copy(tubp);
  249. #endif /* CONFIG_TN3270_CONSOLE */
  250. obcb.bc_buf = (char *)buf;
  251. obcb.bc_len = obcb.bc_cnt = obcb.bc_wr = count;
  252. obcb.bc_rd = 0;
  253. TUBLOCK(tubp->irq, flags);
  254. rc = tub3270_movedata(&obcb, &tubp->tty_bcb, fromuser);
  255. tty3270_try_logging(tubp);
  256. TUBUNLOCK(tubp->irq, flags);
  257. return rc;
  258. static void
  259. tty3270_put_char(struct tty_struct *tty, unsigned char ch)
  260. {
  261. long flags;
  262. tub_t *tubp;
  263. bcb_t *ob;
  264. if ((tubp = tty->driver_data) == NULL)
  265. return;
  266. TUBLOCK(tubp->irq, flags);
  267. ob = &tubp->tty_bcb;
  268. if (ob->bc_cnt < ob->bc_len) {
  269. ob->bc_buf[ob->bc_wr++] = ch;
  270. if (ob->bc_wr == ob->bc_len)
  271. ob->bc_wr = 0;
  272. ob->bc_cnt++;
  273. }
  274. tty3270_try_logging(tubp);
  275. TUBUNLOCK(tubp->irq, flags);
  276. }
  277. static void
  278. tty3270_flush_chars(struct tty_struct *tty)
  279. {
  280. tub_t *tubp;
  281. long flags;
  282. if ((tubp = tty->driver_data) == NULL)
  283. return;
  284. TUBLOCK(tubp->irq, flags);
  285. tty3270_try_logging(tubp);
  286. TUBUNLOCK(tubp->irq, flags);
  287. }
  288. static int 
  289. tty3270_write_room(struct tty_struct *tty)
  290. {
  291. tub_t *tubp;
  292. bcb_t *ob;
  293. if ((tubp = tty->driver_data) == NULL)
  294. return -1;
  295. ob = &tubp->tty_bcb;
  296. return ob->bc_len - ob->bc_cnt;
  297. }
  298. static int
  299. tty3270_chars_in_buffer(struct tty_struct *tty)
  300. {
  301. tub_t *tubp;
  302. bcb_t *ob;
  303. if ((tubp = tty->driver_data) == NULL)
  304. return -1;
  305. ob = &tubp->tty_bcb;
  306. return ob->bc_cnt;
  307. }
  308. static int
  309. tty3270_ioctl(struct tty_struct *tty, struct file *file,
  310. unsigned int cmd, unsigned long arg)
  311. {
  312. tub_t *tubp;
  313. long flags;
  314. int ret = 0;
  315. struct termios termios;
  316. if ((tubp = tty->driver_data) == NULL)
  317. return -ENODEV;
  318. TUBLOCK(tubp->irq, flags);
  319. if (tty->flags * (1 << TTY_IO_ERROR)) {
  320. ret = -EIO;
  321. goto do_return;
  322. }
  323. switch(cmd) {
  324. case TCGETS:
  325. ret = -ENOIOCTLCMD;
  326. goto do_return;
  327. case TCFLSH:            /* arg:  2 or 0 */
  328. ret = -ENOIOCTLCMD;
  329. goto do_return;
  330. case TCSETSF:
  331. if (user_termios_to_kernel_termios(&termios,
  332.     (struct termios *)arg)) {
  333. ret = -EFAULT;
  334. goto do_return;
  335. }
  336. ret = -ENOIOCTLCMD;
  337. goto do_return;
  338. case TCGETA:
  339. ret = -ENOIOCTLCMD;
  340. goto do_return;
  341. case TCSETA:
  342. if (user_termio_to_kernel_termios(&termios,
  343.     (struct termio *)arg)) {
  344. ret = -EFAULT;
  345. goto do_return;
  346. }
  347. ret = -ENOIOCTLCMD;
  348. goto do_return;
  349. default:
  350. ret = -ENOIOCTLCMD;
  351. break;
  352. }
  353. do_return:
  354. TUBUNLOCK(tubp->irq, flags);
  355. return ret;
  356. }
  357. static void
  358. tty3270_set_termios(struct tty_struct *tty, struct termios *old)
  359. {
  360. tub_t *tubp;
  361. long flags;
  362. int new;
  363. if ((tubp = tty->driver_data) == NULL)
  364. return;
  365. if (tty3270_wait(tubp, &flags) != 0) {
  366. TUBUNLOCK(tubp->irq, flags);
  367. return;
  368. }
  369. new = L_ICANON(tty)? L_ECHO(tty)? TF_INPUT: TF_INPUTN:
  370. tubp->tty_inattr;
  371. if (new != tubp->tty_inattr) {
  372. tubp->tty_inattr = new;
  373. tubp->cmd = TBC_CLRINPUT;
  374. tty3270_build(tubp);
  375. }
  376. TUBUNLOCK(tubp->irq, flags);
  377. }
  378. static void
  379. tty3270_flush_buffer(struct tty_struct *tty)
  380. {
  381. tub_t *tubp;
  382. bcb_t *ob;
  383. long flags;
  384. if ((tubp = tty->driver_data) == NULL)
  385. return;
  386. if (tubp->mode == TBM_FS && tubp->fs_pid != 0) {
  387. kill_proc(tubp->fs_pid, SIGHUP, 1);
  388. }
  389. if ((tubp->flags & TUB_OPEN_STET) == 0) {
  390. ob = &tubp->tty_bcb;
  391. TUBLOCK(tubp->irq, flags);
  392. ob->bc_rd = 0;
  393. ob->bc_wr = 0;
  394. ob->bc_cnt = 0;
  395. TUBUNLOCK(tubp->irq, flags);
  396. }
  397. wake_up_interruptible(&tty->write_wait);
  398. if ((tty->flags & (1 << TTY_DO_WRITE_WAKEUP)) &&
  399.     tty->ldisc.write_wakeup)
  400. (tty->ldisc.write_wakeup)(tty);
  401. }
  402. static int
  403. tty3270_read_proc(char *buf, char **start, off_t off, int count,
  404. int *eof, void *data)
  405. {
  406. tub_t *tubp;
  407. int begin = 0;
  408. int i;
  409. int rc;
  410. int len = 0;
  411. if (tty3270_proc_what == TW_CONFIG) {
  412. /*
  413.  * Describe the 3270 configuration in ascii lines.
  414.  * Line 1: 0 <fsmajor> 0
  415.  * Console line: <devnum> CONSOLE <minor>
  416.  * Other lines: <devnum> <ttymajor> <minor>
  417.  */
  418. len += sprintf(buf + len, "0 %d 0n", fs3270_major);
  419. for (i = 1; i <= tubnummins; i++) {
  420. tubp = (*tubminors)[i];
  421. #ifdef CONFIG_TN3270_CONSOLE
  422. if (CONSOLE_IS_3270 && tubp == tub3270_con_tubp)
  423. len += sprintf(buf + len, "%.3x CONSOLE %dn",
  424.        tubp->devno, i);
  425. else
  426. #endif
  427. len += sprintf(buf + len, "%.3x %d %dn",
  428.        tubp->devno, tty3270_major, i);
  429. if (begin + len > off + count)
  430. break;
  431. if (begin + len < off) {
  432. begin += len;
  433. len = 0;
  434. }
  435. }
  436. if (i > tubnummins)
  437. *eof = 1;
  438. if (off >= begin + len) {
  439. rc = 0;
  440. } else {
  441. *start = buf + off - begin;
  442. rc = MIN(count, begin + len - off);
  443. }
  444. if (*eof && rc == 0)
  445. tty3270_proc_what = TW_BOGUS;
  446. return rc;
  447. }
  448. len += sprintf(buf, "There are %d devices.  fs major is %d, "
  449. "tty major is %d.n", tubnummins, fs3270_major,
  450. tty3270_major);
  451. len += sprintf(buf+len, "        index=%d data=%d misc=%dn",
  452. tty3270_proc_index,
  453. tty3270_proc_data,
  454. tty3270_proc_misc);
  455. /*
  456.  * Display info for the tube with minor nr in index
  457.  */
  458. len += tty3270_show_tube(tty3270_proc_index, buf+len, count-len);
  459. *eof = 1;
  460. if (off >= begin + len)
  461. return 0;
  462. *start = buf + off - begin;
  463. return MIN(count, begin + len - off);
  464. }
  465. static int
  466. tty3270_write_proc(struct file *file, const char *buffer,
  467. unsigned long count, void *data)
  468. {
  469. char mybuf[GEOM_MAXINPLEN];
  470. int mycount;
  471. tub_t *tubp;
  472. struct tty_struct *tty;
  473. kdev_t device;
  474. int rc;
  475. mycount = MIN(count, sizeof mybuf - 1);
  476. if (copy_from_user(mybuf, buffer, mycount) != 0)
  477. return -EFAULT;
  478. mybuf[mycount] = '';
  479. /*
  480.  * User-mode settings affect only the current tty ---
  481.  */
  482. tubp = NULL;
  483. tty = current->tty;
  484. device = tty? tty->device: 0;
  485. if (device) {
  486. if (MAJOR(device) == IBM_TTY3270_MAJOR)
  487. tubp = (*tubminors)[MINOR(device)];
  488. #ifdef CONFIG_TN3270_CONSOLE
  489. #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,3,0))
  490. if (CONSOLE_IS_3270 && device == S390_CONSOLE_DEV)
  491. tubp = tub3270_con_tubp;
  492. #endif /* LINUX_VERSION_CODE */
  493. #endif /* CONFIG_TN3270_CONSOLE */
  494. }
  495. if (tubp) {
  496. if ((rc = tty3270_aid_set(tubp, mybuf, mycount + 1)))
  497. return rc > 0? count: rc;
  498. if ((rc = tty3270_rcl_set(tubp, mybuf, mycount + 1)))
  499. return rc > 0? count: rc;
  500. if ((rc = tty3270_scl_set(tubp, mybuf, mycount + 1)))
  501. return rc > 0? count: rc;
  502. }
  503. /*
  504.  * Superuser-mode settings affect the driver overall ---
  505.  */
  506. if (!suser()) {
  507. return -EPERM;
  508. } else if (strncmp(mybuf, "index=", 6) == 0) {
  509. tty3270_proc_index = simple_strtoul(mybuf + 6, 0,0);
  510. return count;
  511. } else if (strncmp(mybuf, "data=", 5) == 0) {
  512. tty3270_proc_data = simple_strtoul(mybuf + 5, 0, 0);
  513. return count;
  514. } else if (strncmp(mybuf, "misc=", 5) == 0) {
  515. tty3270_proc_misc = simple_strtoul(mybuf + 5, 0, 0);
  516. return count;
  517. } else if (strncmp(mybuf, "what=", 5) == 0) {
  518. if (strcmp(mybuf+5, "bogus") == 0)
  519. tty3270_proc_what = 0;
  520. else if (strncmp(mybuf+5, "config", 6) == 0)
  521. tty3270_proc_what = TW_CONFIG;
  522. return count;
  523. } else {
  524. return -EINVAL;
  525. }
  526. }
  527. static void
  528. tty3270_hangup(struct tty_struct *tty)
  529. {
  530. tub_t *tubp;
  531. extern void fs3270_release(tub_t *);
  532. if ((tubp = tty->driver_data) == NULL)
  533. return;
  534. tty3270_rcl_purge(tubp);
  535. tty3270_aid_reinit(tubp);
  536. fs3270_release(tubp);
  537. }
  538. /*
  539.  * tty3270_bh(tubp) -- Perform back-half processing
  540.  */
  541. static void
  542. tty3270_bh(void *data)
  543. {
  544. long flags;
  545. tub_t *tubp;
  546. struct tty_struct *tty;
  547. tubp = data;
  548. TUBLOCK(tubp->irq, flags);
  549. tubp->flags &= ~TUB_BHPENDING;
  550. tty = tubp->tty;
  551. if (tubp->flags & TUB_UNSOL_DE) {
  552. tubp->flags &= ~TUB_UNSOL_DE;
  553. if (tty != NULL) {
  554. tty_hangup(tty);
  555. wake_up_interruptible(&tubp->waitq);
  556. goto do_unlock;
  557. }
  558. }
  559. if (tubp->flags & TUB_IACTIVE) {        /* If read ended, */
  560. tty3270_do_input(tubp);
  561. tubp->flags &= ~TUB_IACTIVE;
  562. }
  563. if ((tubp->flags & TUB_WORKING) == 0) {
  564. if (tubp->flags & TUB_ATTN) {
  565. tty3270_start_input(tubp);
  566. tubp->flags &= ~TUB_ATTN;
  567. } else if (tty3270_try_logging(tubp) == 0) {
  568. wake_up_interruptible(&tubp->waitq);
  569. }
  570. }
  571. if (tty != NULL) {
  572. if ((tty->flags & (1 << TTY_DO_WRITE_WAKEUP)) &&
  573.     tty->ldisc.write_wakeup != NULL)
  574. (tty->ldisc.write_wakeup)(tty);
  575. wake_up_interruptible(&tty->write_wait);
  576. }
  577. do_unlock:
  578. TUBUNLOCK(tubp->irq, flags);
  579. }
  580. /*
  581.  * tty3270_sched_bh(tubp) -- Schedule the back half
  582.  * Irq lock must be held on entry and remains held on exit.
  583.  */
  584. void
  585. tty3270_sched_bh(tub_t *tubp)
  586. {
  587. if (tubp->flags & TUB_BHPENDING)
  588. return;
  589. tubp->flags |= TUB_BHPENDING;
  590. tubp->tqueue.routine = tty3270_bh;
  591. tubp->tqueue.data = tubp;
  592. queue_task(&tubp->tqueue, &tq_immediate);
  593. mark_bh(IMMEDIATE_BH);
  594. }
  595. /*
  596.  * tty3270_io() -- Perform line-mode reads and writes here
  597.  */
  598. int 
  599. tty3270_io(tub_t *tubp)
  600. {
  601. int rc;
  602. ccw1_t *ccwp;
  603. tubp->flags |= TUB_WORKING;
  604. tubp->dstat = 0;
  605. ccwp = &tubp->ttyccw;
  606. rc = do_IO(tubp->irq, ccwp, tubp->irq, 0, 0);
  607. return rc;
  608. }
  609. /*
  610.  * tty3270_wait(tubp) -- Wait until TUB_WORKING is off
  611.  * On entry the lock must not be held; on exit it is held.
  612.  */
  613. static int
  614. tty3270_wait(tub_t *tubp, long *flags)
  615. {
  616. DECLARE_WAITQUEUE(wait, current);
  617. TUBLOCK(tubp->irq, *flags);
  618. add_wait_queue(&tubp->waitq, &wait);
  619. while (!signal_pending(current) &&
  620.     (tubp->flags & TUB_WORKING) != 0) {
  621. current->state = TASK_INTERRUPTIBLE;
  622. TUBUNLOCK(tubp->irq, *flags);
  623. schedule();
  624. current->state = TASK_RUNNING;
  625. TUBLOCK(tubp->irq, *flags);
  626. }
  627. remove_wait_queue(&tubp->waitq, &wait);
  628. return signal_pending(current)? -ERESTARTSYS: 0;
  629. }
  630. void
  631. tty3270_int(tub_t *tubp, devstat_t *dsp)
  632. {
  633. #define DEV_UE_BUSY 
  634. (DEV_STAT_CHN_END | DEV_STAT_DEV_END | DEV_STAT_UNIT_EXCEP)
  635. #define DEV_NOT_WORKING 
  636. (DEV_STAT_ATTENTION | DEV_STAT_DEV_END | DEV_STAT_UNIT_CHECK)
  637. tubp->dstat = dsp->dstat;
  638. /* Handle CE-DE-UE and subsequent UDE */
  639. if (dsp->dstat == DEV_UE_BUSY) {
  640. tubp->flags |= TUB_UE_BUSY;
  641. return;
  642. } else if (tubp->flags & TUB_UE_BUSY) {
  643. tubp->flags &= ~TUB_UE_BUSY;
  644. if (dsp->dstat == DEV_STAT_DEV_END &&
  645.     (tubp->flags & TUB_WORKING) != 0) {
  646. tty3270_io(tubp);
  647. return;
  648. }
  649. }
  650. /* Handle ATTN */
  651. if (dsp->dstat & DEV_STAT_ATTENTION)
  652. tubp->flags |= TUB_ATTN;
  653. if (dsp->dstat & DEV_STAT_CHN_END) {
  654. tubp->cswl = dsp->rescnt;
  655. if ((dsp->dstat & DEV_STAT_DEV_END) == 0)
  656. tubp->flags |= TUB_EXPECT_DE;
  657. else
  658. tubp->flags &= ~TUB_EXPECT_DE;
  659. } else if (dsp->dstat & DEV_STAT_DEV_END) {
  660. if ((tubp->flags & TUB_EXPECT_DE) == 0)
  661. tubp->flags |= TUB_UNSOL_DE;
  662. tubp->flags &= ~TUB_EXPECT_DE;
  663. }
  664. if (dsp->dstat & DEV_NOT_WORKING)
  665. tubp->flags &= ~TUB_WORKING;
  666. if (dsp->dstat & DEV_STAT_UNIT_CHECK)
  667. tubp->sense = dsp->ii.sense;
  668. if ((tubp->flags & TUB_WORKING) == 0)
  669. tty3270_sched_bh(tubp);
  670. }
  671. /*
  672.  * tty3270_refresh(), called by fs3270_close() when tubp->fsopen == 0.
  673.  * On entry, lock is held.
  674.  */
  675. void
  676. tty3270_refresh(tub_t *tubp)
  677. {
  678. if (tubp->lnopen) {
  679. tubp->mode = TBM_LN;
  680. tubp->intv = tty3270_int;
  681. tty3270_scl_resettimer(tubp);
  682. tubp->cmd = TBC_UPDATE;
  683. tty3270_build(tubp);
  684. }
  685. }
  686. int
  687. tty3270_try_logging(tub_t *tubp)
  688. {
  689. if (tubp->flags & TUB_WORKING)
  690. return 0;
  691. if (tubp->mode == TBM_FS)
  692. return 0;
  693. if (tubp->stat == TBS_HOLD)
  694. return 0;
  695. if (tubp->stat == TBS_MORE)
  696. return 0;
  697. #ifdef CONFIG_TN3270_CONSOLE
  698. if (CONSOLE_IS_3270 && tub3270_con_tubp == tubp)
  699. tub3270_con_copy(tubp);
  700. #endif /* CONFIG_TN3270_CONSOLE */
  701. if (tubp->tty_bcb.bc_cnt == 0)
  702. return 0;
  703. if (tubp->intv != tty3270_int)
  704. return 0;
  705. tubp->cmd = TBC_UPDLOG;
  706. return tty3270_build(tubp);
  707. }
  708. /* tty3270 utility functions */
  709. static void
  710. tty3270_start_input(tub_t *tubp)
  711. {
  712. tubp->ttyccw.cda = virt_to_phys(&tubp->tty_input);
  713. tubp->ttyccw.cmd_code = TC_READMOD;
  714. tubp->ttyccw.count = GEOM_INPLEN;
  715. tubp->ttyccw.flags = CCW_FLAG_SLI;
  716. tty3270_io(tubp);
  717. tubp->flags |= TUB_IACTIVE;
  718. }
  719. static void
  720. tty3270_do_input(tub_t *tubp)
  721. {
  722. int count;
  723. char *in;
  724. int aidflags;
  725. char *aidstring;
  726. count = GEOM_INPLEN - tubp->cswl;
  727. in = tubp->tty_input;
  728. tty3270_aid_get(tubp, in[0], &aidflags, &aidstring);
  729. if (aidflags & TA_CLEARKEY) {
  730. tubp->stat = TBS_RUNNING;
  731. tty3270_scl_resettimer(tubp);
  732. tubp->cmd = TBC_UPDATE;
  733. } else if (aidflags & TA_CLEARLOG) {
  734. tubp->stat = TBS_RUNNING;
  735. tty3270_scl_resettimer(tubp);
  736. tubp->cmd = TBC_CLRUPDLOG;
  737. } else if (aidflags & TA_DOENTER) {
  738. if (count <= 6) {
  739. switch(tubp->stat) {
  740. case TBS_MORE:
  741. tubp->stat = TBS_HOLD;
  742. tty3270_scl_resettimer(tubp);
  743. break;
  744. case TBS_HOLD:
  745. tubp->stat = TBS_MORE;
  746. tty3270_scl_settimer(tubp);
  747. break;
  748. case TBS_RUNNING:
  749.                                 tty3270_do_enter(tubp, in + 6, 0);
  750. break;
  751. }
  752. tubp->cmd = TBC_UPDSTAT;
  753. goto do_build;
  754. }
  755. in += 6;
  756. count -= 6;
  757. TUB_EBCASC(in, count);
  758. tubp->cmd = TBC_CLRINPUT;
  759. tty3270_do_enter(tubp, in, count);
  760. } else if ((aidflags & TA_DOSTRING) != 0 && aidstring != NULL) {
  761. tubp->cmd = TBC_KRUPDLOG;
  762. tty3270_do_enter(tubp, aidstring, strlen(aidstring));
  763. } else if ((aidflags & TA_DOSTRINGD) != 0 && aidstring != NULL) {
  764. tty3270_do_showi(tubp, aidstring, strlen(aidstring));
  765. tubp->cmd = TBC_UPDINPUT;
  766. } else {
  767. if (in[0] != 0x60)
  768. tubp->flags |= TUB_ALARM;
  769. tubp->cmd = TBC_KRUPDLOG;
  770. }
  771. do_build:
  772. tty3270_build(tubp);
  773. }
  774. static void
  775. tty3270_do_enter(tub_t *tubp, char *cp, int count)
  776. {
  777. struct tty_struct *tty;
  778. int func = -1;
  779. if ((tty = tubp->tty) == NULL)
  780. return;
  781. if (count < 0)
  782. return;
  783. if (count == 2 && (cp[0] == '^' || cp[0] == '252')) {
  784. switch(cp[1]) {
  785. case 'c':  case 'C':
  786. func = INTR_CHAR(tty);
  787. break;
  788. case 'd':  case 'D':
  789. func = EOF_CHAR(tty);
  790. break;
  791. case 'z':  case 'Z':
  792. func = SUSP_CHAR(tty);
  793. break;
  794. }
  795. } else if (count == 2 && cp[0] == 0x1b) {        /* if ESC */
  796. int inc = 0;
  797. char buf[GEOM_INPLEN + 1];
  798. int len;
  799. switch(cp[1]) {
  800. case 'k':  case 'K':
  801. inc = -1;
  802. break;
  803. case 'j':  case 'J':
  804. inc = 1;
  805. break;
  806. }
  807. if (inc == 0)
  808. goto not_rcl;
  809. len = tty3270_rcl_get(tubp, buf, sizeof buf, inc);
  810. if (len == 0) {
  811. tubp->flags |= TUB_ALARM;
  812. return;
  813. }
  814. tty3270_do_showi(tubp, buf, len);
  815. tubp->cmd = TBC_UPDINPUT;
  816. return;
  817. }
  818. not_rcl:
  819. if (func != -1) {
  820. *tty->flip.flag_buf_ptr++ = TTY_NORMAL;
  821. *tty->flip.char_buf_ptr++ = func;
  822. tty->flip.count++;
  823. } else {
  824. tty3270_rcl_put(tubp, cp, count);
  825. memcpy(tty->flip.char_buf_ptr, cp, count);
  826. /* Add newline unless line ends with "^n" */
  827. if (count < 2 || cp[count - 1] != 'n' ||
  828.     (cp[count - 2] != '^' && cp[count - 2] != '252')) {
  829. tty->flip.char_buf_ptr[count] = 'n';
  830. count++;
  831. } else {
  832. count -= 2;     /* Lop trailing "^n" from text */
  833. }
  834. memset(tty->flip.flag_buf_ptr, TTY_NORMAL, count);
  835. tty->flip.char_buf_ptr += count;
  836. tty->flip.flag_buf_ptr += count;
  837. tty->flip.count += count;
  838. }
  839. tty_flip_buffer_push(tty);
  840. }
  841. static void
  842. tty3270_do_showi(tub_t *tubp, char *cp, int cl)
  843. {
  844. if (cl > GEOM_INPLEN)
  845. cl = GEOM_INPLEN;
  846. memset(tubp->tty_input, 0, GEOM_INPLEN);
  847. memcpy(tubp->tty_input, cp, cl);
  848. TUB_ASCEBC(tubp->tty_input, cl);
  849. }
  850. /* Debugging routine */
  851. static int
  852. tty3270_show_tube(int minor, char *buf, int count)
  853. {
  854. tub_t *tubp;
  855. struct tty_struct *tty;
  856. struct termios *mp;
  857. int len;
  858. /*012345678901234567890123456789012345678901234567890123456789       */
  859. /*Info for tub_t[dd] at xxxxxxxx:                                    */
  860. /*    geom:  rows=dd cols=dd model=d                                 */
  861. /*    lnopen=dd     fsopen=dd   waitq=xxxxxxxx                       */
  862. /*    dstat=xx      mode=dd     stat=dd     flags=xxxx               */
  863. /*    oucount=dddd  ourd=ddddd  ouwr=ddddd  nextlogx=ddddd           */
  864. /*    tty=xxxxxxxx                                                   */
  865. /*    write_wait=xxxxxxxx read_wait=xxxxxxxx                         */
  866. /*    iflag=xxxxxxxx oflag=xxxxxxxx cflag=xxxxxxxx lflag=xxxxxxxx    */
  867. if (minor < 0 || minor > tubnummins ||
  868.     (tubp = (*tubminors)[minor]) == NULL)
  869. return sprintf(buf, "No tube at index=%dn", minor);
  870. tty = tubp->tty;
  871. len = 0;
  872. len += sprintf(buf+len, "Info for tub_t[%d] at %p:n", minor, tubp);
  873. len += sprintf(buf+len, "inattr is at %pn", &tubp->tty_inattr);
  874. len += sprintf(buf+len, "    geom:  rows=%.2d cols=%.2d model=%.1dn",
  875.        tubp->geom_rows, tubp->geom_cols, tubp->tubiocb.model);
  876. len += sprintf(buf+len,
  877.        "    lnopen=%-2d     fsopen=%-2d   waitq=%pn",
  878.        tubp->lnopen, tubp->fsopen, &tubp->waitq);
  879. len += sprintf(buf+len, "    dstat=%.2x      mode=%-2d     "
  880.        "stat=%-2d     flags=%-4xn", tubp->dstat,
  881.        tubp->mode, tubp->stat, tubp->flags);
  882. #ifdef RBH_FIXTHIS
  883. len += sprintf(buf+len,
  884.        "    oucount=%-4d  ourd=%-5d  ouwr=%-5d"
  885.        "  nextlogx=%-5dn", tubp->tty_oucount,
  886.        tubp->tty_ourd, tubp->tty_ouwr, tubp->tty_nextlogx);
  887. #endif
  888. len += sprintf(buf+len, "    tty=%pn",tubp->tty);
  889. if (tty)
  890. len += sprintf(buf+len,
  891. "    write_wait=%p read_wait=%pn",
  892. &tty->write_wait, &tty->read_wait);
  893. if (tty && ((mp = tty->termios)))
  894. len += sprintf(buf+len,"    iflag=%.8x oflag=%.8x "
  895.        "cflag=%.8x lflag=%.8xn", mp->c_iflag,
  896.        mp->c_oflag, mp->c_cflag, mp->c_lflag);
  897. return len;
  898. }