]> nv-tegra.nvidia Code Review - linux-3.10.git/blob - drivers/pci/pcie/portdrv_core.c
127f64f85dc5c44dc4c947fc88b8b22e4a28303b
[linux-3.10.git] / drivers / pci / pcie / portdrv_core.c
1 /*
2  * File:        portdrv_core.c
3  * Purpose:     PCI Express Port Bus Driver's Core Functions
4  *
5  * Copyright (C) 2004 Intel
6  * Copyright (C) Tom Long Nguyen (tom.l.nguyen@intel.com)
7  */
8
9 #include <linux/module.h>
10 #include <linux/pci.h>
11 #include <linux/kernel.h>
12 #include <linux/errno.h>
13 #include <linux/pm.h>
14 #include <linux/pcieport_if.h>
15
16 #include "portdrv.h"
17
18 extern int pcie_mch_quirk;      /* MSI-quirk Indicator */
19
20 static int pcie_port_probe_service(struct device *dev)
21 {
22         struct pcie_device *pciedev;
23         struct pcie_port_service_driver *driver;
24         int status = -ENODEV;
25
26         if (!dev || !dev->driver)
27                 return status;
28
29         driver = to_service_driver(dev->driver);
30         if (!driver || !driver->probe)
31                 return status;
32
33         pciedev = to_pcie_device(dev);
34         status = driver->probe(pciedev, driver->id_table);
35         if (!status) {
36                 printk(KERN_DEBUG "Load service driver %s on pcie device %s\n",
37                         driver->name, dev->bus_id);
38                 get_device(dev);
39         }
40         return status;
41 }
42
43 static int pcie_port_remove_service(struct device *dev)
44 {
45         struct pcie_device *pciedev;
46         struct pcie_port_service_driver *driver;
47
48         if (!dev || !dev->driver)
49                 return 0;
50
51         pciedev = to_pcie_device(dev);
52         driver = to_service_driver(dev->driver);
53         if (driver && driver->remove) { 
54                 printk(KERN_DEBUG "Unload service driver %s on pcie device %s\n",
55                         driver->name, dev->bus_id);
56                 driver->remove(pciedev);
57                 put_device(dev);
58         }
59         return 0;
60 }
61
62 static void pcie_port_shutdown_service(struct device *dev) {}
63
64 static int pcie_port_suspend_service(struct device *dev, u32 state, u32 level)
65 {
66         struct pcie_device *pciedev;
67         struct pcie_port_service_driver *driver;
68
69         if (!dev || !dev->driver)
70                 return 0;
71
72         pciedev = to_pcie_device(dev);
73         driver = to_service_driver(dev->driver);
74         if (driver && driver->suspend)
75                 driver->suspend(pciedev, state);
76         return 0;
77 }
78
79 static int pcie_port_resume_service(struct device *dev, u32 state)
80 {
81         struct pcie_device *pciedev;
82         struct pcie_port_service_driver *driver;
83
84         if (!dev || !dev->driver)
85                 return 0;
86
87         pciedev = to_pcie_device(dev);
88         driver = to_service_driver(dev->driver);
89
90         if (driver && driver->resume)
91                 driver->resume(pciedev);
92         return 0;
93 }
94
95 /*
96  * release_pcie_device
97  *      
98  *      Being invoked automatically when device is being removed 
99  *      in response to device_unregister(dev) call.
100  *      Release all resources being claimed.
101  */
102 static void release_pcie_device(struct device *dev)
103 {
104         printk(KERN_DEBUG "Free Port Service[%s]\n", dev->bus_id);
105         kfree(to_pcie_device(dev));                     
106 }
107
108 static int is_msi_quirked(struct pci_dev *dev)
109 {
110         int port_type, quirk = 0;
111         u16 reg16;
112
113         pci_read_config_word(dev, 
114                 pci_find_capability(dev, PCI_CAP_ID_EXP) + 
115                 PCIE_CAPABILITIES_REG, &reg16);
116         port_type = (reg16 >> 4) & PORT_TYPE_MASK;
117         switch(port_type) {
118         case PCIE_RC_PORT:
119                 if (pcie_mch_quirk == 1)
120                         quirk = 1;
121                 break;
122         case PCIE_SW_UPSTREAM_PORT:
123         case PCIE_SW_DOWNSTREAM_PORT:
124         default:
125                 break;  
126         }
127         return quirk;
128 }
129         
130 static int assign_interrupt_mode(struct pci_dev *dev, int *vectors, int mask)
131 {
132         int i, pos, nvec, status = -EINVAL;
133         int interrupt_mode = PCIE_PORT_INTx_MODE;
134
135         /* Set INTx as default */
136         for (i = 0, nvec = 0; i < PCIE_PORT_DEVICE_MAXSERVICES; i++) {
137                 if (mask & (1 << i)) 
138                         nvec++;
139                 vectors[i] = dev->irq;
140         }
141         
142         /* Check MSI quirk */
143         if (is_msi_quirked(dev))
144                 return interrupt_mode;
145
146         /* Select MSI-X over MSI if supported */                
147         pos = pci_find_capability(dev, PCI_CAP_ID_MSIX);
148         if (pos) {
149                 struct msix_entry msix_entries[PCIE_PORT_DEVICE_MAXSERVICES] = 
150                         {{0, 0}, {0, 1}, {0, 2}, {0, 3}};
151                 printk("%s Found MSIX capability\n", __FUNCTION__);
152                 status = pci_enable_msix(dev, msix_entries, nvec);
153                 if (!status) {
154                         int j = 0;
155
156                         interrupt_mode = PCIE_PORT_MSIX_MODE;
157                         for (i = 0; i < PCIE_PORT_DEVICE_MAXSERVICES; i++) {
158                                 if (mask & (1 << i)) 
159                                         vectors[i] = msix_entries[j++].vector;
160                         }
161                 }
162         } 
163         if (status) {
164                 pos = pci_find_capability(dev, PCI_CAP_ID_MSI);
165                 if (pos) {
166                         printk("%s Found MSI capability\n", __FUNCTION__);
167                         status = pci_enable_msi(dev);
168                         if (!status) {
169                                 interrupt_mode = PCIE_PORT_MSI_MODE;
170                                 for (i = 0;i < PCIE_PORT_DEVICE_MAXSERVICES;i++)
171                                         vectors[i] = dev->irq;
172                         }
173                 }
174         } 
175         return interrupt_mode;
176 }
177
178 static int get_port_device_capability(struct pci_dev *dev)
179 {
180         int services = 0, pos;
181         u16 reg16;
182         u32 reg32;
183
184         pos = pci_find_capability(dev, PCI_CAP_ID_EXP);
185         pci_read_config_word(dev, pos + PCIE_CAPABILITIES_REG, &reg16);
186         /* Hot-Plug Capable */
187         if (reg16 & PORT_TO_SLOT_MASK) {
188                 pci_read_config_dword(dev, 
189                         pos + PCIE_SLOT_CAPABILITIES_REG, &reg32);
190                 if (reg32 & SLOT_HP_CAPABLE_MASK)
191                         services |= PCIE_PORT_SERVICE_HP;
192         } 
193         /* PME Capable */
194         pos = pci_find_capability(dev, PCI_CAP_ID_PME);
195         if (pos) 
196                 services |= PCIE_PORT_SERVICE_PME;
197         
198         pos = PCI_CFG_SPACE_SIZE;
199         while (pos) {
200                 pci_read_config_dword(dev, pos, &reg32);
201                 switch (reg32 & 0xffff) {
202                 case PCI_EXT_CAP_ID_ERR:
203                         services |= PCIE_PORT_SERVICE_AER;
204                         pos = reg32 >> 20;
205                         break;
206                 case PCI_EXT_CAP_ID_VC:
207                         services |= PCIE_PORT_SERVICE_VC;
208                         pos = reg32 >> 20;
209                         break;
210                 default:
211                         pos = 0;
212                         break;
213                 }
214         }
215
216         return services;
217 }
218
219 static void pcie_device_init(struct pci_dev *parent, struct pcie_device *dev, 
220         int port_type, int service_type, int irq, int irq_mode)
221 {
222         struct device *device;
223
224         dev->port = parent;
225         dev->interrupt_mode = irq_mode;
226         dev->irq = irq;
227         dev->id.vendor = parent->vendor;
228         dev->id.device = parent->device;
229         dev->id.port_type = port_type;
230         dev->id.service_type = (1 << service_type);
231
232         /* Initialize generic device interface */
233         device = &dev->device;
234         memset(device, 0, sizeof(struct device));
235         INIT_LIST_HEAD(&device->node);
236         INIT_LIST_HEAD(&device->children);
237         INIT_LIST_HEAD(&device->bus_list);
238         device->bus = &pcie_port_bus_type;
239         device->driver = NULL;
240         device->driver_data = NULL; 
241         device->release = release_pcie_device;  /* callback to free pcie dev */
242         sprintf(&device->bus_id[0], "pcie%02x", 
243                 get_descriptor_id(port_type, service_type));
244         device->parent = &parent->dev;
245 }
246
247 static struct pcie_device* alloc_pcie_device(struct pci_dev *parent, 
248         int port_type, int service_type, int irq, int irq_mode)
249 {
250         struct pcie_device *device;
251
252         device = kmalloc(sizeof(struct pcie_device), GFP_KERNEL);
253         if (!device)
254                 return NULL;
255
256         memset(device, 0, sizeof(struct pcie_device));
257         pcie_device_init(parent, device, port_type, service_type, irq,irq_mode);
258         printk(KERN_DEBUG "Allocate Port Service[%s]\n", device->device.bus_id);
259         return device;
260 }
261
262 int pcie_port_device_probe(struct pci_dev *dev)
263 {
264         int pos, type;
265         u16 reg;
266
267         if (!(pos = pci_find_capability(dev, PCI_CAP_ID_EXP)))
268                 return -ENODEV;
269
270         pci_read_config_word(dev, pos + PCIE_CAPABILITIES_REG, &reg);
271         type = (reg >> 4) & PORT_TYPE_MASK;
272         if (    type == PCIE_RC_PORT || type == PCIE_SW_UPSTREAM_PORT ||
273                 type == PCIE_SW_DOWNSTREAM_PORT )  
274                 return 0;
275  
276         return -ENODEV;
277 }
278
279 int pcie_port_device_register(struct pci_dev *dev)
280 {
281         int status, type, capabilities, irq_mode, i;
282         int vectors[PCIE_PORT_DEVICE_MAXSERVICES];
283         u16 reg16;
284
285         /* Get port type */
286         pci_read_config_word(dev, 
287                 pci_find_capability(dev, PCI_CAP_ID_EXP) + 
288                 PCIE_CAPABILITIES_REG, &reg16);
289         type = (reg16 >> 4) & PORT_TYPE_MASK;
290
291         /* Now get port services */
292         capabilities = get_port_device_capability(dev);
293         irq_mode = assign_interrupt_mode(dev, vectors, capabilities);
294
295         /* Allocate child services if any */
296         for (i = 0; i < PCIE_PORT_DEVICE_MAXSERVICES; i++) {
297                 struct pcie_device *child;
298
299                 if (capabilities & (1 << i)) {
300                         child = alloc_pcie_device(
301                                 dev,            /* parent */
302                                 type,           /* port type */ 
303                                 i,              /* service type */
304                                 vectors[i],     /* irq */
305                                 irq_mode        /* interrupt mode */);
306                         if (child) { 
307                                 status = device_register(&child->device);
308                                 if (status) {
309                                         kfree(child);
310                                         continue;
311                                 }
312                                 get_device(&child->device);
313                         }
314                 }
315         }
316         return 0;
317 }
318
319 #ifdef CONFIG_PM
320 int pcie_port_device_suspend(struct pci_dev *dev, u32 state)
321 {
322         struct list_head                *head, *tmp;
323         struct device                   *parent, *child;
324         struct device_driver            *driver;
325         struct pcie_port_service_driver *service_driver;
326
327         parent = &dev->dev;
328         head = &parent->children;
329         tmp = head->next;
330         while (head != tmp) {
331                 child = container_of(tmp, struct device, node);
332                 tmp = tmp->next;
333                 if (child->bus != &pcie_port_bus_type)
334                         continue;
335                 driver = child->driver;
336                 if (!driver)
337                         continue;
338                 service_driver = to_service_driver(driver);
339                 if (service_driver->suspend)  
340                         service_driver->suspend(to_pcie_device(child), state);
341         }
342         return 0; 
343 }
344
345 int pcie_port_device_resume(struct pci_dev *dev) 
346
347         struct list_head                *head, *tmp;
348         struct device                   *parent, *child;
349         struct device_driver            *driver;
350         struct pcie_port_service_driver *service_driver;
351
352         parent = &dev->dev;
353         head = &parent->children;
354         tmp = head->next;
355         while (head != tmp) {
356                 child = container_of(tmp, struct device, node);
357                 tmp = tmp->next;
358                 if (child->bus != &pcie_port_bus_type)
359                         continue;
360                 driver = child->driver;
361                 if (!driver)
362                         continue;
363                 service_driver = to_service_driver(driver);
364                 if (service_driver->resume)  
365                         service_driver->resume(to_pcie_device(child));
366         }
367         return 0; 
368
369 }
370 #endif
371
372 void pcie_port_device_remove(struct pci_dev *dev)
373 {
374         struct list_head                *head, *tmp;
375         struct device                   *parent, *child;
376         struct device_driver            *driver;
377         struct pcie_port_service_driver *service_driver;
378         int interrupt_mode = PCIE_PORT_INTx_MODE;
379
380         parent = &dev->dev;
381         head = &parent->children;
382         tmp = head->next;
383         while (head != tmp) {
384                 child = container_of(tmp, struct device, node);
385                 tmp = tmp->next;
386                 if (child->bus != &pcie_port_bus_type)
387                         continue;
388                 driver = child->driver;
389                 if (driver) { 
390                         service_driver = to_service_driver(driver);
391                         if (service_driver->remove)  
392                                 service_driver->remove(to_pcie_device(child));
393                 }
394                 interrupt_mode = (to_pcie_device(child))->interrupt_mode;
395                 put_device(child);
396                 device_unregister(child);
397         }
398         /* Switch to INTx by default if MSI enabled */
399         if (interrupt_mode == PCIE_PORT_MSIX_MODE)
400                 pci_disable_msix(dev);
401         else if (interrupt_mode == PCIE_PORT_MSI_MODE)
402                 pci_disable_msi(dev);
403 }
404
405 void pcie_port_bus_register(void)
406 {
407         bus_register(&pcie_port_bus_type);
408 }
409
410 void pcie_port_bus_unregister(void)
411 {
412         bus_unregister(&pcie_port_bus_type);
413 }
414
415 int pcie_port_service_register(struct pcie_port_service_driver *new)
416 {
417         new->driver.name = (char *)new->name;
418         new->driver.bus = &pcie_port_bus_type;
419         new->driver.probe = pcie_port_probe_service;
420         new->driver.remove = pcie_port_remove_service;
421         new->driver.shutdown = pcie_port_shutdown_service;
422         new->driver.suspend = pcie_port_suspend_service;
423         new->driver.resume = pcie_port_resume_service;
424
425         return driver_register(&new->driver);
426
427
428 void pcie_port_service_unregister(struct pcie_port_service_driver *new)
429 {
430         driver_unregister(&new->driver);
431 }
432
433 EXPORT_SYMBOL(pcie_port_service_register);
434 EXPORT_SYMBOL(pcie_port_service_unregister);