hw/spapr_vty.c

   1 #include "qdev.h"
   2 #include "qemu-char.h"
   3 #include "hw/spapr.h"
   4 #include "hw/spapr_vio.h"
   5
   6 #define VTERM_BUFSIZE   16
   7
   8 typedef struct VIOsPAPRVTYDevice {
   9     VIOsPAPRDevice sdev;
  10     CharDriverState *chardev;
  11     uint32_t in, out;
  12     uint8_t buf[VTERM_BUFSIZE];
  13 } VIOsPAPRVTYDevice;
  14
  15 static int vty_can_receive(void *opaque)
  16 {
  17     VIOsPAPRVTYDevice *dev = (VIOsPAPRVTYDevice *)opaque;
  18
  19     return (dev->in - dev->out) < VTERM_BUFSIZE;
  20 }
  21
  22 static void vty_receive(void *opaque, const uint8_t *buf, int size)
  23 {
  24     VIOsPAPRVTYDevice *dev = (VIOsPAPRVTYDevice *)opaque;
  25     int i;
  26
  27     if ((dev->in == dev->out) && size) {
  28         /* toggle line to simulate edge interrupt */
  29         qemu_irq_pulse(dev->sdev.qirq);
  30     }
  31     for (i = 0; i < size; i++) {
  32         assert((dev->in - dev->out) < VTERM_BUFSIZE);
  33         dev->buf[dev->in++ % VTERM_BUFSIZE] = buf[i];
  34     }
  35 }
  36
  37 static int vty_getchars(VIOsPAPRDevice *sdev, uint8_t *buf, int max)
  38 {
  39     VIOsPAPRVTYDevice *dev = (VIOsPAPRVTYDevice *)sdev;
  40     int n = 0;
  41
  42     while ((n < max) && (dev->out != dev->in)) {
  43         buf[n++] = dev->buf[dev->out++ % VTERM_BUFSIZE];
  44     }
  45
  46     return n;
  47 }
  48
  49 void vty_putchars(VIOsPAPRDevice *sdev, uint8_t *buf, int len)
  50 {
  51     VIOsPAPRVTYDevice *dev = (VIOsPAPRVTYDevice *)sdev;
  52
  53     /* FIXME: should check the qemu_chr_fe_write() return value */
  54     qemu_chr_fe_write(dev->chardev, buf, len);
  55 }
  56
  57 static int spapr_vty_init(VIOsPAPRDevice *sdev)
  58 {
  59     VIOsPAPRVTYDevice *dev = (VIOsPAPRVTYDevice *)sdev;
  60
  61     if (!dev->chardev) {
  62         fprintf(stderr, "spapr-vty: Can't create vty without a chardev!\n");
  63         exit(1);
  64     }
  65
  66     qemu_chr_add_handlers(dev->chardev, vty_can_receive,
  67                           vty_receive, NULL, dev);
  68
  69     return 0;
  70 }
  71
  72 /* Forward declaration */
  73 static target_ulong h_put_term_char(CPUPPCState *env, sPAPREnvironment *spapr,
  74                                     target_ulong opcode, target_ulong *args)
  75 {
  76     target_ulong reg = args[0];
  77     target_ulong len = args[1];
  78     target_ulong char0_7 = args[2];
  79     target_ulong char8_15 = args[3];
  80     VIOsPAPRDevice *sdev;
  81     uint8_t buf[16];
  82
  83     sdev = vty_lookup(spapr, reg);
  84     if (!sdev) {
  85         return H_PARAMETER;
  86     }
  87
  88     if (len > 16) {
  89         return H_PARAMETER;
  90     }
  91
  92     *((uint64_t *)buf) = cpu_to_be64(char0_7);
  93     *((uint64_t *)buf + 1) = cpu_to_be64(char8_15);
  94
  95     vty_putchars(sdev, buf, len);
  96
  97     return H_SUCCESS;
  98 }
  99
 100 static target_ulong h_get_term_char(CPUPPCState *env, sPAPREnvironment *spapr,
 101                                     target_ulong opcode, target_ulong *args)
 102 {
 103     target_ulong reg = args[0];
 104     target_ulong *len = args + 0;
 105     target_ulong *char0_7 = args + 1;
 106     target_ulong *char8_15 = args + 2;
 107     VIOsPAPRDevice *sdev;
 108     uint8_t buf[16];
 109
 110     sdev = vty_lookup(spapr, reg);
 111     if (!sdev) {
 112         return H_PARAMETER;
 113     }
 114
 115     *len = vty_getchars(sdev, buf, sizeof(buf));
 116     if (*len < 16) {
 117         memset(buf + *len, 0, 16 - *len);
 118     }
 119
 120     *char0_7 = be64_to_cpu(*((uint64_t *)buf));
 121     *char8_15 = be64_to_cpu(*((uint64_t *)buf + 1));
 122
 123     return H_SUCCESS;
 124 }
 125
 126 void spapr_vty_create(VIOsPAPRBus *bus, uint32_t reg, CharDriverState *chardev)
 127 {
 128     DeviceState *dev;
 129
 130     dev = qdev_create(&bus->bus, "spapr-vty");
 131     qdev_prop_set_uint32(dev, "reg", reg);
 132     qdev_prop_set_chr(dev, "chardev", chardev);
 133     qdev_init_nofail(dev);
 134 }
 135
 136 static Property spapr_vty_properties[] = {
 137     DEFINE_SPAPR_PROPERTIES(VIOsPAPRVTYDevice, sdev, SPAPR_VTY_BASE_ADDRESS, 0),
 138     DEFINE_PROP_CHR("chardev", VIOsPAPRVTYDevice, chardev),
 139     DEFINE_PROP_END_OF_LIST(),
 140 };
 141
 142 static void spapr_vty_class_init(ObjectClass *klass, void *data)
 143 {
 144     DeviceClass *dc = DEVICE_CLASS(klass);
 145     VIOsPAPRDeviceClass *k = VIO_SPAPR_DEVICE_CLASS(klass);
 146
 147     k->init = spapr_vty_init;
 148     k->dt_name = "vty";
 149     k->dt_type = "serial";
 150     k->dt_compatible = "hvterm1";
 151     dc->props = spapr_vty_properties;
 152 }
 153
 154 static TypeInfo spapr_vty_info = {
 155     .name          = "spapr-vty",
 156     .parent        = TYPE_VIO_SPAPR_DEVICE,
 157     .instance_size = sizeof(VIOsPAPRVTYDevice),
 158     .class_init    = spapr_vty_class_init,
 159 };
 160
 161 VIOsPAPRDevice *spapr_vty_get_default(VIOsPAPRBus *bus)
 162 {
 163     VIOsPAPRDevice *sdev, *selected;
 164     DeviceState *iter;
 165
 166     /*
 167      * To avoid the console bouncing around we want one VTY to be
 168      * the "default". We haven't really got anything to go on, so
 169      * arbitrarily choose the one with the lowest reg value.
 170      */
 171
 172     selected = NULL;
 173     QTAILQ_FOREACH(iter, &bus->bus.children, sibling) {
 174         /* Only look at VTY devices */
 175         if (!object_dynamic_cast(OBJECT(iter), "spapr-vty")) {
 176             continue;
 177         }
 178
 179         sdev = DO_UPCAST(VIOsPAPRDevice, qdev, iter);
 180
 181         /* First VTY we've found, so it is selected for now */
 182         if (!selected) {
 183             selected = sdev;
 184             continue;
 185         }
 186
 187         /* Choose VTY with lowest reg value */
 188         if (sdev->reg < selected->reg) {
 189             selected = sdev;
 190         }
 191     }
 192
 193     return selected;
 194 }
 195
 196 VIOsPAPRDevice *vty_lookup(sPAPREnvironment *spapr, target_ulong reg)
 197 {
 198     VIOsPAPRDevice *sdev;
 199
 200     sdev = spapr_vio_find_by_reg(spapr->vio_bus, reg);
 201     if (!sdev && reg == 0) {
 202         /* Hack for kernel early debug, which always specifies reg==0.
 203          * We search all VIO devices, and grab the vty with the lowest
 204          * reg.  This attempts to mimic existing PowerVM behaviour
 205          * (early debug does work there, despite having no vty with
 206          * reg==0. */
 207         return spapr_vty_get_default(spapr->vio_bus);
 208     }
 209
 210     return sdev;
 211 }
 212
 213 static void spapr_vty_register_types(void)
 214 {
 215     spapr_register_hypercall(H_PUT_TERM_CHAR, h_put_term_char);
 216     spapr_register_hypercall(H_GET_TERM_CHAR, h_get_term_char);
 217     type_register_static(&spapr_vty_info);
 218 }
 219
 220 type_init(spapr_vty_register_types)