[linux.git] / drivers / base / soc.c

/*
 * Copyright (C) ST-Ericsson SA 2011
 *
 * Author: Lee Jones <[email protected]> for ST-Ericsson.
 * License terms:  GNU General Public License (GPL), version 2
 */

#include <linux/sysfs.h>
#include <linux/init.h>
#include <linux/stat.h>
#include <linux/slab.h>
#include <linux/idr.h>
#include <linux/spinlock.h>
#include <linux/sys_soc.h>
#include <linux/err.h>
#include <linux/glob.h>

static DEFINE_IDA(soc_ida);

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

struct soc_device {
	struct device dev;
	struct soc_device_attribute *attr;
	int soc_dev_num;
};

static struct bus_type soc_bus_type = {
	.name  = "soc",
};

static DEVICE_ATTR(machine,  S_IRUGO, soc_info_get,  NULL);
static DEVICE_ATTR(family,   S_IRUGO, soc_info_get,  NULL);
static DEVICE_ATTR(soc_id,   S_IRUGO, soc_info_get,  NULL);
static DEVICE_ATTR(revision, S_IRUGO, soc_info_get,  NULL);

struct device *soc_device_to_device(struct soc_device *soc_dev)
{
	return &soc_dev->dev;
}

static umode_t soc_attribute_mode(struct kobject *kobj,
				struct attribute *attr,
				int index)
{
	struct device *dev = container_of(kobj, struct device, kobj);
	struct soc_device *soc_dev = container_of(dev, struct soc_device, dev);

	if ((attr == &dev_attr_machine.attr)
	    && (soc_dev->attr->machine != NULL))
		return attr->mode;
	if ((attr == &dev_attr_family.attr)
	    && (soc_dev->attr->family != NULL))
		return attr->mode;
	if ((attr == &dev_attr_revision.attr)
	    && (soc_dev->attr->revision != NULL))
		return attr->mode;
	if ((attr == &dev_attr_soc_id.attr)
	    && (soc_dev->attr->soc_id != NULL))
		return attr->mode;

	/* Unknown or unfilled attribute. */
	return 0;
}

static ssize_t soc_info_get(struct device *dev,
			    struct device_attribute *attr,
			    char *buf)
{
	struct soc_device *soc_dev = container_of(dev, struct soc_device, dev);

	if (attr == &dev_attr_machine)
		return sprintf(buf, "%s\n", soc_dev->attr->machine);
	if (attr == &dev_attr_family)
		return sprintf(buf, "%s\n", soc_dev->attr->family);
	if (attr == &dev_attr_revision)
		return sprintf(buf, "%s\n", soc_dev->attr->revision);
	if (attr == &dev_attr_soc_id)
		return sprintf(buf, "%s\n", soc_dev->attr->soc_id);

	return -EINVAL;

}

static struct attribute *soc_attr[] = {
	&dev_attr_machine.attr,
	&dev_attr_family.attr,
	&dev_attr_soc_id.attr,
	&dev_attr_revision.attr,
	NULL,
};

static const struct attribute_group soc_attr_group = {
	.attrs = soc_attr,
	.is_visible = soc_attribute_mode,
};

static const struct attribute_group *soc_attr_groups[] = {
	&soc_attr_group,
	NULL,
};

static void soc_release(struct device *dev)
{
	struct soc_device *soc_dev = container_of(dev, struct soc_device, dev);

	kfree(soc_dev);
}

static struct soc_device_attribute *early_soc_dev_attr;

struct soc_device *soc_device_register(struct soc_device_attribute *soc_dev_attr)
{
	struct soc_device *soc_dev;
	int ret;

	if (!soc_bus_type.p) {
		if (early_soc_dev_attr)
			return ERR_PTR(-EBUSY);
		early_soc_dev_attr = soc_dev_attr;
		return NULL;
	}

	soc_dev = kzalloc(sizeof(*soc_dev), GFP_KERNEL);
	if (!soc_dev) {
		ret = -ENOMEM;
		goto out1;
	}

	/* Fetch a unique (reclaimable) SOC ID. */
	ret = ida_simple_get(&soc_ida, 0, 0, GFP_KERNEL);
	if (ret < 0)
		goto out2;
	soc_dev->soc_dev_num = ret;

	soc_dev->attr = soc_dev_attr;
	soc_dev->dev.bus = &soc_bus_type;
	soc_dev->dev.groups = soc_attr_groups;
	soc_dev->dev.release = soc_release;

	dev_set_name(&soc_dev->dev, "soc%d", soc_dev->soc_dev_num);

	ret = device_register(&soc_dev->dev);
	if (ret)
		goto out3;

	return soc_dev;

out3:
	ida_simple_remove(&soc_ida, soc_dev->soc_dev_num);
out2:
	kfree(soc_dev);
out1:
	return ERR_PTR(ret);
}

/* Ensure soc_dev->attr is freed prior to calling soc_device_unregister. */
void soc_device_unregister(struct soc_device *soc_dev)
{
	ida_simple_remove(&soc_ida, soc_dev->soc_dev_num);

	device_unregister(&soc_dev->dev);
	early_soc_dev_attr = NULL;
}

static int __init soc_bus_register(void)
{
	int ret;

	ret = bus_register(&soc_bus_type);
	if (ret)
		return ret;

	if (early_soc_dev_attr)
		return PTR_ERR(soc_device_register(early_soc_dev_attr));

	return 0;
}
core_initcall(soc_bus_register);

static int soc_device_match_attr(const struct soc_device_attribute *attr,
				 const struct soc_device_attribute *match)
{
	if (match->machine &&
	    (!attr->machine || !glob_match(match->machine, attr->machine)))
		return 0;

	if (match->family &&
	    (!attr->family || !glob_match(match->family, attr->family)))
		return 0;

	if (match->revision &&
	    (!attr->revision || !glob_match(match->revision, attr->revision)))
		return 0;

	if (match->soc_id &&
	    (!attr->soc_id || !glob_match(match->soc_id, attr->soc_id)))
		return 0;

	return 1;
}

static int soc_device_match_one(struct device *dev, void *arg)
{
	struct soc_device *soc_dev = container_of(dev, struct soc_device, dev);

	return soc_device_match_attr(soc_dev->attr, arg);
}

/*
 * soc_device_match - identify the SoC in the machine
 * @matches: zero-terminated array of possible matches
 *
 * returns the first matching entry of the argument array, or NULL
 * if none of them match.
 *
 * This function is meant as a helper in place of of_match_node()
 * in cases where either no device tree is available or the information
 * in a device node is insufficient to identify a particular variant
 * by its compatible strings or other properties. For new devices,
 * the DT binding should always provide unique compatible strings
 * that allow the use of of_match_node() instead.
 *
 * The calling function can use the .data entry of the
 * soc_device_attribute to pass a structure or function pointer for
 * each entry.
 */
const struct soc_device_attribute *soc_device_match(
	const struct soc_device_attribute *matches)
{
	int ret = 0;

	if (!matches)
		return NULL;

	while (!ret) {
		if (!(matches->machine || matches->family ||
		      matches->revision || matches->soc_id))
			break;
		ret = bus_for_each_dev(&soc_bus_type, NULL, (void *)matches,
				       soc_device_match_one);
		if (ret < 0 && early_soc_dev_attr)
			ret = soc_device_match_attr(early_soc_dev_attr,
						    matches);
		if (ret < 0)
			return NULL;
		if (!ret)
			matches++;
		else
			return matches;
	}
	return NULL;
}
EXPORT_SYMBOL_GPL(soc_device_match);
Commit	Line	Data
74d1d82c LJ	1	/*
	2	* Copyright (C) ST-Ericsson SA 2011
	3	*
	4	* Author: Lee Jones <[email protected]> for ST-Ericsson.
	5	* License terms: GNU General Public License (GPL), version 2
	6	*/
	7
	8	#include <linux/sysfs.h>
74d1d82c LJ	9	#include <linux/init.h>
	10	#include <linux/stat.h>
	11	#include <linux/slab.h>
	12	#include <linux/idr.h>
	13	#include <linux/spinlock.h>
	14	#include <linux/sys_soc.h>
	15	#include <linux/err.h>
c97db7cc	16	#include <linux/glob.h>
74d1d82c	17
3a4ffe93	18	static DEFINE_IDA(soc_ida);
74d1d82c LJ	19
	20	static ssize_t soc_info_get(struct device *dev,
	21	struct device_attribute *attr,
	22	char *buf);
	23
	24	struct soc_device {
	25	struct device dev;
	26	struct soc_device_attribute *attr;
	27	int soc_dev_num;
	28	};
	29
	30	static struct bus_type soc_bus_type = {
	31	.name = "soc",
	32	};
	33
	34	static DEVICE_ATTR(machine, S_IRUGO, soc_info_get, NULL);
	35	static DEVICE_ATTR(family, S_IRUGO, soc_info_get, NULL);
	36	static DEVICE_ATTR(soc_id, S_IRUGO, soc_info_get, NULL);
	37	static DEVICE_ATTR(revision, S_IRUGO, soc_info_get, NULL);
	38
	39	struct device soc_device_to_device(struct soc_device soc_dev)
	40	{
	41	return &soc_dev->dev;
	42	}
	43
726592a9	44	static umode_t soc_attribute_mode(struct kobject *kobj,
2071b950 LT	45	struct attribute *attr,
2071b950 LT	46	int index)
74d1d82c LJ	47	{
	48	struct device *dev = container_of(kobj, struct device, kobj);
	49	struct soc_device *soc_dev = container_of(dev, struct soc_device, dev);
	50
	51	if ((attr == &dev_attr_machine.attr)
	52	&& (soc_dev->attr->machine != NULL))
	53	return attr->mode;
	54	if ((attr == &dev_attr_family.attr)
	55	&& (soc_dev->attr->family != NULL))
	56	return attr->mode;
	57	if ((attr == &dev_attr_revision.attr)
	58	&& (soc_dev->attr->revision != NULL))
	59	return attr->mode;
	60	if ((attr == &dev_attr_soc_id.attr)
	61	&& (soc_dev->attr->soc_id != NULL))
2071b950	62	return attr->mode;
74d1d82c LJ	63
	64	/* Unknown or unfilled attribute. */
	65	return 0;
	66	}
	67
	68	static ssize_t soc_info_get(struct device *dev,
	69	struct device_attribute *attr,
	70	char *buf)
	71	{
	72	struct soc_device *soc_dev = container_of(dev, struct soc_device, dev);
	73
	74	if (attr == &dev_attr_machine)
	75	return sprintf(buf, "%s\n", soc_dev->attr->machine);
	76	if (attr == &dev_attr_family)
	77	return sprintf(buf, "%s\n", soc_dev->attr->family);
	78	if (attr == &dev_attr_revision)
	79	return sprintf(buf, "%s\n", soc_dev->attr->revision);
	80	if (attr == &dev_attr_soc_id)
	81	return sprintf(buf, "%s\n", soc_dev->attr->soc_id);
	82
	83	return -EINVAL;
	84
	85	}
	86
	87	static struct attribute *soc_attr[] = {
	88	&dev_attr_machine.attr,
	89	&dev_attr_family.attr,
	90	&dev_attr_soc_id.attr,
	91	&dev_attr_revision.attr,
	92	NULL,
	93	};
	94
	95	static const struct attribute_group soc_attr_group = {
	96	.attrs = soc_attr,
	97	.is_visible = soc_attribute_mode,
	98	};
	99
	100	static const struct attribute_group *soc_attr_groups[] = {
	101	&soc_attr_group,
	102	NULL,
	103	};
	104
	105	static void soc_release(struct device *dev)
	106	{
	107	struct soc_device *soc_dev = container_of(dev, struct soc_device, dev);
	108
	109	kfree(soc_dev);
	110	}
	111
6e12db37 GU	112	static struct soc_device_attribute *early_soc_dev_attr;
6e12db37 GU	113
74d1d82c LJ	114	struct soc_device soc_device_register(struct soc_device_attribute soc_dev_attr)
	115	{
	116	struct soc_device *soc_dev;
	117	int ret;
	118
1da1b362	119	if (!soc_bus_type.p) {
6e12db37 GU	120	if (early_soc_dev_attr)
	121	return ERR_PTR(-EBUSY);
	122	early_soc_dev_attr = soc_dev_attr;
	123	return NULL;
1da1b362 GU	124	}
1da1b362 GU	125
74d1d82c LJ	126	soc_dev = kzalloc(sizeof(*soc_dev), GFP_KERNEL);
74d1d82c LJ	127	if (!soc_dev) {
2071b950	128	ret = -ENOMEM;
74d1d82c LJ	129	goto out1;
	130	}
	131
	132	/* Fetch a unique (reclaimable) SOC ID. */
cfcf6a91 LD	133	ret = ida_simple_get(&soc_ida, 0, 0, GFP_KERNEL);
cfcf6a91 LD	134	if (ret < 0)
2071b950	135	goto out2;
cfcf6a91	136	soc_dev->soc_dev_num = ret;
74d1d82c LJ	137
	138	soc_dev->attr = soc_dev_attr;
	139	soc_dev->dev.bus = &soc_bus_type;
	140	soc_dev->dev.groups = soc_attr_groups;
	141	soc_dev->dev.release = soc_release;
	142
	143	dev_set_name(&soc_dev->dev, "soc%d", soc_dev->soc_dev_num);
	144
	145	ret = device_register(&soc_dev->dev);
	146	if (ret)
	147	goto out3;
	148
	149	return soc_dev;
	150
	151	out3:
cfcf6a91	152	ida_simple_remove(&soc_ida, soc_dev->soc_dev_num);
74d1d82c LJ	153	out2:
	154	kfree(soc_dev);
	155	out1:
	156	return ERR_PTR(ret);
	157	}
	158
	159	/* Ensure soc_dev->attr is freed prior to calling soc_device_unregister. */
	160	void soc_device_unregister(struct soc_device *soc_dev)
	161	{
cfcf6a91	162	ida_simple_remove(&soc_ida, soc_dev->soc_dev_num);
74d1d82c LJ	163
74d1d82c LJ	164	device_unregister(&soc_dev->dev);
6e12db37	165	early_soc_dev_attr = NULL;
74d1d82c LJ	166	}
	167
	168	static int __init soc_bus_register(void)
	169	{
6e12db37	170	int ret;
1da1b362	171
6e12db37 GU	172	ret = bus_register(&soc_bus_type);
	173	if (ret)
	174	return ret;
	175
	176	if (early_soc_dev_attr)
	177	return PTR_ERR(soc_device_register(early_soc_dev_attr));
	178
	179	return 0;
74d1d82c LJ	180	}
74d1d82c LJ	181	core_initcall(soc_bus_register);
c97db7cc	182
6e12db37 GU	183	static int soc_device_match_attr(const struct soc_device_attribute *attr,
6e12db37 GU	184	const struct soc_device_attribute *match)
c97db7cc	185	{
c97db7cc	186	if (match->machine &&
6e12db37	187	(!attr->machine \|\| !glob_match(match->machine, attr->machine)))
c97db7cc AB	188	return 0;
	189
	190	if (match->family &&
6e12db37	191	(!attr->family \|\| !glob_match(match->family, attr->family)))
c97db7cc AB	192	return 0;
	193
	194	if (match->revision &&
6e12db37	195	(!attr->revision \|\| !glob_match(match->revision, attr->revision)))
c97db7cc AB	196	return 0;
	197
	198	if (match->soc_id &&
6e12db37	199	(!attr->soc_id \|\| !glob_match(match->soc_id, attr->soc_id)))
c97db7cc AB	200	return 0;
	201
	202	return 1;
	203	}
	204
6e12db37 GU	205	static int soc_device_match_one(struct device dev, void arg)
	206	{
	207	struct soc_device *soc_dev = container_of(dev, struct soc_device, dev);
	208
	209	return soc_device_match_attr(soc_dev->attr, arg);
	210	}
	211
c97db7cc AB	212	/*
	213	* soc_device_match - identify the SoC in the machine
	214	* @matches: zero-terminated array of possible matches
	215	*
	216	* returns the first matching entry of the argument array, or NULL
	217	* if none of them match.
	218	*
	219	* This function is meant as a helper in place of of_match_node()
	220	* in cases where either no device tree is available or the information
	221	* in a device node is insufficient to identify a particular variant
	222	* by its compatible strings or other properties. For new devices,
	223	* the DT binding should always provide unique compatible strings
	224	* that allow the use of of_match_node() instead.
	225	*
	226	* The calling function can use the .data entry of the
	227	* soc_device_attribute to pass a structure or function pointer for
	228	* each entry.
	229	*/
	230	const struct soc_device_attribute *soc_device_match(
	231	const struct soc_device_attribute *matches)
	232	{
	233	int ret = 0;
	234
	235	if (!matches)
	236	return NULL;
	237
	238	while (!ret) {
	239	if (!(matches->machine \|\| matches->family \|\|
	240	matches->revision \|\| matches->soc_id))
	241	break;
	242	ret = bus_for_each_dev(&soc_bus_type, NULL, (void *)matches,
	243	soc_device_match_one);
6e12db37 GU	244	if (ret < 0 && early_soc_dev_attr)
	245	ret = soc_device_match_attr(early_soc_dev_attr,
	246	matches);
0656db9e GU	247	if (ret < 0)
0656db9e GU	248	return NULL;
c97db7cc AB	249	if (!ret)
	250	matches++;
	251	else
	252	return matches;
	253	}
	254	return NULL;
	255	}
	256	EXPORT_SYMBOL_GPL(soc_device_match);