3594c469494face18a422e6811516cda4574d35a
[linux-2.6.git] / 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-2006 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_disc.h"
34 #include "lpfc_scsi.h"
35 #include "lpfc.h"
36 #include "lpfc_crtn.h"
37
38 #define LPFC_MBUF_POOL_SIZE     64      /* max elements in MBUF safety pool */
39 #define LPFC_MEM_POOL_SIZE      64      /* max elem in non-DMA safety pool */
40
41
42
43 int
44 lpfc_mem_alloc(struct lpfc_hba * phba)
45 {
46         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
47         int longs;
48         int i;
49
50         phba->lpfc_scsi_dma_buf_pool = pci_pool_create("lpfc_scsi_dma_buf_pool",
51                                 phba->pcidev, phba->cfg_sg_dma_buf_size, 8, 0);
52         if (!phba->lpfc_scsi_dma_buf_pool)
53                 goto fail;
54
55         phba->lpfc_mbuf_pool = pci_pool_create("lpfc_mbuf_pool", phba->pcidev,
56                                                         LPFC_BPL_SIZE, 8,0);
57         if (!phba->lpfc_mbuf_pool)
58                 goto fail_free_dma_buf_pool;
59
60         pool->elements = kmalloc(sizeof(struct lpfc_dmabuf) *
61                                          LPFC_MBUF_POOL_SIZE, GFP_KERNEL);
62         if (!pool->elements)
63                 goto fail_free_lpfc_mbuf_pool;
64
65         pool->max_count = 0;
66         pool->current_count = 0;
67         for ( i = 0; i < LPFC_MBUF_POOL_SIZE; i++) {
68                 pool->elements[i].virt = pci_pool_alloc(phba->lpfc_mbuf_pool,
69                                        GFP_KERNEL, &pool->elements[i].phys);
70                 if (!pool->elements[i].virt)
71                         goto fail_free_mbuf_pool;
72                 pool->max_count++;
73                 pool->current_count++;
74         }
75
76         phba->mbox_mem_pool = mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE,
77                                                          sizeof(LPFC_MBOXQ_t));
78         if (!phba->mbox_mem_pool)
79                 goto fail_free_mbuf_pool;
80
81         phba->nlp_mem_pool = mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE,
82                                                 sizeof(struct lpfc_nodelist));
83         if (!phba->nlp_mem_pool)
84                 goto fail_free_mbox_pool;
85
86         phba->lpfc_hbq_pool = pci_pool_create("lpfc_hbq_pool",phba->pcidev,
87                                               LPFC_BPL_SIZE, 8, 0);
88         if (!phba->lpfc_hbq_pool)
89                 goto fail_free_nlp_mem_pool;
90
91         /* vpi zero is reserved for the physical port so add 1 to max */
92         longs = ((phba->max_vpi + 1) + BITS_PER_LONG - 1) / BITS_PER_LONG;
93         phba->vpi_bmask = kzalloc(longs * sizeof(unsigned long), GFP_KERNEL);
94         if (!phba->vpi_bmask)
95                 goto fail_free_hbq_pool;
96
97         return 0;
98
99  fail_free_hbq_pool:
100         lpfc_sli_hbqbuf_free_all(phba);
101  fail_free_nlp_mem_pool:
102         mempool_destroy(phba->nlp_mem_pool);
103         phba->nlp_mem_pool = NULL;
104  fail_free_mbox_pool:
105         mempool_destroy(phba->mbox_mem_pool);
106         phba->mbox_mem_pool = NULL;
107  fail_free_mbuf_pool:
108         while (i--)
109                 pci_pool_free(phba->lpfc_mbuf_pool, pool->elements[i].virt,
110                                                  pool->elements[i].phys);
111         kfree(pool->elements);
112  fail_free_lpfc_mbuf_pool:
113         pci_pool_destroy(phba->lpfc_mbuf_pool);
114         phba->lpfc_mbuf_pool = NULL;
115  fail_free_dma_buf_pool:
116         pci_pool_destroy(phba->lpfc_scsi_dma_buf_pool);
117         phba->lpfc_scsi_dma_buf_pool = NULL;
118  fail:
119         return -ENOMEM;
120 }
121
122 void
123 lpfc_mem_free(struct lpfc_hba * phba)
124 {
125         struct lpfc_sli *psli = &phba->sli;
126         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
127         LPFC_MBOXQ_t *mbox, *next_mbox;
128         struct lpfc_dmabuf   *mp;
129         int i;
130
131         kfree(phba->vpi_bmask);
132         lpfc_sli_hbqbuf_free_all(phba);
133
134         list_for_each_entry_safe(mbox, next_mbox, &psli->mboxq, list) {
135                 mp = (struct lpfc_dmabuf *) (mbox->context1);
136                 if (mp) {
137                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
138                         kfree(mp);
139                 }
140                 list_del(&mbox->list);
141                 mempool_free(mbox, phba->mbox_mem_pool);
142         }
143         list_for_each_entry_safe(mbox, next_mbox, &psli->mboxq_cmpl, list) {
144                 mp = (struct lpfc_dmabuf *) (mbox->context1);
145                 if (mp) {
146                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
147                         kfree(mp);
148                 }
149                 list_del(&mbox->list);
150                 mempool_free(mbox, phba->mbox_mem_pool);
151         }
152
153         psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
154         if (psli->mbox_active) {
155                 mbox = psli->mbox_active;
156                 mp = (struct lpfc_dmabuf *) (mbox->context1);
157                 if (mp) {
158                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
159                         kfree(mp);
160                 }
161                 mempool_free(mbox, phba->mbox_mem_pool);
162                 psli->mbox_active = NULL;
163         }
164
165         for (i = 0; i < pool->current_count; i++)
166                 pci_pool_free(phba->lpfc_mbuf_pool, pool->elements[i].virt,
167                                                  pool->elements[i].phys);
168         kfree(pool->elements);
169
170         pci_pool_destroy(phba->lpfc_hbq_pool);
171         mempool_destroy(phba->nlp_mem_pool);
172         mempool_destroy(phba->mbox_mem_pool);
173
174         pci_pool_destroy(phba->lpfc_scsi_dma_buf_pool);
175         pci_pool_destroy(phba->lpfc_mbuf_pool);
176
177         phba->lpfc_hbq_pool = NULL;
178         phba->nlp_mem_pool = NULL;
179         phba->mbox_mem_pool = NULL;
180         phba->lpfc_scsi_dma_buf_pool = NULL;
181         phba->lpfc_mbuf_pool = NULL;
182
183                                 /* Free the iocb lookup array */
184         kfree(psli->iocbq_lookup);
185         psli->iocbq_lookup = NULL;
186
187 }
188
189 void *
190 lpfc_mbuf_alloc(struct lpfc_hba *phba, int mem_flags, dma_addr_t *handle)
191 {
192         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
193         unsigned long iflags;
194         void *ret;
195
196         ret = pci_pool_alloc(phba->lpfc_mbuf_pool, GFP_KERNEL, handle);
197
198         spin_lock_irqsave(&phba->hbalock, iflags);
199         if (!ret && (mem_flags & MEM_PRI) && pool->current_count) {
200                 pool->current_count--;
201                 ret = pool->elements[pool->current_count].virt;
202                 *handle = pool->elements[pool->current_count].phys;
203         }
204         spin_unlock_irqrestore(&phba->hbalock, iflags);
205         return ret;
206 }
207
208 void
209 __lpfc_mbuf_free(struct lpfc_hba * phba, void *virt, dma_addr_t dma)
210 {
211         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
212
213         if (pool->current_count < pool->max_count) {
214                 pool->elements[pool->current_count].virt = virt;
215                 pool->elements[pool->current_count].phys = dma;
216                 pool->current_count++;
217         } else {
218                 pci_pool_free(phba->lpfc_mbuf_pool, virt, dma);
219         }
220         return;
221 }
222
223 void
224 lpfc_mbuf_free(struct lpfc_hba * phba, void *virt, dma_addr_t dma)
225 {
226         unsigned long iflags;
227
228         spin_lock_irqsave(&phba->hbalock, iflags);
229         __lpfc_mbuf_free(phba, virt, dma);
230         spin_unlock_irqrestore(&phba->hbalock, iflags);
231         return;
232 }
233
234 void *
235 lpfc_hbq_alloc(struct lpfc_hba *phba, int mem_flags, dma_addr_t *handle)
236 {
237         void *ret;
238         ret = pci_pool_alloc(phba->lpfc_hbq_pool, GFP_ATOMIC, handle);
239         return ret;
240 }
241
242 void
243 lpfc_hbq_free(struct lpfc_hba *phba, void *virt, dma_addr_t dma)
244 {
245         pci_pool_free(phba->lpfc_hbq_pool, virt, dma);
246         return;
247 }
248
249 void
250 lpfc_in_buf_free(struct lpfc_hba *phba, struct lpfc_dmabuf *mp)
251 {
252         struct hbq_dmabuf *hbq_entry;
253
254         if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
255                 hbq_entry = container_of(mp, struct hbq_dmabuf, dbuf);
256                 if (hbq_entry->tag == -1) {
257                         lpfc_hbq_free(phba, hbq_entry->dbuf.virt,
258                                       hbq_entry->dbuf.phys);
259                         kfree(hbq_entry);
260                 } else {
261                         lpfc_sli_free_hbq(phba, hbq_entry);
262                 }
263         } else {
264                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
265                 kfree(mp);
266         }
267         return;
268 }
269