// SPDX-License-Identifier: GPL-2.0-or-later

  /*
   * RapidIO sysfs attributes and support
   *
   * Copyright 2005 MontaVista Software, Inc.
   * Matt Porter <mporter@kernel.crashing.org>

   */

  #include <linux/kernel.h>
  #include <linux/rio.h>
  #include <linux/rio_drv.h>
  #include <linux/stat.h>

  #include <linux/capability.h>

  
  #include "rio.h"
  
  /* Sysfs support */
  #define rio_config_attr(field, format_string)					\
  static ssize_t								\

  field##_show(struct device *dev, struct device_attribute *attr, char *buf)			\

  {									\
  	struct rio_dev *rdev = to_rio_dev(dev);				\
  									\
  	return sprintf(buf, format_string, rdev->field);		\
  }									\

  static DEVICE_ATTR_RO(field);

  
  rio_config_attr(did, "0x%04x
  ");
  rio_config_attr(vid, "0x%04x
  ");
  rio_config_attr(device_rev, "0x%08x
  ");
  rio_config_attr(asm_did, "0x%04x
  ");
  rio_config_attr(asm_vid, "0x%04x
  ");
  rio_config_attr(asm_rev, "0x%04x
  ");

  rio_config_attr(destid, "0x%04x
  ");
  rio_config_attr(hopcount, "0x%02x
  ");

  static ssize_t routes_show(struct device *dev, struct device_attribute *attr, char *buf)

  {
  	struct rio_dev *rdev = to_rio_dev(dev);
  	char *str = buf;
  	int i;

  	for (i = 0; i < RIO_MAX_ROUTE_ENTRIES(rdev->net->hport->sys_size);
  			i++) {

  		if (rdev->rswitch->route_table[i] == RIO_INVALID_ROUTE)
  			continue;
  		str +=
  		    sprintf(str, "%04x %02x
  ", i,
  			    rdev->rswitch->route_table[i]);
  	}

  	return (str - buf);
  }

  static DEVICE_ATTR_RO(routes);

  static ssize_t lprev_show(struct device *dev,
  			  struct device_attribute *attr, char *buf)
  {
  	struct rio_dev *rdev = to_rio_dev(dev);
  
  	return sprintf(buf, "%s
  ",
  			(rdev->prev) ? rio_name(rdev->prev) : "root");
  }

  static DEVICE_ATTR_RO(lprev);

  
  static ssize_t lnext_show(struct device *dev,
  			  struct device_attribute *attr, char *buf)
  {
  	struct rio_dev *rdev = to_rio_dev(dev);
  	char *str = buf;
  	int i;
  
  	if (rdev->pef & RIO_PEF_SWITCH) {
  		for (i = 0; i < RIO_GET_TOTAL_PORTS(rdev->swpinfo); i++) {
  			if (rdev->rswitch->nextdev[i])
  				str += sprintf(str, "%s
  ",
  					rio_name(rdev->rswitch->nextdev[i]));
  			else
  				str += sprintf(str, "null
  ");
  		}
  	}
  
  	return str - buf;
  }

  static DEVICE_ATTR_RO(lnext);

  static ssize_t modalias_show(struct device *dev,
  			     struct device_attribute *attr, char *buf)
  {
  	struct rio_dev *rdev = to_rio_dev(dev);
  
  	return sprintf(buf, "rapidio:v%04Xd%04Xav%04Xad%04X
  ",
  		       rdev->vid, rdev->did, rdev->asm_vid, rdev->asm_did);
  }

  static DEVICE_ATTR_RO(modalias);
  
  static struct attribute *rio_dev_attrs[] = {
  	&dev_attr_did.attr,
  	&dev_attr_vid.attr,
  	&dev_attr_device_rev.attr,
  	&dev_attr_asm_did.attr,
  	&dev_attr_asm_vid.attr,
  	&dev_attr_asm_rev.attr,
  	&dev_attr_lprev.attr,
  	&dev_attr_destid.attr,
  	&dev_attr_modalias.attr,

  	/* Switch-only attributes */
  	&dev_attr_routes.attr,
  	&dev_attr_lnext.attr,
  	&dev_attr_hopcount.attr,

  	NULL,
  };

  static ssize_t

  rio_read_config(struct file *filp, struct kobject *kobj,
  		struct bin_attribute *bin_attr,

  		char *buf, loff_t off, size_t count)

  {

  	struct rio_dev *dev = to_rio_dev(kobj_to_dev(kobj));

  	unsigned int size = 0x100;
  	loff_t init_off = off;
  	u8 *data = (u8 *) buf;
  
  	/* Several chips lock up trying to read undefined config space */
  	if (capable(CAP_SYS_ADMIN))

  		size = RIO_MAINT_SPACE_SZ;

  	if (off >= size)

  		return 0;
  	if (off + count > size) {
  		size -= off;
  		count = size;
  	} else {
  		size = count;
  	}
  
  	if ((off & 1) && size) {
  		u8 val;
  		rio_read_config_8(dev, off, &val);
  		data[off - init_off] = val;
  		off++;
  		size--;
  	}
  
  	if ((off & 3) && size > 2) {
  		u16 val;
  		rio_read_config_16(dev, off, &val);
  		data[off - init_off] = (val >> 8) & 0xff;
  		data[off - init_off + 1] = val & 0xff;
  		off += 2;
  		size -= 2;
  	}
  
  	while (size > 3) {
  		u32 val;
  		rio_read_config_32(dev, off, &val);
  		data[off - init_off] = (val >> 24) & 0xff;
  		data[off - init_off + 1] = (val >> 16) & 0xff;
  		data[off - init_off + 2] = (val >> 8) & 0xff;
  		data[off - init_off + 3] = val & 0xff;
  		off += 4;
  		size -= 4;
  	}
  
  	if (size >= 2) {
  		u16 val;
  		rio_read_config_16(dev, off, &val);
  		data[off - init_off] = (val >> 8) & 0xff;
  		data[off - init_off + 1] = val & 0xff;
  		off += 2;
  		size -= 2;
  	}
  
  	if (size > 0) {
  		u8 val;
  		rio_read_config_8(dev, off, &val);
  		data[off - init_off] = val;
  		off++;
  		--size;
  	}
  
  	return count;
  }
  
  static ssize_t

  rio_write_config(struct file *filp, struct kobject *kobj,
  		 struct bin_attribute *bin_attr,

  		 char *buf, loff_t off, size_t count)

  {

  	struct rio_dev *dev = to_rio_dev(kobj_to_dev(kobj));

  	unsigned int size = count;
  	loff_t init_off = off;
  	u8 *data = (u8 *) buf;

  	if (off >= RIO_MAINT_SPACE_SZ)

  		return 0;

  	if (off + count > RIO_MAINT_SPACE_SZ) {
  		size = RIO_MAINT_SPACE_SZ - off;

  		count = size;
  	}
  
  	if ((off & 1) && size) {
  		rio_write_config_8(dev, off, data[off - init_off]);
  		off++;
  		size--;
  	}
  
  	if ((off & 3) && (size > 2)) {
  		u16 val = data[off - init_off + 1];
  		val |= (u16) data[off - init_off] << 8;
  		rio_write_config_16(dev, off, val);
  		off += 2;
  		size -= 2;
  	}
  
  	while (size > 3) {
  		u32 val = data[off - init_off + 3];
  		val |= (u32) data[off - init_off + 2] << 8;
  		val |= (u32) data[off - init_off + 1] << 16;
  		val |= (u32) data[off - init_off] << 24;
  		rio_write_config_32(dev, off, val);
  		off += 4;
  		size -= 4;
  	}
  
  	if (size >= 2) {
  		u16 val = data[off - init_off + 1];
  		val |= (u16) data[off - init_off] << 8;
  		rio_write_config_16(dev, off, val);
  		off += 2;
  		size -= 2;
  	}
  
  	if (size) {
  		rio_write_config_8(dev, off, data[off - init_off]);
  		off++;
  		--size;
  	}
  
  	return count;
  }
  
  static struct bin_attribute rio_config_attr = {
  	.attr = {
  		 .name = "config",
  		 .mode = S_IRUGO | S_IWUSR,

  		 },

  	.size = RIO_MAINT_SPACE_SZ,

  	.read = rio_read_config,
  	.write = rio_write_config,
  };

  static struct bin_attribute *rio_dev_bin_attrs[] = {
  	&rio_config_attr,
  	NULL,
  };

  static umode_t rio_dev_is_attr_visible(struct kobject *kobj,
  				       struct attribute *attr, int n)
  {
  	struct rio_dev *rdev = to_rio_dev(kobj_to_dev(kobj));
  	umode_t mode = attr->mode;
  
  	if (!(rdev->pef & RIO_PEF_SWITCH) &&
  	    (attr == &dev_attr_routes.attr ||
  	     attr == &dev_attr_lnext.attr ||
  	     attr == &dev_attr_hopcount.attr)) {
  		/*
  		 * Hide switch-specific attributes for a non-switch device.
  		 */
  		mode = 0;

  	}

  	return mode;

  }

  static const struct attribute_group rio_dev_group = {
  	.attrs		= rio_dev_attrs,
  	.is_visible	= rio_dev_is_attr_visible,
  	.bin_attrs	= rio_dev_bin_attrs,
  };
  
  const struct attribute_group *rio_dev_groups[] = {
  	&rio_dev_group,
  	NULL,
  };

  static ssize_t scan_store(struct bus_type *bus, const char *buf, size_t count)

  {
  	long val;

  	int rc;
  
  	if (kstrtol(buf, 0, &val) < 0)
  		return -EINVAL;
  
  	if (val == RIO_MPORT_ANY) {
  		rc = rio_init_mports();
  		goto exit;
  	}
  
  	if (val < 0 || val >= RIO_MAX_MPORTS)
  		return -EINVAL;

  	rc = rio_mport_scan((int)val);

  exit:
  	if (!rc)
  		rc = count;
  
  	return rc;
  }

  static BUS_ATTR_WO(scan);

  static struct attribute *rio_bus_attrs[] = {
  	&bus_attr_scan.attr,
  	NULL,
  };
  
  static const struct attribute_group rio_bus_group = {
  	.attrs = rio_bus_attrs,
  };
  
  const struct attribute_group *rio_bus_groups[] = {
  	&rio_bus_group,
  	NULL,

  };

  
  static ssize_t
  port_destid_show(struct device *dev, struct device_attribute *attr,
  		 char *buf)
  {
  	struct rio_mport *mport = to_rio_mport(dev);
  
  	if (mport)
  		return sprintf(buf, "0x%04x
  ", mport->host_deviceid);
  	else
  		return -ENODEV;
  }
  static DEVICE_ATTR_RO(port_destid);
  
  static ssize_t sys_size_show(struct device *dev, struct device_attribute *attr,
  			   char *buf)
  {
  	struct rio_mport *mport = to_rio_mport(dev);
  
  	if (mport)
  		return sprintf(buf, "%u
  ", mport->sys_size);
  	else
  		return -ENODEV;
  }
  static DEVICE_ATTR_RO(sys_size);
  
  static struct attribute *rio_mport_attrs[] = {
  	&dev_attr_port_destid.attr,
  	&dev_attr_sys_size.attr,
  	NULL,
  };
  
  static const struct attribute_group rio_mport_group = {
  	.attrs = rio_mport_attrs,
  };
  
  const struct attribute_group *rio_mport_groups[] = {
  	&rio_mport_group,
  	NULL,
  };