2 * IBM/3270 Driver - tty functions.
5 * Original 3270 Code for 2.4 written by Richard Hitt (UTS Global)
6 * Rewritten for 2.5 by Martin Schwidefsky <schwidefsky@de.ibm.com>
7 * -- Copyright IBM Corp. 2003
10 #include <linux/module.h>
11 #include <linux/types.h>
12 #include <linux/kdev_t.h>
13 #include <linux/tty.h>
14 #include <linux/vt_kern.h>
15 #include <linux/init.h>
16 #include <linux/console.h>
17 #include <linux/interrupt.h>
18 #include <linux/workqueue.h>
20 #include <linux/slab.h>
21 #include <linux/bootmem.h>
22 #include <linux/compat.h>
24 #include <asm/ccwdev.h>
26 #include <asm/ebcdic.h>
27 #include <asm/uaccess.h>
33 #define TTY3270_CHAR_BUF_SIZE 256
34 #define TTY3270_OUTPUT_BUFFER_SIZE 1024
35 #define TTY3270_STRING_PAGES 5
37 struct tty_driver
*tty3270_driver
;
38 static int tty3270_max_index
;
40 static struct raw3270_fn tty3270_fn
;
43 unsigned char character
;
44 unsigned char highlight
;
45 unsigned char f_color
;
49 struct tty3270_cell
*cells
;
56 * The main tty view data structure.
58 * 1) describe line orientation & lines list concept against screen
59 * 2) describe conversion of screen to lines
60 * 3) describe line format.
63 struct raw3270_view view
;
65 void **freemem_pages
; /* Array of pages used for freemem. */
66 struct list_head freemem
; /* List of free memory for strings. */
69 struct list_head lines
; /* List of lines. */
70 struct list_head update
; /* List of lines to update. */
71 unsigned char wcc
; /* Write control character. */
72 int nr_lines
; /* # lines in list. */
73 int nr_up
; /* # lines up in history. */
74 unsigned long update_flags
; /* Update indication bits. */
75 struct string
*status
; /* Lower right of display. */
76 struct raw3270_request
*write
; /* Single write request. */
77 struct timer_list timer
; /* Output delay timer. */
79 /* Current tty screen. */
80 unsigned int cx
, cy
; /* Current output position. */
81 unsigned int highlight
; /* Blink/reverse/underscore */
82 unsigned int f_color
; /* Foreground color */
83 struct tty3270_line
*screen
;
84 unsigned int n_model
, n_cols
, n_rows
; /* New model & size */
85 struct work_struct resize_work
;
88 struct string
*prompt
; /* Output string for input area. */
89 struct string
*input
; /* Input string for read request. */
90 struct raw3270_request
*read
; /* Single read request. */
91 struct raw3270_request
*kreset
; /* Single keyboard reset request. */
92 unsigned char inattr
; /* Visible/invisible input. */
93 int throttle
, attn
; /* tty throttle/unthrottle. */
94 struct tasklet_struct readlet
; /* Tasklet to issue read request. */
95 struct kbd_data
*kbd
; /* key_maps stuff. */
97 /* Escape sequence parsing. */
98 int esc_state
, esc_ques
, esc_npar
;
99 int esc_par
[ESCAPE_NPAR
];
100 unsigned int saved_cx
, saved_cy
;
101 unsigned int saved_highlight
, saved_f_color
;
103 /* Command recalling. */
104 struct list_head rcl_lines
; /* List of recallable lines. */
105 struct list_head
*rcl_walk
; /* Point in rcl_lines list. */
106 int rcl_nr
, rcl_max
; /* Number/max number of rcl_lines. */
108 /* Character array for put_char/flush_chars. */
109 unsigned int char_count
;
110 char char_buf
[TTY3270_CHAR_BUF_SIZE
];
113 /* tty3270->update_flags. See tty3270_update for details. */
114 #define TTY_UPDATE_ERASE 1 /* Use EWRITEA instead of WRITE. */
115 #define TTY_UPDATE_LIST 2 /* Update lines in tty3270->update. */
116 #define TTY_UPDATE_INPUT 4 /* Update input line. */
117 #define TTY_UPDATE_STATUS 8 /* Update status line. */
118 #define TTY_UPDATE_ALL 16 /* Recreate screen. */
120 static void tty3270_update(struct tty3270
*);
121 static void tty3270_resize_work(struct work_struct
*work
);
124 * Setup timeout for a device. On timeout trigger an update.
126 static void tty3270_set_timer(struct tty3270
*tp
, int expires
)
129 del_timer(&tp
->timer
);
131 mod_timer(&tp
->timer
, jiffies
+ expires
);
135 * The input line are the two last lines of the screen.
138 tty3270_update_prompt(struct tty3270
*tp
, char *input
, int count
)
145 line
->string
[5] = TF_INMDT
;
147 line
->string
[5] = tp
->inattr
;
148 if (count
> tp
->view
.cols
* 2 - 11)
149 count
= tp
->view
.cols
* 2 - 11;
150 memcpy(line
->string
+ 6, input
, count
);
151 line
->string
[6 + count
] = TO_IC
;
152 /* Clear to end of input line. */
153 if (count
< tp
->view
.cols
* 2 - 11) {
154 line
->string
[7 + count
] = TO_RA
;
155 line
->string
[10 + count
] = 0;
156 off
= tp
->view
.cols
* tp
->view
.rows
- 9;
157 raw3270_buffer_address(tp
->view
.dev
, line
->string
+count
+8, off
);
158 line
->len
= 11 + count
;
160 line
->len
= 7 + count
;
161 tp
->update_flags
|= TTY_UPDATE_INPUT
;
165 tty3270_create_prompt(struct tty3270
*tp
)
167 static const unsigned char blueprint
[] =
168 { TO_SBA
, 0, 0, 0x6e, TO_SF
, TF_INPUT
,
169 /* empty input string */
170 TO_IC
, TO_RA
, 0, 0, 0 };
174 line
= alloc_string(&tp
->freemem
,
175 sizeof(blueprint
) + tp
->view
.cols
* 2 - 9);
177 tp
->inattr
= TF_INPUT
;
178 /* Copy blueprint to status line */
179 memcpy(line
->string
, blueprint
, sizeof(blueprint
));
180 line
->len
= sizeof(blueprint
);
181 /* Set output offsets. */
182 offset
= tp
->view
.cols
* (tp
->view
.rows
- 2);
183 raw3270_buffer_address(tp
->view
.dev
, line
->string
+ 1, offset
);
184 offset
= tp
->view
.cols
* tp
->view
.rows
- 9;
185 raw3270_buffer_address(tp
->view
.dev
, line
->string
+ 8, offset
);
187 /* Allocate input string for reading. */
188 tp
->input
= alloc_string(&tp
->freemem
, tp
->view
.cols
* 2 - 9 + 6);
192 * The status line is the last line of the screen. It shows the string
193 * "Running"/"Holding" in the lower right corner of the screen.
196 tty3270_update_status(struct tty3270
* tp
)
200 str
= (tp
->nr_up
!= 0) ? "History" : "Running";
201 memcpy(tp
->status
->string
+ 8, str
, 7);
202 codepage_convert(tp
->view
.ascebc
, tp
->status
->string
+ 8, 7);
203 tp
->update_flags
|= TTY_UPDATE_STATUS
;
207 tty3270_create_status(struct tty3270
* tp
)
209 static const unsigned char blueprint
[] =
210 { TO_SBA
, 0, 0, TO_SF
, TF_LOG
, TO_SA
, TAT_COLOR
, TAC_GREEN
,
211 0, 0, 0, 0, 0, 0, 0, TO_SF
, TF_LOG
, TO_SA
, TAT_COLOR
,
216 line
= alloc_string(&tp
->freemem
,sizeof(blueprint
));
218 /* Copy blueprint to status line */
219 memcpy(line
->string
, blueprint
, sizeof(blueprint
));
220 /* Set address to start of status string (= last 9 characters). */
221 offset
= tp
->view
.cols
* tp
->view
.rows
- 9;
222 raw3270_buffer_address(tp
->view
.dev
, line
->string
+ 1, offset
);
226 * Set output offsets to 3270 datastream fragment of a tty string.
227 * (TO_SBA offset at the start and TO_RA offset at the end of the string)
230 tty3270_update_string(struct tty3270
*tp
, struct string
*line
, int nr
)
234 raw3270_buffer_address(tp
->view
.dev
, line
->string
+ 1,
236 cp
= line
->string
+ line
->len
- 4;
238 raw3270_buffer_address(tp
->view
.dev
, cp
+ 1,
239 tp
->view
.cols
* (nr
+ 1));
243 * Rebuild update list to print all lines.
246 tty3270_rebuild_update(struct tty3270
*tp
)
248 struct string
*s
, *n
;
252 * Throw away update list and create a new one,
253 * containing all lines that will fit on the screen.
255 list_for_each_entry_safe(s
, n
, &tp
->update
, update
)
256 list_del_init(&s
->update
);
257 line
= tp
->view
.rows
- 3;
259 list_for_each_entry_reverse(s
, &tp
->lines
, list
) {
264 tty3270_update_string(tp
, s
, line
);
265 list_add(&s
->update
, &tp
->update
);
269 tp
->update_flags
|= TTY_UPDATE_LIST
;
273 * Alloc string for size bytes. If there is not enough room in
274 * freemem, free strings until there is room.
276 static struct string
*
277 tty3270_alloc_string(struct tty3270
*tp
, size_t size
)
279 struct string
*s
, *n
;
281 s
= alloc_string(&tp
->freemem
, size
);
284 list_for_each_entry_safe(s
, n
, &tp
->lines
, list
) {
285 BUG_ON(tp
->nr_lines
<= tp
->view
.rows
- 2);
287 if (!list_empty(&s
->update
))
288 list_del(&s
->update
);
290 if (free_string(&tp
->freemem
, s
) >= size
)
293 s
= alloc_string(&tp
->freemem
, size
);
295 if (tp
->nr_up
!= 0 &&
296 tp
->nr_up
+ tp
->view
.rows
- 2 >= tp
->nr_lines
) {
297 tp
->nr_up
= tp
->nr_lines
- tp
->view
.rows
+ 2;
298 tty3270_rebuild_update(tp
);
299 tty3270_update_status(tp
);
305 * Add an empty line to the list.
308 tty3270_blank_line(struct tty3270
*tp
)
310 static const unsigned char blueprint
[] =
311 { TO_SBA
, 0, 0, TO_SA
, TAT_EXTHI
, TAX_RESET
,
312 TO_SA
, TAT_COLOR
, TAC_RESET
, TO_RA
, 0, 0, 0 };
315 s
= tty3270_alloc_string(tp
, sizeof(blueprint
));
316 memcpy(s
->string
, blueprint
, sizeof(blueprint
));
317 s
->len
= sizeof(blueprint
);
318 list_add_tail(&s
->list
, &tp
->lines
);
325 * Write request completion callback.
328 tty3270_write_callback(struct raw3270_request
*rq
, void *data
)
330 struct tty3270
*tp
= container_of(rq
->view
, struct tty3270
, view
);
333 /* Write wasn't successful. Refresh all. */
334 tp
->update_flags
= TTY_UPDATE_ALL
;
335 tty3270_set_timer(tp
, 1);
337 raw3270_request_reset(rq
);
338 xchg(&tp
->write
, rq
);
342 * Update 3270 display.
345 tty3270_update(struct tty3270
*tp
)
347 static char invalid_sba
[2] = { 0xff, 0xff };
348 struct raw3270_request
*wrq
;
349 unsigned long updated
;
350 struct string
*s
, *n
;
354 wrq
= xchg(&tp
->write
, 0);
356 tty3270_set_timer(tp
, 1);
360 spin_lock(&tp
->view
.lock
);
362 if (tp
->update_flags
& TTY_UPDATE_ALL
) {
363 tty3270_rebuild_update(tp
);
364 tty3270_update_status(tp
);
365 tp
->update_flags
= TTY_UPDATE_ERASE
| TTY_UPDATE_LIST
|
366 TTY_UPDATE_INPUT
| TTY_UPDATE_STATUS
;
368 if (tp
->update_flags
& TTY_UPDATE_ERASE
) {
369 /* Use erase write alternate to erase display. */
370 raw3270_request_set_cmd(wrq
, TC_EWRITEA
);
371 updated
|= TTY_UPDATE_ERASE
;
373 raw3270_request_set_cmd(wrq
, TC_WRITE
);
375 raw3270_request_add_data(wrq
, &tp
->wcc
, 1);
379 * Update status line.
381 if (tp
->update_flags
& TTY_UPDATE_STATUS
)
382 if (raw3270_request_add_data(wrq
, tp
->status
->string
,
383 tp
->status
->len
) == 0)
384 updated
|= TTY_UPDATE_STATUS
;
389 if (tp
->update_flags
& TTY_UPDATE_INPUT
)
390 if (raw3270_request_add_data(wrq
, tp
->prompt
->string
,
391 tp
->prompt
->len
) == 0)
392 updated
|= TTY_UPDATE_INPUT
;
396 if (tp
->update_flags
& TTY_UPDATE_LIST
) {
397 /* Write strings in the update list to the screen. */
398 list_for_each_entry_safe(s
, n
, &tp
->update
, update
) {
402 * Skip TO_SBA at the start of the string if the
403 * last output position matches the start address
406 if (s
->string
[1] == sba
[0] && s
->string
[2] == sba
[1])
408 if (raw3270_request_add_data(wrq
, str
, len
) != 0)
410 list_del_init(&s
->update
);
411 sba
= s
->string
+ s
->len
- 3;
413 if (list_empty(&tp
->update
))
414 updated
|= TTY_UPDATE_LIST
;
416 wrq
->callback
= tty3270_write_callback
;
417 rc
= raw3270_start(&tp
->view
, wrq
);
419 tp
->update_flags
&= ~updated
;
420 if (tp
->update_flags
)
421 tty3270_set_timer(tp
, 1);
423 raw3270_request_reset(wrq
);
424 xchg(&tp
->write
, wrq
);
426 spin_unlock(&tp
->view
.lock
);
433 tty3270_rcl_add(struct tty3270
*tp
, char *input
, int len
)
440 if (tp
->rcl_nr
>= tp
->rcl_max
) {
441 s
= list_entry(tp
->rcl_lines
.next
, struct string
, list
);
443 free_string(&tp
->freemem
, s
);
446 s
= tty3270_alloc_string(tp
, len
);
447 memcpy(s
->string
, input
, len
);
448 list_add_tail(&s
->list
, &tp
->rcl_lines
);
453 tty3270_rcl_backward(struct kbd_data
*kbd
)
455 struct tty3270
*tp
= container_of(kbd
->port
, struct tty3270
, port
);
458 spin_lock_bh(&tp
->view
.lock
);
459 if (tp
->inattr
== TF_INPUT
) {
460 if (tp
->rcl_walk
&& tp
->rcl_walk
->prev
!= &tp
->rcl_lines
)
461 tp
->rcl_walk
= tp
->rcl_walk
->prev
;
462 else if (!list_empty(&tp
->rcl_lines
))
463 tp
->rcl_walk
= tp
->rcl_lines
.prev
;
465 list_entry(tp
->rcl_walk
, struct string
, list
) : NULL
;
467 s
= list_entry(tp
->rcl_walk
, struct string
, list
);
468 tty3270_update_prompt(tp
, s
->string
, s
->len
);
470 tty3270_update_prompt(tp
, NULL
, 0);
471 tty3270_set_timer(tp
, 1);
473 spin_unlock_bh(&tp
->view
.lock
);
477 * Deactivate tty view.
480 tty3270_exit_tty(struct kbd_data
*kbd
)
482 struct tty3270
*tp
= container_of(kbd
->port
, struct tty3270
, port
);
484 raw3270_deactivate_view(&tp
->view
);
488 * Scroll forward in history.
491 tty3270_scroll_forward(struct kbd_data
*kbd
)
493 struct tty3270
*tp
= container_of(kbd
->port
, struct tty3270
, port
);
496 spin_lock_bh(&tp
->view
.lock
);
497 nr_up
= tp
->nr_up
- tp
->view
.rows
+ 2;
500 if (nr_up
!= tp
->nr_up
) {
502 tty3270_rebuild_update(tp
);
503 tty3270_update_status(tp
);
504 tty3270_set_timer(tp
, 1);
506 spin_unlock_bh(&tp
->view
.lock
);
510 * Scroll backward in history.
513 tty3270_scroll_backward(struct kbd_data
*kbd
)
515 struct tty3270
*tp
= container_of(kbd
->port
, struct tty3270
, port
);
518 spin_lock_bh(&tp
->view
.lock
);
519 nr_up
= tp
->nr_up
+ tp
->view
.rows
- 2;
520 if (nr_up
+ tp
->view
.rows
- 2 > tp
->nr_lines
)
521 nr_up
= tp
->nr_lines
- tp
->view
.rows
+ 2;
522 if (nr_up
!= tp
->nr_up
) {
524 tty3270_rebuild_update(tp
);
525 tty3270_update_status(tp
);
526 tty3270_set_timer(tp
, 1);
528 spin_unlock_bh(&tp
->view
.lock
);
532 * Pass input line to tty.
535 tty3270_read_tasklet(struct raw3270_request
*rrq
)
537 static char kreset_data
= TW_KR
;
538 struct tty3270
*tp
= container_of(rrq
->view
, struct tty3270
, view
);
542 spin_lock_bh(&tp
->view
.lock
);
544 * Two AID keys are special: For 0x7d (enter) the input line
545 * has to be emitted to the tty and for 0x6d the screen
546 * needs to be redrawn.
550 if (tp
->input
->string
[0] == 0x7d) {
551 /* Enter: write input to tty. */
552 input
= tp
->input
->string
+ 6;
553 len
= tp
->input
->len
- 6 - rrq
->rescnt
;
554 if (tp
->inattr
!= TF_INPUTN
)
555 tty3270_rcl_add(tp
, input
, len
);
558 tty3270_rebuild_update(tp
);
559 tty3270_update_status(tp
);
561 /* Clear input area. */
562 tty3270_update_prompt(tp
, NULL
, 0);
563 tty3270_set_timer(tp
, 1);
564 } else if (tp
->input
->string
[0] == 0x6d) {
565 /* Display has been cleared. Redraw. */
566 tp
->update_flags
= TTY_UPDATE_ALL
;
567 tty3270_set_timer(tp
, 1);
569 spin_unlock_bh(&tp
->view
.lock
);
571 /* Start keyboard reset command. */
572 raw3270_request_reset(tp
->kreset
);
573 raw3270_request_set_cmd(tp
->kreset
, TC_WRITE
);
574 raw3270_request_add_data(tp
->kreset
, &kreset_data
, 1);
575 raw3270_start(&tp
->view
, tp
->kreset
);
578 kbd_keycode(tp
->kbd
, *input
++);
579 /* Emit keycode for AID byte. */
580 kbd_keycode(tp
->kbd
, 256 + tp
->input
->string
[0]);
582 raw3270_request_reset(rrq
);
583 xchg(&tp
->read
, rrq
);
584 raw3270_put_view(&tp
->view
);
588 * Read request completion callback.
591 tty3270_read_callback(struct raw3270_request
*rq
, void *data
)
593 struct tty3270
*tp
= container_of(rq
->view
, struct tty3270
, view
);
594 raw3270_get_view(rq
->view
);
595 /* Schedule tasklet to pass input to tty. */
596 tasklet_schedule(&tp
->readlet
);
600 * Issue a read request. Call with device lock.
603 tty3270_issue_read(struct tty3270
*tp
, int lock
)
605 struct raw3270_request
*rrq
;
608 rrq
= xchg(&tp
->read
, 0);
610 /* Read already scheduled. */
612 rrq
->callback
= tty3270_read_callback
;
613 rrq
->callback_data
= tp
;
614 raw3270_request_set_cmd(rrq
, TC_READMOD
);
615 raw3270_request_set_data(rrq
, tp
->input
->string
, tp
->input
->len
);
616 /* Issue the read modified request. */
618 rc
= raw3270_start(&tp
->view
, rrq
);
620 rc
= raw3270_start_irq(&tp
->view
, rrq
);
622 raw3270_request_reset(rrq
);
623 xchg(&tp
->read
, rrq
);
628 * Switch to the tty view.
631 tty3270_activate(struct raw3270_view
*view
)
633 struct tty3270
*tp
= container_of(view
, struct tty3270
, view
);
635 tp
->update_flags
= TTY_UPDATE_ALL
;
636 tty3270_set_timer(tp
, 1);
641 tty3270_deactivate(struct raw3270_view
*view
)
643 struct tty3270
*tp
= container_of(view
, struct tty3270
, view
);
645 del_timer(&tp
->timer
);
649 tty3270_irq(struct tty3270
*tp
, struct raw3270_request
*rq
, struct irb
*irb
)
651 /* Handle ATTN. Schedule tasklet to read aid. */
652 if (irb
->scsw
.cmd
.dstat
& DEV_STAT_ATTENTION
) {
654 tty3270_issue_read(tp
, 0);
660 if (irb
->scsw
.cmd
.dstat
& DEV_STAT_UNIT_CHECK
)
663 /* Normal end. Copy residual count. */
664 rq
->rescnt
= irb
->scsw
.cmd
.count
;
666 return RAW3270_IO_DONE
;
670 * Allocate tty3270 structure.
672 static struct tty3270
*
673 tty3270_alloc_view(void)
678 tp
= kzalloc(sizeof(struct tty3270
), GFP_KERNEL
);
682 kmalloc(sizeof(void *) * TTY3270_STRING_PAGES
, GFP_KERNEL
);
683 if (!tp
->freemem_pages
)
685 INIT_LIST_HEAD(&tp
->freemem
);
686 INIT_LIST_HEAD(&tp
->lines
);
687 INIT_LIST_HEAD(&tp
->update
);
688 INIT_LIST_HEAD(&tp
->rcl_lines
);
691 for (pages
= 0; pages
< TTY3270_STRING_PAGES
; pages
++) {
692 tp
->freemem_pages
[pages
] = (void *)
693 __get_free_pages(GFP_KERNEL
|GFP_DMA
, 0);
694 if (!tp
->freemem_pages
[pages
])
696 add_string_memory(&tp
->freemem
,
697 tp
->freemem_pages
[pages
], PAGE_SIZE
);
699 tp
->write
= raw3270_request_alloc(TTY3270_OUTPUT_BUFFER_SIZE
);
700 if (IS_ERR(tp
->write
))
702 tp
->read
= raw3270_request_alloc(0);
703 if (IS_ERR(tp
->read
))
705 tp
->kreset
= raw3270_request_alloc(1);
706 if (IS_ERR(tp
->kreset
))
708 tp
->kbd
= kbd_alloc();
712 tty_port_init(&tp
->port
);
713 setup_timer(&tp
->timer
, (void (*)(unsigned long)) tty3270_update
,
715 tasklet_init(&tp
->readlet
,
716 (void (*)(unsigned long)) tty3270_read_tasklet
,
717 (unsigned long) tp
->read
);
718 INIT_WORK(&tp
->resize_work
, tty3270_resize_work
);
723 raw3270_request_free(tp
->kreset
);
725 raw3270_request_free(tp
->read
);
727 raw3270_request_free(tp
->write
);
730 free_pages((unsigned long) tp
->freemem_pages
[pages
], 0);
731 kfree(tp
->freemem_pages
);
732 tty_port_destroy(&tp
->port
);
736 return ERR_PTR(-ENOMEM
);
740 * Free tty3270 structure.
743 tty3270_free_view(struct tty3270
*tp
)
747 del_timer_sync(&tp
->timer
);
749 raw3270_request_free(tp
->kreset
);
750 raw3270_request_free(tp
->read
);
751 raw3270_request_free(tp
->write
);
752 for (pages
= 0; pages
< TTY3270_STRING_PAGES
; pages
++)
753 free_pages((unsigned long) tp
->freemem_pages
[pages
], 0);
754 kfree(tp
->freemem_pages
);
755 tty_port_destroy(&tp
->port
);
760 * Allocate tty3270 screen.
762 static struct tty3270_line
*
763 tty3270_alloc_screen(unsigned int rows
, unsigned int cols
)
765 struct tty3270_line
*screen
;
769 size
= sizeof(struct tty3270_line
) * (rows
- 2);
770 screen
= kzalloc(size
, GFP_KERNEL
);
773 for (lines
= 0; lines
< rows
- 2; lines
++) {
774 size
= sizeof(struct tty3270_cell
) * cols
;
775 screen
[lines
].cells
= kzalloc(size
, GFP_KERNEL
);
776 if (!screen
[lines
].cells
)
782 kfree(screen
[lines
].cells
);
785 return ERR_PTR(-ENOMEM
);
789 * Free tty3270 screen.
792 tty3270_free_screen(struct tty3270_line
*screen
, unsigned int rows
)
796 for (lines
= 0; lines
< rows
- 2; lines
++)
797 kfree(screen
[lines
].cells
);
802 * Resize tty3270 screen
804 static void tty3270_resize_work(struct work_struct
*work
)
806 struct tty3270
*tp
= container_of(work
, struct tty3270
, resize_work
);
807 struct tty3270_line
*screen
, *oscreen
;
808 struct tty_struct
*tty
;
812 screen
= tty3270_alloc_screen(tp
->n_rows
, tp
->n_cols
);
815 /* Switch to new output size */
816 spin_lock_bh(&tp
->view
.lock
);
817 oscreen
= tp
->screen
;
818 orows
= tp
->view
.rows
;
819 tp
->view
.model
= tp
->n_model
;
820 tp
->view
.rows
= tp
->n_rows
;
821 tp
->view
.cols
= tp
->n_cols
;
823 free_string(&tp
->freemem
, tp
->prompt
);
824 free_string(&tp
->freemem
, tp
->status
);
825 tty3270_create_prompt(tp
);
826 tty3270_create_status(tp
);
828 while (tp
->nr_lines
< tp
->view
.rows
- 2)
829 tty3270_blank_line(tp
);
830 tp
->update_flags
= TTY_UPDATE_ALL
;
831 spin_unlock_bh(&tp
->view
.lock
);
832 tty3270_free_screen(oscreen
, orows
);
833 tty3270_set_timer(tp
, 1);
834 /* Informat tty layer about new size */
835 tty
= tty_port_tty_get(&tp
->port
);
838 ws
.ws_row
= tp
->view
.rows
- 2;
839 ws
.ws_col
= tp
->view
.cols
;
840 tty_do_resize(tty
, &ws
);
844 tty3270_resize(struct raw3270_view
*view
, int model
, int rows
, int cols
)
846 struct tty3270
*tp
= container_of(view
, struct tty3270
, view
);
851 schedule_work(&tp
->resize_work
);
855 * Unlink tty3270 data structure from tty.
858 tty3270_release(struct raw3270_view
*view
)
860 struct tty3270
*tp
= container_of(view
, struct tty3270
, view
);
861 struct tty_struct
*tty
= tty_port_tty_get(&tp
->port
);
864 tty
->driver_data
= NULL
;
865 tty_port_tty_set(&tp
->port
, NULL
);
867 raw3270_put_view(&tp
->view
);
873 * Free tty3270 data structure
876 tty3270_free(struct raw3270_view
*view
)
878 struct tty3270
*tp
= container_of(view
, struct tty3270
, view
);
880 tty3270_free_screen(tp
->screen
, tp
->view
.rows
);
881 tty3270_free_view(tp
);
885 * Delayed freeing of tty3270 views.
888 tty3270_del_views(void)
892 for (i
= RAW3270_FIRSTMINOR
; i
<= tty3270_max_index
; i
++) {
893 struct raw3270_view
*view
= raw3270_find_view(&tty3270_fn
, i
);
895 raw3270_del_view(view
);
899 static struct raw3270_fn tty3270_fn
= {
900 .activate
= tty3270_activate
,
901 .deactivate
= tty3270_deactivate
,
902 .intv
= (void *) tty3270_irq
,
903 .release
= tty3270_release
,
904 .free
= tty3270_free
,
905 .resize
= tty3270_resize
909 * This routine is called whenever a 3270 tty is opened first time.
911 static int tty3270_install(struct tty_driver
*driver
, struct tty_struct
*tty
)
913 struct raw3270_view
*view
;
917 /* Check if the tty3270 is already there. */
918 view
= raw3270_find_view(&tty3270_fn
, tty
->index
);
920 tp
= container_of(view
, struct tty3270
, view
);
921 tty
->driver_data
= tp
;
922 tty
->winsize
.ws_row
= tp
->view
.rows
- 2;
923 tty
->winsize
.ws_col
= tp
->view
.cols
;
924 tp
->port
.low_latency
= 0;
925 /* why to reassign? */
926 tty_port_tty_set(&tp
->port
, tty
);
927 tp
->inattr
= TF_INPUT
;
928 return tty_port_install(&tp
->port
, driver
, tty
);
930 if (tty3270_max_index
< tty
->index
)
931 tty3270_max_index
= tty
->index
;
933 /* Allocate tty3270 structure on first open. */
934 tp
= tty3270_alloc_view();
938 rc
= raw3270_add_view(&tp
->view
, &tty3270_fn
, tty
->index
);
940 tty3270_free_view(tp
);
944 tp
->screen
= tty3270_alloc_screen(tp
->view
.cols
, tp
->view
.rows
);
945 if (IS_ERR(tp
->screen
)) {
946 rc
= PTR_ERR(tp
->screen
);
947 raw3270_put_view(&tp
->view
);
948 raw3270_del_view(&tp
->view
);
949 tty3270_free_view(tp
);
953 tty_port_tty_set(&tp
->port
, tty
);
954 tp
->port
.low_latency
= 0;
955 tty
->winsize
.ws_row
= tp
->view
.rows
- 2;
956 tty
->winsize
.ws_col
= tp
->view
.cols
;
958 tty3270_create_prompt(tp
);
959 tty3270_create_status(tp
);
960 tty3270_update_status(tp
);
962 /* Create blank line for every line in the tty output area. */
963 for (i
= 0; i
< tp
->view
.rows
- 2; i
++)
964 tty3270_blank_line(tp
);
966 tp
->kbd
->port
= &tp
->port
;
967 tp
->kbd
->fn_handler
[KVAL(K_INCRCONSOLE
)] = tty3270_exit_tty
;
968 tp
->kbd
->fn_handler
[KVAL(K_SCROLLBACK
)] = tty3270_scroll_backward
;
969 tp
->kbd
->fn_handler
[KVAL(K_SCROLLFORW
)] = tty3270_scroll_forward
;
970 tp
->kbd
->fn_handler
[KVAL(K_CONS
)] = tty3270_rcl_backward
;
971 kbd_ascebc(tp
->kbd
, tp
->view
.ascebc
);
973 raw3270_activate_view(&tp
->view
);
975 rc
= tty_port_install(&tp
->port
, driver
, tty
);
977 raw3270_put_view(&tp
->view
);
981 tty
->driver_data
= tp
;
987 * This routine is called whenever a 3270 tty is opened.
990 tty3270_open(struct tty_struct
*tty
, struct file
*filp
)
992 struct tty3270
*tp
= tty
->driver_data
;
993 struct tty_port
*port
= &tp
->port
;
996 tty_port_tty_set(port
, tty
);
1001 * This routine is called when the 3270 tty is closed. We wait
1002 * for the remaining request to be completed. Then we clean up.
1005 tty3270_close(struct tty_struct
*tty
, struct file
* filp
)
1007 struct tty3270
*tp
= tty
->driver_data
;
1012 tty
->driver_data
= NULL
;
1013 tty_port_tty_set(&tp
->port
, NULL
);
1017 static void tty3270_cleanup(struct tty_struct
*tty
)
1019 struct tty3270
*tp
= tty
->driver_data
;
1022 raw3270_put_view(&tp
->view
);
1026 * We always have room.
1029 tty3270_write_room(struct tty_struct
*tty
)
1035 * Insert character into the screen at the current position with the
1036 * current color and highlight. This function does NOT do cursor movement.
1038 static void tty3270_put_character(struct tty3270
*tp
, char ch
)
1040 struct tty3270_line
*line
;
1041 struct tty3270_cell
*cell
;
1043 line
= tp
->screen
+ tp
->cy
;
1044 if (line
->len
<= tp
->cx
) {
1045 while (line
->len
< tp
->cx
) {
1046 cell
= line
->cells
+ line
->len
;
1047 cell
->character
= tp
->view
.ascebc
[' '];
1048 cell
->highlight
= tp
->highlight
;
1049 cell
->f_color
= tp
->f_color
;
1054 cell
= line
->cells
+ tp
->cx
;
1055 cell
->character
= tp
->view
.ascebc
[(unsigned int) ch
];
1056 cell
->highlight
= tp
->highlight
;
1057 cell
->f_color
= tp
->f_color
;
1061 * Convert a tty3270_line to a 3270 data fragment usable for output.
1064 tty3270_convert_line(struct tty3270
*tp
, int line_nr
)
1066 struct tty3270_line
*line
;
1067 struct tty3270_cell
*cell
;
1068 struct string
*s
, *n
;
1069 unsigned char highlight
;
1070 unsigned char f_color
;
1074 /* Determine how long the fragment will be. */
1075 flen
= 3; /* Prefix (TO_SBA). */
1076 line
= tp
->screen
+ line_nr
;
1078 highlight
= TAX_RESET
;
1079 f_color
= TAC_RESET
;
1080 for (i
= 0, cell
= line
->cells
; i
< line
->len
; i
++, cell
++) {
1081 if (cell
->highlight
!= highlight
) {
1082 flen
+= 3; /* TO_SA to switch highlight. */
1083 highlight
= cell
->highlight
;
1085 if (cell
->f_color
!= f_color
) {
1086 flen
+= 3; /* TO_SA to switch color. */
1087 f_color
= cell
->f_color
;
1090 if (highlight
!= TAX_RESET
)
1091 flen
+= 3; /* TO_SA to reset hightlight. */
1092 if (f_color
!= TAC_RESET
)
1093 flen
+= 3; /* TO_SA to reset color. */
1094 if (line
->len
< tp
->view
.cols
)
1095 flen
+= 4; /* Postfix (TO_RA). */
1097 /* Find the line in the list. */
1098 i
= tp
->view
.rows
- 2 - line_nr
;
1099 list_for_each_entry_reverse(s
, &tp
->lines
, list
)
1103 * Check if the line needs to get reallocated.
1105 if (s
->len
!= flen
) {
1106 /* Reallocate string. */
1107 n
= tty3270_alloc_string(tp
, flen
);
1108 list_add(&n
->list
, &s
->list
);
1109 list_del_init(&s
->list
);
1110 if (!list_empty(&s
->update
))
1111 list_del_init(&s
->update
);
1112 free_string(&tp
->freemem
, s
);
1116 /* Write 3270 data fragment. */
1122 highlight
= TAX_RESET
;
1123 f_color
= TAC_RESET
;
1124 for (i
= 0, cell
= line
->cells
; i
< line
->len
; i
++, cell
++) {
1125 if (cell
->highlight
!= highlight
) {
1128 *cp
++ = cell
->highlight
;
1129 highlight
= cell
->highlight
;
1131 if (cell
->f_color
!= f_color
) {
1134 *cp
++ = cell
->f_color
;
1135 f_color
= cell
->f_color
;
1137 *cp
++ = cell
->character
;
1139 if (highlight
!= TAX_RESET
) {
1144 if (f_color
!= TAC_RESET
) {
1149 if (line
->len
< tp
->view
.cols
) {
1156 if (tp
->nr_up
+ line_nr
< tp
->view
.rows
- 2) {
1157 /* Line is currently visible on screen. */
1158 tty3270_update_string(tp
, s
, line_nr
);
1159 /* Add line to update list. */
1160 if (list_empty(&s
->update
)) {
1161 list_add_tail(&s
->update
, &tp
->update
);
1162 tp
->update_flags
|= TTY_UPDATE_LIST
;
1168 * Do carriage return.
1171 tty3270_cr(struct tty3270
*tp
)
1180 tty3270_lf(struct tty3270
*tp
)
1182 struct tty3270_line temp
;
1185 tty3270_convert_line(tp
, tp
->cy
);
1186 if (tp
->cy
< tp
->view
.rows
- 3) {
1190 /* Last line just filled up. Add new, blank line. */
1191 tty3270_blank_line(tp
);
1192 temp
= tp
->screen
[0];
1194 for (i
= 0; i
< tp
->view
.rows
- 3; i
++)
1195 tp
->screen
[i
] = tp
->screen
[i
+1];
1196 tp
->screen
[tp
->view
.rows
- 3] = temp
;
1197 tty3270_rebuild_update(tp
);
1201 tty3270_ri(struct tty3270
*tp
)
1204 tty3270_convert_line(tp
, tp
->cy
);
1210 * Insert characters at current position.
1213 tty3270_insert_characters(struct tty3270
*tp
, int n
)
1215 struct tty3270_line
*line
;
1218 line
= tp
->screen
+ tp
->cy
;
1219 while (line
->len
< tp
->cx
) {
1220 line
->cells
[line
->len
].character
= tp
->view
.ascebc
[' '];
1221 line
->cells
[line
->len
].highlight
= TAX_RESET
;
1222 line
->cells
[line
->len
].f_color
= TAC_RESET
;
1225 if (n
> tp
->view
.cols
- tp
->cx
)
1226 n
= tp
->view
.cols
- tp
->cx
;
1227 k
= min_t(int, line
->len
- tp
->cx
, tp
->view
.cols
- tp
->cx
- n
);
1229 line
->cells
[tp
->cx
+ n
+ k
] = line
->cells
[tp
->cx
+ k
];
1231 if (line
->len
> tp
->view
.cols
)
1232 line
->len
= tp
->view
.cols
;
1234 line
->cells
[tp
->cx
+ n
].character
= tp
->view
.ascebc
[' '];
1235 line
->cells
[tp
->cx
+ n
].highlight
= tp
->highlight
;
1236 line
->cells
[tp
->cx
+ n
].f_color
= tp
->f_color
;
1241 * Delete characters at current position.
1244 tty3270_delete_characters(struct tty3270
*tp
, int n
)
1246 struct tty3270_line
*line
;
1249 line
= tp
->screen
+ tp
->cy
;
1250 if (line
->len
<= tp
->cx
)
1252 if (line
->len
- tp
->cx
<= n
) {
1256 for (i
= tp
->cx
; i
+ n
< line
->len
; i
++)
1257 line
->cells
[i
] = line
->cells
[i
+ n
];
1262 * Erase characters at current position.
1265 tty3270_erase_characters(struct tty3270
*tp
, int n
)
1267 struct tty3270_line
*line
;
1268 struct tty3270_cell
*cell
;
1270 line
= tp
->screen
+ tp
->cy
;
1271 while (line
->len
> tp
->cx
&& n
-- > 0) {
1272 cell
= line
->cells
+ tp
->cx
++;
1273 cell
->character
= ' ';
1274 cell
->highlight
= TAX_RESET
;
1275 cell
->f_color
= TAC_RESET
;
1278 tp
->cx
= min_t(int, tp
->cx
, tp
->view
.cols
- 1);
1282 * Erase line, 3 different cases:
1283 * Esc [ 0 K Erase from current position to end of line inclusive
1284 * Esc [ 1 K Erase from beginning of line to current position inclusive
1285 * Esc [ 2 K Erase entire line (without moving cursor)
1288 tty3270_erase_line(struct tty3270
*tp
, int mode
)
1290 struct tty3270_line
*line
;
1291 struct tty3270_cell
*cell
;
1294 line
= tp
->screen
+ tp
->cy
;
1297 else if (mode
== 1) {
1298 for (i
= 0; i
< tp
->cx
; i
++) {
1299 cell
= line
->cells
+ i
;
1300 cell
->character
= ' ';
1301 cell
->highlight
= TAX_RESET
;
1302 cell
->f_color
= TAC_RESET
;
1304 if (line
->len
<= tp
->cx
)
1305 line
->len
= tp
->cx
+ 1;
1306 } else if (mode
== 2)
1308 tty3270_convert_line(tp
, tp
->cy
);
1312 * Erase display, 3 different cases:
1313 * Esc [ 0 J Erase from current position to bottom of screen inclusive
1314 * Esc [ 1 J Erase from top of screen to current position inclusive
1315 * Esc [ 2 J Erase entire screen (without moving the cursor)
1318 tty3270_erase_display(struct tty3270
*tp
, int mode
)
1323 tty3270_erase_line(tp
, 0);
1324 for (i
= tp
->cy
+ 1; i
< tp
->view
.rows
- 2; i
++) {
1325 tp
->screen
[i
].len
= 0;
1326 tty3270_convert_line(tp
, i
);
1328 } else if (mode
== 1) {
1329 for (i
= 0; i
< tp
->cy
; i
++) {
1330 tp
->screen
[i
].len
= 0;
1331 tty3270_convert_line(tp
, i
);
1333 tty3270_erase_line(tp
, 1);
1334 } else if (mode
== 2) {
1335 for (i
= 0; i
< tp
->view
.rows
- 2; i
++) {
1336 tp
->screen
[i
].len
= 0;
1337 tty3270_convert_line(tp
, i
);
1340 tty3270_rebuild_update(tp
);
1344 * Set attributes found in an escape sequence.
1345 * Esc [ <attr> ; <attr> ; ... m
1348 tty3270_set_attributes(struct tty3270
*tp
)
1350 static unsigned char f_colors
[] = {
1351 TAC_DEFAULT
, TAC_RED
, TAC_GREEN
, TAC_YELLOW
, TAC_BLUE
,
1352 TAC_PINK
, TAC_TURQ
, TAC_WHITE
, 0, TAC_DEFAULT
1356 for (i
= 0; i
<= tp
->esc_npar
; i
++) {
1357 attr
= tp
->esc_par
[i
];
1360 tp
->highlight
= TAX_RESET
;
1361 tp
->f_color
= TAC_RESET
;
1364 case 4: /* Start underlining. */
1365 tp
->highlight
= TAX_UNDER
;
1367 case 5: /* Start blink. */
1368 tp
->highlight
= TAX_BLINK
;
1370 case 7: /* Start reverse. */
1371 tp
->highlight
= TAX_REVER
;
1373 case 24: /* End underlining */
1374 if (tp
->highlight
== TAX_UNDER
)
1375 tp
->highlight
= TAX_RESET
;
1377 case 25: /* End blink. */
1378 if (tp
->highlight
== TAX_BLINK
)
1379 tp
->highlight
= TAX_RESET
;
1381 case 27: /* End reverse. */
1382 if (tp
->highlight
== TAX_REVER
)
1383 tp
->highlight
= TAX_RESET
;
1385 /* Foreground color. */
1386 case 30: /* Black */
1388 case 32: /* Green */
1389 case 33: /* Yellow */
1391 case 35: /* Magenta */
1393 case 37: /* White */
1394 case 39: /* Black */
1395 tp
->f_color
= f_colors
[attr
- 30];
1402 tty3270_getpar(struct tty3270
*tp
, int ix
)
1404 return (tp
->esc_par
[ix
] > 0) ? tp
->esc_par
[ix
] : 1;
1408 tty3270_goto_xy(struct tty3270
*tp
, int cx
, int cy
)
1410 int max_cx
= max(0, cx
);
1411 int max_cy
= max(0, cy
);
1413 tp
->cx
= min_t(int, tp
->view
.cols
- 1, max_cx
);
1414 cy
= min_t(int, tp
->view
.rows
- 3, max_cy
);
1416 tty3270_convert_line(tp
, tp
->cy
);
1422 * Process escape sequences. Known sequences:
1423 * Esc 7 Save Cursor Position
1424 * Esc 8 Restore Cursor Position
1425 * Esc [ Pn ; Pn ; .. m Set attributes
1426 * Esc [ Pn ; Pn H Cursor Position
1427 * Esc [ Pn ; Pn f Cursor Position
1428 * Esc [ Pn A Cursor Up
1429 * Esc [ Pn B Cursor Down
1430 * Esc [ Pn C Cursor Forward
1431 * Esc [ Pn D Cursor Backward
1432 * Esc [ Pn G Cursor Horizontal Absolute
1433 * Esc [ Pn X Erase Characters
1434 * Esc [ Ps J Erase in Display
1435 * Esc [ Ps K Erase in Line
1436 * // FIXME: add all the new ones.
1438 * Pn is a numeric parameter, a string of zero or more decimal digits.
1439 * Ps is a selective parameter.
1442 tty3270_escape_sequence(struct tty3270
*tp
, char ch
)
1444 enum { ESnormal
, ESesc
, ESsquare
, ESgetpars
};
1446 if (tp
->esc_state
== ESnormal
) {
1448 /* Starting new escape sequence. */
1449 tp
->esc_state
= ESesc
;
1452 if (tp
->esc_state
== ESesc
) {
1453 tp
->esc_state
= ESnormal
;
1456 tp
->esc_state
= ESsquare
;
1468 case 'Z': /* Respond ID. */
1469 kbd_puts_queue(&tp
->port
, "\033[?6c");
1471 case '7': /* Save cursor position. */
1472 tp
->saved_cx
= tp
->cx
;
1473 tp
->saved_cy
= tp
->cy
;
1474 tp
->saved_highlight
= tp
->highlight
;
1475 tp
->saved_f_color
= tp
->f_color
;
1477 case '8': /* Restore cursor position. */
1478 tty3270_convert_line(tp
, tp
->cy
);
1479 tty3270_goto_xy(tp
, tp
->saved_cx
, tp
->saved_cy
);
1480 tp
->highlight
= tp
->saved_highlight
;
1481 tp
->f_color
= tp
->saved_f_color
;
1483 case 'c': /* Reset terminal. */
1484 tp
->cx
= tp
->saved_cx
= 0;
1485 tp
->cy
= tp
->saved_cy
= 0;
1486 tp
->highlight
= tp
->saved_highlight
= TAX_RESET
;
1487 tp
->f_color
= tp
->saved_f_color
= TAC_RESET
;
1488 tty3270_erase_display(tp
, 2);
1493 if (tp
->esc_state
== ESsquare
) {
1494 tp
->esc_state
= ESgetpars
;
1495 memset(tp
->esc_par
, 0, sizeof(tp
->esc_par
));
1497 tp
->esc_ques
= (ch
== '?');
1501 if (tp
->esc_state
== ESgetpars
) {
1502 if (ch
== ';' && tp
->esc_npar
< ESCAPE_NPAR
- 1) {
1506 if (ch
>= '0' && ch
<= '9') {
1507 tp
->esc_par
[tp
->esc_npar
] *= 10;
1508 tp
->esc_par
[tp
->esc_npar
] += ch
- '0';
1512 tp
->esc_state
= ESnormal
;
1513 if (ch
== 'n' && !tp
->esc_ques
) {
1514 if (tp
->esc_par
[0] == 5) /* Status report. */
1515 kbd_puts_queue(&tp
->port
, "\033[0n");
1516 else if (tp
->esc_par
[0] == 6) { /* Cursor report. */
1518 sprintf(buf
, "\033[%d;%dR", tp
->cy
+ 1, tp
->cx
+ 1);
1519 kbd_puts_queue(&tp
->port
, buf
);
1527 tty3270_set_attributes(tp
);
1529 case 'H': /* Set cursor position. */
1531 tty3270_goto_xy(tp
, tty3270_getpar(tp
, 1) - 1,
1532 tty3270_getpar(tp
, 0) - 1);
1534 case 'd': /* Set y position. */
1535 tty3270_goto_xy(tp
, tp
->cx
, tty3270_getpar(tp
, 0) - 1);
1537 case 'A': /* Cursor up. */
1539 tty3270_goto_xy(tp
, tp
->cx
, tp
->cy
- tty3270_getpar(tp
, 0));
1541 case 'B': /* Cursor down. */
1544 tty3270_goto_xy(tp
, tp
->cx
, tp
->cy
+ tty3270_getpar(tp
, 0));
1546 case 'C': /* Cursor forward. */
1548 tty3270_goto_xy(tp
, tp
->cx
+ tty3270_getpar(tp
, 0), tp
->cy
);
1550 case 'D': /* Cursor backward. */
1551 tty3270_goto_xy(tp
, tp
->cx
- tty3270_getpar(tp
, 0), tp
->cy
);
1553 case 'G': /* Set x position. */
1555 tty3270_goto_xy(tp
, tty3270_getpar(tp
, 0), tp
->cy
);
1557 case 'X': /* Erase Characters. */
1558 tty3270_erase_characters(tp
, tty3270_getpar(tp
, 0));
1560 case 'J': /* Erase display. */
1561 tty3270_erase_display(tp
, tp
->esc_par
[0]);
1563 case 'K': /* Erase line. */
1564 tty3270_erase_line(tp
, tp
->esc_par
[0]);
1566 case 'P': /* Delete characters. */
1567 tty3270_delete_characters(tp
, tty3270_getpar(tp
, 0));
1569 case '@': /* Insert characters. */
1570 tty3270_insert_characters(tp
, tty3270_getpar(tp
, 0));
1572 case 's': /* Save cursor position. */
1573 tp
->saved_cx
= tp
->cx
;
1574 tp
->saved_cy
= tp
->cy
;
1575 tp
->saved_highlight
= tp
->highlight
;
1576 tp
->saved_f_color
= tp
->f_color
;
1578 case 'u': /* Restore cursor position. */
1579 tty3270_convert_line(tp
, tp
->cy
);
1580 tty3270_goto_xy(tp
, tp
->saved_cx
, tp
->saved_cy
);
1581 tp
->highlight
= tp
->saved_highlight
;
1582 tp
->f_color
= tp
->saved_f_color
;
1588 * String write routine for 3270 ttys
1591 tty3270_do_write(struct tty3270
*tp
, struct tty_struct
*tty
,
1592 const unsigned char *buf
, int count
)
1596 spin_lock_bh(&tp
->view
.lock
);
1597 for (i_msg
= 0; !tty
->stopped
&& i_msg
< count
; i_msg
++) {
1598 if (tp
->esc_state
!= 0) {
1599 /* Continue escape sequence. */
1600 tty3270_escape_sequence(tp
, buf
[i_msg
]);
1604 switch (buf
[i_msg
]) {
1605 case 0x07: /* '\a' -- Alarm */
1606 tp
->wcc
|= TW_PLUSALARM
;
1608 case 0x08: /* Backspace. */
1611 tty3270_put_character(tp
, ' ');
1614 case 0x09: /* '\t' -- Tabulate */
1615 for (i
= tp
->cx
% 8; i
< 8; i
++) {
1616 if (tp
->cx
>= tp
->view
.cols
) {
1621 tty3270_put_character(tp
, ' ');
1625 case 0x0a: /* '\n' -- New Line */
1629 case 0x0c: /* '\f' -- Form Feed */
1630 tty3270_erase_display(tp
, 2);
1631 tp
->cx
= tp
->cy
= 0;
1633 case 0x0d: /* '\r' -- Carriage Return */
1636 case 0x0f: /* SuSE "exit alternate mode" */
1638 case 0x1b: /* Start escape sequence. */
1639 tty3270_escape_sequence(tp
, buf
[i_msg
]);
1641 default: /* Insert normal character. */
1642 if (tp
->cx
>= tp
->view
.cols
) {
1646 tty3270_put_character(tp
, buf
[i_msg
]);
1651 /* Convert current line to 3270 data fragment. */
1652 tty3270_convert_line(tp
, tp
->cy
);
1654 /* Setup timer to update display after 1/10 second */
1655 if (!timer_pending(&tp
->timer
))
1656 tty3270_set_timer(tp
, HZ
/10);
1658 spin_unlock_bh(&tp
->view
.lock
);
1662 * String write routine for 3270 ttys
1665 tty3270_write(struct tty_struct
* tty
,
1666 const unsigned char *buf
, int count
)
1670 tp
= tty
->driver_data
;
1673 if (tp
->char_count
> 0) {
1674 tty3270_do_write(tp
, tty
, tp
->char_buf
, tp
->char_count
);
1677 tty3270_do_write(tp
, tty
, buf
, count
);
1682 * Put single characters to the ttys character buffer
1684 static int tty3270_put_char(struct tty_struct
*tty
, unsigned char ch
)
1688 tp
= tty
->driver_data
;
1689 if (!tp
|| tp
->char_count
>= TTY3270_CHAR_BUF_SIZE
)
1691 tp
->char_buf
[tp
->char_count
++] = ch
;
1696 * Flush all characters from the ttys characeter buffer put there
1697 * by tty3270_put_char.
1700 tty3270_flush_chars(struct tty_struct
*tty
)
1704 tp
= tty
->driver_data
;
1707 if (tp
->char_count
> 0) {
1708 tty3270_do_write(tp
, tty
, tp
->char_buf
, tp
->char_count
);
1714 * Returns the number of characters in the output buffer. This is
1715 * used in tty_wait_until_sent to wait until all characters have
1716 * appeared on the screen.
1719 tty3270_chars_in_buffer(struct tty_struct
*tty
)
1725 tty3270_flush_buffer(struct tty_struct
*tty
)
1730 * Check for visible/invisible input switches
1733 tty3270_set_termios(struct tty_struct
*tty
, struct ktermios
*old
)
1738 tp
= tty
->driver_data
;
1741 spin_lock_bh(&tp
->view
.lock
);
1742 if (L_ICANON(tty
)) {
1743 new = L_ECHO(tty
) ? TF_INPUT
: TF_INPUTN
;
1744 if (new != tp
->inattr
) {
1746 tty3270_update_prompt(tp
, NULL
, 0);
1747 tty3270_set_timer(tp
, 1);
1750 spin_unlock_bh(&tp
->view
.lock
);
1754 * Disable reading from a 3270 tty
1757 tty3270_throttle(struct tty_struct
* tty
)
1761 tp
= tty
->driver_data
;
1768 * Enable reading from a 3270 tty
1771 tty3270_unthrottle(struct tty_struct
* tty
)
1775 tp
= tty
->driver_data
;
1780 tty3270_issue_read(tp
, 1);
1784 * Hang up the tty device.
1787 tty3270_hangup(struct tty_struct
*tty
)
1793 tty3270_wait_until_sent(struct tty_struct
*tty
, int timeout
)
1797 static int tty3270_ioctl(struct tty_struct
*tty
, unsigned int cmd
,
1802 tp
= tty
->driver_data
;
1805 if (tty
->flags
& (1 << TTY_IO_ERROR
))
1807 return kbd_ioctl(tp
->kbd
, cmd
, arg
);
1810 #ifdef CONFIG_COMPAT
1811 static long tty3270_compat_ioctl(struct tty_struct
*tty
,
1812 unsigned int cmd
, unsigned long arg
)
1816 tp
= tty
->driver_data
;
1819 if (tty
->flags
& (1 << TTY_IO_ERROR
))
1821 return kbd_ioctl(tp
->kbd
, cmd
, (unsigned long)compat_ptr(arg
));
1825 static const struct tty_operations tty3270_ops
= {
1826 .install
= tty3270_install
,
1827 .cleanup
= tty3270_cleanup
,
1828 .open
= tty3270_open
,
1829 .close
= tty3270_close
,
1830 .write
= tty3270_write
,
1831 .put_char
= tty3270_put_char
,
1832 .flush_chars
= tty3270_flush_chars
,
1833 .write_room
= tty3270_write_room
,
1834 .chars_in_buffer
= tty3270_chars_in_buffer
,
1835 .flush_buffer
= tty3270_flush_buffer
,
1836 .throttle
= tty3270_throttle
,
1837 .unthrottle
= tty3270_unthrottle
,
1838 .hangup
= tty3270_hangup
,
1839 .wait_until_sent
= tty3270_wait_until_sent
,
1840 .ioctl
= tty3270_ioctl
,
1841 #ifdef CONFIG_COMPAT
1842 .compat_ioctl
= tty3270_compat_ioctl
,
1844 .set_termios
= tty3270_set_termios
1847 void tty3270_create_cb(int minor
)
1849 tty_register_device(tty3270_driver
, minor
, NULL
);
1852 void tty3270_destroy_cb(int minor
)
1854 tty_unregister_device(tty3270_driver
, minor
);
1857 struct raw3270_notifier tty3270_notifier
=
1859 .create
= tty3270_create_cb
,
1860 .destroy
= tty3270_destroy_cb
,
1864 * 3270 tty registration code called from tty_init().
1865 * Most kernel services (incl. kmalloc) are available at this poimt.
1867 static int __init
tty3270_init(void)
1869 struct tty_driver
*driver
;
1872 driver
= tty_alloc_driver(RAW3270_MAXDEVS
,
1873 TTY_DRIVER_REAL_RAW
|
1874 TTY_DRIVER_DYNAMIC_DEV
|
1875 TTY_DRIVER_RESET_TERMIOS
);
1877 return PTR_ERR(driver
);
1880 * Initialize the tty_driver structure
1881 * Entries in tty3270_driver that are NOT initialized:
1882 * proc_entry, set_termios, flush_buffer, set_ldisc, write_proc
1884 driver
->driver_name
= "tty3270";
1885 driver
->name
= "3270/tty";
1886 driver
->major
= IBM_TTY3270_MAJOR
;
1887 driver
->minor_start
= 0;
1888 driver
->type
= TTY_DRIVER_TYPE_SYSTEM
;
1889 driver
->subtype
= SYSTEM_TYPE_TTY
;
1890 driver
->init_termios
= tty_std_termios
;
1891 tty_set_operations(driver
, &tty3270_ops
);
1892 ret
= tty_register_driver(driver
);
1894 put_tty_driver(driver
);
1897 tty3270_driver
= driver
;
1898 raw3270_register_notifier(&tty3270_notifier
);
1905 struct tty_driver
*driver
;
1907 raw3270_unregister_notifier(&tty3270_notifier
);
1908 driver
= tty3270_driver
;
1909 tty3270_driver
= NULL
;
1910 tty_unregister_driver(driver
);
1911 put_tty_driver(driver
);
1912 tty3270_del_views();
1915 MODULE_LICENSE("GPL");
1916 MODULE_ALIAS_CHARDEV_MAJOR(IBM_TTY3270_MAJOR
);
1918 module_init(tty3270_init
);
1919 module_exit(tty3270_exit
);