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