diff options
Diffstat (limited to 'io-module/mtac_gpiob.c')
| -rw-r--r-- | io-module/mtac_gpiob.c | 598 |
1 files changed, 0 insertions, 598 deletions
diff --git a/io-module/mtac_gpiob.c b/io-module/mtac_gpiob.c deleted file mode 100644 index 3dbd828..0000000 --- a/io-module/mtac_gpiob.c +++ /dev/null @@ -1,598 +0,0 @@ -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; -} |