xref: /openbmc/linux/drivers/pci/proc.c (revision b595076a)
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 	switch (cmd) {
216 	case PCIIOC_CONTROLLER:
217 		ret = pci_domain_nr(dev->bus);
218 		break;
219 
220 #ifdef HAVE_PCI_MMAP
221 	case PCIIOC_MMAP_IS_IO:
222 		fpriv->mmap_state = pci_mmap_io;
223 		break;
224 
225 	case PCIIOC_MMAP_IS_MEM:
226 		fpriv->mmap_state = pci_mmap_mem;
227 		break;
228 
229 	case PCIIOC_WRITE_COMBINE:
230 		if (arg)
231 			fpriv->write_combine = 1;
232 		else
233 			fpriv->write_combine = 0;
234 		break;
235 
236 #endif /* HAVE_PCI_MMAP */
237 
238 	default:
239 		ret = -EINVAL;
240 		break;
241 	};
242 
243 	return ret;
244 }
245 
246 #ifdef HAVE_PCI_MMAP
247 static int proc_bus_pci_mmap(struct file *file, struct vm_area_struct *vma)
248 {
249 	struct inode *inode = file->f_path.dentry->d_inode;
250 	const struct proc_dir_entry *dp = PDE(inode);
251 	struct pci_dev *dev = dp->data;
252 	struct pci_filp_private *fpriv = file->private_data;
253 	int i, ret;
254 
255 	if (!capable(CAP_SYS_RAWIO))
256 		return -EPERM;
257 
258 	/* Make sure the caller is mapping a real resource for this device */
259 	for (i = 0; i < PCI_ROM_RESOURCE; i++) {
260 		if (pci_mmap_fits(dev, i, vma))
261 			break;
262 	}
263 
264 	if (i >= PCI_ROM_RESOURCE)
265 		return -ENODEV;
266 
267 	ret = pci_mmap_page_range(dev, vma,
268 				  fpriv->mmap_state,
269 				  fpriv->write_combine);
270 	if (ret < 0)
271 		return ret;
272 
273 	return 0;
274 }
275 
276 static int proc_bus_pci_open(struct inode *inode, struct file *file)
277 {
278 	struct pci_filp_private *fpriv = kmalloc(sizeof(*fpriv), GFP_KERNEL);
279 
280 	if (!fpriv)
281 		return -ENOMEM;
282 
283 	fpriv->mmap_state = pci_mmap_io;
284 	fpriv->write_combine = 0;
285 
286 	file->private_data = fpriv;
287 
288 	return 0;
289 }
290 
291 static int proc_bus_pci_release(struct inode *inode, struct file *file)
292 {
293 	kfree(file->private_data);
294 	file->private_data = NULL;
295 
296 	return 0;
297 }
298 #endif /* HAVE_PCI_MMAP */
299 
300 static const struct file_operations proc_bus_pci_operations = {
301 	.owner		= THIS_MODULE,
302 	.llseek		= proc_bus_pci_lseek,
303 	.read		= proc_bus_pci_read,
304 	.write		= proc_bus_pci_write,
305 	.unlocked_ioctl	= proc_bus_pci_ioctl,
306 	.compat_ioctl	= proc_bus_pci_ioctl,
307 #ifdef HAVE_PCI_MMAP
308 	.open		= proc_bus_pci_open,
309 	.release	= proc_bus_pci_release,
310 	.mmap		= proc_bus_pci_mmap,
311 #ifdef HAVE_ARCH_PCI_GET_UNMAPPED_AREA
312 	.get_unmapped_area = get_pci_unmapped_area,
313 #endif /* HAVE_ARCH_PCI_GET_UNMAPPED_AREA */
314 #endif /* HAVE_PCI_MMAP */
315 };
316 
317 /* iterator */
318 static void *pci_seq_start(struct seq_file *m, loff_t *pos)
319 {
320 	struct pci_dev *dev = NULL;
321 	loff_t n = *pos;
322 
323 	for_each_pci_dev(dev) {
324 		if (!n--)
325 			break;
326 	}
327 	return dev;
328 }
329 
330 static void *pci_seq_next(struct seq_file *m, void *v, loff_t *pos)
331 {
332 	struct pci_dev *dev = v;
333 
334 	(*pos)++;
335 	dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev);
336 	return dev;
337 }
338 
339 static void pci_seq_stop(struct seq_file *m, void *v)
340 {
341 	if (v) {
342 		struct pci_dev *dev = v;
343 		pci_dev_put(dev);
344 	}
345 }
346 
347 static int show_device(struct seq_file *m, void *v)
348 {
349 	const struct pci_dev *dev = v;
350 	const struct pci_driver *drv;
351 	int i;
352 
353 	if (dev == NULL)
354 		return 0;
355 
356 	drv = pci_dev_driver(dev);
357 	seq_printf(m, "%02x%02x\t%04x%04x\t%x",
358 			dev->bus->number,
359 			dev->devfn,
360 			dev->vendor,
361 			dev->device,
362 			dev->irq);
363 
364 	/* only print standard and ROM resources to preserve compatibility */
365 	for (i = 0; i <= PCI_ROM_RESOURCE; i++) {
366 		resource_size_t start, end;
367 		pci_resource_to_user(dev, i, &dev->resource[i], &start, &end);
368 		seq_printf(m, "\t%16llx",
369 			(unsigned long long)(start |
370 			(dev->resource[i].flags & PCI_REGION_FLAG_MASK)));
371 	}
372 	for (i = 0; i <= PCI_ROM_RESOURCE; i++) {
373 		resource_size_t start, end;
374 		pci_resource_to_user(dev, i, &dev->resource[i], &start, &end);
375 		seq_printf(m, "\t%16llx",
376 			dev->resource[i].start < dev->resource[i].end ?
377 			(unsigned long long)(end - start) + 1 : 0);
378 	}
379 	seq_putc(m, '\t');
380 	if (drv)
381 		seq_printf(m, "%s", drv->name);
382 	seq_putc(m, '\n');
383 	return 0;
384 }
385 
386 static const struct seq_operations proc_bus_pci_devices_op = {
387 	.start	= pci_seq_start,
388 	.next	= pci_seq_next,
389 	.stop	= pci_seq_stop,
390 	.show	= show_device
391 };
392 
393 static struct proc_dir_entry *proc_bus_pci_dir;
394 
395 int pci_proc_attach_device(struct pci_dev *dev)
396 {
397 	struct pci_bus *bus = dev->bus;
398 	struct proc_dir_entry *e;
399 	char name[16];
400 
401 	if (!proc_initialized)
402 		return -EACCES;
403 
404 	if (!bus->procdir) {
405 		if (pci_proc_domain(bus)) {
406 			sprintf(name, "%04x:%02x", pci_domain_nr(bus),
407 					bus->number);
408 		} else {
409 			sprintf(name, "%02x", bus->number);
410 		}
411 		bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
412 		if (!bus->procdir)
413 			return -ENOMEM;
414 	}
415 
416 	sprintf(name, "%02x.%x", PCI_SLOT(dev->devfn), PCI_FUNC(dev->devfn));
417 	e = proc_create_data(name, S_IFREG | S_IRUGO | S_IWUSR, bus->procdir,
418 			     &proc_bus_pci_operations, dev);
419 	if (!e)
420 		return -ENOMEM;
421 	e->size = dev->cfg_size;
422 	dev->procent = e;
423 
424 	return 0;
425 }
426 
427 int pci_proc_detach_device(struct pci_dev *dev)
428 {
429 	struct proc_dir_entry *e;
430 
431 	if ((e = dev->procent)) {
432 		remove_proc_entry(e->name, dev->bus->procdir);
433 		dev->procent = NULL;
434 	}
435 	return 0;
436 }
437 
438 #if 0
439 int pci_proc_attach_bus(struct pci_bus* bus)
440 {
441 	struct proc_dir_entry *de = bus->procdir;
442 
443 	if (!proc_initialized)
444 		return -EACCES;
445 
446 	if (!de) {
447 		char name[16];
448 		sprintf(name, "%02x", bus->number);
449 		de = bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
450 		if (!de)
451 			return -ENOMEM;
452 	}
453 	return 0;
454 }
455 #endif  /*  0  */
456 
457 int pci_proc_detach_bus(struct pci_bus* bus)
458 {
459 	struct proc_dir_entry *de = bus->procdir;
460 	if (de)
461 		remove_proc_entry(de->name, proc_bus_pci_dir);
462 	return 0;
463 }
464 
465 static int proc_bus_pci_dev_open(struct inode *inode, struct file *file)
466 {
467 	return seq_open(file, &proc_bus_pci_devices_op);
468 }
469 static const struct file_operations proc_bus_pci_dev_operations = {
470 	.owner		= THIS_MODULE,
471 	.open		= proc_bus_pci_dev_open,
472 	.read		= seq_read,
473 	.llseek		= seq_lseek,
474 	.release	= seq_release,
475 };
476 
477 static int __init pci_proc_init(void)
478 {
479 	struct pci_dev *dev = NULL;
480 	proc_bus_pci_dir = proc_mkdir("bus/pci", NULL);
481 	proc_create("devices", 0, proc_bus_pci_dir,
482 		    &proc_bus_pci_dev_operations);
483 	proc_initialized = 1;
484 	for_each_pci_dev(dev)
485 		pci_proc_attach_device(dev);
486 
487 	return 0;
488 }
489 
490 device_initcall(pci_proc_init);
491 
492