xref: /openbmc/linux/drivers/scsi/lpfc/lpfc_mem.c (revision c21b37f6)
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 
270