struct spi_device *gpiob_spi[NUM_AP][3]; struct spi_driver gpiob_spi_drivers[NUM_AP][3]; static u8 spi_ap_dout_value[NUM_AP]; static DEFINE_MUTEX(spi_ap_dout_mutex); static unsigned int ap_dout_max_speed_hz = 1 * 1000 * 1000; module_param(ap_dout_max_speed_hz, uint, S_IRUGO); MODULE_PARM_DESC( ap_dout_max_speed_hz, "Maximum clock rate to be used with this device (default: 1 MHz)" ); static unsigned int ap_din_max_speed_hz = 1 * 1000 * 1000; module_param(ap_din_max_speed_hz, uint, S_IRUGO); MODULE_PARM_DESC( ap_din_max_speed_hz, "Maximum clock rate to be used with this device (default: 1 MHz)" ); static unsigned int ap_adc_max_speed_hz = 20 * 1000 * 1000; module_param(ap_adc_max_speed_hz, uint, S_IRUGO); MODULE_PARM_DESC( ap_adc_max_speed_hz, "Maximum clock rate to be used with this device (default: 20 MHz)" ); static bool gpiob_get_dev_info_from_modalias(const char* modalias, int* port, char* buf) { sscanf(modalias, "mts-io-ap%d-%s", port, buf); return true; } /* Generic SPI functions */ static inline int spi_writen(struct spi_device *spi, const u8 *buf, size_t len) { int tmp; u8 *tx; tx = kmalloc(len, GFP_KERNEL); if (!tx) { return -ENOMEM; } memcpy(tx, buf, len); tmp = spi_write(spi, tx, len); kfree(tx); return tmp; } static inline int spi_readn(struct spi_device *spi, u8 *buf, size_t len) { int tmp; u8 *rx; rx = kmalloc(len, GFP_KERNEL); if (!rx) { return -ENOMEM; } tmp = spi_read(spi, rx, len); memcpy(buf, rx, len); kfree(rx); return tmp; } static int mts_spi_ap_probe(struct spi_device *spi) { int tmp; int port; int port_index; char buf[16]; enum spi_devices dev; gpiob_get_dev_info_from_modalias(spi->modalias, &port, buf); port_index = port - 1; if (port < 1 || port > NUM_AP) { log_error("port %d is invalid", port); return -ENODEV; } if (strstr(buf, "dout")) { dev = dout; spi->max_speed_hz = ap_dout_max_speed_hz; spi->mode = 0; } else if (strstr(buf, "din")) { dev = din; spi->max_speed_hz = ap_din_max_speed_hz; spi->mode = SPI_CPOL; } else if (strstr(buf, "adc")) { dev = adc; spi->max_speed_hz = ap_adc_max_speed_hz; spi->mode = 0; } else { log_error("unknown gpiob spi device type [%s]", buf); return -ENODEV; } gpiob_spi[port_index][dev] = spi; tmp = spi_setup(gpiob_spi[port_index][dev]); if (tmp < 0) { log_error("spi_setup ap %d [%s] failed", port, buf); return tmp; } if (dev == dout) { spi_ap_dout_value[port_index] = 0x00; spi_writen(gpiob_spi[port_index][dev], &spi_ap_dout_value[port_index], 1); } return 0; } static int mts_spi_ap_remove(struct spi_device *spi) { int port; int port_index; char buf[16]; gpiob_get_dev_info_from_modalias(spi->modalias, &port, buf); port_index = port - 1; if (port < 1 || port > NUM_AP) { log_error("port %d is invalid", port); return -ENODEV; } if (strstr(buf, "dout")) { gpiob_spi[port_index][dout] = NULL; } else if (strstr(buf, "din")) { gpiob_spi[port_index][din] = NULL; } else if (strstr(buf, "adc")) { gpiob_spi[port_index][adc] = NULL; } else { log_error("unknown gpiob spi device type [%s]", buf); return -ENODEV; } return 0; } static char* gpiob_gpio_pin_name_by_attr_name(const char* name, int port) { switch (port) { case port_1: if (! strcmp(name, "led1")) { return "ap1-gpio3"; } else if (! strcmp(name, "led2")) { return "ap1-gpio4"; } else if (! strcmp(name, "dout-enable")) { return "ap1-gpio1"; } else if (! strcmp(name, "reset")) { return "ap1-reset"; } else { log_error("attribute name [%s] is invalid for GPIOB in port %d", name, port); return ""; } case port_2: if (! strcmp(name, "led1")) { return "ap2-gpio3"; } else if (! strcmp(name, "led2")) { return "ap2-gpio4"; } else if (! strcmp(name, "dout-enable")) { return "ap2-gpio1"; } else if (! strcmp(name, "reset")) { return "ap2-reset"; } else { log_error("attribute name [%s] is invalid for GPIOB in port %d", name, port); return ""; } } log_error("gpiob: Invalid port number"); return ""; } static ssize_t mts_attr_show_ap_din(struct kobject *kobj, struct kobj_attribute *attr, char *buf) { int tmp; int channel; int port; int port_index; u8 bit; u8 byte; sscanf(attr->attr.name, "din%d", &channel); if (channel < 0 || channel > 3) { log_error("channel %d is invalid", channel); return -ENOENT; } port = port_from_kobject(kobj); if (port < 0) { log_error("port_from_kobject returned %d", port); return -EINVAL; } port_index = port - 1; bit = BIT(channel); tmp = spi_readn(gpiob_spi[port_index][din], &byte, 1); if (tmp) { log_error("spi_read failed %d", tmp); return tmp; } tmp = byte & bit ? 1 : 0; return sprintf(buf, "%d\n", tmp); } static ssize_t mts_attr_store_ap_dout(struct kobject *kobj, struct kobj_attribute *attr, const char *buf, size_t count) { int value; int channel; int port; int port_index; u8 bit; sscanf(attr->attr.name, "dout%d", &channel); if (channel < 0 || channel > 3) { log_error("channel %d is invalid", channel); return -ENOENT; } port = port_from_kobject(kobj); if (port < 0) { log_error("port_from_kobject returned %d", port); return -EINVAL; } port_index = port - 1; bit = BIT(channel); if (sscanf(buf, "%i", &value) != 1) { log_error("accessory card dout attr invalid argument %d", value); return -EINVAL; } mutex_lock(&spi_ap_dout_mutex); if (value) { spi_ap_dout_value[port_index] &= ~bit; } else { spi_ap_dout_value[port_index] |= bit; } spi_writen(gpiob_spi[port_index][dout], &spi_ap_dout_value[port_index], 1); mutex_unlock(&spi_ap_dout_mutex); return count; } static ssize_t mts_attr_show_ap_dout(struct kobject *kobj, struct kobj_attribute *attr, char *buf) { int value; int channel; int port; int port_index; u8 bit; sscanf(attr->attr.name, "dout%d", &channel); if (channel < 0 || channel > 3) { log_error("channel %d is invalid", channel); return -ENOENT; } port = port_from_kobject(kobj); if (port < 0) { log_error("port_from_kobject returned %d", port); return -EINVAL; } port_index = port - 1; bit = BIT(channel); mutex_lock(&spi_ap_dout_mutex); value = spi_ap_dout_value[port_index] & bit ? 0 : 1; mutex_unlock(&spi_ap_dout_mutex); return sprintf(buf, "%d\n", value); } static ssize_t mts_attr_show_ap_adc(struct kobject *kobj, struct kobj_attribute *attr, char *buf) { int tmp; int tx_data; int rx_data; int channel; int port; int port_index; int channel_mask = 0x0180; /* 0b 0000 0001 1000 0000 */ int manual_mode = 0x1840; /* 0b 0001 1000 0100 0000 */ uint8_t tx[2]; uint8_t rx[2]; memset(tx, 0, sizeof(tx)); memset(rx, 0, sizeof(rx)); sscanf(attr->attr.name, "adc%d", &channel); if (channel < 0 || channel > 2) { log_error("channel %d is invalid", channel); return -ENOENT; } port = port_from_kobject(kobj); if (port < 0) { log_error("port_from_kobject returned %d", port); return -EINVAL; } port_index = port - 1; /* 1st transfer to set up (5V reference, channel to read from) */ tx_data = manual_mode | ((channel << 7) & channel_mask); tx[0] = tx_data >> 8; tx[1] = tx_data & 0xFF; tmp = spi_writen(gpiob_spi[port_index][adc], tx, 2); if (tmp) { log_error("spi_write failed %d", tmp); return tmp; } /* 2nd transfer to clock chip for ADC conversion * this can be a throw-away read or an empty write, * the ADC just needs the clock running so it can convert */ tx[0] = 0; tx[1] = 0; tmp = spi_writen(gpiob_spi[port_index][adc], tx, 2); if (tmp) { log_error("2nd spi_write failed %d", tmp); return tmp; } /* 3rd transfer to read data */ tmp = spi_readn(gpiob_spi[port_index][adc], rx, 2); if (tmp) { log_error("spi_read failed %d", tmp); return tmp; } rx_data = ((rx[0] & 0x0F) << 8) | (rx[1] & 0xFF); return sprintf(buf, "%lu\n", (unsigned long) rx_data); } static bool gpiob_spi_driver_setup(struct spi_driver *driver, const char *driver_name) { char* name = kstrdup(driver_name, GFP_KERNEL); if (! name) { log_error("GFP_KERNEL dup failed for driver [%s]", driver_name); return false; } driver->driver.name = name; driver->driver.bus = &spi_bus_type; driver->driver.owner = THIS_MODULE; driver->probe = mts_spi_ap_probe; driver->remove = mts_spi_ap_remove; return true; } // 4 digital inputs // 4 digital outputs // 3 analog to digital // 2 LEDs // 1 digital out enable // 1 reset // 1 vendor-id // 1 product-id // 1 device-id // 1 hw-version // NULL static int ap_gpiob_attrs_size = 20; static bool gpiob_setup(enum ap port) { int i; int port_index = port - 1; int index = 0; int count = 0; int ret; char buf[32]; struct kobj_attribute* attr; struct attribute **attrs; log_info("loading GPIOB accessory card in port %d", port); sprintf(buf, "ap%d", port); ap_subdirs[port_index] = kobject_create_and_add(buf, &mts_io_platform_device->dev.kobj); if (! ap_subdirs[port_index]) { log_error("kobject_create_and_add for port %d failed", port); return false; } // create the link to the apX directory this card is in // if we're in the first slot, we get plain "gpiob" // if we're in a different slot, we might need to use "gpiob-2" to differentiate if (port > 1) { for (i = 1; i < port; i++) { if (port_info[i - 1]) { if (strstr(port_info[i - 1]->product_id, PRODUCT_ID_MTAC_GPIOB)) { count++; } } } } if (count > 0) { sprintf(buf, "gpiob-%d", count + 1); } else { sprintf(buf, "gpiob"); } ret = sysfs_create_link(ap_subdirs[port_index]->parent, ap_subdirs[port_index], buf); if (ret) { log_error("failed to link [%s] to [%s], %d", buf, ap_subdirs[port_index]->name, ret); } attrs = kzalloc(sizeof(struct attribute*) * ap_gpiob_attrs_size, GFP_KERNEL); if (! attrs) { log_error("failed to allocate attribute space for port %d", port); return false; } // add digital inputs for (i = 0; i < 4; i++) { sprintf(buf, "din%d", i); attr = create_attribute(buf, MTS_ATTR_MODE_RO); if (! attr) { log_error("failed to create attribute [%s]", buf); return false; } attr->show = mts_attr_show_ap_din; attrs[index++] = &attr->attr; } // add digital outputs for (i = 0; i < 4; i++) { sprintf(buf, "dout%d", i); attr = create_attribute(buf, MTS_ATTR_MODE_RW); if (! attr) { log_error("failed to create attribute [%s] for GPIOB in port %d", buf, port); return false; } attr->show = mts_attr_show_ap_dout; attr->store = mts_attr_store_ap_dout; attrs[index++] = &attr->attr; } // add analog to digital for (i = 0; i < 3; i++) { sprintf(buf, "adc%d", i); attr = create_attribute(buf, MTS_ATTR_MODE_RO); if (! attr) { log_error("failed to create attribute [%s] for GPIOB in port %d", buf, port); return false; } attr->show = mts_attr_show_ap_adc; attrs[index++] = &attr->attr; } // add LEDs for (i = 1; i <= 2; i++) { sprintf(buf, "led%d", i); attr = create_attribute(buf, MTS_ATTR_MODE_RW); if (! attr) { log_error("failed to create attribute [%s] for GPIOB in port %d", buf, port); return false; } attr->show = mts_attr_show_ap_gpio_pin; attr->store = mts_attr_store_ap_gpio_pin; attrs[index++] = &attr->attr; } // add misc attributes sprintf(buf, "dout-enable"); attr = create_attribute(buf, MTS_ATTR_MODE_RW); if (! attr) { log_error("failed to create attribute [%s] for GPIOB in port %d", buf, port); return false; } attr->show = mts_attr_show_ap_gpio_pin; attr->store = mts_attr_store_ap_gpio_pin; attrs[index++] = &attr->attr; sprintf(buf, "reset"); attr = create_attribute(buf, MTS_ATTR_MODE_RW); if (! attr) { log_error("failed to create attribute [%s] for GPIOB in port %d", buf, port); return false; } attr->show = mts_attr_show_ap_gpio_pin; attr->store = mts_attr_store_ap_gpio_pin; attrs[index++] = &attr->attr; // add attributes for eeprom contents if (! ap_add_product_info_attributes(port, MTAC_GPIOB_0_0, attrs, &index)) { log_error("failed to add product info attributes for GPIOB in port %d", port); return false; } attrs[index] = NULL; ap_attr_groups[port_index].attrs = attrs; // setup and register drivers log_debug("registering accessory card %d dout driver", port); sprintf(buf, "mts-io-ap%d-dout", port); if (! gpiob_spi_driver_setup(&gpiob_spi_drivers[port_index][dout], buf)) { log_error("failed to set up spi driver [%s] for GPIOB in port %d", buf, port); return false; } if (spi_register_driver(&gpiob_spi_drivers[port_index][dout])) { log_error("failed to register accessory card %d dout driver", port); spi_unregister_driver(&gpiob_spi_drivers[port_index][dout]); return false; } log_debug("registering accessory card %d din driver", port); sprintf(buf, "mts-io-ap%d-din", port); if (! gpiob_spi_driver_setup(&gpiob_spi_drivers[port_index][din], buf)) { log_error("failed to set up spi driver [%s] for GPIOB in port %d", buf, port); return false; } if (spi_register_driver(&gpiob_spi_drivers[port_index][din])) { log_error("failed to register accessory card %d din driver", port); spi_unregister_driver(&gpiob_spi_drivers[port_index][din]); return false; } log_debug("registering accessory card %d adc driver", port); sprintf(buf, "mts-io-ap%d-adc", port); if (! gpiob_spi_driver_setup(&gpiob_spi_drivers[port_index][adc], buf)) { log_error("failed to set up spi driver [%s] for GPIOB in port %d", buf, port); return false; } if (spi_register_driver(&gpiob_spi_drivers[port_index][adc])) { log_error("failed to register accessory card %d adc driver", port); spi_unregister_driver(&gpiob_spi_drivers[port_index][adc]); return false; } if (sysfs_create_group(ap_subdirs[port_index], &ap_attr_groups[port_index])) { log_error("sysfs_create_group failed for GPIOB in port %d", port); return false; } return true; } static bool gpiob_teardown(enum ap port) { int i; int port_index = port - 1; struct attribute **attrs = ap_attr_groups[port_index].attrs; log_info("unloading GPIOB accessory card in port %d", port); // clean up allocated memory for attributes for (i = 0; i < ap_gpiob_attrs_size; i++) { if (attrs[i]) { if (attrs[i]->name) kfree(attrs[i]->name); kfree(attrs[i]); } } kfree(attrs); // clean up our "apX/" kobject if it exists if (ap_subdirs[port_index]) { kobject_put(ap_subdirs[port_index]); } // clean up allocated memory for SPI drivers if (gpiob_spi_drivers[port_index][dout].driver.name) kfree(gpiob_spi_drivers[port_index][dout].driver.name); if (gpiob_spi_drivers[port_index][din].driver.name) kfree(gpiob_spi_drivers[port_index][din].driver.name); if (gpiob_spi_drivers[port_index][adc].driver.name) kfree(gpiob_spi_drivers[port_index][adc].driver.name); // unregister SPI drivers spi_unregister_driver(&gpiob_spi_drivers[port_index][dout]); spi_unregister_driver(&gpiob_spi_drivers[port_index][din]); spi_unregister_driver(&gpiob_spi_drivers[port_index][adc]); return true; } bool set_gpiob_info(struct ap_info* info) { snprintf(info->product_id, 32, "%s", PRODUCT_ID_MTAC_GPIOB); info->setup = &gpiob_setup; info->teardown = &gpiob_teardown; info->gpio_pin_name_by_attr_name = &gpiob_gpio_pin_name_by_attr_name; return true; }