1 /*
2  * RPA Virtual I/O device functions
3  * Copyright (C) 2004 Linda Xie <lxie@us.ibm.com>
4  *
5  * All rights reserved.
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2 of the License, or (at
10  * your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, GOOD TITLE or
15  * NON INFRINGEMENT.  See the GNU General Public License for more
16  * details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21  *
22  * Send feedback to <lxie@us.ibm.com>
23  *
24  */
25 #include <linux/kernel.h>
26 #include <linux/module.h>
27 #include <linux/kobject.h>
28 #include <linux/sysfs.h>
29 #include <linux/pci.h>
30 #include <linux/string.h>
31 #include <linux/slab.h>
32 
33 #include <asm/rtas.h>
34 #include "rpaphp.h"
35 
36 static ssize_t location_read_file (struct hotplug_slot *php_slot, char *buf)
37 {
38         char *value;
39         int retval = -ENOENT;
40 	struct slot *slot = (struct slot *)php_slot->private;
41 
42 	if (!slot)
43 		return retval;
44 
45         value = slot->location;
46         retval = sprintf (buf, "%s\n", value);
47         return retval;
48 }
49 
50 static struct hotplug_slot_attribute hotplug_slot_attr_location = {
51 	.attr = {.name = "phy_location", .mode = S_IFREG | S_IRUGO},
52 	.show = location_read_file,
53 };
54 
55 static void rpaphp_sysfs_add_attr_location (struct hotplug_slot *slot)
56 {
57 	sysfs_create_file(&slot->kobj, &hotplug_slot_attr_location.attr);
58 }
59 
60 static void rpaphp_sysfs_remove_attr_location (struct hotplug_slot *slot)
61 {
62 	sysfs_remove_file(&slot->kobj, &hotplug_slot_attr_location.attr);
63 }
64 
65 /* free up the memory used by a slot */
66 static void rpaphp_release_slot(struct hotplug_slot *hotplug_slot)
67 {
68 	struct slot *slot = (struct slot *) hotplug_slot->private;
69 
70 	dealloc_slot_struct(slot);
71 }
72 
73 void dealloc_slot_struct(struct slot *slot)
74 {
75 	kfree(slot->hotplug_slot->info);
76 	kfree(slot->hotplug_slot->name);
77 	kfree(slot->hotplug_slot);
78 	kfree(slot);
79 	return;
80 }
81 
82 struct slot *alloc_slot_struct(struct device_node *dn, int drc_index, char *drc_name,
83 		  int power_domain)
84 {
85 	struct slot *slot;
86 
87 	slot = kmalloc(sizeof (struct slot), GFP_KERNEL);
88 	if (!slot)
89 		goto error_nomem;
90 	memset(slot, 0, sizeof (struct slot));
91 	slot->hotplug_slot = kmalloc(sizeof (struct hotplug_slot), GFP_KERNEL);
92 	if (!slot->hotplug_slot)
93 		goto error_slot;
94 	memset(slot->hotplug_slot, 0, sizeof (struct hotplug_slot));
95 	slot->hotplug_slot->info = kmalloc(sizeof (struct hotplug_slot_info),
96 					   GFP_KERNEL);
97 	if (!slot->hotplug_slot->info)
98 		goto error_hpslot;
99 	memset(slot->hotplug_slot->info, 0, sizeof (struct hotplug_slot_info));
100 	slot->hotplug_slot->name = kmalloc(BUS_ID_SIZE + 1, GFP_KERNEL);
101 	if (!slot->hotplug_slot->name)
102 		goto error_info;
103 	slot->location = kmalloc(strlen(drc_name) + 1, GFP_KERNEL);
104 	if (!slot->location)
105 		goto error_name;
106 	slot->name = slot->hotplug_slot->name;
107 	slot->dn = dn;
108 	slot->index = drc_index;
109 	strcpy(slot->location, drc_name);
110 	slot->power_domain = power_domain;
111 	slot->hotplug_slot->private = slot;
112 	slot->hotplug_slot->ops = &rpaphp_hotplug_slot_ops;
113 	slot->hotplug_slot->release = &rpaphp_release_slot;
114 
115 	return (slot);
116 
117 error_name:
118 	kfree(slot->hotplug_slot->name);
119 error_info:
120 	kfree(slot->hotplug_slot->info);
121 error_hpslot:
122 	kfree(slot->hotplug_slot);
123 error_slot:
124 	kfree(slot);
125 error_nomem:
126 	return NULL;
127 }
128 
129 static int is_registered(struct slot *slot)
130 {
131 	struct slot             *tmp_slot;
132 
133 	list_for_each_entry(tmp_slot, &rpaphp_slot_head, rpaphp_slot_list) {
134 		if (!strcmp(tmp_slot->name, slot->name))
135 			return 1;
136 	}
137 	return 0;
138 }
139 
140 int deregister_slot(struct slot *slot)
141 {
142 	int retval = 0;
143 	struct hotplug_slot *php_slot = slot->hotplug_slot;
144 
145 	 dbg("%s - Entry: deregistering slot=%s\n",
146 		__FUNCTION__, slot->name);
147 
148 	list_del(&slot->rpaphp_slot_list);
149 
150 	/* remove "phy_location" file */
151 	rpaphp_sysfs_remove_attr_location(php_slot);
152 
153 	retval = pci_hp_deregister(php_slot);
154 	if (retval)
155 		err("Problem unregistering a slot %s\n", slot->name);
156 	else
157 		num_slots--;
158 
159 	dbg("%s - Exit: rc[%d]\n", __FUNCTION__, retval);
160 	return retval;
161 }
162 
163 int register_slot(struct slot *slot)
164 {
165 	int retval;
166 
167 	dbg("%s registering slot:path[%s] index[%x], name[%s] pdomain[%x] type[%d]\n",
168 		__FUNCTION__, slot->dn->full_name, slot->index, slot->name,
169 		slot->power_domain, slot->type);
170 	/* should not try to register the same slot twice */
171 	if (is_registered(slot)) { /* should't be here */
172 		err("register_slot: slot[%s] is already registered\n", slot->name);
173 		rpaphp_release_slot(slot->hotplug_slot);
174 		return -EAGAIN;
175 	}
176 	retval = pci_hp_register(slot->hotplug_slot);
177 	if (retval) {
178 		err("pci_hp_register failed with error %d\n", retval);
179 		rpaphp_release_slot(slot->hotplug_slot);
180 		return retval;
181 	}
182 
183 	/* create "phy_locatoin" file */
184 	rpaphp_sysfs_add_attr_location(slot->hotplug_slot);
185 
186 	/* add slot to our internal list */
187 	dbg("%s adding slot[%s] to rpaphp_slot_list\n",
188 	    __FUNCTION__, slot->name);
189 
190 	list_add(&slot->rpaphp_slot_list, &rpaphp_slot_head);
191 	info("Slot [%s](PCI location=%s) registered\n", slot->name,
192 			slot->location);
193 	num_slots++;
194 	return 0;
195 }
196 
197 int rpaphp_get_power_status(struct slot *slot, u8 * value)
198 {
199 	int rc = 0, level;
200 
201 	rc = rtas_get_power_level(slot->power_domain, &level);
202 	if (rc < 0) {
203 		err("failed to get power-level for slot(%s), rc=0x%x\n",
204 			slot->location, rc);
205 		return rc;
206 	}
207 
208 	dbg("%s the power level of slot %s(pwd-domain:0x%x) is %d\n",
209 		__FUNCTION__, slot->name, slot->power_domain, level);
210 	*value = level;
211 
212 	return rc;
213 }
214 
215 int rpaphp_set_attention_status(struct slot *slot, u8 status)
216 {
217 	int rc;
218 
219 	/* status: LED_OFF or LED_ON */
220 	rc = rtas_set_indicator(DR_INDICATOR, slot->index, status);
221 	if (rc < 0)
222 		err("slot(name=%s location=%s index=0x%x) set attention-status(%d) failed! rc=0x%x\n",
223 		    slot->name, slot->location, slot->index, status, rc);
224 
225 	return rc;
226 }
227