Loading...
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * IBM/3270 Driver - core functions.
4 *
5 * Author(s):
6 * Original 3270 Code for 2.4 written by Richard Hitt (UTS Global)
7 * Rewritten for 2.5 by Martin Schwidefsky <schwidefsky@de.ibm.com>
8 * Copyright IBM Corp. 2003, 2009
9 */
10
11#include <linux/module.h>
12#include <linux/err.h>
13#include <linux/init.h>
14#include <linux/interrupt.h>
15#include <linux/list.h>
16#include <linux/slab.h>
17#include <linux/types.h>
18#include <linux/wait.h>
19
20#include <asm/ccwdev.h>
21#include <asm/cio.h>
22#include <asm/ebcdic.h>
23#include <asm/diag.h>
24
25#include "raw3270.h"
26
27#include <linux/major.h>
28#include <linux/kdev_t.h>
29#include <linux/device.h>
30#include <linux/mutex.h>
31
32struct class *class3270;
33EXPORT_SYMBOL(class3270);
34
35/* The main 3270 data structure. */
36struct raw3270 {
37 struct list_head list;
38 struct ccw_device *cdev;
39 int minor;
40
41 int model, rows, cols;
42 int old_model, old_rows, old_cols;
43 unsigned int state;
44 unsigned long flags;
45
46 struct list_head req_queue; /* Request queue. */
47 struct list_head view_list; /* List of available views. */
48 struct raw3270_view *view; /* Active view. */
49
50 struct timer_list timer; /* Device timer. */
51
52 unsigned char *ascebc; /* ascii -> ebcdic table */
53
54 struct raw3270_view init_view;
55 struct raw3270_request init_reset;
56 struct raw3270_request init_readpart;
57 struct raw3270_request init_readmod;
58 unsigned char init_data[256];
59 struct work_struct resize_work;
60};
61
62/* raw3270->state */
63#define RAW3270_STATE_INIT 0 /* Initial state */
64#define RAW3270_STATE_RESET 1 /* Reset command is pending */
65#define RAW3270_STATE_W4ATTN 2 /* Wait for attention interrupt */
66#define RAW3270_STATE_READMOD 3 /* Read partition is pending */
67#define RAW3270_STATE_READY 4 /* Device is usable by views */
68
69/* raw3270->flags */
70#define RAW3270_FLAGS_14BITADDR 0 /* 14-bit buffer addresses */
71#define RAW3270_FLAGS_BUSY 1 /* Device busy, leave it alone */
72#define RAW3270_FLAGS_CONSOLE 2 /* Device is the console. */
73
74/* Semaphore to protect global data of raw3270 (devices, views, etc). */
75static DEFINE_MUTEX(raw3270_mutex);
76
77/* List of 3270 devices. */
78static LIST_HEAD(raw3270_devices);
79
80/*
81 * Flag to indicate if the driver has been registered. Some operations
82 * like waiting for the end of i/o need to be done differently as long
83 * as the kernel is still starting up (console support).
84 */
85static int raw3270_registered;
86
87/* Module parameters */
88static bool tubxcorrect;
89module_param(tubxcorrect, bool, 0);
90
91/*
92 * Wait queue for device init/delete, view delete.
93 */
94DECLARE_WAIT_QUEUE_HEAD(raw3270_wait_queue);
95EXPORT_SYMBOL(raw3270_wait_queue);
96
97static void __raw3270_disconnect(struct raw3270 *rp);
98
99/*
100 * Encode array for 12 bit 3270 addresses.
101 */
102static unsigned char raw3270_ebcgraf[64] = {
103 0x40, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7,
104 0xc8, 0xc9, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f,
105 0x50, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7,
106 0xd8, 0xd9, 0x5a, 0x5b, 0x5c, 0x5d, 0x5e, 0x5f,
107 0x60, 0x61, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7,
108 0xe8, 0xe9, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f,
109 0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7,
110 0xf8, 0xf9, 0x7a, 0x7b, 0x7c, 0x7d, 0x7e, 0x7f
111};
112
113static inline int raw3270_state_ready(struct raw3270 *rp)
114{
115 return rp->state == RAW3270_STATE_READY;
116}
117
118void raw3270_buffer_address(struct raw3270 *rp, char *cp, int x, int y)
119{
120 int addr;
121
122 if (x < 0)
123 x = max_t(int, 0, rp->view->cols + x);
124 if (y < 0)
125 y = max_t(int, 0, rp->view->rows + y);
126 addr = (y * rp->view->cols) + x;
127 if (test_bit(RAW3270_FLAGS_14BITADDR, &rp->flags)) {
128 cp[0] = (addr >> 8) & 0x3f;
129 cp[1] = addr & 0xff;
130 } else {
131 cp[0] = raw3270_ebcgraf[(addr >> 6) & 0x3f];
132 cp[1] = raw3270_ebcgraf[addr & 0x3f];
133 }
134}
135EXPORT_SYMBOL(raw3270_buffer_address);
136
137/*
138 * Allocate a new 3270 ccw request
139 */
140struct raw3270_request *raw3270_request_alloc(size_t size)
141{
142 struct raw3270_request *rq;
143
144 /* Allocate request structure */
145 rq = kzalloc(sizeof(*rq), GFP_KERNEL | GFP_DMA);
146 if (!rq)
147 return ERR_PTR(-ENOMEM);
148
149 /* alloc output buffer. */
150 if (size > 0) {
151 rq->buffer = kmalloc(size, GFP_KERNEL | GFP_DMA);
152 if (!rq->buffer) {
153 kfree(rq);
154 return ERR_PTR(-ENOMEM);
155 }
156 }
157 rq->size = size;
158 INIT_LIST_HEAD(&rq->list);
159
160 /*
161 * Setup ccw.
162 */
163 rq->ccw.cda = __pa(rq->buffer);
164 rq->ccw.flags = CCW_FLAG_SLI;
165
166 return rq;
167}
168EXPORT_SYMBOL(raw3270_request_alloc);
169
170/*
171 * Free 3270 ccw request
172 */
173void raw3270_request_free(struct raw3270_request *rq)
174{
175 kfree(rq->buffer);
176 kfree(rq);
177}
178EXPORT_SYMBOL(raw3270_request_free);
179
180/*
181 * Reset request to initial state.
182 */
183int raw3270_request_reset(struct raw3270_request *rq)
184{
185 if (WARN_ON_ONCE(!list_empty(&rq->list)))
186 return -EBUSY;
187 rq->ccw.cmd_code = 0;
188 rq->ccw.count = 0;
189 rq->ccw.cda = __pa(rq->buffer);
190 rq->ccw.flags = CCW_FLAG_SLI;
191 rq->rescnt = 0;
192 rq->rc = 0;
193 return 0;
194}
195EXPORT_SYMBOL(raw3270_request_reset);
196
197/*
198 * Set command code to ccw of a request.
199 */
200void raw3270_request_set_cmd(struct raw3270_request *rq, u8 cmd)
201{
202 rq->ccw.cmd_code = cmd;
203}
204EXPORT_SYMBOL(raw3270_request_set_cmd);
205
206/*
207 * Add data fragment to output buffer.
208 */
209int raw3270_request_add_data(struct raw3270_request *rq, void *data, size_t size)
210{
211 if (size + rq->ccw.count > rq->size)
212 return -E2BIG;
213 memcpy(rq->buffer + rq->ccw.count, data, size);
214 rq->ccw.count += size;
215 return 0;
216}
217EXPORT_SYMBOL(raw3270_request_add_data);
218
219/*
220 * Set address/length pair to ccw of a request.
221 */
222void raw3270_request_set_data(struct raw3270_request *rq, void *data, size_t size)
223{
224 rq->ccw.cda = __pa(data);
225 rq->ccw.count = size;
226}
227EXPORT_SYMBOL(raw3270_request_set_data);
228
229/*
230 * Set idal buffer to ccw of a request.
231 */
232void raw3270_request_set_idal(struct raw3270_request *rq, struct idal_buffer *ib)
233{
234 rq->ccw.cda = __pa(ib->data);
235 rq->ccw.count = ib->size;
236 rq->ccw.flags |= CCW_FLAG_IDA;
237}
238EXPORT_SYMBOL(raw3270_request_set_idal);
239
240/*
241 * Add the request to the request queue, try to start it if the
242 * 3270 device is idle. Return without waiting for end of i/o.
243 */
244static int __raw3270_start(struct raw3270 *rp, struct raw3270_view *view,
245 struct raw3270_request *rq)
246{
247 rq->view = view;
248 raw3270_get_view(view);
249 if (list_empty(&rp->req_queue) &&
250 !test_bit(RAW3270_FLAGS_BUSY, &rp->flags)) {
251 /* No other requests are on the queue. Start this one. */
252 rq->rc = ccw_device_start(rp->cdev, &rq->ccw,
253 (unsigned long)rq, 0, 0);
254 if (rq->rc) {
255 raw3270_put_view(view);
256 return rq->rc;
257 }
258 }
259 list_add_tail(&rq->list, &rp->req_queue);
260 return 0;
261}
262
263int raw3270_view_active(struct raw3270_view *view)
264{
265 struct raw3270 *rp = view->dev;
266
267 return rp && rp->view == view;
268}
269
270int raw3270_start(struct raw3270_view *view, struct raw3270_request *rq)
271{
272 unsigned long flags;
273 struct raw3270 *rp;
274 int rc;
275
276 spin_lock_irqsave(get_ccwdev_lock(view->dev->cdev), flags);
277 rp = view->dev;
278 if (!rp || rp->view != view)
279 rc = -EACCES;
280 else if (!raw3270_state_ready(rp))
281 rc = -EBUSY;
282 else
283 rc = __raw3270_start(rp, view, rq);
284 spin_unlock_irqrestore(get_ccwdev_lock(view->dev->cdev), flags);
285 return rc;
286}
287EXPORT_SYMBOL(raw3270_start);
288
289int raw3270_start_request(struct raw3270_view *view, struct raw3270_request *rq,
290 int cmd, void *data, size_t len)
291{
292 int rc;
293
294 rc = raw3270_request_reset(rq);
295 if (rc)
296 return rc;
297 raw3270_request_set_cmd(rq, cmd);
298 rc = raw3270_request_add_data(rq, data, len);
299 if (rc)
300 return rc;
301 return raw3270_start(view, rq);
302}
303EXPORT_SYMBOL(raw3270_start_request);
304
305int raw3270_start_locked(struct raw3270_view *view, struct raw3270_request *rq)
306{
307 struct raw3270 *rp;
308 int rc;
309
310 rp = view->dev;
311 if (!rp || rp->view != view)
312 rc = -EACCES;
313 else if (!raw3270_state_ready(rp))
314 rc = -EBUSY;
315 else
316 rc = __raw3270_start(rp, view, rq);
317 return rc;
318}
319EXPORT_SYMBOL(raw3270_start_locked);
320
321int raw3270_start_irq(struct raw3270_view *view, struct raw3270_request *rq)
322{
323 struct raw3270 *rp;
324
325 rp = view->dev;
326 rq->view = view;
327 raw3270_get_view(view);
328 list_add_tail(&rq->list, &rp->req_queue);
329 return 0;
330}
331EXPORT_SYMBOL(raw3270_start_irq);
332
333/*
334 * 3270 interrupt routine, called from the ccw_device layer
335 */
336static void raw3270_irq(struct ccw_device *cdev, unsigned long intparm, struct irb *irb)
337{
338 struct raw3270 *rp;
339 struct raw3270_view *view;
340 struct raw3270_request *rq;
341
342 rp = dev_get_drvdata(&cdev->dev);
343 if (!rp)
344 return;
345 rq = (struct raw3270_request *)intparm;
346 view = rq ? rq->view : rp->view;
347
348 if (!IS_ERR(irb)) {
349 /* Handle CE-DE-UE and subsequent UDE */
350 if (irb->scsw.cmd.dstat & DEV_STAT_DEV_END)
351 clear_bit(RAW3270_FLAGS_BUSY, &rp->flags);
352 if (irb->scsw.cmd.dstat == (DEV_STAT_CHN_END |
353 DEV_STAT_DEV_END |
354 DEV_STAT_UNIT_EXCEP))
355 set_bit(RAW3270_FLAGS_BUSY, &rp->flags);
356 /* Handle disconnected devices */
357 if ((irb->scsw.cmd.dstat & DEV_STAT_UNIT_CHECK) &&
358 (irb->ecw[0] & SNS0_INTERVENTION_REQ)) {
359 set_bit(RAW3270_FLAGS_BUSY, &rp->flags);
360 if (rp->state > RAW3270_STATE_RESET)
361 __raw3270_disconnect(rp);
362 }
363 /* Call interrupt handler of the view */
364 if (view)
365 view->fn->intv(view, rq, irb);
366 }
367
368 if (test_bit(RAW3270_FLAGS_BUSY, &rp->flags))
369 /* Device busy, do not start I/O */
370 return;
371
372 if (rq && !list_empty(&rq->list)) {
373 /* The request completed, remove from queue and do callback. */
374 list_del_init(&rq->list);
375 if (rq->callback)
376 rq->callback(rq, rq->callback_data);
377 /* Do put_device for get_device in raw3270_start. */
378 raw3270_put_view(view);
379 }
380
381 /*
382 * Try to start each request on request queue until one is
383 * started successful.
384 */
385 while (!list_empty(&rp->req_queue)) {
386 rq = list_entry(rp->req_queue.next, struct raw3270_request, list);
387 rq->rc = ccw_device_start(rp->cdev, &rq->ccw,
388 (unsigned long)rq, 0, 0);
389 if (rq->rc == 0)
390 break;
391 /* Start failed. Remove request and do callback. */
392 list_del_init(&rq->list);
393 if (rq->callback)
394 rq->callback(rq, rq->callback_data);
395 /* Do put_device for get_device in raw3270_start. */
396 raw3270_put_view(view);
397 }
398}
399
400/*
401 * To determine the size of the 3270 device we need to do:
402 * 1) send a 'read partition' data stream to the device
403 * 2) wait for the attn interrupt that precedes the query reply
404 * 3) do a read modified to get the query reply
405 * To make things worse we have to cope with intervention
406 * required (3270 device switched to 'stand-by') and command
407 * rejects (old devices that can't do 'read partition').
408 */
409struct raw3270_ua { /* Query Reply structure for Usable Area */
410 struct { /* Usable Area Query Reply Base */
411 short l; /* Length of this structured field */
412 char sfid; /* 0x81 if Query Reply */
413 char qcode; /* 0x81 if Usable Area */
414 char flags0;
415 char flags1;
416 short w; /* Width of usable area */
417 short h; /* Heigth of usavle area */
418 char units; /* 0x00:in; 0x01:mm */
419 int xr;
420 int yr;
421 char aw;
422 char ah;
423 short buffsz; /* Character buffer size, bytes */
424 char xmin;
425 char ymin;
426 char xmax;
427 char ymax;
428 } __packed uab;
429 struct { /* Alternate Usable Area Self-Defining Parameter */
430 char l; /* Length of this Self-Defining Parm */
431 char sdpid; /* 0x02 if Alternate Usable Area */
432 char res;
433 char auaid; /* 0x01 is Id for the A U A */
434 short wauai; /* Width of AUAi */
435 short hauai; /* Height of AUAi */
436 char auaunits; /* 0x00:in, 0x01:mm */
437 int auaxr;
438 int auayr;
439 char awauai;
440 char ahauai;
441 } __packed aua;
442} __packed;
443
444static void raw3270_size_device_vm(struct raw3270 *rp)
445{
446 int rc, model;
447 struct ccw_dev_id dev_id;
448 struct diag210 diag_data;
449 struct diag8c diag8c_data;
450
451 ccw_device_get_id(rp->cdev, &dev_id);
452 rc = diag8c(&diag8c_data, &dev_id);
453 if (!rc) {
454 rp->model = 2;
455 rp->rows = diag8c_data.height;
456 rp->cols = diag8c_data.width;
457 if (diag8c_data.flags & 1)
458 set_bit(RAW3270_FLAGS_14BITADDR, &rp->flags);
459 return;
460 }
461
462 diag_data.vrdcdvno = dev_id.devno;
463 diag_data.vrdclen = sizeof(struct diag210);
464 rc = diag210(&diag_data);
465 model = diag_data.vrdccrmd;
466 /* Use default model 2 if the size could not be detected */
467 if (rc || model < 2 || model > 5)
468 model = 2;
469 switch (model) {
470 case 2:
471 rp->model = model;
472 rp->rows = 24;
473 rp->cols = 80;
474 break;
475 case 3:
476 rp->model = model;
477 rp->rows = 32;
478 rp->cols = 80;
479 break;
480 case 4:
481 rp->model = model;
482 rp->rows = 43;
483 rp->cols = 80;
484 break;
485 case 5:
486 rp->model = model;
487 rp->rows = 27;
488 rp->cols = 132;
489 break;
490 }
491}
492
493static void raw3270_size_device(struct raw3270 *rp, char *init_data)
494{
495 struct raw3270_ua *uap;
496
497 /* Got a Query Reply */
498 uap = (struct raw3270_ua *)(init_data + 1);
499 /* Paranoia check. */
500 if (init_data[0] != 0x88 || uap->uab.qcode != 0x81) {
501 /* Couldn't detect size. Use default model 2. */
502 rp->model = 2;
503 rp->rows = 24;
504 rp->cols = 80;
505 return;
506 }
507 /* Copy rows/columns of default Usable Area */
508 rp->rows = uap->uab.h;
509 rp->cols = uap->uab.w;
510 /* Check for 14 bit addressing */
511 if ((uap->uab.flags0 & 0x0d) == 0x01)
512 set_bit(RAW3270_FLAGS_14BITADDR, &rp->flags);
513 /* Check for Alternate Usable Area */
514 if (uap->uab.l == sizeof(struct raw3270_ua) &&
515 uap->aua.sdpid == 0x02) {
516 rp->rows = uap->aua.hauai;
517 rp->cols = uap->aua.wauai;
518 }
519 /* Try to find a model. */
520 rp->model = 0;
521 if (rp->rows == 24 && rp->cols == 80)
522 rp->model = 2;
523 if (rp->rows == 32 && rp->cols == 80)
524 rp->model = 3;
525 if (rp->rows == 43 && rp->cols == 80)
526 rp->model = 4;
527 if (rp->rows == 27 && rp->cols == 132)
528 rp->model = 5;
529}
530
531static void raw3270_resize_work(struct work_struct *work)
532{
533 struct raw3270 *rp = container_of(work, struct raw3270, resize_work);
534 struct raw3270_view *view;
535
536 /* Notify views about new size */
537 list_for_each_entry(view, &rp->view_list, list) {
538 if (view->fn->resize)
539 view->fn->resize(view, rp->model, rp->rows, rp->cols,
540 rp->old_model, rp->old_rows, rp->old_cols);
541 }
542 rp->old_cols = rp->cols;
543 rp->old_rows = rp->rows;
544 rp->old_model = rp->model;
545 /* Setup processing done, now activate a view */
546 list_for_each_entry(view, &rp->view_list, list) {
547 rp->view = view;
548 if (view->fn->activate(view) == 0)
549 break;
550 rp->view = NULL;
551 }
552}
553
554static void raw3270_size_device_done(struct raw3270 *rp)
555{
556 rp->view = NULL;
557 rp->state = RAW3270_STATE_READY;
558 schedule_work(&rp->resize_work);
559}
560
561void raw3270_read_modified_cb(struct raw3270_request *rq, void *data)
562{
563 struct raw3270 *rp = rq->view->dev;
564
565 raw3270_size_device(rp, data);
566 raw3270_size_device_done(rp);
567}
568EXPORT_SYMBOL(raw3270_read_modified_cb);
569
570static void raw3270_read_modified(struct raw3270 *rp)
571{
572 if (rp->state != RAW3270_STATE_W4ATTN)
573 return;
574 /* Use 'read modified' to get the result of a read partition. */
575 memset(&rp->init_readmod, 0, sizeof(rp->init_readmod));
576 memset(&rp->init_data, 0, sizeof(rp->init_data));
577 rp->init_readmod.ccw.cmd_code = TC_READMOD;
578 rp->init_readmod.ccw.flags = CCW_FLAG_SLI;
579 rp->init_readmod.ccw.count = sizeof(rp->init_data);
580 rp->init_readmod.ccw.cda = (__u32)__pa(rp->init_data);
581 rp->init_readmod.callback = raw3270_read_modified_cb;
582 rp->init_readmod.callback_data = rp->init_data;
583 rp->state = RAW3270_STATE_READMOD;
584 raw3270_start_irq(&rp->init_view, &rp->init_readmod);
585}
586
587static void raw3270_writesf_readpart(struct raw3270 *rp)
588{
589 static const unsigned char wbuf[] = {
590 0x00, 0x07, 0x01, 0xff, 0x03, 0x00, 0x81
591 };
592
593 /* Store 'read partition' data stream to init_data */
594 memset(&rp->init_readpart, 0, sizeof(rp->init_readpart));
595 memset(&rp->init_data, 0, sizeof(rp->init_data));
596 memcpy(&rp->init_data, wbuf, sizeof(wbuf));
597 rp->init_readpart.ccw.cmd_code = TC_WRITESF;
598 rp->init_readpart.ccw.flags = CCW_FLAG_SLI;
599 rp->init_readpart.ccw.count = sizeof(wbuf);
600 rp->init_readpart.ccw.cda = (__u32)__pa(&rp->init_data);
601 rp->state = RAW3270_STATE_W4ATTN;
602 raw3270_start_irq(&rp->init_view, &rp->init_readpart);
603}
604
605/*
606 * Device reset
607 */
608static void raw3270_reset_device_cb(struct raw3270_request *rq, void *data)
609{
610 struct raw3270 *rp = rq->view->dev;
611
612 if (rp->state != RAW3270_STATE_RESET)
613 return;
614 if (rq->rc) {
615 /* Reset command failed. */
616 rp->state = RAW3270_STATE_INIT;
617 } else if (MACHINE_IS_VM) {
618 raw3270_size_device_vm(rp);
619 raw3270_size_device_done(rp);
620 } else {
621 raw3270_writesf_readpart(rp);
622 }
623 memset(&rp->init_reset, 0, sizeof(rp->init_reset));
624}
625
626static int __raw3270_reset_device(struct raw3270 *rp)
627{
628 int rc;
629
630 /* Check if reset is already pending */
631 if (rp->init_reset.view)
632 return -EBUSY;
633 /* Store reset data stream to init_data/init_reset */
634 rp->init_data[0] = TW_KR;
635 rp->init_reset.ccw.cmd_code = TC_EWRITEA;
636 rp->init_reset.ccw.flags = CCW_FLAG_SLI;
637 rp->init_reset.ccw.count = 1;
638 rp->init_reset.ccw.cda = (__u32)__pa(rp->init_data);
639 rp->init_reset.callback = raw3270_reset_device_cb;
640 rc = __raw3270_start(rp, &rp->init_view, &rp->init_reset);
641 if (rc == 0 && rp->state == RAW3270_STATE_INIT)
642 rp->state = RAW3270_STATE_RESET;
643 return rc;
644}
645
646static int raw3270_reset_device(struct raw3270 *rp)
647{
648 unsigned long flags;
649 int rc;
650
651 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
652 rc = __raw3270_reset_device(rp);
653 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
654 return rc;
655}
656
657int raw3270_reset(struct raw3270_view *view)
658{
659 struct raw3270 *rp;
660 int rc;
661
662 rp = view->dev;
663 if (!rp || rp->view != view)
664 rc = -EACCES;
665 else if (!raw3270_state_ready(rp))
666 rc = -EBUSY;
667 else
668 rc = raw3270_reset_device(view->dev);
669 return rc;
670}
671EXPORT_SYMBOL(raw3270_reset);
672
673static void __raw3270_disconnect(struct raw3270 *rp)
674{
675 struct raw3270_request *rq;
676 struct raw3270_view *view;
677
678 rp->state = RAW3270_STATE_INIT;
679 rp->view = &rp->init_view;
680 /* Cancel all queued requests */
681 while (!list_empty(&rp->req_queue)) {
682 rq = list_entry(rp->req_queue.next, struct raw3270_request, list);
683 view = rq->view;
684 rq->rc = -EACCES;
685 list_del_init(&rq->list);
686 if (rq->callback)
687 rq->callback(rq, rq->callback_data);
688 raw3270_put_view(view);
689 }
690 /* Start from scratch */
691 __raw3270_reset_device(rp);
692}
693
694static void raw3270_init_irq(struct raw3270_view *view, struct raw3270_request *rq,
695 struct irb *irb)
696{
697 struct raw3270 *rp;
698
699 if (rq) {
700 if (irb->scsw.cmd.dstat & DEV_STAT_UNIT_CHECK) {
701 if (irb->ecw[0] & SNS0_CMD_REJECT)
702 rq->rc = -EOPNOTSUPP;
703 else
704 rq->rc = -EIO;
705 }
706 }
707 if (irb->scsw.cmd.dstat & DEV_STAT_ATTENTION) {
708 /* Queue read modified after attention interrupt */
709 rp = view->dev;
710 raw3270_read_modified(rp);
711 }
712}
713
714static struct raw3270_fn raw3270_init_fn = {
715 .intv = raw3270_init_irq
716};
717
718/*
719 * Setup new 3270 device.
720 */
721static int raw3270_setup_device(struct ccw_device *cdev, struct raw3270 *rp,
722 char *ascebc)
723{
724 struct list_head *l;
725 struct raw3270 *tmp;
726 int minor;
727
728 memset(rp, 0, sizeof(struct raw3270));
729 /* Copy ebcdic -> ascii translation table. */
730 memcpy(ascebc, _ascebc, 256);
731 if (tubxcorrect) {
732 /* correct brackets and circumflex */
733 ascebc['['] = 0xad;
734 ascebc[']'] = 0xbd;
735 ascebc['^'] = 0xb0;
736 }
737 rp->ascebc = ascebc;
738
739 /* Set defaults. */
740 rp->rows = 24;
741 rp->cols = 80;
742 rp->old_rows = rp->rows;
743 rp->old_cols = rp->cols;
744
745 INIT_LIST_HEAD(&rp->req_queue);
746 INIT_LIST_HEAD(&rp->view_list);
747
748 rp->init_view.dev = rp;
749 rp->init_view.fn = &raw3270_init_fn;
750 rp->view = &rp->init_view;
751 INIT_WORK(&rp->resize_work, raw3270_resize_work);
752
753 /*
754 * Add device to list and find the smallest unused minor
755 * number for it. Note: there is no device with minor 0,
756 * see special case for fs3270.c:fs3270_open().
757 */
758 mutex_lock(&raw3270_mutex);
759 /* Keep the list sorted. */
760 minor = RAW3270_FIRSTMINOR;
761 rp->minor = -1;
762 list_for_each(l, &raw3270_devices) {
763 tmp = list_entry(l, struct raw3270, list);
764 if (tmp->minor > minor) {
765 rp->minor = minor;
766 __list_add(&rp->list, l->prev, l);
767 break;
768 }
769 minor++;
770 }
771 if (rp->minor == -1 && minor < RAW3270_MAXDEVS + RAW3270_FIRSTMINOR) {
772 rp->minor = minor;
773 list_add_tail(&rp->list, &raw3270_devices);
774 }
775 mutex_unlock(&raw3270_mutex);
776 /* No free minor number? Then give up. */
777 if (rp->minor == -1)
778 return -EUSERS;
779 rp->cdev = cdev;
780 dev_set_drvdata(&cdev->dev, rp);
781 cdev->handler = raw3270_irq;
782 return 0;
783}
784
785#ifdef CONFIG_TN3270_CONSOLE
786/* Tentative definition - see below for actual definition. */
787static struct ccw_driver raw3270_ccw_driver;
788
789static inline int raw3270_state_final(struct raw3270 *rp)
790{
791 return rp->state == RAW3270_STATE_INIT ||
792 rp->state == RAW3270_STATE_READY;
793}
794
795/*
796 * Setup 3270 device configured as console.
797 */
798struct raw3270 __init *raw3270_setup_console(void)
799{
800 struct ccw_device *cdev;
801 unsigned long flags;
802 struct raw3270 *rp;
803 char *ascebc;
804 int rc;
805
806 cdev = ccw_device_create_console(&raw3270_ccw_driver);
807 if (IS_ERR(cdev))
808 return ERR_CAST(cdev);
809
810 rp = kzalloc(sizeof(*rp), GFP_KERNEL | GFP_DMA);
811 ascebc = kzalloc(256, GFP_KERNEL);
812 rc = raw3270_setup_device(cdev, rp, ascebc);
813 if (rc)
814 return ERR_PTR(rc);
815 set_bit(RAW3270_FLAGS_CONSOLE, &rp->flags);
816
817 rc = ccw_device_enable_console(cdev);
818 if (rc) {
819 ccw_device_destroy_console(cdev);
820 return ERR_PTR(rc);
821 }
822
823 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
824 do {
825 __raw3270_reset_device(rp);
826 while (!raw3270_state_final(rp)) {
827 ccw_device_wait_idle(rp->cdev);
828 barrier();
829 }
830 } while (rp->state != RAW3270_STATE_READY);
831 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
832 return rp;
833}
834
835void raw3270_wait_cons_dev(struct raw3270 *rp)
836{
837 unsigned long flags;
838
839 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
840 ccw_device_wait_idle(rp->cdev);
841 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
842}
843
844#endif
845
846/*
847 * Create a 3270 device structure.
848 */
849static struct raw3270 *raw3270_create_device(struct ccw_device *cdev)
850{
851 struct raw3270 *rp;
852 char *ascebc;
853 int rc;
854
855 rp = kzalloc(sizeof(*rp), GFP_KERNEL | GFP_DMA);
856 if (!rp)
857 return ERR_PTR(-ENOMEM);
858 ascebc = kmalloc(256, GFP_KERNEL);
859 if (!ascebc) {
860 kfree(rp);
861 return ERR_PTR(-ENOMEM);
862 }
863 rc = raw3270_setup_device(cdev, rp, ascebc);
864 if (rc) {
865 kfree(rp->ascebc);
866 kfree(rp);
867 rp = ERR_PTR(rc);
868 }
869 /* Get reference to ccw_device structure. */
870 get_device(&cdev->dev);
871 return rp;
872}
873
874/*
875 * This helper just validates that it is safe to activate a
876 * view in the panic() context, due to locking restrictions.
877 */
878int raw3270_view_lock_unavailable(struct raw3270_view *view)
879{
880 struct raw3270 *rp = view->dev;
881
882 if (!rp)
883 return -ENODEV;
884 if (spin_is_locked(get_ccwdev_lock(rp->cdev)))
885 return -EBUSY;
886 return 0;
887}
888
889static int raw3270_assign_activate_view(struct raw3270 *rp, struct raw3270_view *view)
890{
891 rp->view = view;
892 return view->fn->activate(view);
893}
894
895static int __raw3270_activate_view(struct raw3270 *rp, struct raw3270_view *view)
896{
897 struct raw3270_view *oldview = NULL, *nv;
898 int rc;
899
900 if (rp->view == view)
901 return 0;
902
903 if (!raw3270_state_ready(rp))
904 return -EBUSY;
905
906 if (rp->view && rp->view->fn->deactivate) {
907 oldview = rp->view;
908 oldview->fn->deactivate(oldview);
909 }
910
911 rc = raw3270_assign_activate_view(rp, view);
912 if (!rc)
913 return 0;
914
915 /* Didn't work. Try to reactivate the old view. */
916 if (oldview) {
917 rc = raw3270_assign_activate_view(rp, oldview);
918 if (!rc)
919 return 0;
920 }
921
922 /* Didn't work as well. Try any other view. */
923 list_for_each_entry(nv, &rp->view_list, list) {
924 if (nv == view || nv == oldview)
925 continue;
926 rc = raw3270_assign_activate_view(rp, nv);
927 if (!rc)
928 break;
929 rp->view = NULL;
930 }
931 return rc;
932}
933
934/*
935 * Activate a view.
936 */
937int raw3270_activate_view(struct raw3270_view *view)
938{
939 struct raw3270 *rp;
940 unsigned long flags;
941 int rc;
942
943 rp = view->dev;
944 if (!rp)
945 return -ENODEV;
946 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
947 rc = __raw3270_activate_view(rp, view);
948 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
949 return rc;
950}
951EXPORT_SYMBOL(raw3270_activate_view);
952
953/*
954 * Deactivate current view.
955 */
956void raw3270_deactivate_view(struct raw3270_view *view)
957{
958 unsigned long flags;
959 struct raw3270 *rp;
960
961 rp = view->dev;
962 if (!rp)
963 return;
964 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
965 if (rp->view == view) {
966 view->fn->deactivate(view);
967 rp->view = NULL;
968 /* Move deactivated view to end of list. */
969 list_del_init(&view->list);
970 list_add_tail(&view->list, &rp->view_list);
971 /* Try to activate another view. */
972 if (raw3270_state_ready(rp)) {
973 list_for_each_entry(view, &rp->view_list, list) {
974 rp->view = view;
975 if (view->fn->activate(view) == 0)
976 break;
977 rp->view = NULL;
978 }
979 }
980 }
981 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
982}
983EXPORT_SYMBOL(raw3270_deactivate_view);
984
985/*
986 * Add view to device with minor "minor".
987 */
988int raw3270_add_view(struct raw3270_view *view, struct raw3270_fn *fn,
989 int minor, int subclass)
990{
991 unsigned long flags;
992 struct raw3270 *rp;
993 int rc;
994
995 if (minor <= 0)
996 return -ENODEV;
997 mutex_lock(&raw3270_mutex);
998 rc = -ENODEV;
999 list_for_each_entry(rp, &raw3270_devices, list) {
1000 if (rp->minor != minor)
1001 continue;
1002 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
1003 atomic_set(&view->ref_count, 2);
1004 view->dev = rp;
1005 view->fn = fn;
1006 view->model = rp->model;
1007 view->rows = rp->rows;
1008 view->cols = rp->cols;
1009 view->ascebc = rp->ascebc;
1010 spin_lock_init(&view->lock);
1011 lockdep_set_subclass(&view->lock, subclass);
1012 list_add(&view->list, &rp->view_list);
1013 rc = 0;
1014 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
1015 break;
1016 }
1017 mutex_unlock(&raw3270_mutex);
1018 return rc;
1019}
1020EXPORT_SYMBOL(raw3270_add_view);
1021
1022/*
1023 * Find specific view of device with minor "minor".
1024 */
1025struct raw3270_view *raw3270_find_view(struct raw3270_fn *fn, int minor)
1026{
1027 struct raw3270 *rp;
1028 struct raw3270_view *view, *tmp;
1029 unsigned long flags;
1030
1031 mutex_lock(&raw3270_mutex);
1032 view = ERR_PTR(-ENODEV);
1033 list_for_each_entry(rp, &raw3270_devices, list) {
1034 if (rp->minor != minor)
1035 continue;
1036 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
1037 list_for_each_entry(tmp, &rp->view_list, list) {
1038 if (tmp->fn == fn) {
1039 raw3270_get_view(tmp);
1040 view = tmp;
1041 break;
1042 }
1043 }
1044 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
1045 break;
1046 }
1047 mutex_unlock(&raw3270_mutex);
1048 return view;
1049}
1050EXPORT_SYMBOL(raw3270_find_view);
1051
1052/*
1053 * Remove view from device and free view structure via call to view->fn->free.
1054 */
1055void raw3270_del_view(struct raw3270_view *view)
1056{
1057 unsigned long flags;
1058 struct raw3270 *rp;
1059 struct raw3270_view *nv;
1060
1061 rp = view->dev;
1062 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
1063 if (rp->view == view) {
1064 view->fn->deactivate(view);
1065 rp->view = NULL;
1066 }
1067 list_del_init(&view->list);
1068 if (!rp->view && raw3270_state_ready(rp)) {
1069 /* Try to activate another view. */
1070 list_for_each_entry(nv, &rp->view_list, list) {
1071 if (nv->fn->activate(nv) == 0) {
1072 rp->view = nv;
1073 break;
1074 }
1075 }
1076 }
1077 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
1078 /* Wait for reference counter to drop to zero. */
1079 atomic_dec(&view->ref_count);
1080 wait_event(raw3270_wait_queue, atomic_read(&view->ref_count) == 0);
1081 if (view->fn->free)
1082 view->fn->free(view);
1083}
1084EXPORT_SYMBOL(raw3270_del_view);
1085
1086/*
1087 * Remove a 3270 device structure.
1088 */
1089static void raw3270_delete_device(struct raw3270 *rp)
1090{
1091 struct ccw_device *cdev;
1092
1093 /* Remove from device chain. */
1094 mutex_lock(&raw3270_mutex);
1095 list_del_init(&rp->list);
1096 mutex_unlock(&raw3270_mutex);
1097
1098 /* Disconnect from ccw_device. */
1099 cdev = rp->cdev;
1100 rp->cdev = NULL;
1101 dev_set_drvdata(&cdev->dev, NULL);
1102 cdev->handler = NULL;
1103
1104 /* Put ccw_device structure. */
1105 put_device(&cdev->dev);
1106
1107 /* Now free raw3270 structure. */
1108 kfree(rp->ascebc);
1109 kfree(rp);
1110}
1111
1112static int raw3270_probe(struct ccw_device *cdev)
1113{
1114 return 0;
1115}
1116
1117/*
1118 * Additional attributes for a 3270 device
1119 */
1120static ssize_t model_show(struct device *dev, struct device_attribute *attr,
1121 char *buf)
1122{
1123 return sysfs_emit(buf, "%i\n",
1124 ((struct raw3270 *)dev_get_drvdata(dev))->model);
1125}
1126static DEVICE_ATTR_RO(model);
1127
1128static ssize_t rows_show(struct device *dev, struct device_attribute *attr,
1129 char *buf)
1130{
1131 return sysfs_emit(buf, "%i\n",
1132 ((struct raw3270 *)dev_get_drvdata(dev))->rows);
1133}
1134static DEVICE_ATTR_RO(rows);
1135
1136static ssize_t
1137columns_show(struct device *dev, struct device_attribute *attr,
1138 char *buf)
1139{
1140 return sysfs_emit(buf, "%i\n",
1141 ((struct raw3270 *)dev_get_drvdata(dev))->cols);
1142}
1143static DEVICE_ATTR_RO(columns);
1144
1145static struct attribute *raw3270_attrs[] = {
1146 &dev_attr_model.attr,
1147 &dev_attr_rows.attr,
1148 &dev_attr_columns.attr,
1149 NULL,
1150};
1151
1152static const struct attribute_group raw3270_attr_group = {
1153 .attrs = raw3270_attrs,
1154};
1155
1156static int raw3270_create_attributes(struct raw3270 *rp)
1157{
1158 return sysfs_create_group(&rp->cdev->dev.kobj, &raw3270_attr_group);
1159}
1160
1161/*
1162 * Notifier for device addition/removal
1163 */
1164static LIST_HEAD(raw3270_notifier);
1165
1166int raw3270_register_notifier(struct raw3270_notifier *notifier)
1167{
1168 struct raw3270 *rp;
1169
1170 mutex_lock(&raw3270_mutex);
1171 list_add_tail(¬ifier->list, &raw3270_notifier);
1172 list_for_each_entry(rp, &raw3270_devices, list)
1173 notifier->create(rp->minor);
1174 mutex_unlock(&raw3270_mutex);
1175 return 0;
1176}
1177EXPORT_SYMBOL(raw3270_register_notifier);
1178
1179void raw3270_unregister_notifier(struct raw3270_notifier *notifier)
1180{
1181 struct raw3270 *rp;
1182
1183 mutex_lock(&raw3270_mutex);
1184 list_for_each_entry(rp, &raw3270_devices, list)
1185 notifier->destroy(rp->minor);
1186 list_del(¬ifier->list);
1187 mutex_unlock(&raw3270_mutex);
1188}
1189EXPORT_SYMBOL(raw3270_unregister_notifier);
1190
1191/*
1192 * Set 3270 device online.
1193 */
1194static int raw3270_set_online(struct ccw_device *cdev)
1195{
1196 struct raw3270_notifier *np;
1197 struct raw3270 *rp;
1198 int rc;
1199
1200 rp = raw3270_create_device(cdev);
1201 if (IS_ERR(rp))
1202 return PTR_ERR(rp);
1203 rc = raw3270_create_attributes(rp);
1204 if (rc)
1205 goto failure;
1206 raw3270_reset_device(rp);
1207 mutex_lock(&raw3270_mutex);
1208 list_for_each_entry(np, &raw3270_notifier, list)
1209 np->create(rp->minor);
1210 mutex_unlock(&raw3270_mutex);
1211 return 0;
1212
1213failure:
1214 raw3270_delete_device(rp);
1215 return rc;
1216}
1217
1218/*
1219 * Remove 3270 device structure.
1220 */
1221static void raw3270_remove(struct ccw_device *cdev)
1222{
1223 unsigned long flags;
1224 struct raw3270 *rp;
1225 struct raw3270_view *v;
1226 struct raw3270_notifier *np;
1227
1228 rp = dev_get_drvdata(&cdev->dev);
1229 /*
1230 * _remove is the opposite of _probe; it's probe that
1231 * should set up rp. raw3270_remove gets entered for
1232 * devices even if they haven't been varied online.
1233 * Thus, rp may validly be NULL here.
1234 */
1235 if (!rp)
1236 return;
1237
1238 sysfs_remove_group(&cdev->dev.kobj, &raw3270_attr_group);
1239
1240 /* Deactivate current view and remove all views. */
1241 spin_lock_irqsave(get_ccwdev_lock(cdev), flags);
1242 if (rp->view) {
1243 if (rp->view->fn->deactivate)
1244 rp->view->fn->deactivate(rp->view);
1245 rp->view = NULL;
1246 }
1247 while (!list_empty(&rp->view_list)) {
1248 v = list_entry(rp->view_list.next, struct raw3270_view, list);
1249 if (v->fn->release)
1250 v->fn->release(v);
1251 spin_unlock_irqrestore(get_ccwdev_lock(cdev), flags);
1252 raw3270_del_view(v);
1253 spin_lock_irqsave(get_ccwdev_lock(cdev), flags);
1254 }
1255 spin_unlock_irqrestore(get_ccwdev_lock(cdev), flags);
1256
1257 mutex_lock(&raw3270_mutex);
1258 list_for_each_entry(np, &raw3270_notifier, list)
1259 np->destroy(rp->minor);
1260 mutex_unlock(&raw3270_mutex);
1261
1262 /* Reset 3270 device. */
1263 raw3270_reset_device(rp);
1264 /* And finally remove it. */
1265 raw3270_delete_device(rp);
1266}
1267
1268/*
1269 * Set 3270 device offline.
1270 */
1271static int raw3270_set_offline(struct ccw_device *cdev)
1272{
1273 struct raw3270 *rp;
1274
1275 rp = dev_get_drvdata(&cdev->dev);
1276 if (test_bit(RAW3270_FLAGS_CONSOLE, &rp->flags))
1277 return -EBUSY;
1278 raw3270_remove(cdev);
1279 return 0;
1280}
1281
1282static struct ccw_device_id raw3270_id[] = {
1283 { CCW_DEVICE(0x3270, 0) },
1284 { CCW_DEVICE(0x3271, 0) },
1285 { CCW_DEVICE(0x3272, 0) },
1286 { CCW_DEVICE(0x3273, 0) },
1287 { CCW_DEVICE(0x3274, 0) },
1288 { CCW_DEVICE(0x3275, 0) },
1289 { CCW_DEVICE(0x3276, 0) },
1290 { CCW_DEVICE(0x3277, 0) },
1291 { CCW_DEVICE(0x3278, 0) },
1292 { CCW_DEVICE(0x3279, 0) },
1293 { CCW_DEVICE(0x3174, 0) },
1294 { /* end of list */ },
1295};
1296
1297static struct ccw_driver raw3270_ccw_driver = {
1298 .driver = {
1299 .name = "3270",
1300 .owner = THIS_MODULE,
1301 },
1302 .ids = raw3270_id,
1303 .probe = &raw3270_probe,
1304 .remove = &raw3270_remove,
1305 .set_online = &raw3270_set_online,
1306 .set_offline = &raw3270_set_offline,
1307 .int_class = IRQIO_C70,
1308};
1309
1310static int raw3270_init(void)
1311{
1312 struct raw3270 *rp;
1313 int rc;
1314
1315 if (raw3270_registered)
1316 return 0;
1317 raw3270_registered = 1;
1318 rc = ccw_driver_register(&raw3270_ccw_driver);
1319 if (rc == 0) {
1320 /* Create attributes for early (= console) device. */
1321 mutex_lock(&raw3270_mutex);
1322 class3270 = class_create("3270");
1323 list_for_each_entry(rp, &raw3270_devices, list) {
1324 get_device(&rp->cdev->dev);
1325 raw3270_create_attributes(rp);
1326 }
1327 mutex_unlock(&raw3270_mutex);
1328 }
1329 return rc;
1330}
1331
1332static void raw3270_exit(void)
1333{
1334 ccw_driver_unregister(&raw3270_ccw_driver);
1335 class_destroy(class3270);
1336}
1337
1338MODULE_LICENSE("GPL");
1339
1340module_init(raw3270_init);
1341module_exit(raw3270_exit);
1/*
2 * IBM/3270 Driver - core functions.
3 *
4 * Author(s):
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, 2009
8 */
9
10#include <linux/kernel_stat.h>
11#include <linux/module.h>
12#include <linux/err.h>
13#include <linux/init.h>
14#include <linux/interrupt.h>
15#include <linux/list.h>
16#include <linux/slab.h>
17#include <linux/types.h>
18#include <linux/wait.h>
19
20#include <asm/ccwdev.h>
21#include <asm/cio.h>
22#include <asm/ebcdic.h>
23#include <asm/diag.h>
24
25#include "raw3270.h"
26
27#include <linux/major.h>
28#include <linux/kdev_t.h>
29#include <linux/device.h>
30#include <linux/mutex.h>
31
32static struct class *class3270;
33
34/* The main 3270 data structure. */
35struct raw3270 {
36 struct list_head list;
37 struct ccw_device *cdev;
38 int minor;
39
40 short model, rows, cols;
41 unsigned long flags;
42
43 struct list_head req_queue; /* Request queue. */
44 struct list_head view_list; /* List of available views. */
45 struct raw3270_view *view; /* Active view. */
46
47 struct timer_list timer; /* Device timer. */
48
49 unsigned char *ascebc; /* ascii -> ebcdic table */
50 struct device *clttydev; /* 3270-class tty device ptr */
51 struct device *cltubdev; /* 3270-class tub device ptr */
52
53 struct raw3270_request init_request;
54 unsigned char init_data[256];
55};
56
57/* raw3270->flags */
58#define RAW3270_FLAGS_14BITADDR 0 /* 14-bit buffer addresses */
59#define RAW3270_FLAGS_BUSY 1 /* Device busy, leave it alone */
60#define RAW3270_FLAGS_ATTN 2 /* Device sent an ATTN interrupt */
61#define RAW3270_FLAGS_READY 4 /* Device is useable by views */
62#define RAW3270_FLAGS_CONSOLE 8 /* Device is the console. */
63#define RAW3270_FLAGS_FROZEN 16 /* set if 3270 is frozen for suspend */
64
65/* Semaphore to protect global data of raw3270 (devices, views, etc). */
66static DEFINE_MUTEX(raw3270_mutex);
67
68/* List of 3270 devices. */
69static LIST_HEAD(raw3270_devices);
70
71/*
72 * Flag to indicate if the driver has been registered. Some operations
73 * like waiting for the end of i/o need to be done differently as long
74 * as the kernel is still starting up (console support).
75 */
76static int raw3270_registered;
77
78/* Module parameters */
79static int tubxcorrect = 0;
80module_param(tubxcorrect, bool, 0);
81
82/*
83 * Wait queue for device init/delete, view delete.
84 */
85DECLARE_WAIT_QUEUE_HEAD(raw3270_wait_queue);
86
87/*
88 * Encode array for 12 bit 3270 addresses.
89 */
90static unsigned char raw3270_ebcgraf[64] = {
91 0x40, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7,
92 0xc8, 0xc9, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f,
93 0x50, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7,
94 0xd8, 0xd9, 0x5a, 0x5b, 0x5c, 0x5d, 0x5e, 0x5f,
95 0x60, 0x61, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7,
96 0xe8, 0xe9, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f,
97 0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7,
98 0xf8, 0xf9, 0x7a, 0x7b, 0x7c, 0x7d, 0x7e, 0x7f
99};
100
101void
102raw3270_buffer_address(struct raw3270 *rp, char *cp, unsigned short addr)
103{
104 if (test_bit(RAW3270_FLAGS_14BITADDR, &rp->flags)) {
105 cp[0] = (addr >> 8) & 0x3f;
106 cp[1] = addr & 0xff;
107 } else {
108 cp[0] = raw3270_ebcgraf[(addr >> 6) & 0x3f];
109 cp[1] = raw3270_ebcgraf[addr & 0x3f];
110 }
111}
112
113/*
114 * Allocate a new 3270 ccw request
115 */
116struct raw3270_request *
117raw3270_request_alloc(size_t size)
118{
119 struct raw3270_request *rq;
120
121 /* Allocate request structure */
122 rq = kzalloc(sizeof(struct raw3270_request), GFP_KERNEL | GFP_DMA);
123 if (!rq)
124 return ERR_PTR(-ENOMEM);
125
126 /* alloc output buffer. */
127 if (size > 0) {
128 rq->buffer = kmalloc(size, GFP_KERNEL | GFP_DMA);
129 if (!rq->buffer) {
130 kfree(rq);
131 return ERR_PTR(-ENOMEM);
132 }
133 }
134 rq->size = size;
135 INIT_LIST_HEAD(&rq->list);
136
137 /*
138 * Setup ccw.
139 */
140 rq->ccw.cda = __pa(rq->buffer);
141 rq->ccw.flags = CCW_FLAG_SLI;
142
143 return rq;
144}
145
146/*
147 * Free 3270 ccw request
148 */
149void
150raw3270_request_free (struct raw3270_request *rq)
151{
152 kfree(rq->buffer);
153 kfree(rq);
154}
155
156/*
157 * Reset request to initial state.
158 */
159void
160raw3270_request_reset(struct raw3270_request *rq)
161{
162 BUG_ON(!list_empty(&rq->list));
163 rq->ccw.cmd_code = 0;
164 rq->ccw.count = 0;
165 rq->ccw.cda = __pa(rq->buffer);
166 rq->ccw.flags = CCW_FLAG_SLI;
167 rq->rescnt = 0;
168 rq->rc = 0;
169}
170
171/*
172 * Set command code to ccw of a request.
173 */
174void
175raw3270_request_set_cmd(struct raw3270_request *rq, u8 cmd)
176{
177 rq->ccw.cmd_code = cmd;
178}
179
180/*
181 * Add data fragment to output buffer.
182 */
183int
184raw3270_request_add_data(struct raw3270_request *rq, void *data, size_t size)
185{
186 if (size + rq->ccw.count > rq->size)
187 return -E2BIG;
188 memcpy(rq->buffer + rq->ccw.count, data, size);
189 rq->ccw.count += size;
190 return 0;
191}
192
193/*
194 * Set address/length pair to ccw of a request.
195 */
196void
197raw3270_request_set_data(struct raw3270_request *rq, void *data, size_t size)
198{
199 rq->ccw.cda = __pa(data);
200 rq->ccw.count = size;
201}
202
203/*
204 * Set idal buffer to ccw of a request.
205 */
206void
207raw3270_request_set_idal(struct raw3270_request *rq, struct idal_buffer *ib)
208{
209 rq->ccw.cda = __pa(ib->data);
210 rq->ccw.count = ib->size;
211 rq->ccw.flags |= CCW_FLAG_IDA;
212}
213
214/*
215 * Stop running ccw.
216 */
217static int
218raw3270_halt_io_nolock(struct raw3270 *rp, struct raw3270_request *rq)
219{
220 int retries;
221 int rc;
222
223 if (raw3270_request_final(rq))
224 return 0;
225 /* Check if interrupt has already been processed */
226 for (retries = 0; retries < 5; retries++) {
227 if (retries < 2)
228 rc = ccw_device_halt(rp->cdev, (long) rq);
229 else
230 rc = ccw_device_clear(rp->cdev, (long) rq);
231 if (rc == 0)
232 break; /* termination successful */
233 }
234 return rc;
235}
236
237static int
238raw3270_halt_io(struct raw3270 *rp, struct raw3270_request *rq)
239{
240 unsigned long flags;
241 int rc;
242
243 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
244 rc = raw3270_halt_io_nolock(rp, rq);
245 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
246 return rc;
247}
248
249/*
250 * Add the request to the request queue, try to start it if the
251 * 3270 device is idle. Return without waiting for end of i/o.
252 */
253static int
254__raw3270_start(struct raw3270 *rp, struct raw3270_view *view,
255 struct raw3270_request *rq)
256{
257 rq->view = view;
258 raw3270_get_view(view);
259 if (list_empty(&rp->req_queue) &&
260 !test_bit(RAW3270_FLAGS_BUSY, &rp->flags)) {
261 /* No other requests are on the queue. Start this one. */
262 rq->rc = ccw_device_start(rp->cdev, &rq->ccw,
263 (unsigned long) rq, 0, 0);
264 if (rq->rc) {
265 raw3270_put_view(view);
266 return rq->rc;
267 }
268 }
269 list_add_tail(&rq->list, &rp->req_queue);
270 return 0;
271}
272
273int
274raw3270_start(struct raw3270_view *view, struct raw3270_request *rq)
275{
276 unsigned long flags;
277 struct raw3270 *rp;
278 int rc;
279
280 spin_lock_irqsave(get_ccwdev_lock(view->dev->cdev), flags);
281 rp = view->dev;
282 if (!rp || rp->view != view ||
283 test_bit(RAW3270_FLAGS_FROZEN, &rp->flags))
284 rc = -EACCES;
285 else if (!test_bit(RAW3270_FLAGS_READY, &rp->flags))
286 rc = -ENODEV;
287 else
288 rc = __raw3270_start(rp, view, rq);
289 spin_unlock_irqrestore(get_ccwdev_lock(view->dev->cdev), flags);
290 return rc;
291}
292
293int
294raw3270_start_locked(struct raw3270_view *view, struct raw3270_request *rq)
295{
296 struct raw3270 *rp;
297 int rc;
298
299 rp = view->dev;
300 if (!rp || rp->view != view ||
301 test_bit(RAW3270_FLAGS_FROZEN, &rp->flags))
302 rc = -EACCES;
303 else if (!test_bit(RAW3270_FLAGS_READY, &rp->flags))
304 rc = -ENODEV;
305 else
306 rc = __raw3270_start(rp, view, rq);
307 return rc;
308}
309
310int
311raw3270_start_irq(struct raw3270_view *view, struct raw3270_request *rq)
312{
313 struct raw3270 *rp;
314
315 rp = view->dev;
316 rq->view = view;
317 raw3270_get_view(view);
318 list_add_tail(&rq->list, &rp->req_queue);
319 return 0;
320}
321
322/*
323 * 3270 interrupt routine, called from the ccw_device layer
324 */
325static void
326raw3270_irq (struct ccw_device *cdev, unsigned long intparm, struct irb *irb)
327{
328 struct raw3270 *rp;
329 struct raw3270_view *view;
330 struct raw3270_request *rq;
331 int rc;
332
333 kstat_cpu(smp_processor_id()).irqs[IOINT_C70]++;
334 rp = dev_get_drvdata(&cdev->dev);
335 if (!rp)
336 return;
337 rq = (struct raw3270_request *) intparm;
338 view = rq ? rq->view : rp->view;
339
340 if (IS_ERR(irb))
341 rc = RAW3270_IO_RETRY;
342 else if (irb->scsw.cmd.fctl & SCSW_FCTL_HALT_FUNC) {
343 rq->rc = -EIO;
344 rc = RAW3270_IO_DONE;
345 } else if (irb->scsw.cmd.dstat == (DEV_STAT_CHN_END | DEV_STAT_DEV_END |
346 DEV_STAT_UNIT_EXCEP)) {
347 /* Handle CE-DE-UE and subsequent UDE */
348 set_bit(RAW3270_FLAGS_BUSY, &rp->flags);
349 rc = RAW3270_IO_BUSY;
350 } else if (test_bit(RAW3270_FLAGS_BUSY, &rp->flags)) {
351 /* Wait for UDE if busy flag is set. */
352 if (irb->scsw.cmd.dstat & DEV_STAT_DEV_END) {
353 clear_bit(RAW3270_FLAGS_BUSY, &rp->flags);
354 /* Got it, now retry. */
355 rc = RAW3270_IO_RETRY;
356 } else
357 rc = RAW3270_IO_BUSY;
358 } else if (view)
359 rc = view->fn->intv(view, rq, irb);
360 else
361 rc = RAW3270_IO_DONE;
362
363 switch (rc) {
364 case RAW3270_IO_DONE:
365 break;
366 case RAW3270_IO_BUSY:
367 /*
368 * Intervention required by the operator. We have to wait
369 * for unsolicited device end.
370 */
371 return;
372 case RAW3270_IO_RETRY:
373 if (!rq)
374 break;
375 rq->rc = ccw_device_start(rp->cdev, &rq->ccw,
376 (unsigned long) rq, 0, 0);
377 if (rq->rc == 0)
378 return; /* Successfully restarted. */
379 break;
380 case RAW3270_IO_STOP:
381 if (!rq)
382 break;
383 raw3270_halt_io_nolock(rp, rq);
384 rq->rc = -EIO;
385 break;
386 default:
387 BUG();
388 }
389 if (rq) {
390 BUG_ON(list_empty(&rq->list));
391 /* The request completed, remove from queue and do callback. */
392 list_del_init(&rq->list);
393 if (rq->callback)
394 rq->callback(rq, rq->callback_data);
395 /* Do put_device for get_device in raw3270_start. */
396 raw3270_put_view(view);
397 }
398 /*
399 * Try to start each request on request queue until one is
400 * started successful.
401 */
402 while (!list_empty(&rp->req_queue)) {
403 rq = list_entry(rp->req_queue.next,struct raw3270_request,list);
404 rq->rc = ccw_device_start(rp->cdev, &rq->ccw,
405 (unsigned long) rq, 0, 0);
406 if (rq->rc == 0)
407 break;
408 /* Start failed. Remove request and do callback. */
409 list_del_init(&rq->list);
410 if (rq->callback)
411 rq->callback(rq, rq->callback_data);
412 /* Do put_device for get_device in raw3270_start. */
413 raw3270_put_view(view);
414 }
415}
416
417/*
418 * Size sensing.
419 */
420
421struct raw3270_ua { /* Query Reply structure for Usable Area */
422 struct { /* Usable Area Query Reply Base */
423 short l; /* Length of this structured field */
424 char sfid; /* 0x81 if Query Reply */
425 char qcode; /* 0x81 if Usable Area */
426 char flags0;
427 char flags1;
428 short w; /* Width of usable area */
429 short h; /* Heigth of usavle area */
430 char units; /* 0x00:in; 0x01:mm */
431 int xr;
432 int yr;
433 char aw;
434 char ah;
435 short buffsz; /* Character buffer size, bytes */
436 char xmin;
437 char ymin;
438 char xmax;
439 char ymax;
440 } __attribute__ ((packed)) uab;
441 struct { /* Alternate Usable Area Self-Defining Parameter */
442 char l; /* Length of this Self-Defining Parm */
443 char sdpid; /* 0x02 if Alternate Usable Area */
444 char res;
445 char auaid; /* 0x01 is Id for the A U A */
446 short wauai; /* Width of AUAi */
447 short hauai; /* Height of AUAi */
448 char auaunits; /* 0x00:in, 0x01:mm */
449 int auaxr;
450 int auayr;
451 char awauai;
452 char ahauai;
453 } __attribute__ ((packed)) aua;
454} __attribute__ ((packed));
455
456static struct diag210 raw3270_init_diag210;
457static DEFINE_MUTEX(raw3270_init_mutex);
458
459static int
460raw3270_init_irq(struct raw3270_view *view, struct raw3270_request *rq,
461 struct irb *irb)
462{
463 /*
464 * Unit-Check Processing:
465 * Expect Command Reject or Intervention Required.
466 */
467 if (irb->scsw.cmd.dstat & DEV_STAT_UNIT_CHECK) {
468 /* Request finished abnormally. */
469 if (irb->ecw[0] & SNS0_INTERVENTION_REQ) {
470 set_bit(RAW3270_FLAGS_BUSY, &view->dev->flags);
471 return RAW3270_IO_BUSY;
472 }
473 }
474 if (rq) {
475 if (irb->scsw.cmd.dstat & DEV_STAT_UNIT_CHECK) {
476 if (irb->ecw[0] & SNS0_CMD_REJECT)
477 rq->rc = -EOPNOTSUPP;
478 else
479 rq->rc = -EIO;
480 } else
481 /* Request finished normally. Copy residual count. */
482 rq->rescnt = irb->scsw.cmd.count;
483 }
484 if (irb->scsw.cmd.dstat & DEV_STAT_ATTENTION) {
485 set_bit(RAW3270_FLAGS_ATTN, &view->dev->flags);
486 wake_up(&raw3270_wait_queue);
487 }
488 return RAW3270_IO_DONE;
489}
490
491static struct raw3270_fn raw3270_init_fn = {
492 .intv = raw3270_init_irq
493};
494
495static struct raw3270_view raw3270_init_view = {
496 .fn = &raw3270_init_fn
497};
498
499/*
500 * raw3270_wait/raw3270_wait_interruptible/__raw3270_wakeup
501 * Wait for end of request. The request must have been started
502 * with raw3270_start, rc = 0. The device lock may NOT have been
503 * released between calling raw3270_start and raw3270_wait.
504 */
505static void
506raw3270_wake_init(struct raw3270_request *rq, void *data)
507{
508 wake_up((wait_queue_head_t *) data);
509}
510
511/*
512 * Special wait function that can cope with console initialization.
513 */
514static int
515raw3270_start_init(struct raw3270 *rp, struct raw3270_view *view,
516 struct raw3270_request *rq)
517{
518 unsigned long flags;
519 int rc;
520
521#ifdef CONFIG_TN3270_CONSOLE
522 if (raw3270_registered == 0) {
523 spin_lock_irqsave(get_ccwdev_lock(view->dev->cdev), flags);
524 rq->callback = NULL;
525 rc = __raw3270_start(rp, view, rq);
526 if (rc == 0)
527 while (!raw3270_request_final(rq)) {
528 wait_cons_dev();
529 barrier();
530 }
531 spin_unlock_irqrestore(get_ccwdev_lock(view->dev->cdev), flags);
532 return rq->rc;
533 }
534#endif
535 rq->callback = raw3270_wake_init;
536 rq->callback_data = &raw3270_wait_queue;
537 spin_lock_irqsave(get_ccwdev_lock(view->dev->cdev), flags);
538 rc = __raw3270_start(rp, view, rq);
539 spin_unlock_irqrestore(get_ccwdev_lock(view->dev->cdev), flags);
540 if (rc)
541 return rc;
542 /* Now wait for the completion. */
543 rc = wait_event_interruptible(raw3270_wait_queue,
544 raw3270_request_final(rq));
545 if (rc == -ERESTARTSYS) { /* Interrupted by a signal. */
546 raw3270_halt_io(view->dev, rq);
547 /* No wait for the halt to complete. */
548 wait_event(raw3270_wait_queue, raw3270_request_final(rq));
549 return -ERESTARTSYS;
550 }
551 return rq->rc;
552}
553
554static int
555__raw3270_size_device_vm(struct raw3270 *rp)
556{
557 int rc, model;
558 struct ccw_dev_id dev_id;
559
560 ccw_device_get_id(rp->cdev, &dev_id);
561 raw3270_init_diag210.vrdcdvno = dev_id.devno;
562 raw3270_init_diag210.vrdclen = sizeof(struct diag210);
563 rc = diag210(&raw3270_init_diag210);
564 if (rc)
565 return rc;
566 model = raw3270_init_diag210.vrdccrmd;
567 switch (model) {
568 case 2:
569 rp->model = model;
570 rp->rows = 24;
571 rp->cols = 80;
572 break;
573 case 3:
574 rp->model = model;
575 rp->rows = 32;
576 rp->cols = 80;
577 break;
578 case 4:
579 rp->model = model;
580 rp->rows = 43;
581 rp->cols = 80;
582 break;
583 case 5:
584 rp->model = model;
585 rp->rows = 27;
586 rp->cols = 132;
587 break;
588 default:
589 rc = -EOPNOTSUPP;
590 break;
591 }
592 return rc;
593}
594
595static int
596__raw3270_size_device(struct raw3270 *rp)
597{
598 static const unsigned char wbuf[] =
599 { 0x00, 0x07, 0x01, 0xff, 0x03, 0x00, 0x81 };
600 struct raw3270_ua *uap;
601 int rc;
602
603 /*
604 * To determine the size of the 3270 device we need to do:
605 * 1) send a 'read partition' data stream to the device
606 * 2) wait for the attn interrupt that precedes the query reply
607 * 3) do a read modified to get the query reply
608 * To make things worse we have to cope with intervention
609 * required (3270 device switched to 'stand-by') and command
610 * rejects (old devices that can't do 'read partition').
611 */
612 memset(&rp->init_request, 0, sizeof(rp->init_request));
613 memset(&rp->init_data, 0, 256);
614 /* Store 'read partition' data stream to init_data */
615 memcpy(&rp->init_data, wbuf, sizeof(wbuf));
616 INIT_LIST_HEAD(&rp->init_request.list);
617 rp->init_request.ccw.cmd_code = TC_WRITESF;
618 rp->init_request.ccw.flags = CCW_FLAG_SLI;
619 rp->init_request.ccw.count = sizeof(wbuf);
620 rp->init_request.ccw.cda = (__u32) __pa(&rp->init_data);
621
622 rc = raw3270_start_init(rp, &raw3270_init_view, &rp->init_request);
623 if (rc)
624 /* Check error cases: -ERESTARTSYS, -EIO and -EOPNOTSUPP */
625 return rc;
626
627 /* Wait for attention interrupt. */
628#ifdef CONFIG_TN3270_CONSOLE
629 if (raw3270_registered == 0) {
630 unsigned long flags;
631
632 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
633 while (!test_and_clear_bit(RAW3270_FLAGS_ATTN, &rp->flags))
634 wait_cons_dev();
635 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
636 } else
637#endif
638 rc = wait_event_interruptible(raw3270_wait_queue,
639 test_and_clear_bit(RAW3270_FLAGS_ATTN, &rp->flags));
640 if (rc)
641 return rc;
642
643 /*
644 * The device accepted the 'read partition' command. Now
645 * set up a read ccw and issue it.
646 */
647 rp->init_request.ccw.cmd_code = TC_READMOD;
648 rp->init_request.ccw.flags = CCW_FLAG_SLI;
649 rp->init_request.ccw.count = sizeof(rp->init_data);
650 rp->init_request.ccw.cda = (__u32) __pa(rp->init_data);
651 rc = raw3270_start_init(rp, &raw3270_init_view, &rp->init_request);
652 if (rc)
653 return rc;
654 /* Got a Query Reply */
655 uap = (struct raw3270_ua *) (rp->init_data + 1);
656 /* Paranoia check. */
657 if (rp->init_data[0] != 0x88 || uap->uab.qcode != 0x81)
658 return -EOPNOTSUPP;
659 /* Copy rows/columns of default Usable Area */
660 rp->rows = uap->uab.h;
661 rp->cols = uap->uab.w;
662 /* Check for 14 bit addressing */
663 if ((uap->uab.flags0 & 0x0d) == 0x01)
664 set_bit(RAW3270_FLAGS_14BITADDR, &rp->flags);
665 /* Check for Alternate Usable Area */
666 if (uap->uab.l == sizeof(struct raw3270_ua) &&
667 uap->aua.sdpid == 0x02) {
668 rp->rows = uap->aua.hauai;
669 rp->cols = uap->aua.wauai;
670 }
671 return 0;
672}
673
674static int
675raw3270_size_device(struct raw3270 *rp)
676{
677 int rc;
678
679 mutex_lock(&raw3270_init_mutex);
680 rp->view = &raw3270_init_view;
681 raw3270_init_view.dev = rp;
682 if (MACHINE_IS_VM)
683 rc = __raw3270_size_device_vm(rp);
684 else
685 rc = __raw3270_size_device(rp);
686 raw3270_init_view.dev = NULL;
687 rp->view = NULL;
688 mutex_unlock(&raw3270_init_mutex);
689 if (rc == 0) { /* Found something. */
690 /* Try to find a model. */
691 rp->model = 0;
692 if (rp->rows == 24 && rp->cols == 80)
693 rp->model = 2;
694 if (rp->rows == 32 && rp->cols == 80)
695 rp->model = 3;
696 if (rp->rows == 43 && rp->cols == 80)
697 rp->model = 4;
698 if (rp->rows == 27 && rp->cols == 132)
699 rp->model = 5;
700 } else {
701 /* Couldn't detect size. Use default model 2. */
702 rp->model = 2;
703 rp->rows = 24;
704 rp->cols = 80;
705 return 0;
706 }
707 return rc;
708}
709
710static int
711raw3270_reset_device(struct raw3270 *rp)
712{
713 int rc;
714
715 mutex_lock(&raw3270_init_mutex);
716 memset(&rp->init_request, 0, sizeof(rp->init_request));
717 memset(&rp->init_data, 0, sizeof(rp->init_data));
718 /* Store reset data stream to init_data/init_request */
719 rp->init_data[0] = TW_KR;
720 INIT_LIST_HEAD(&rp->init_request.list);
721 rp->init_request.ccw.cmd_code = TC_EWRITEA;
722 rp->init_request.ccw.flags = CCW_FLAG_SLI;
723 rp->init_request.ccw.count = 1;
724 rp->init_request.ccw.cda = (__u32) __pa(rp->init_data);
725 rp->view = &raw3270_init_view;
726 raw3270_init_view.dev = rp;
727 rc = raw3270_start_init(rp, &raw3270_init_view, &rp->init_request);
728 raw3270_init_view.dev = NULL;
729 rp->view = NULL;
730 mutex_unlock(&raw3270_init_mutex);
731 return rc;
732}
733
734int
735raw3270_reset(struct raw3270_view *view)
736{
737 struct raw3270 *rp;
738 int rc;
739
740 rp = view->dev;
741 if (!rp || rp->view != view ||
742 test_bit(RAW3270_FLAGS_FROZEN, &rp->flags))
743 rc = -EACCES;
744 else if (!test_bit(RAW3270_FLAGS_READY, &rp->flags))
745 rc = -ENODEV;
746 else
747 rc = raw3270_reset_device(view->dev);
748 return rc;
749}
750
751/*
752 * Setup new 3270 device.
753 */
754static int
755raw3270_setup_device(struct ccw_device *cdev, struct raw3270 *rp, char *ascebc)
756{
757 struct list_head *l;
758 struct raw3270 *tmp;
759 int minor;
760
761 memset(rp, 0, sizeof(struct raw3270));
762 /* Copy ebcdic -> ascii translation table. */
763 memcpy(ascebc, _ascebc, 256);
764 if (tubxcorrect) {
765 /* correct brackets and circumflex */
766 ascebc['['] = 0xad;
767 ascebc[']'] = 0xbd;
768 ascebc['^'] = 0xb0;
769 }
770 rp->ascebc = ascebc;
771
772 /* Set defaults. */
773 rp->rows = 24;
774 rp->cols = 80;
775
776 INIT_LIST_HEAD(&rp->req_queue);
777 INIT_LIST_HEAD(&rp->view_list);
778
779 /*
780 * Add device to list and find the smallest unused minor
781 * number for it. Note: there is no device with minor 0,
782 * see special case for fs3270.c:fs3270_open().
783 */
784 mutex_lock(&raw3270_mutex);
785 /* Keep the list sorted. */
786 minor = RAW3270_FIRSTMINOR;
787 rp->minor = -1;
788 list_for_each(l, &raw3270_devices) {
789 tmp = list_entry(l, struct raw3270, list);
790 if (tmp->minor > minor) {
791 rp->minor = minor;
792 __list_add(&rp->list, l->prev, l);
793 break;
794 }
795 minor++;
796 }
797 if (rp->minor == -1 && minor < RAW3270_MAXDEVS + RAW3270_FIRSTMINOR) {
798 rp->minor = minor;
799 list_add_tail(&rp->list, &raw3270_devices);
800 }
801 mutex_unlock(&raw3270_mutex);
802 /* No free minor number? Then give up. */
803 if (rp->minor == -1)
804 return -EUSERS;
805 rp->cdev = cdev;
806 dev_set_drvdata(&cdev->dev, rp);
807 cdev->handler = raw3270_irq;
808 return 0;
809}
810
811#ifdef CONFIG_TN3270_CONSOLE
812/*
813 * Setup 3270 device configured as console.
814 */
815struct raw3270 __init *raw3270_setup_console(struct ccw_device *cdev)
816{
817 struct raw3270 *rp;
818 char *ascebc;
819 int rc;
820
821 rp = kzalloc(sizeof(struct raw3270), GFP_KERNEL | GFP_DMA);
822 ascebc = kzalloc(256, GFP_KERNEL);
823 rc = raw3270_setup_device(cdev, rp, ascebc);
824 if (rc)
825 return ERR_PTR(rc);
826 set_bit(RAW3270_FLAGS_CONSOLE, &rp->flags);
827 rc = raw3270_reset_device(rp);
828 if (rc)
829 return ERR_PTR(rc);
830 rc = raw3270_size_device(rp);
831 if (rc)
832 return ERR_PTR(rc);
833 rc = raw3270_reset_device(rp);
834 if (rc)
835 return ERR_PTR(rc);
836 set_bit(RAW3270_FLAGS_READY, &rp->flags);
837 return rp;
838}
839
840void
841raw3270_wait_cons_dev(struct raw3270 *rp)
842{
843 unsigned long flags;
844
845 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
846 wait_cons_dev();
847 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
848}
849
850#endif
851
852/*
853 * Create a 3270 device structure.
854 */
855static struct raw3270 *
856raw3270_create_device(struct ccw_device *cdev)
857{
858 struct raw3270 *rp;
859 char *ascebc;
860 int rc;
861
862 rp = kmalloc(sizeof(struct raw3270), GFP_KERNEL | GFP_DMA);
863 if (!rp)
864 return ERR_PTR(-ENOMEM);
865 ascebc = kmalloc(256, GFP_KERNEL);
866 if (!ascebc) {
867 kfree(rp);
868 return ERR_PTR(-ENOMEM);
869 }
870 rc = raw3270_setup_device(cdev, rp, ascebc);
871 if (rc) {
872 kfree(rp->ascebc);
873 kfree(rp);
874 rp = ERR_PTR(rc);
875 }
876 /* Get reference to ccw_device structure. */
877 get_device(&cdev->dev);
878 return rp;
879}
880
881/*
882 * Activate a view.
883 */
884int
885raw3270_activate_view(struct raw3270_view *view)
886{
887 struct raw3270 *rp;
888 struct raw3270_view *oldview, *nv;
889 unsigned long flags;
890 int rc;
891
892 rp = view->dev;
893 if (!rp)
894 return -ENODEV;
895 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
896 if (rp->view == view)
897 rc = 0;
898 else if (!test_bit(RAW3270_FLAGS_READY, &rp->flags))
899 rc = -ENODEV;
900 else if (test_bit(RAW3270_FLAGS_FROZEN, &rp->flags))
901 rc = -EACCES;
902 else {
903 oldview = NULL;
904 if (rp->view) {
905 oldview = rp->view;
906 oldview->fn->deactivate(oldview);
907 }
908 rp->view = view;
909 rc = view->fn->activate(view);
910 if (rc) {
911 /* Didn't work. Try to reactivate the old view. */
912 rp->view = oldview;
913 if (!oldview || oldview->fn->activate(oldview) != 0) {
914 /* Didn't work as well. Try any other view. */
915 list_for_each_entry(nv, &rp->view_list, list)
916 if (nv != view && nv != oldview) {
917 rp->view = nv;
918 if (nv->fn->activate(nv) == 0)
919 break;
920 rp->view = NULL;
921 }
922 }
923 }
924 }
925 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
926 return rc;
927}
928
929/*
930 * Deactivate current view.
931 */
932void
933raw3270_deactivate_view(struct raw3270_view *view)
934{
935 unsigned long flags;
936 struct raw3270 *rp;
937
938 rp = view->dev;
939 if (!rp)
940 return;
941 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
942 if (rp->view == view) {
943 view->fn->deactivate(view);
944 rp->view = NULL;
945 /* Move deactivated view to end of list. */
946 list_del_init(&view->list);
947 list_add_tail(&view->list, &rp->view_list);
948 /* Try to activate another view. */
949 if (test_bit(RAW3270_FLAGS_READY, &rp->flags) &&
950 !test_bit(RAW3270_FLAGS_FROZEN, &rp->flags)) {
951 list_for_each_entry(view, &rp->view_list, list) {
952 rp->view = view;
953 if (view->fn->activate(view) == 0)
954 break;
955 rp->view = NULL;
956 }
957 }
958 }
959 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
960}
961
962/*
963 * Add view to device with minor "minor".
964 */
965int
966raw3270_add_view(struct raw3270_view *view, struct raw3270_fn *fn, int minor)
967{
968 unsigned long flags;
969 struct raw3270 *rp;
970 int rc;
971
972 if (minor <= 0)
973 return -ENODEV;
974 mutex_lock(&raw3270_mutex);
975 rc = -ENODEV;
976 list_for_each_entry(rp, &raw3270_devices, list) {
977 if (rp->minor != minor)
978 continue;
979 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
980 if (test_bit(RAW3270_FLAGS_READY, &rp->flags)) {
981 atomic_set(&view->ref_count, 2);
982 view->dev = rp;
983 view->fn = fn;
984 view->model = rp->model;
985 view->rows = rp->rows;
986 view->cols = rp->cols;
987 view->ascebc = rp->ascebc;
988 spin_lock_init(&view->lock);
989 list_add(&view->list, &rp->view_list);
990 rc = 0;
991 }
992 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
993 break;
994 }
995 mutex_unlock(&raw3270_mutex);
996 return rc;
997}
998
999/*
1000 * Find specific view of device with minor "minor".
1001 */
1002struct raw3270_view *
1003raw3270_find_view(struct raw3270_fn *fn, int minor)
1004{
1005 struct raw3270 *rp;
1006 struct raw3270_view *view, *tmp;
1007 unsigned long flags;
1008
1009 mutex_lock(&raw3270_mutex);
1010 view = ERR_PTR(-ENODEV);
1011 list_for_each_entry(rp, &raw3270_devices, list) {
1012 if (rp->minor != minor)
1013 continue;
1014 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
1015 if (test_bit(RAW3270_FLAGS_READY, &rp->flags)) {
1016 view = ERR_PTR(-ENOENT);
1017 list_for_each_entry(tmp, &rp->view_list, list) {
1018 if (tmp->fn == fn) {
1019 raw3270_get_view(tmp);
1020 view = tmp;
1021 break;
1022 }
1023 }
1024 }
1025 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
1026 break;
1027 }
1028 mutex_unlock(&raw3270_mutex);
1029 return view;
1030}
1031
1032/*
1033 * Remove view from device and free view structure via call to view->fn->free.
1034 */
1035void
1036raw3270_del_view(struct raw3270_view *view)
1037{
1038 unsigned long flags;
1039 struct raw3270 *rp;
1040 struct raw3270_view *nv;
1041
1042 rp = view->dev;
1043 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
1044 if (rp->view == view) {
1045 view->fn->deactivate(view);
1046 rp->view = NULL;
1047 }
1048 list_del_init(&view->list);
1049 if (!rp->view && test_bit(RAW3270_FLAGS_READY, &rp->flags) &&
1050 !test_bit(RAW3270_FLAGS_FROZEN, &rp->flags)) {
1051 /* Try to activate another view. */
1052 list_for_each_entry(nv, &rp->view_list, list) {
1053 if (nv->fn->activate(nv) == 0) {
1054 rp->view = nv;
1055 break;
1056 }
1057 }
1058 }
1059 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
1060 /* Wait for reference counter to drop to zero. */
1061 atomic_dec(&view->ref_count);
1062 wait_event(raw3270_wait_queue, atomic_read(&view->ref_count) == 0);
1063 if (view->fn->free)
1064 view->fn->free(view);
1065}
1066
1067/*
1068 * Remove a 3270 device structure.
1069 */
1070static void
1071raw3270_delete_device(struct raw3270 *rp)
1072{
1073 struct ccw_device *cdev;
1074
1075 /* Remove from device chain. */
1076 mutex_lock(&raw3270_mutex);
1077 if (rp->clttydev && !IS_ERR(rp->clttydev))
1078 device_destroy(class3270, MKDEV(IBM_TTY3270_MAJOR, rp->minor));
1079 if (rp->cltubdev && !IS_ERR(rp->cltubdev))
1080 device_destroy(class3270, MKDEV(IBM_FS3270_MAJOR, rp->minor));
1081 list_del_init(&rp->list);
1082 mutex_unlock(&raw3270_mutex);
1083
1084 /* Disconnect from ccw_device. */
1085 cdev = rp->cdev;
1086 rp->cdev = NULL;
1087 dev_set_drvdata(&cdev->dev, NULL);
1088 cdev->handler = NULL;
1089
1090 /* Put ccw_device structure. */
1091 put_device(&cdev->dev);
1092
1093 /* Now free raw3270 structure. */
1094 kfree(rp->ascebc);
1095 kfree(rp);
1096}
1097
1098static int
1099raw3270_probe (struct ccw_device *cdev)
1100{
1101 return 0;
1102}
1103
1104/*
1105 * Additional attributes for a 3270 device
1106 */
1107static ssize_t
1108raw3270_model_show(struct device *dev, struct device_attribute *attr, char *buf)
1109{
1110 return snprintf(buf, PAGE_SIZE, "%i\n",
1111 ((struct raw3270 *) dev_get_drvdata(dev))->model);
1112}
1113static DEVICE_ATTR(model, 0444, raw3270_model_show, NULL);
1114
1115static ssize_t
1116raw3270_rows_show(struct device *dev, struct device_attribute *attr, char *buf)
1117{
1118 return snprintf(buf, PAGE_SIZE, "%i\n",
1119 ((struct raw3270 *) dev_get_drvdata(dev))->rows);
1120}
1121static DEVICE_ATTR(rows, 0444, raw3270_rows_show, NULL);
1122
1123static ssize_t
1124raw3270_columns_show(struct device *dev, struct device_attribute *attr, char *buf)
1125{
1126 return snprintf(buf, PAGE_SIZE, "%i\n",
1127 ((struct raw3270 *) dev_get_drvdata(dev))->cols);
1128}
1129static DEVICE_ATTR(columns, 0444, raw3270_columns_show, NULL);
1130
1131static struct attribute * raw3270_attrs[] = {
1132 &dev_attr_model.attr,
1133 &dev_attr_rows.attr,
1134 &dev_attr_columns.attr,
1135 NULL,
1136};
1137
1138static struct attribute_group raw3270_attr_group = {
1139 .attrs = raw3270_attrs,
1140};
1141
1142static int raw3270_create_attributes(struct raw3270 *rp)
1143{
1144 int rc;
1145
1146 rc = sysfs_create_group(&rp->cdev->dev.kobj, &raw3270_attr_group);
1147 if (rc)
1148 goto out;
1149
1150 rp->clttydev = device_create(class3270, &rp->cdev->dev,
1151 MKDEV(IBM_TTY3270_MAJOR, rp->minor), NULL,
1152 "tty%s", dev_name(&rp->cdev->dev));
1153 if (IS_ERR(rp->clttydev)) {
1154 rc = PTR_ERR(rp->clttydev);
1155 goto out_ttydev;
1156 }
1157
1158 rp->cltubdev = device_create(class3270, &rp->cdev->dev,
1159 MKDEV(IBM_FS3270_MAJOR, rp->minor), NULL,
1160 "tub%s", dev_name(&rp->cdev->dev));
1161 if (!IS_ERR(rp->cltubdev))
1162 goto out;
1163
1164 rc = PTR_ERR(rp->cltubdev);
1165 device_destroy(class3270, MKDEV(IBM_TTY3270_MAJOR, rp->minor));
1166
1167out_ttydev:
1168 sysfs_remove_group(&rp->cdev->dev.kobj, &raw3270_attr_group);
1169out:
1170 return rc;
1171}
1172
1173/*
1174 * Notifier for device addition/removal
1175 */
1176struct raw3270_notifier {
1177 struct list_head list;
1178 void (*notifier)(int, int);
1179};
1180
1181static LIST_HEAD(raw3270_notifier);
1182
1183int raw3270_register_notifier(void (*notifier)(int, int))
1184{
1185 struct raw3270_notifier *np;
1186 struct raw3270 *rp;
1187
1188 np = kmalloc(sizeof(struct raw3270_notifier), GFP_KERNEL);
1189 if (!np)
1190 return -ENOMEM;
1191 np->notifier = notifier;
1192 mutex_lock(&raw3270_mutex);
1193 list_add_tail(&np->list, &raw3270_notifier);
1194 list_for_each_entry(rp, &raw3270_devices, list) {
1195 get_device(&rp->cdev->dev);
1196 notifier(rp->minor, 1);
1197 }
1198 mutex_unlock(&raw3270_mutex);
1199 return 0;
1200}
1201
1202void raw3270_unregister_notifier(void (*notifier)(int, int))
1203{
1204 struct raw3270_notifier *np;
1205
1206 mutex_lock(&raw3270_mutex);
1207 list_for_each_entry(np, &raw3270_notifier, list)
1208 if (np->notifier == notifier) {
1209 list_del(&np->list);
1210 kfree(np);
1211 break;
1212 }
1213 mutex_unlock(&raw3270_mutex);
1214}
1215
1216/*
1217 * Set 3270 device online.
1218 */
1219static int
1220raw3270_set_online (struct ccw_device *cdev)
1221{
1222 struct raw3270 *rp;
1223 struct raw3270_notifier *np;
1224 int rc;
1225
1226 rp = raw3270_create_device(cdev);
1227 if (IS_ERR(rp))
1228 return PTR_ERR(rp);
1229 rc = raw3270_reset_device(rp);
1230 if (rc)
1231 goto failure;
1232 rc = raw3270_size_device(rp);
1233 if (rc)
1234 goto failure;
1235 rc = raw3270_reset_device(rp);
1236 if (rc)
1237 goto failure;
1238 rc = raw3270_create_attributes(rp);
1239 if (rc)
1240 goto failure;
1241 set_bit(RAW3270_FLAGS_READY, &rp->flags);
1242 mutex_lock(&raw3270_mutex);
1243 list_for_each_entry(np, &raw3270_notifier, list)
1244 np->notifier(rp->minor, 1);
1245 mutex_unlock(&raw3270_mutex);
1246 return 0;
1247
1248failure:
1249 raw3270_delete_device(rp);
1250 return rc;
1251}
1252
1253/*
1254 * Remove 3270 device structure.
1255 */
1256static void
1257raw3270_remove (struct ccw_device *cdev)
1258{
1259 unsigned long flags;
1260 struct raw3270 *rp;
1261 struct raw3270_view *v;
1262 struct raw3270_notifier *np;
1263
1264 rp = dev_get_drvdata(&cdev->dev);
1265 /*
1266 * _remove is the opposite of _probe; it's probe that
1267 * should set up rp. raw3270_remove gets entered for
1268 * devices even if they haven't been varied online.
1269 * Thus, rp may validly be NULL here.
1270 */
1271 if (rp == NULL)
1272 return;
1273 clear_bit(RAW3270_FLAGS_READY, &rp->flags);
1274
1275 sysfs_remove_group(&cdev->dev.kobj, &raw3270_attr_group);
1276
1277 /* Deactivate current view and remove all views. */
1278 spin_lock_irqsave(get_ccwdev_lock(cdev), flags);
1279 if (rp->view) {
1280 rp->view->fn->deactivate(rp->view);
1281 rp->view = NULL;
1282 }
1283 while (!list_empty(&rp->view_list)) {
1284 v = list_entry(rp->view_list.next, struct raw3270_view, list);
1285 if (v->fn->release)
1286 v->fn->release(v);
1287 spin_unlock_irqrestore(get_ccwdev_lock(cdev), flags);
1288 raw3270_del_view(v);
1289 spin_lock_irqsave(get_ccwdev_lock(cdev), flags);
1290 }
1291 spin_unlock_irqrestore(get_ccwdev_lock(cdev), flags);
1292
1293 mutex_lock(&raw3270_mutex);
1294 list_for_each_entry(np, &raw3270_notifier, list)
1295 np->notifier(rp->minor, 0);
1296 mutex_unlock(&raw3270_mutex);
1297
1298 /* Reset 3270 device. */
1299 raw3270_reset_device(rp);
1300 /* And finally remove it. */
1301 raw3270_delete_device(rp);
1302}
1303
1304/*
1305 * Set 3270 device offline.
1306 */
1307static int
1308raw3270_set_offline (struct ccw_device *cdev)
1309{
1310 struct raw3270 *rp;
1311
1312 rp = dev_get_drvdata(&cdev->dev);
1313 if (test_bit(RAW3270_FLAGS_CONSOLE, &rp->flags))
1314 return -EBUSY;
1315 raw3270_remove(cdev);
1316 return 0;
1317}
1318
1319static int raw3270_pm_stop(struct ccw_device *cdev)
1320{
1321 struct raw3270 *rp;
1322 struct raw3270_view *view;
1323 unsigned long flags;
1324
1325 rp = dev_get_drvdata(&cdev->dev);
1326 if (!rp)
1327 return 0;
1328 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
1329 if (rp->view)
1330 rp->view->fn->deactivate(rp->view);
1331 if (!test_bit(RAW3270_FLAGS_CONSOLE, &rp->flags)) {
1332 /*
1333 * Release tty and fullscreen for all non-console
1334 * devices.
1335 */
1336 list_for_each_entry(view, &rp->view_list, list) {
1337 if (view->fn->release)
1338 view->fn->release(view);
1339 }
1340 }
1341 set_bit(RAW3270_FLAGS_FROZEN, &rp->flags);
1342 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
1343 return 0;
1344}
1345
1346static int raw3270_pm_start(struct ccw_device *cdev)
1347{
1348 struct raw3270 *rp;
1349 unsigned long flags;
1350
1351 rp = dev_get_drvdata(&cdev->dev);
1352 if (!rp)
1353 return 0;
1354 spin_lock_irqsave(get_ccwdev_lock(rp->cdev), flags);
1355 clear_bit(RAW3270_FLAGS_FROZEN, &rp->flags);
1356 if (rp->view)
1357 rp->view->fn->activate(rp->view);
1358 spin_unlock_irqrestore(get_ccwdev_lock(rp->cdev), flags);
1359 return 0;
1360}
1361
1362void raw3270_pm_unfreeze(struct raw3270_view *view)
1363{
1364#ifdef CONFIG_TN3270_CONSOLE
1365 struct raw3270 *rp;
1366
1367 rp = view->dev;
1368 if (rp && test_bit(RAW3270_FLAGS_FROZEN, &rp->flags))
1369 ccw_device_force_console();
1370#endif
1371}
1372
1373static struct ccw_device_id raw3270_id[] = {
1374 { CCW_DEVICE(0x3270, 0) },
1375 { CCW_DEVICE(0x3271, 0) },
1376 { CCW_DEVICE(0x3272, 0) },
1377 { CCW_DEVICE(0x3273, 0) },
1378 { CCW_DEVICE(0x3274, 0) },
1379 { CCW_DEVICE(0x3275, 0) },
1380 { CCW_DEVICE(0x3276, 0) },
1381 { CCW_DEVICE(0x3277, 0) },
1382 { CCW_DEVICE(0x3278, 0) },
1383 { CCW_DEVICE(0x3279, 0) },
1384 { CCW_DEVICE(0x3174, 0) },
1385 { /* end of list */ },
1386};
1387
1388static struct ccw_driver raw3270_ccw_driver = {
1389 .driver = {
1390 .name = "3270",
1391 .owner = THIS_MODULE,
1392 },
1393 .ids = raw3270_id,
1394 .probe = &raw3270_probe,
1395 .remove = &raw3270_remove,
1396 .set_online = &raw3270_set_online,
1397 .set_offline = &raw3270_set_offline,
1398 .freeze = &raw3270_pm_stop,
1399 .thaw = &raw3270_pm_start,
1400 .restore = &raw3270_pm_start,
1401};
1402
1403static int
1404raw3270_init(void)
1405{
1406 struct raw3270 *rp;
1407 int rc;
1408
1409 if (raw3270_registered)
1410 return 0;
1411 raw3270_registered = 1;
1412 rc = ccw_driver_register(&raw3270_ccw_driver);
1413 if (rc == 0) {
1414 /* Create attributes for early (= console) device. */
1415 mutex_lock(&raw3270_mutex);
1416 class3270 = class_create(THIS_MODULE, "3270");
1417 list_for_each_entry(rp, &raw3270_devices, list) {
1418 get_device(&rp->cdev->dev);
1419 raw3270_create_attributes(rp);
1420 }
1421 mutex_unlock(&raw3270_mutex);
1422 }
1423 return rc;
1424}
1425
1426static void
1427raw3270_exit(void)
1428{
1429 ccw_driver_unregister(&raw3270_ccw_driver);
1430 class_destroy(class3270);
1431}
1432
1433MODULE_LICENSE("GPL");
1434
1435module_init(raw3270_init);
1436module_exit(raw3270_exit);
1437
1438EXPORT_SYMBOL(raw3270_request_alloc);
1439EXPORT_SYMBOL(raw3270_request_free);
1440EXPORT_SYMBOL(raw3270_request_reset);
1441EXPORT_SYMBOL(raw3270_request_set_cmd);
1442EXPORT_SYMBOL(raw3270_request_add_data);
1443EXPORT_SYMBOL(raw3270_request_set_data);
1444EXPORT_SYMBOL(raw3270_request_set_idal);
1445EXPORT_SYMBOL(raw3270_buffer_address);
1446EXPORT_SYMBOL(raw3270_add_view);
1447EXPORT_SYMBOL(raw3270_del_view);
1448EXPORT_SYMBOL(raw3270_find_view);
1449EXPORT_SYMBOL(raw3270_activate_view);
1450EXPORT_SYMBOL(raw3270_deactivate_view);
1451EXPORT_SYMBOL(raw3270_start);
1452EXPORT_SYMBOL(raw3270_start_locked);
1453EXPORT_SYMBOL(raw3270_start_irq);
1454EXPORT_SYMBOL(raw3270_reset);
1455EXPORT_SYMBOL(raw3270_register_notifier);
1456EXPORT_SYMBOL(raw3270_unregister_notifier);
1457EXPORT_SYMBOL(raw3270_wait_queue);