Linux-2.6.12-rc2
[linux-3.10.git] / drivers / pci / proc.c
1 /*
2  *      $Id: proc.c,v 1.13 1998/05/12 07:36:07 mj Exp $
3  *
4  *      Procfs interface for the PCI bus.
5  *
6  *      Copyright (c) 1997--1999 Martin Mares <mj@ucw.cz>
7  */
8
9 #include <linux/init.h>
10 #include <linux/pci.h>
11 #include <linux/module.h>
12 #include <linux/proc_fs.h>
13 #include <linux/seq_file.h>
14 #include <linux/smp_lock.h>
15
16 #include <asm/uaccess.h>
17 #include <asm/byteorder.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_dentry->d_inode;
26
27         down(&inode->i_sem);
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         up(&inode->i_sem);
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_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 = dev->cfg_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_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_read_config_word(dev, pos, &val);
92                 __put_user(cpu_to_le16(val), (unsigned short __user *) buf);
93                 buf += 2;
94                 pos += 2;
95                 cnt -= 2;
96         }
97
98         while (cnt >= 4) {
99                 unsigned int val;
100                 pci_read_config_dword(dev, pos, &val);
101                 __put_user(cpu_to_le32(val), (unsigned int __user *) buf);
102                 buf += 4;
103                 pos += 4;
104                 cnt -= 4;
105         }
106
107         if (cnt >= 2) {
108                 unsigned short val;
109                 pci_read_config_word(dev, pos, &val);
110                 __put_user(cpu_to_le16(val), (unsigned short __user *) buf);
111                 buf += 2;
112                 pos += 2;
113                 cnt -= 2;
114         }
115
116         if (cnt) {
117                 unsigned char val;
118                 pci_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         const struct inode *ino = file->f_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 = dev->cfg_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_write_config_byte(dev, pos, val);
154                 buf++;
155                 pos++;
156                 cnt--;
157         }
158
159         if ((pos & 3) && cnt > 2) {
160                 unsigned short val;
161                 __get_user(val, (unsigned short __user *) buf);
162                 pci_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                 unsigned int val;
170                 __get_user(val, (unsigned int __user *) buf);
171                 pci_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                 unsigned short val;
179                 __get_user(val, (unsigned short __user *) buf);
180                 pci_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_write_config_byte(dev, pos, val);
190                 buf++;
191                 pos++;
192                 cnt--;
193         }
194
195         *ppos = pos;
196         return nbytes;
197 }
198
199 struct pci_filp_private {
200         enum pci_mmap_state mmap_state;
201         int write_combine;
202 };
203
204 static int proc_bus_pci_ioctl(struct inode *inode, struct file *file, unsigned int cmd, unsigned long arg)
205 {
206         const struct proc_dir_entry *dp = PDE(inode);
207         struct pci_dev *dev = dp->data;
208 #ifdef HAVE_PCI_MMAP
209         struct pci_filp_private *fpriv = file->private_data;
210 #endif /* HAVE_PCI_MMAP */
211         int ret = 0;
212
213         switch (cmd) {
214         case PCIIOC_CONTROLLER:
215                 ret = pci_domain_nr(dev->bus);
216                 break;
217
218 #ifdef HAVE_PCI_MMAP
219         case PCIIOC_MMAP_IS_IO:
220                 fpriv->mmap_state = pci_mmap_io;
221                 break;
222
223         case PCIIOC_MMAP_IS_MEM:
224                 fpriv->mmap_state = pci_mmap_mem;
225                 break;
226
227         case PCIIOC_WRITE_COMBINE:
228                 if (arg)
229                         fpriv->write_combine = 1;
230                 else
231                         fpriv->write_combine = 0;
232                 break;
233
234 #endif /* HAVE_PCI_MMAP */
235
236         default:
237                 ret = -EINVAL;
238                 break;
239         };
240
241         return ret;
242 }
243
244 #ifdef HAVE_PCI_MMAP
245 static int proc_bus_pci_mmap(struct file *file, struct vm_area_struct *vma)
246 {
247         struct inode *inode = file->f_dentry->d_inode;
248         const struct proc_dir_entry *dp = PDE(inode);
249         struct pci_dev *dev = dp->data;
250         struct pci_filp_private *fpriv = file->private_data;
251         int ret;
252
253         if (!capable(CAP_SYS_RAWIO))
254                 return -EPERM;
255
256         ret = pci_mmap_page_range(dev, vma,
257                                   fpriv->mmap_state,
258                                   fpriv->write_combine);
259         if (ret < 0)
260                 return ret;
261
262         return 0;
263 }
264
265 static int proc_bus_pci_open(struct inode *inode, struct file *file)
266 {
267         struct pci_filp_private *fpriv = kmalloc(sizeof(*fpriv), GFP_KERNEL);
268
269         if (!fpriv)
270                 return -ENOMEM;
271
272         fpriv->mmap_state = pci_mmap_io;
273         fpriv->write_combine = 0;
274
275         file->private_data = fpriv;
276
277         return 0;
278 }
279
280 static int proc_bus_pci_release(struct inode *inode, struct file *file)
281 {
282         kfree(file->private_data);
283         file->private_data = NULL;
284
285         return 0;
286 }
287 #endif /* HAVE_PCI_MMAP */
288
289 static struct file_operations proc_bus_pci_operations = {
290         .llseek         = proc_bus_pci_lseek,
291         .read           = proc_bus_pci_read,
292         .write          = proc_bus_pci_write,
293         .ioctl          = proc_bus_pci_ioctl,
294 #ifdef HAVE_PCI_MMAP
295         .open           = proc_bus_pci_open,
296         .release        = proc_bus_pci_release,
297         .mmap           = proc_bus_pci_mmap,
298 #ifdef HAVE_ARCH_PCI_GET_UNMAPPED_AREA
299         .get_unmapped_area = get_pci_unmapped_area,
300 #endif /* HAVE_ARCH_PCI_GET_UNMAPPED_AREA */
301 #endif /* HAVE_PCI_MMAP */
302 };
303
304 #if BITS_PER_LONG == 32
305 #define LONG_FORMAT "\t%08lx"
306 #else
307 #define LONG_FORMAT "\t%16lx"
308 #endif
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         /* Here should be 7 and not PCI_NUM_RESOURCES as we need to preserve compatibility */
357         for(i=0; i<7; i++)
358                 seq_printf(m, LONG_FORMAT,
359                         dev->resource[i].start |
360                         (dev->resource[i].flags & PCI_REGION_FLAG_MASK));
361         for(i=0; i<7; i++)
362                 seq_printf(m, LONG_FORMAT,
363                         dev->resource[i].start < dev->resource[i].end ?
364                         dev->resource[i].end - dev->resource[i].start + 1 : 0);
365         seq_putc(m, '\t');
366         if (drv)
367                 seq_printf(m, "%s", drv->name);
368         seq_putc(m, '\n');
369         return 0;
370 }
371
372 static struct seq_operations proc_bus_pci_devices_op = {
373         .start  = pci_seq_start,
374         .next   = pci_seq_next,
375         .stop   = pci_seq_stop,
376         .show   = show_device
377 };
378
379 static struct proc_dir_entry *proc_bus_pci_dir;
380
381 int pci_proc_attach_device(struct pci_dev *dev)
382 {
383         struct pci_bus *bus = dev->bus;
384         struct proc_dir_entry *e;
385         char name[16];
386
387         if (!proc_initialized)
388                 return -EACCES;
389
390         if (!bus->procdir) {
391                 if (pci_proc_domain(bus)) {
392                         sprintf(name, "%04x:%02x", pci_domain_nr(bus),
393                                         bus->number);
394                 } else {
395                         sprintf(name, "%02x", bus->number);
396                 }
397                 bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
398                 if (!bus->procdir)
399                         return -ENOMEM;
400         }
401
402         sprintf(name, "%02x.%x", PCI_SLOT(dev->devfn), PCI_FUNC(dev->devfn));
403         e = create_proc_entry(name, S_IFREG | S_IRUGO | S_IWUSR, bus->procdir);
404         if (!e)
405                 return -ENOMEM;
406         e->proc_fops = &proc_bus_pci_operations;
407         e->data = dev;
408         e->size = dev->cfg_size;
409         dev->procent = e;
410
411         return 0;
412 }
413
414 int pci_proc_detach_device(struct pci_dev *dev)
415 {
416         struct proc_dir_entry *e;
417
418         if ((e = dev->procent)) {
419                 if (atomic_read(&e->count))
420                         return -EBUSY;
421                 remove_proc_entry(e->name, dev->bus->procdir);
422                 dev->procent = NULL;
423         }
424         return 0;
425 }
426
427 int pci_proc_attach_bus(struct pci_bus* bus)
428 {
429         struct proc_dir_entry *de = bus->procdir;
430
431         if (!proc_initialized)
432                 return -EACCES;
433
434         if (!de) {
435                 char name[16];
436                 sprintf(name, "%02x", bus->number);
437                 de = bus->procdir = proc_mkdir(name, proc_bus_pci_dir);
438                 if (!de)
439                         return -ENOMEM;
440         }
441         return 0;
442 }
443
444 int pci_proc_detach_bus(struct pci_bus* bus)
445 {
446         struct proc_dir_entry *de = bus->procdir;
447         if (de)
448                 remove_proc_entry(de->name, proc_bus_pci_dir);
449         return 0;
450 }
451
452 #ifdef CONFIG_PCI_LEGACY_PROC
453
454 /*
455  *  Backward compatible /proc/pci interface.
456  */
457
458 /*
459  * Convert some of the configuration space registers of the device at
460  * address (bus,devfn) into a string (possibly several lines each).
461  * The configuration string is stored starting at buf[len].  If the
462  * string would exceed the size of the buffer (SIZE), 0 is returned.
463  */
464 static int show_dev_config(struct seq_file *m, void *v)
465 {
466         struct pci_dev *dev = v;
467         struct pci_dev *first_dev;
468         struct pci_driver *drv;
469         u32 class_rev;
470         unsigned char latency, min_gnt, max_lat, *class;
471         int reg;
472
473         first_dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, NULL);
474         if (dev == first_dev)
475                 seq_puts(m, "PCI devices found:\n");
476         pci_dev_put(first_dev);
477
478         drv = pci_dev_driver(dev);
479
480         pci_read_config_dword(dev, PCI_CLASS_REVISION, &class_rev);
481         pci_read_config_byte (dev, PCI_LATENCY_TIMER, &latency);
482         pci_read_config_byte (dev, PCI_MIN_GNT, &min_gnt);
483         pci_read_config_byte (dev, PCI_MAX_LAT, &max_lat);
484         seq_printf(m, "  Bus %2d, device %3d, function %2d:\n",
485                dev->bus->number, PCI_SLOT(dev->devfn), PCI_FUNC(dev->devfn));
486         class = pci_class_name(class_rev >> 16);
487         if (class)
488                 seq_printf(m, "    %s", class);
489         else
490                 seq_printf(m, "    Class %04x", class_rev >> 16);
491 #ifdef CONFIG_PCI_NAMES
492         seq_printf(m, ": %s", dev->pretty_name);
493 #else
494         seq_printf(m, ": PCI device %04x:%04x", dev->vendor, dev->device);
495 #endif
496         seq_printf(m, " (rev %d).\n", class_rev & 0xff);
497
498         if (dev->irq)
499                 seq_printf(m, "      IRQ %d.\n", dev->irq);
500
501         if (latency || min_gnt || max_lat) {
502                 seq_printf(m, "      Master Capable.  ");
503                 if (latency)
504                         seq_printf(m, "Latency=%d.  ", latency);
505                 else
506                         seq_puts(m, "No bursts.  ");
507                 if (min_gnt)
508                         seq_printf(m, "Min Gnt=%d.", min_gnt);
509                 if (max_lat)
510                         seq_printf(m, "Max Lat=%d.", max_lat);
511                 seq_putc(m, '\n');
512         }
513
514         for (reg = 0; reg < 6; reg++) {
515                 struct resource *res = dev->resource + reg;
516                 unsigned long base, end, flags;
517
518                 base = res->start;
519                 end = res->end;
520                 flags = res->flags;
521                 if (!end)
522                         continue;
523
524                 if (flags & PCI_BASE_ADDRESS_SPACE_IO) {
525                         seq_printf(m, "      I/O at 0x%lx [0x%lx].\n",
526                                 base, end);
527                 } else {
528                         const char *pref, *type = "unknown";
529
530                         if (flags & PCI_BASE_ADDRESS_MEM_PREFETCH)
531                                 pref = "P";
532                         else
533                                 pref = "Non-p";
534                         switch (flags & PCI_BASE_ADDRESS_MEM_TYPE_MASK) {
535                               case PCI_BASE_ADDRESS_MEM_TYPE_32:
536                                 type = "32 bit"; break;
537                               case PCI_BASE_ADDRESS_MEM_TYPE_1M:
538                                 type = "20 bit"; break;
539                               case PCI_BASE_ADDRESS_MEM_TYPE_64:
540                                 type = "64 bit"; break;
541                         }
542                         seq_printf(m, "      %srefetchable %s memory at "
543                                        "0x%lx [0x%lx].\n", pref, type,
544                                        base,
545                                        end);
546                 }
547         }
548         return 0;
549 }
550
551 static struct seq_operations proc_pci_op = {
552         .start  = pci_seq_start,
553         .next   = pci_seq_next,
554         .stop   = pci_seq_stop,
555         .show   = show_dev_config
556 };
557
558 static int proc_pci_open(struct inode *inode, struct file *file)
559 {
560         return seq_open(file, &proc_pci_op);
561 }
562 static struct file_operations proc_pci_operations = {
563         .open           = proc_pci_open,
564         .read           = seq_read,
565         .llseek         = seq_lseek,
566         .release        = seq_release,
567 };
568
569 static void legacy_proc_init(void)
570 {
571         struct proc_dir_entry * entry = create_proc_entry("pci", 0, NULL);
572         if (entry)
573                 entry->proc_fops = &proc_pci_operations;
574 }
575
576 #else
577
578 static void legacy_proc_init(void)
579 {
580
581 }
582
583 #endif /* CONFIG_PCI_LEGACY_PROC */
584
585 static int proc_bus_pci_dev_open(struct inode *inode, struct file *file)
586 {
587         return seq_open(file, &proc_bus_pci_devices_op);
588 }
589 static struct file_operations proc_bus_pci_dev_operations = {
590         .open           = proc_bus_pci_dev_open,
591         .read           = seq_read,
592         .llseek         = seq_lseek,
593         .release        = seq_release,
594 };
595
596 static int __init pci_proc_init(void)
597 {
598         struct proc_dir_entry *entry;
599         struct pci_dev *dev = NULL;
600         proc_bus_pci_dir = proc_mkdir("pci", proc_bus);
601         entry = create_proc_entry("devices", 0, proc_bus_pci_dir);
602         if (entry)
603                 entry->proc_fops = &proc_bus_pci_dev_operations;
604         proc_initialized = 1;
605         while ((dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev)) != NULL) {
606                 pci_proc_attach_device(dev);
607         }
608         legacy_proc_init();
609         return 0;
610 }
611
612 __initcall(pci_proc_init);
613
614 #ifdef CONFIG_HOTPLUG
615 EXPORT_SYMBOL(pci_proc_attach_device);
616 EXPORT_SYMBOL(pci_proc_attach_bus);
617 EXPORT_SYMBOL(pci_proc_detach_bus);
618 #endif
619