xref: /openbmc/linux/drivers/pci/proc.c (revision e190bfe5)
1 /*
2  *	Procfs interface for the PCI bus.
3  *
4  *	Copyright (c) 1997--1999 Martin Mares <mj@ucw.cz>
5  */
6 
7 #include <linux/init.h>
8 #include <linux/pci.h>
9 #include <linux/slab.h>
10 #include <linux/module.h>
11 #include <linux/proc_fs.h>
12 #include <linux/seq_file.h>
13 #include <linux/smp_lock.h>
14 #include <linux/capability.h>
15 #include <asm/uaccess.h>
16 #include <asm/byteorder.h>
17 #include "pci.h"
18 
19 static int proc_initialized;	/* = 0 */
20 
21 static loff_t
22 proc_bus_pci_lseek(struct file *file, loff_t off, int whence)
23 {
24 	loff_t new = -1;
25 	struct inode *inode = file->f_path.dentry->d_inode;
26 
27 	mutex_lock(&inode->i_mutex);
28 	switch (whence) {
29 	case 0:
30 		new = off;
31 		break;
32 	case 1:
33 		new = file->f_pos + off;
34 		break;
35 	case 2:
36 		new = inode->i_size + off;
37 		break;
38 	}
39 	if (new < 0 || new > inode->i_size)
40 		new = -EINVAL;
41 	else
42 		file->f_pos = new;
43 	mutex_unlock(&inode->i_mutex);
44 	return new;
45 }
46 
47 static ssize_t
48 proc_bus_pci_read(struct file *file, char __user *buf, size_t nbytes, loff_t *ppos)
49 {
50 	const struct inode *ino = file->f_path.dentry->d_inode;
51 	const struct proc_dir_entry *dp = PDE(ino);
52 	struct pci_dev *dev = dp->data;
53 	unsigned int pos = *ppos;
54 	unsigned int cnt, size;
55 
56 	/*
57 	 * Normal users can read only the standardized portion of the
58 	 * configuration space as several chips lock up when trying to read
59 	 * undefined locations (think of Intel PIIX4 as a typical example).
60 	 */
61 
62 	if (capable(CAP_SYS_ADMIN))
63 		size = dp->size;
64 	else if (dev->hdr_type == PCI_HEADER_TYPE_CARDBUS)
65 		size = 128;
66 	else
67 		size = 64;
68 
69 	if (pos >= size)
70 		return 0;
71 	if (nbytes >= size)
72 		nbytes = size;
73 	if (pos + nbytes > size)
74 		nbytes = size - pos;
75 	cnt = nbytes;
76 
77 	if (!access_ok(VERIFY_WRITE, buf, cnt))
78 		return -EINVAL;
79 
80 	if ((pos & 1) && cnt) {
81 		unsigned char val;
82 		pci_user_read_config_byte(dev, pos, &val);
83 		__put_user(val, buf);
84 		buf++;
85 		pos++;
86 		cnt--;
87 	}
88 
89 	if ((pos & 3) && cnt > 2) {
90 		unsigned short val;
91 		pci_user_read_config_word(dev, pos, &val);
92 		__put_user(cpu_to_le16(val), (__le16 __user *) buf);
93 		buf += 2;
94 		pos += 2;
95 		cnt -= 2;
96 	}
97 
98 	while (cnt >= 4) {
99 		unsigned int val;
100 		pci_user_read_config_dword(dev, pos, &val);
101 		__put_user(cpu_to_le32(val), (__le32 __user *) buf);
102 		buf += 4;
103 		pos += 4;
104 		cnt -= 4;
105 	}
106 
107 	if (cnt >= 2) {
108 		unsigned short val;
109 		pci_user_read_config_word(dev, pos, &val);
110 		__put_user(cpu_to_le16(val), (__le16 __user *) buf);
111 		buf += 2;
112 		pos += 2;
113 		cnt -= 2;
114 	}
115 
116 	if (cnt) {
117 		unsigned char val;
118 		pci_user_read_config_byte(dev, pos, &val);
119 		__put_user(val, buf);
120 		buf++;
121 		pos++;
122 		cnt--;
123 	}
124 
125 	*ppos = pos;
126 	return nbytes;
127 }
128 
129 static ssize_t
130 proc_bus_pci_write(struct file *file, const char __user *buf, size_t nbytes, loff_t *ppos)
131 {
132 	struct inode *ino = file->f_path.dentry->d_inode;
133 	const struct proc_dir_entry *dp = PDE(ino);
134 	struct pci_dev *dev = dp->data;
135 	int pos = *ppos;
136 	int size = dp->size;
137 	int cnt;
138 
139 	if (pos >= size)
140 		return 0;
141 	if (nbytes >= size)
142 		nbytes = size;
143 	if (pos + nbytes > size)
144 		nbytes = size - pos;
145 	cnt = nbytes;
146 
147 	if (!access_ok(VERIFY_READ, buf, cnt))
148 		return -EINVAL;
149 
150 	if ((pos & 1) && cnt) {
151 		unsigned char val;
152 		__get_user(val, buf);
153 		pci_user_write_config_byte(dev, pos, val);
154 		buf++;
155 		pos++;
156 		cnt--;
157 	}
158 
159 	if ((pos & 3) && cnt > 2) {
160 		__le16 val;
161 		__get_user(val, (__le16 __user *) buf);
162 		pci_user_write_config_word(dev, pos, le16_to_cpu(val));
163 		buf += 2;
164 		pos += 2;
165 		cnt -= 2;
166 	}
167 
168 	while (cnt >= 4) {
169 		__le32 val;
170 		__get_user(val, (__le32 __user *) buf);
171 		pci_user_write_config_dword(dev, pos, le32_to_cpu(val));
172 		buf += 4;
173 		pos += 4;
174 		cnt -= 4;
175 	}
176 
177 	if (cnt >= 2) {
178 		__le16 val;
179 		__get_user(val, (__le16 __user *) buf);
180 		pci_user_write_config_word(dev, pos, le16_to_cpu(val));
181 		buf += 2;
182 		pos += 2;
183 		cnt -= 2;
184 	}
185 
186 	if (cnt) {
187 		unsigned char val;
188 		__get_user(val, buf);
189 		pci_user_write_config_byte(dev, pos, val);
190 		buf++;
191 		pos++;
192 		cnt--;
193 	}
194 
195 	*ppos = pos;
196 	i_size_write(ino, dp->size);
197 	return nbytes;
198 }
199 
200 struct pci_filp_private {
201 	enum pci_mmap_state mmap_state;
202 	int write_combine;
203 };
204 
205 static long proc_bus_pci_ioctl(struct file *file, unsigned int cmd,
206 			       unsigned long arg)
207 {
208 	const struct proc_dir_entry *dp = PDE(file->f_dentry->d_inode);
209 	struct pci_dev *dev = dp->data;
210 #ifdef HAVE_PCI_MMAP
211 	struct pci_filp_private *fpriv = file->private_data;
212 #endif /* HAVE_PCI_MMAP */
213 	int ret = 0;
214 
215 	lock_kernel();
216 
217 	switch (cmd) {
218 	case PCIIOC_CONTROLLER:
219 		ret = pci_domain_nr(dev->bus);
220 		break;
221 
222 #ifdef HAVE_PCI_MMAP
223 	case PCIIOC_MMAP_IS_IO:
224 		fpriv->mmap_state = pci_mmap_io;
225 		break;
226 
227 	case PCIIOC_MMAP_IS_MEM:
228 		fpriv->mmap_state = pci_mmap_mem;
229 		break;
230 
231 	case PCIIOC_WRITE_COMBINE:
232 		if (arg)
233 			fpriv->write_combine = 1;
234 		else
235 			fpriv->write_combine = 0;
236 		break;
237 
238 #endif /* HAVE_PCI_MMAP */
239 
240 	default:
241 		ret = -EINVAL;
242 		break;
243 	};
244 
245 	unlock_kernel();
246 	return ret;
247 }
248 
249 #ifdef HAVE_PCI_MMAP
250 static int proc_bus_pci_mmap(struct file *file, struct vm_area_struct *vma)
251 {
252 	struct inode *inode = file->f_path.dentry->d_inode;
253 	const struct proc_dir_entry *dp = PDE(inode);
254 	struct pci_dev *dev = dp->data;
255 	struct pci_filp_private *fpriv = file->private_data;
256 	int i, ret;
257 
258 	if (!capable(CAP_SYS_RAWIO))
259 		return -EPERM;
260 
261 	/* Make sure the caller is mapping a real resource for this device */
262 	for (i = 0; i < PCI_ROM_RESOURCE; i++) {
263 		if (pci_mmap_fits(dev, i, vma))
264 			break;
265 	}
266 
267 	if (i >= PCI_ROM_RESOURCE)
268 		return -ENODEV;
269 
270 	ret = pci_mmap_page_range(dev, vma,
271 				  fpriv->mmap_state,
272 				  fpriv->write_combine);
273 	if (ret < 0)
274 		return ret;
275 
276 	return 0;
277 }
278 
279 static int proc_bus_pci_open(struct inode *inode, struct file *file)
280 {
281 	struct pci_filp_private *fpriv = kmalloc(sizeof(*fpriv), GFP_KERNEL);
282 
283 	if (!fpriv)
284 		return -ENOMEM;
285 
286 	fpriv->mmap_state = pci_mmap_io;
287 	fpriv->write_combine = 0;
288 
289 	file->private_data = fpriv;
290 
291 	return 0;
292 }
293 
294 static int proc_bus_pci_release(struct inode *inode, struct file *file)
295 {
296 	kfree(file->private_data);
297 	file->private_data = NULL;
298 
299 	return 0;
300 }
301 #endif /* HAVE_PCI_MMAP */
302 
303 static const struct file_operations proc_bus_pci_operations = {
304 	.owner		= THIS_MODULE,
305 	.llseek		= proc_bus_pci_lseek,
306 	.read		= proc_bus_pci_read,
307 	.write		= proc_bus_pci_write,
308 	.unlocked_ioctl	= proc_bus_pci_ioctl,
309 #ifdef HAVE_PCI_MMAP
310 	.open		= proc_bus_pci_open,
311 	.release	= proc_bus_pci_release,
312 	.mmap		= proc_bus_pci_mmap,
313 #ifdef HAVE_ARCH_PCI_GET_UNMAPPED_AREA
314 	.get_unmapped_area = get_pci_unmapped_area,
315 #endif /* HAVE_ARCH_PCI_GET_UNMAPPED_AREA */
316 #endif /* HAVE_PCI_MMAP */
317 };
318 
319 /* iterator */
320 static void *pci_seq_start(struct seq_file *m, loff_t *pos)
321 {
322 	struct pci_dev *dev = NULL;
323 	loff_t n = *pos;
324 
325 	for_each_pci_dev(dev) {
326 		if (!n--)
327 			break;
328 	}
329 	return dev;
330 }
331 
332 static void *pci_seq_next(struct seq_file *m, void *v, loff_t *pos)
333 {
334 	struct pci_dev *dev = v;
335 
336 	(*pos)++;
337 	dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev);
338 	return dev;
339 }
340 
341 static void pci_seq_stop(struct seq_file *m, void *v)
342 {
343 	if (v) {
344 		struct pci_dev *dev = v;
345 		pci_dev_put(dev);
346 	}
347 }
348 
349 static int show_device(struct seq_file *m, void *v)
350 {
351 	const struct pci_dev *dev = v;
352 	const struct pci_driver *drv;
353 	int i;
354 
355 	if (dev == NULL)
356 		return 0;
357 
358 	drv = pci_dev_driver(dev);
359 	seq_printf(m, "%02x%02x\t%04x%04x\t%x",
360 			dev->bus->number,
361 			dev->devfn,
362 			dev->vendor,
363 			dev->device,
364 			dev->irq);
365 
366 	/* only print standard and ROM resources to preserve compatibility */
367 	for (i = 0; i <= PCI_ROM_RESOURCE; i++) {
368 		resource_size_t start, end;
369 		pci_resource_to_user(dev, i, &dev->resource[i], &start, &end);
370 		seq_printf(m, "\t%16llx",
371 			(unsigned long long)(start |
372 			(dev->resource[i].flags & PCI_REGION_FLAG_MASK)));
373 	}
374 	for (i = 0; i <= PCI_ROM_RESOURCE; i++) {
375 		resource_size_t start, end;
376 		pci_resource_to_user(dev, i, &dev->resource[i], &start, &end);
377 		seq_printf(m, "\t%16llx",
378 			dev->resource[i].start < dev->resource[i].end ?
379 			(unsigned long long)(end - start) + 1 : 0);
380 	}
381 	seq_putc(m, '\t');
382 	if (drv)
383 		seq_printf(m, "%s", drv->name);
384 	seq_putc(m, '\n');
385 	return 0;
386 }
387 
388 static const struct seq_operations proc_bus_pci_devices_op = {
389 	.start	= pci_seq_start,
390 	.next	= pci_seq_next,
391 	.stop	= pci_seq_stop,
392 	.show	= show_device
393 };
394 
395 static struct proc_dir_entry *proc_bus_pci_dir;
396 
397 int pci_proc_attach_device(struct pci_dev *dev)
398 {
399 	struct pci_bus *bus = dev->bus;
400 	struct proc_dir_entry *e;
401 	char name[16];
402 
403 	if (!proc_initialized)
404 		return -EACCES;
405 
406 	if (!bus->procdir) {
407 		if (pci_proc_domain(bus)) {
408 			sprintf(name, "%04x:%02x", pci_domain_nr(bus),
409 					bus->number);
410 		} else {
411 			sprintf(name, "%02x", bus->number);
412 		}
413 		bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
414 		if (!bus->procdir)
415 			return -ENOMEM;
416 	}
417 
418 	sprintf(name, "%02x.%x", PCI_SLOT(dev->devfn), PCI_FUNC(dev->devfn));
419 	e = proc_create_data(name, S_IFREG | S_IRUGO | S_IWUSR, bus->procdir,
420 			     &proc_bus_pci_operations, dev);
421 	if (!e)
422 		return -ENOMEM;
423 	e->size = dev->cfg_size;
424 	dev->procent = e;
425 
426 	return 0;
427 }
428 
429 int pci_proc_detach_device(struct pci_dev *dev)
430 {
431 	struct proc_dir_entry *e;
432 
433 	if ((e = dev->procent)) {
434 		if (atomic_read(&e->count) > 1)
435 			return -EBUSY;
436 		remove_proc_entry(e->name, dev->bus->procdir);
437 		dev->procent = NULL;
438 	}
439 	return 0;
440 }
441 
442 #if 0
443 int pci_proc_attach_bus(struct pci_bus* bus)
444 {
445 	struct proc_dir_entry *de = bus->procdir;
446 
447 	if (!proc_initialized)
448 		return -EACCES;
449 
450 	if (!de) {
451 		char name[16];
452 		sprintf(name, "%02x", bus->number);
453 		de = bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
454 		if (!de)
455 			return -ENOMEM;
456 	}
457 	return 0;
458 }
459 #endif  /*  0  */
460 
461 int pci_proc_detach_bus(struct pci_bus* bus)
462 {
463 	struct proc_dir_entry *de = bus->procdir;
464 	if (de)
465 		remove_proc_entry(de->name, proc_bus_pci_dir);
466 	return 0;
467 }
468 
469 static int proc_bus_pci_dev_open(struct inode *inode, struct file *file)
470 {
471 	return seq_open(file, &proc_bus_pci_devices_op);
472 }
473 static const struct file_operations proc_bus_pci_dev_operations = {
474 	.owner		= THIS_MODULE,
475 	.open		= proc_bus_pci_dev_open,
476 	.read		= seq_read,
477 	.llseek		= seq_lseek,
478 	.release	= seq_release,
479 };
480 
481 static int __init pci_proc_init(void)
482 {
483 	struct pci_dev *dev = NULL;
484 	proc_bus_pci_dir = proc_mkdir("bus/pci", NULL);
485 	proc_create("devices", 0, proc_bus_pci_dir,
486 		    &proc_bus_pci_dev_operations);
487 	proc_initialized = 1;
488 	while ((dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev)) != NULL) {
489 		pci_proc_attach_device(dev);
490 	}
491 	return 0;
492 }
493 
494 device_initcall(pci_proc_init);
495 
496