Pull utrace into release branch
[linux-2.6] / drivers / scsi / lpfc / lpfc_mem.c
1 /*******************************************************************
2  * This file is part of the Emulex Linux Device Driver for         *
3  * Fibre Channel Host Bus Adapters.                                *
4  * Copyright (C) 2004-2008 Emulex.  All rights reserved.           *
5  * EMULEX and SLI are trademarks of Emulex.                        *
6  * www.emulex.com                                                  *
7  * Portions Copyright (C) 2004-2005 Christoph Hellwig              *
8  *                                                                 *
9  * This program is free software; you can redistribute it and/or   *
10  * modify it under the terms of version 2 of the GNU General       *
11  * Public License as published by the Free Software Foundation.    *
12  * This program is distributed in the hope that it will be useful. *
13  * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND          *
14  * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY,  *
15  * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE      *
16  * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD *
17  * TO BE LEGALLY INVALID.  See the GNU General Public License for  *
18  * more details, a copy of which can be found in the file COPYING  *
19  * included with this package.                                     *
20  *******************************************************************/
21
22 #include <linux/mempool.h>
23 #include <linux/pci.h>
24 #include <linux/interrupt.h>
25
26 #include <scsi/scsi_device.h>
27 #include <scsi/scsi_transport_fc.h>
28
29 #include <scsi/scsi.h>
30
31 #include "lpfc_hw.h"
32 #include "lpfc_sli.h"
33 #include "lpfc_nl.h"
34 #include "lpfc_disc.h"
35 #include "lpfc_scsi.h"
36 #include "lpfc.h"
37 #include "lpfc_crtn.h"
38
39 #define LPFC_MBUF_POOL_SIZE     64      /* max elements in MBUF safety pool */
40 #define LPFC_MEM_POOL_SIZE      64      /* max elem in non-DMA safety pool */
41
42
43 /**
44  * lpfc_mem_alloc: create and allocate all PCI and memory pools
45  * @phba: HBA to allocate pools for
46  *
47  * Description: Creates and allocates PCI pools lpfc_scsi_dma_buf_pool,
48  * lpfc_mbuf_pool, lpfc_hbq_pool.  Creates and allocates kmalloc-backed mempools
49  * for LPFC_MBOXQ_t and lpfc_nodelist.  Also allocates the VPI bitmask.
50  *
51  * Notes: Not interrupt-safe.  Must be called with no locks held.  If any
52  * allocation fails, frees all successfully allocated memory before returning.
53  *
54  * Returns:
55  *   0 on success
56  *   -ENOMEM on failure (if any memory allocations fail)
57  **/
58 int
59 lpfc_mem_alloc(struct lpfc_hba * phba)
60 {
61         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
62         int longs;
63         int i;
64
65         phba->lpfc_scsi_dma_buf_pool = pci_pool_create("lpfc_scsi_dma_buf_pool",
66                                 phba->pcidev, phba->cfg_sg_dma_buf_size, 8, 0);
67         if (!phba->lpfc_scsi_dma_buf_pool)
68                 goto fail;
69
70         phba->lpfc_mbuf_pool = pci_pool_create("lpfc_mbuf_pool", phba->pcidev,
71                                                         LPFC_BPL_SIZE, 8,0);
72         if (!phba->lpfc_mbuf_pool)
73                 goto fail_free_dma_buf_pool;
74
75         pool->elements = kmalloc(sizeof(struct lpfc_dmabuf) *
76                                          LPFC_MBUF_POOL_SIZE, GFP_KERNEL);
77         if (!pool->elements)
78                 goto fail_free_lpfc_mbuf_pool;
79
80         pool->max_count = 0;
81         pool->current_count = 0;
82         for ( i = 0; i < LPFC_MBUF_POOL_SIZE; i++) {
83                 pool->elements[i].virt = pci_pool_alloc(phba->lpfc_mbuf_pool,
84                                        GFP_KERNEL, &pool->elements[i].phys);
85                 if (!pool->elements[i].virt)
86                         goto fail_free_mbuf_pool;
87                 pool->max_count++;
88                 pool->current_count++;
89         }
90
91         phba->mbox_mem_pool = mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE,
92                                                          sizeof(LPFC_MBOXQ_t));
93         if (!phba->mbox_mem_pool)
94                 goto fail_free_mbuf_pool;
95
96         phba->nlp_mem_pool = mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE,
97                                                 sizeof(struct lpfc_nodelist));
98         if (!phba->nlp_mem_pool)
99                 goto fail_free_mbox_pool;
100
101         phba->lpfc_hbq_pool = pci_pool_create("lpfc_hbq_pool",phba->pcidev,
102                                               LPFC_BPL_SIZE, 8, 0);
103         if (!phba->lpfc_hbq_pool)
104                 goto fail_free_nlp_mem_pool;
105
106         /* vpi zero is reserved for the physical port so add 1 to max */
107         longs = ((phba->max_vpi + 1) + BITS_PER_LONG - 1) / BITS_PER_LONG;
108         phba->vpi_bmask = kzalloc(longs * sizeof(unsigned long), GFP_KERNEL);
109         if (!phba->vpi_bmask)
110                 goto fail_free_hbq_pool;
111
112         return 0;
113
114  fail_free_hbq_pool:
115         lpfc_sli_hbqbuf_free_all(phba);
116         pci_pool_destroy(phba->lpfc_hbq_pool);
117  fail_free_nlp_mem_pool:
118         mempool_destroy(phba->nlp_mem_pool);
119         phba->nlp_mem_pool = NULL;
120  fail_free_mbox_pool:
121         mempool_destroy(phba->mbox_mem_pool);
122         phba->mbox_mem_pool = NULL;
123  fail_free_mbuf_pool:
124         while (i--)
125                 pci_pool_free(phba->lpfc_mbuf_pool, pool->elements[i].virt,
126                                                  pool->elements[i].phys);
127         kfree(pool->elements);
128  fail_free_lpfc_mbuf_pool:
129         pci_pool_destroy(phba->lpfc_mbuf_pool);
130         phba->lpfc_mbuf_pool = NULL;
131  fail_free_dma_buf_pool:
132         pci_pool_destroy(phba->lpfc_scsi_dma_buf_pool);
133         phba->lpfc_scsi_dma_buf_pool = NULL;
134  fail:
135         return -ENOMEM;
136 }
137
138 /**
139  * lpfc_mem_free: Frees all PCI and memory allocated by lpfc_mem_alloc
140  * @phba: HBA to free memory for
141  *
142  * Description: Frees PCI pools lpfc_scsi_dma_buf_pool, lpfc_mbuf_pool,
143  * lpfc_hbq_pool.  Frees kmalloc-backed mempools for LPFC_MBOXQ_t and
144  * lpfc_nodelist.  Also frees the VPI bitmask.
145  *
146  * Returns: None
147  **/
148 void
149 lpfc_mem_free(struct lpfc_hba * phba)
150 {
151         struct lpfc_sli *psli = &phba->sli;
152         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
153         LPFC_MBOXQ_t *mbox, *next_mbox;
154         struct lpfc_dmabuf   *mp;
155         int i;
156
157         kfree(phba->vpi_bmask);
158         lpfc_sli_hbqbuf_free_all(phba);
159
160         list_for_each_entry_safe(mbox, next_mbox, &psli->mboxq, list) {
161                 mp = (struct lpfc_dmabuf *) (mbox->context1);
162                 if (mp) {
163                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
164                         kfree(mp);
165                 }
166                 list_del(&mbox->list);
167                 mempool_free(mbox, phba->mbox_mem_pool);
168         }
169         list_for_each_entry_safe(mbox, next_mbox, &psli->mboxq_cmpl, list) {
170                 mp = (struct lpfc_dmabuf *) (mbox->context1);
171                 if (mp) {
172                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
173                         kfree(mp);
174                 }
175                 list_del(&mbox->list);
176                 mempool_free(mbox, phba->mbox_mem_pool);
177         }
178
179         psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
180         if (psli->mbox_active) {
181                 mbox = psli->mbox_active;
182                 mp = (struct lpfc_dmabuf *) (mbox->context1);
183                 if (mp) {
184                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
185                         kfree(mp);
186                 }
187                 mempool_free(mbox, phba->mbox_mem_pool);
188                 psli->mbox_active = NULL;
189         }
190
191         for (i = 0; i < pool->current_count; i++)
192                 pci_pool_free(phba->lpfc_mbuf_pool, pool->elements[i].virt,
193                                                  pool->elements[i].phys);
194         kfree(pool->elements);
195
196         pci_pool_destroy(phba->lpfc_hbq_pool);
197         mempool_destroy(phba->nlp_mem_pool);
198         mempool_destroy(phba->mbox_mem_pool);
199
200         pci_pool_destroy(phba->lpfc_scsi_dma_buf_pool);
201         pci_pool_destroy(phba->lpfc_mbuf_pool);
202
203         phba->lpfc_hbq_pool = NULL;
204         phba->nlp_mem_pool = NULL;
205         phba->mbox_mem_pool = NULL;
206         phba->lpfc_scsi_dma_buf_pool = NULL;
207         phba->lpfc_mbuf_pool = NULL;
208
209         /* Free the iocb lookup array */
210         kfree(psli->iocbq_lookup);
211         psli->iocbq_lookup = NULL;
212 }
213
214 /**
215  * lpfc_mbuf_alloc: Allocate an mbuf from the lpfc_mbuf_pool PCI pool
216  * @phba: HBA which owns the pool to allocate from
217  * @mem_flags: indicates if this is a priority (MEM_PRI) allocation
218  * @handle: used to return the DMA-mapped address of the mbuf
219  *
220  * Description: Allocates a DMA-mapped buffer from the lpfc_mbuf_pool PCI pool.
221  * Allocates from generic pci_pool_alloc function first and if that fails and
222  * mem_flags has MEM_PRI set (the only defined flag), returns an mbuf from the
223  * HBA's pool.
224  *
225  * Notes: Not interrupt-safe.  Must be called with no locks held.  Takes
226  * phba->hbalock.
227  *
228  * Returns:
229  *   pointer to the allocated mbuf on success
230  *   NULL on failure
231  **/
232 void *
233 lpfc_mbuf_alloc(struct lpfc_hba *phba, int mem_flags, dma_addr_t *handle)
234 {
235         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
236         unsigned long iflags;
237         void *ret;
238
239         ret = pci_pool_alloc(phba->lpfc_mbuf_pool, GFP_KERNEL, handle);
240
241         spin_lock_irqsave(&phba->hbalock, iflags);
242         if (!ret && (mem_flags & MEM_PRI) && pool->current_count) {
243                 pool->current_count--;
244                 ret = pool->elements[pool->current_count].virt;
245                 *handle = pool->elements[pool->current_count].phys;
246         }
247         spin_unlock_irqrestore(&phba->hbalock, iflags);
248         return ret;
249 }
250
251 /**
252  * __lpfc_mem_free: Free an mbuf from the lpfc_mbuf_pool PCI pool (locked)
253  * @phba: HBA which owns the pool to return to
254  * @virt: mbuf to free
255  * @dma: the DMA-mapped address of the lpfc_mbuf_pool to be freed
256  *
257  * Description: Returns an mbuf lpfc_mbuf_pool to the lpfc_mbuf_safety_pool if
258  * it is below its max_count, frees the mbuf otherwise.
259  *
260  * Notes: Must be called with phba->hbalock held to synchronize access to
261  * lpfc_mbuf_safety_pool.
262  *
263  * Returns: None
264  **/
265 void
266 __lpfc_mbuf_free(struct lpfc_hba * phba, void *virt, dma_addr_t dma)
267 {
268         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
269
270         if (pool->current_count < pool->max_count) {
271                 pool->elements[pool->current_count].virt = virt;
272                 pool->elements[pool->current_count].phys = dma;
273                 pool->current_count++;
274         } else {
275                 pci_pool_free(phba->lpfc_mbuf_pool, virt, dma);
276         }
277         return;
278 }
279
280 /**
281  * lpfc_mem_free: Free an mbuf from the lpfc_mbuf_pool PCI pool (unlocked)
282  * @phba: HBA which owns the pool to return to
283  * @virt: mbuf to free
284  * @dma: the DMA-mapped address of the lpfc_mbuf_pool to be freed
285  *
286  * Description: Returns an mbuf lpfc_mbuf_pool to the lpfc_mbuf_safety_pool if
287  * it is below its max_count, frees the mbuf otherwise.
288  *
289  * Notes: Takes phba->hbalock.  Can be called with or without other locks held.
290  *
291  * Returns: None
292  **/
293 void
294
295 lpfc_mbuf_free(struct lpfc_hba * phba, void *virt, dma_addr_t dma)
296 {
297         unsigned long iflags;
298
299         spin_lock_irqsave(&phba->hbalock, iflags);
300         __lpfc_mbuf_free(phba, virt, dma);
301         spin_unlock_irqrestore(&phba->hbalock, iflags);
302         return;
303 }
304
305 /**
306  * lpfc_els_hbq_alloc: Allocate an HBQ buffer
307  * @phba: HBA to allocate HBQ buffer for
308  *
309  * Description: Allocates a DMA-mapped HBQ buffer from the lpfc_hbq_pool PCI
310  * pool along a non-DMA-mapped container for it.
311  *
312  * Notes: Not interrupt-safe.  Must be called with no locks held.
313  *
314  * Returns:
315  *   pointer to HBQ on success
316  *   NULL on failure
317  **/
318 struct hbq_dmabuf *
319 lpfc_els_hbq_alloc(struct lpfc_hba *phba)
320 {
321         struct hbq_dmabuf *hbqbp;
322
323         hbqbp = kmalloc(sizeof(struct hbq_dmabuf), GFP_KERNEL);
324         if (!hbqbp)
325                 return NULL;
326
327         hbqbp->dbuf.virt = pci_pool_alloc(phba->lpfc_hbq_pool, GFP_KERNEL,
328                                           &hbqbp->dbuf.phys);
329         if (!hbqbp->dbuf.virt) {
330                 kfree(hbqbp);
331                 return NULL;
332         }
333         hbqbp->size = LPFC_BPL_SIZE;
334         return hbqbp;
335 }
336
337 /**
338  * lpfc_mem_hbq_free: Frees an HBQ buffer allocated with lpfc_els_hbq_alloc
339  * @phba: HBA buffer was allocated for
340  * @hbqbp: HBQ container returned by lpfc_els_hbq_alloc
341  *
342  * Description: Frees both the container and the DMA-mapped buffer returned by
343  * lpfc_els_hbq_alloc.
344  *
345  * Notes: Can be called with or without locks held.
346  *
347  * Returns: None
348  **/
349 void
350 lpfc_els_hbq_free(struct lpfc_hba *phba, struct hbq_dmabuf *hbqbp)
351 {
352         pci_pool_free(phba->lpfc_hbq_pool, hbqbp->dbuf.virt, hbqbp->dbuf.phys);
353         kfree(hbqbp);
354         return;
355 }
356
357 /**
358  * lpfc_in_buf_free: Free a DMA buffer
359  * @phba: HBA buffer is associated with
360  * @mp: Buffer to free
361  *
362  * Description: Frees the given DMA buffer in the appropriate way given if the
363  * HBA is running in SLI3 mode with HBQs enabled.
364  *
365  * Notes: Takes phba->hbalock.  Can be called with or without other locks held.
366  *
367  * Returns: None
368  **/
369 void
370 lpfc_in_buf_free(struct lpfc_hba *phba, struct lpfc_dmabuf *mp)
371 {
372         struct hbq_dmabuf *hbq_entry;
373         unsigned long flags;
374
375         if (!mp)
376                 return;
377
378         if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
379                 /* Check whether HBQ is still in use */
380                 spin_lock_irqsave(&phba->hbalock, flags);
381                 if (!phba->hbq_in_use) {
382                         spin_unlock_irqrestore(&phba->hbalock, flags);
383                         return;
384                 }
385                 hbq_entry = container_of(mp, struct hbq_dmabuf, dbuf);
386                 list_del(&hbq_entry->dbuf.list);
387                 if (hbq_entry->tag == -1) {
388                         (phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer)
389                                 (phba, hbq_entry);
390                 } else {
391                         lpfc_sli_free_hbq(phba, hbq_entry);
392                 }
393                 spin_unlock_irqrestore(&phba->hbalock, flags);
394         } else {
395                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
396                 kfree(mp);
397         }
398         return;
399 }