1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37#undef DEBUG
38
39#include <linux/types.h>
40#include <linux/init.h>
41#include <linux/delay.h>
42#include <linux/slab.h>
43#include <linux/console.h>
44#include <linux/module.h>
45
46#include <asm/hvconsole.h>
47#include <asm/vio.h>
48#include <asm/prom.h>
49#include <asm/firmware.h>
50#include <asm/hvsi.h>
51#include <asm/udbg.h>
52
53#include "hvc_console.h"
54
55static const char hvc_driver_name[] = "hvc_console";
56
57static struct vio_device_id hvc_driver_table[] __devinitdata = {
58 {"serial", "hvterm1"},
59#ifndef HVC_OLD_HVSI
60 {"serial", "hvterm-protocol"},
61#endif
62 { "", "" }
63};
64MODULE_DEVICE_TABLE(vio, hvc_driver_table);
65
66typedef enum hv_protocol {
67 HV_PROTOCOL_RAW,
68 HV_PROTOCOL_HVSI
69} hv_protocol_t;
70
71struct hvterm_priv {
72 u32 termno;
73 hv_protocol_t proto;
74 struct hvsi_priv hvsi;
75 spinlock_t buf_lock;
76 char buf[SIZE_VIO_GET_CHARS];
77 int left;
78 int offset;
79};
80static struct hvterm_priv *hvterm_privs[MAX_NR_HVC_CONSOLES];
81
82static struct hvterm_priv hvterm_priv0;
83
84static int hvterm_raw_get_chars(uint32_t vtermno, char *buf, int count)
85{
86 struct hvterm_priv *pv = hvterm_privs[vtermno];
87 unsigned long i;
88 unsigned long flags;
89 int got;
90
91 if (WARN_ON(!pv))
92 return 0;
93
94 spin_lock_irqsave(&pv->buf_lock, flags);
95
96 if (pv->left == 0) {
97 pv->offset = 0;
98 pv->left = hvc_get_chars(pv->termno, pv->buf, count);
99
100
101
102
103
104 for (i = 1; i < pv->left; ++i) {
105 if (pv->buf[i] == 0 && pv->buf[i-1] == '\r') {
106 --pv->left;
107 if (i < pv->left) {
108 memmove(&pv->buf[i], &pv->buf[i+1],
109 pv->left - i);
110 }
111 }
112 }
113 }
114
115 got = min(count, pv->left);
116 memcpy(buf, &pv->buf[pv->offset], got);
117 pv->offset += got;
118 pv->left -= got;
119
120 spin_unlock_irqrestore(&pv->buf_lock, flags);
121
122 return got;
123}
124
125static int hvterm_raw_put_chars(uint32_t vtermno, const char *buf, int count)
126{
127 struct hvterm_priv *pv = hvterm_privs[vtermno];
128
129 if (WARN_ON(!pv))
130 return 0;
131
132 return hvc_put_chars(pv->termno, buf, count);
133}
134
135static const struct hv_ops hvterm_raw_ops = {
136 .get_chars = hvterm_raw_get_chars,
137 .put_chars = hvterm_raw_put_chars,
138 .notifier_add = notifier_add_irq,
139 .notifier_del = notifier_del_irq,
140 .notifier_hangup = notifier_hangup_irq,
141};
142
143static int hvterm_hvsi_get_chars(uint32_t vtermno, char *buf, int count)
144{
145 struct hvterm_priv *pv = hvterm_privs[vtermno];
146
147 if (WARN_ON(!pv))
148 return 0;
149
150 return hvsilib_get_chars(&pv->hvsi, buf, count);
151}
152
153static int hvterm_hvsi_put_chars(uint32_t vtermno, const char *buf, int count)
154{
155 struct hvterm_priv *pv = hvterm_privs[vtermno];
156
157 if (WARN_ON(!pv))
158 return 0;
159
160 return hvsilib_put_chars(&pv->hvsi, buf, count);
161}
162
163static int hvterm_hvsi_open(struct hvc_struct *hp, int data)
164{
165 struct hvterm_priv *pv = hvterm_privs[hp->vtermno];
166 int rc;
167
168 pr_devel("HVSI@%x: open !\n", pv->termno);
169
170 rc = notifier_add_irq(hp, data);
171 if (rc)
172 return rc;
173
174 return hvsilib_open(&pv->hvsi, hp);
175}
176
177static void hvterm_hvsi_close(struct hvc_struct *hp, int data)
178{
179 struct hvterm_priv *pv = hvterm_privs[hp->vtermno];
180
181 pr_devel("HVSI@%x: do close !\n", pv->termno);
182
183 hvsilib_close(&pv->hvsi, hp);
184
185 notifier_del_irq(hp, data);
186}
187
188void hvterm_hvsi_hangup(struct hvc_struct *hp, int data)
189{
190 struct hvterm_priv *pv = hvterm_privs[hp->vtermno];
191
192 pr_devel("HVSI@%x: do hangup !\n", pv->termno);
193
194 hvsilib_close(&pv->hvsi, hp);
195
196 notifier_hangup_irq(hp, data);
197}
198
199static int hvterm_hvsi_tiocmget(struct hvc_struct *hp)
200{
201 struct hvterm_priv *pv = hvterm_privs[hp->vtermno];
202
203 if (!pv)
204 return -EINVAL;
205 return pv->hvsi.mctrl;
206}
207
208static int hvterm_hvsi_tiocmset(struct hvc_struct *hp, unsigned int set,
209 unsigned int clear)
210{
211 struct hvterm_priv *pv = hvterm_privs[hp->vtermno];
212
213 pr_devel("HVSI@%x: Set modem control, set=%x,clr=%x\n",
214 pv->termno, set, clear);
215
216 if (set & TIOCM_DTR)
217 hvsilib_write_mctrl(&pv->hvsi, 1);
218 else if (clear & TIOCM_DTR)
219 hvsilib_write_mctrl(&pv->hvsi, 0);
220
221 return 0;
222}
223
224static const struct hv_ops hvterm_hvsi_ops = {
225 .get_chars = hvterm_hvsi_get_chars,
226 .put_chars = hvterm_hvsi_put_chars,
227 .notifier_add = hvterm_hvsi_open,
228 .notifier_del = hvterm_hvsi_close,
229 .notifier_hangup = hvterm_hvsi_hangup,
230 .tiocmget = hvterm_hvsi_tiocmget,
231 .tiocmset = hvterm_hvsi_tiocmset,
232};
233
234static int __devinit hvc_vio_probe(struct vio_dev *vdev,
235 const struct vio_device_id *id)
236{
237 const struct hv_ops *ops;
238 struct hvc_struct *hp;
239 struct hvterm_priv *pv;
240 hv_protocol_t proto;
241 int i, termno = -1;
242
243
244 if (!vdev || !id)
245 return -EPERM;
246
247 if (of_device_is_compatible(vdev->dev.of_node, "hvterm1")) {
248 proto = HV_PROTOCOL_RAW;
249 ops = &hvterm_raw_ops;
250 } else if (of_device_is_compatible(vdev->dev.of_node, "hvterm-protocol")) {
251 proto = HV_PROTOCOL_HVSI;
252 ops = &hvterm_hvsi_ops;
253 } else {
254 pr_err("hvc_vio: Unkown protocol for %s\n", vdev->dev.of_node->full_name);
255 return -ENXIO;
256 }
257
258 pr_devel("hvc_vio_probe() device %s, using %s protocol\n",
259 vdev->dev.of_node->full_name,
260 proto == HV_PROTOCOL_RAW ? "raw" : "hvsi");
261
262
263 if (hvterm_privs[0] == &hvterm_priv0 &&
264 vdev->unit_address == hvterm_priv0.termno) {
265 pv = hvterm_privs[0];
266 termno = 0;
267 pr_devel("->boot console, using termno 0\n");
268 }
269
270 else {
271 for (i = 0; i < MAX_NR_HVC_CONSOLES && termno < 0; i++)
272 if (!hvterm_privs[i])
273 termno = i;
274 pr_devel("->non-boot console, using termno %d\n", termno);
275 if (termno < 0)
276 return -ENODEV;
277 pv = kzalloc(sizeof(struct hvterm_priv), GFP_KERNEL);
278 if (!pv)
279 return -ENOMEM;
280 pv->termno = vdev->unit_address;
281 pv->proto = proto;
282 spin_lock_init(&pv->buf_lock);
283 hvterm_privs[termno] = pv;
284 hvsilib_init(&pv->hvsi, hvc_get_chars, hvc_put_chars,
285 pv->termno, 0);
286 }
287
288 hp = hvc_alloc(termno, vdev->irq, ops, MAX_VIO_PUT_CHARS);
289 if (IS_ERR(hp))
290 return PTR_ERR(hp);
291 dev_set_drvdata(&vdev->dev, hp);
292
293 return 0;
294}
295
296static int __devexit hvc_vio_remove(struct vio_dev *vdev)
297{
298 struct hvc_struct *hp = dev_get_drvdata(&vdev->dev);
299 int rc, termno;
300
301 termno = hp->vtermno;
302 rc = hvc_remove(hp);
303 if (rc == 0) {
304 if (hvterm_privs[termno] != &hvterm_priv0)
305 kfree(hvterm_privs[termno]);
306 hvterm_privs[termno] = NULL;
307 }
308 return rc;
309}
310
311static struct vio_driver hvc_vio_driver = {
312 .id_table = hvc_driver_table,
313 .probe = hvc_vio_probe,
314 .remove = __devexit_p(hvc_vio_remove),
315 .driver = {
316 .name = hvc_driver_name,
317 .owner = THIS_MODULE,
318 }
319};
320
321static int __init hvc_vio_init(void)
322{
323 int rc;
324
325 if (firmware_has_feature(FW_FEATURE_ISERIES))
326 return -EIO;
327
328
329 rc = vio_register_driver(&hvc_vio_driver);
330
331 return rc;
332}
333module_init(hvc_vio_init);
334
335static void __exit hvc_vio_exit(void)
336{
337 vio_unregister_driver(&hvc_vio_driver);
338}
339module_exit(hvc_vio_exit);
340
341static void udbg_hvc_putc(char c)
342{
343 int count = -1;
344
345 if (c == '\n')
346 udbg_hvc_putc('\r');
347
348 do {
349 switch(hvterm_priv0.proto) {
350 case HV_PROTOCOL_RAW:
351 count = hvterm_raw_put_chars(0, &c, 1);
352 break;
353 case HV_PROTOCOL_HVSI:
354 count = hvterm_hvsi_put_chars(0, &c, 1);
355 break;
356 }
357 } while(count == 0);
358}
359
360static int udbg_hvc_getc_poll(void)
361{
362 int rc = 0;
363 char c;
364
365 switch(hvterm_priv0.proto) {
366 case HV_PROTOCOL_RAW:
367 rc = hvterm_raw_get_chars(0, &c, 1);
368 break;
369 case HV_PROTOCOL_HVSI:
370 rc = hvterm_hvsi_get_chars(0, &c, 1);
371 break;
372 }
373 if (!rc)
374 return -1;
375 return c;
376}
377
378static int udbg_hvc_getc(void)
379{
380 int ch;
381 for (;;) {
382 ch = udbg_hvc_getc_poll();
383 if (ch == -1) {
384
385 volatile unsigned long delay;
386 for (delay=0; delay < 2000000; delay++)
387 ;
388 } else {
389 return ch;
390 }
391 }
392}
393
394void __init hvc_vio_init_early(void)
395{
396 struct device_node *stdout_node;
397 const u32 *termno;
398 const char *name;
399 const struct hv_ops *ops;
400
401
402 if (!of_chosen)
403 return;
404 name = of_get_property(of_chosen, "linux,stdout-path", NULL);
405 if (name == NULL)
406 return;
407 stdout_node = of_find_node_by_path(name);
408 if (!stdout_node)
409 return;
410 name = of_get_property(stdout_node, "name", NULL);
411 if (!name) {
412 printk(KERN_WARNING "stdout node missing 'name' property!\n");
413 goto out;
414 }
415
416
417 if (strncmp(name, "vty", 3) != 0)
418 goto out;
419 termno = of_get_property(stdout_node, "reg", NULL);
420 if (termno == NULL)
421 goto out;
422 hvterm_priv0.termno = *termno;
423 spin_lock_init(&hvterm_priv0.buf_lock);
424 hvterm_privs[0] = &hvterm_priv0;
425
426
427 if (of_device_is_compatible(stdout_node, "hvterm1")) {
428 hvterm_priv0.proto = HV_PROTOCOL_RAW;
429 ops = &hvterm_raw_ops;
430 }
431 else if (of_device_is_compatible(stdout_node, "hvterm-protocol")) {
432 hvterm_priv0.proto = HV_PROTOCOL_HVSI;
433 ops = &hvterm_hvsi_ops;
434 hvsilib_init(&hvterm_priv0.hvsi, hvc_get_chars, hvc_put_chars,
435 hvterm_priv0.termno, 1);
436
437 hvsilib_establish(&hvterm_priv0.hvsi);
438 } else
439 goto out;
440 udbg_putc = udbg_hvc_putc;
441 udbg_getc = udbg_hvc_getc;
442 udbg_getc_poll = udbg_hvc_getc_poll;
443#ifdef HVC_OLD_HVSI
444
445
446
447 if (hvterm_priv0.proto == HV_PROTOCOL_HVSI)
448 goto out;
449#endif
450 add_preferred_console("hvc", 0, NULL);
451 hvc_instantiate(0, 0, ops);
452out:
453 of_node_put(stdout_node);
454}
455
456
457
458
459#ifdef CONFIG_PPC_EARLY_DEBUG_LPAR
460void __init udbg_init_debug_lpar(void)
461{
462 hvterm_privs[0] = &hvterm_priv0;
463 hvterm_priv0.termno = 0;
464 hvterm_priv0.proto = HV_PROTOCOL_RAW;
465 spin_lock_init(&hvterm_priv0.buf_lock);
466 udbg_putc = udbg_hvc_putc;
467 udbg_getc = udbg_hvc_getc;
468 udbg_getc_poll = udbg_hvc_getc_poll;
469}
470#endif
471
472#ifdef CONFIG_PPC_EARLY_DEBUG_LPAR_HVSI
473void __init udbg_init_debug_lpar_hvsi(void)
474{
475 hvterm_privs[0] = &hvterm_priv0;
476 hvterm_priv0.termno = CONFIG_PPC_EARLY_DEBUG_HVSI_VTERMNO;
477 hvterm_priv0.proto = HV_PROTOCOL_HVSI;
478 spin_lock_init(&hvterm_priv0.buf_lock);
479 udbg_putc = udbg_hvc_putc;
480 udbg_getc = udbg_hvc_getc;
481 udbg_getc_poll = udbg_hvc_getc_poll;
482 hvsilib_init(&hvterm_priv0.hvsi, hvc_get_chars, hvc_put_chars,
483 hvterm_priv0.termno, 1);
484 hvsilib_establish(&hvterm_priv0.hvsi);
485}
486#endif
487