| /******************************************************************* |
| * This file is part of the Emulex Linux Device Driver for * |
| * Fibre Channel Host Bus Adapters. * |
| * Copyright (C) 2004-2012 Emulex. All rights reserved. * |
| * EMULEX and SLI are trademarks of Emulex. * |
| * www.emulex.com * |
| * Portions Copyright (C) 2004-2005 Christoph Hellwig * |
| * * |
| * This program is free software; you can redistribute it and/or * |
| * modify it under the terms of version 2 of the GNU General * |
| * Public License as published by the Free Software Foundation. * |
| * This program is distributed in the hope that it will be useful. * |
| * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND * |
| * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY, * |
| * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE * |
| * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD * |
| * TO BE LEGALLY INVALID. See the GNU General Public License for * |
| * more details, a copy of which can be found in the file COPYING * |
| * included with this package. * |
| *******************************************************************/ |
| |
| #include <linux/mempool.h> |
| #include <linux/slab.h> |
| #include <linux/pci.h> |
| #include <linux/interrupt.h> |
| |
| #include <scsi/scsi_device.h> |
| #include <scsi/scsi_transport_fc.h> |
| |
| #include <scsi/scsi.h> |
| |
| #include "lpfc_hw4.h" |
| #include "lpfc_hw.h" |
| #include "lpfc_sli.h" |
| #include "lpfc_sli4.h" |
| #include "lpfc_nl.h" |
| #include "lpfc_disc.h" |
| #include "lpfc_scsi.h" |
| #include "lpfc.h" |
| #include "lpfc_crtn.h" |
| |
| #define LPFC_MBUF_POOL_SIZE 64 /* max elements in MBUF safety pool */ |
| #define LPFC_MEM_POOL_SIZE 64 /* max elem in non-DMA safety pool */ |
| |
| |
| /** |
| * lpfc_mem_alloc - create and allocate all PCI and memory pools |
| * @phba: HBA to allocate pools for |
| * |
| * Description: Creates and allocates PCI pools lpfc_scsi_dma_buf_pool, |
| * lpfc_mbuf_pool, lpfc_hrb_pool. Creates and allocates kmalloc-backed mempools |
| * for LPFC_MBOXQ_t and lpfc_nodelist. Also allocates the VPI bitmask. |
| * |
| * Notes: Not interrupt-safe. Must be called with no locks held. If any |
| * allocation fails, frees all successfully allocated memory before returning. |
| * |
| * Returns: |
| * 0 on success |
| * -ENOMEM on failure (if any memory allocations fail) |
| **/ |
| int |
| lpfc_mem_alloc(struct lpfc_hba *phba, int align) |
| { |
| struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool; |
| int i; |
| |
| if (phba->sli_rev == LPFC_SLI_REV4) |
| phba->lpfc_scsi_dma_buf_pool = |
| pci_pool_create("lpfc_scsi_dma_buf_pool", |
| phba->pcidev, |
| phba->cfg_sg_dma_buf_size, |
| phba->cfg_sg_dma_buf_size, |
| 0); |
| else |
| phba->lpfc_scsi_dma_buf_pool = |
| pci_pool_create("lpfc_scsi_dma_buf_pool", |
| phba->pcidev, phba->cfg_sg_dma_buf_size, |
| align, 0); |
| if (!phba->lpfc_scsi_dma_buf_pool) |
| goto fail; |
| |
| phba->lpfc_mbuf_pool = pci_pool_create("lpfc_mbuf_pool", phba->pcidev, |
| LPFC_BPL_SIZE, |
| align, 0); |
| if (!phba->lpfc_mbuf_pool) |
| goto fail_free_dma_buf_pool; |
| |
| pool->elements = kmalloc(sizeof(struct lpfc_dmabuf) * |
| LPFC_MBUF_POOL_SIZE, GFP_KERNEL); |
| if (!pool->elements) |
| goto fail_free_lpfc_mbuf_pool; |
| |
| pool->max_count = 0; |
| pool->current_count = 0; |
| for ( i = 0; i < LPFC_MBUF_POOL_SIZE; i++) { |
| pool->elements[i].virt = pci_pool_alloc(phba->lpfc_mbuf_pool, |
| GFP_KERNEL, &pool->elements[i].phys); |
| if (!pool->elements[i].virt) |
| goto fail_free_mbuf_pool; |
| pool->max_count++; |
| pool->current_count++; |
| } |
| |
| phba->mbox_mem_pool = mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE, |
| sizeof(LPFC_MBOXQ_t)); |
| if (!phba->mbox_mem_pool) |
| goto fail_free_mbuf_pool; |
| |
| phba->nlp_mem_pool = mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE, |
| sizeof(struct lpfc_nodelist)); |
| if (!phba->nlp_mem_pool) |
| goto fail_free_mbox_pool; |
| |
| if (phba->sli_rev == LPFC_SLI_REV4) { |
| phba->rrq_pool = |
| mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE, |
| sizeof(struct lpfc_node_rrq)); |
| if (!phba->rrq_pool) |
| goto fail_free_nlp_mem_pool; |
| phba->lpfc_hrb_pool = pci_pool_create("lpfc_hrb_pool", |
| phba->pcidev, |
| LPFC_HDR_BUF_SIZE, align, 0); |
| if (!phba->lpfc_hrb_pool) |
| goto fail_free_rrq_mem_pool; |
| |
| phba->lpfc_drb_pool = pci_pool_create("lpfc_drb_pool", |
| phba->pcidev, |
| LPFC_DATA_BUF_SIZE, align, 0); |
| if (!phba->lpfc_drb_pool) |
| goto fail_free_hrb_pool; |
| phba->lpfc_hbq_pool = NULL; |
| } else { |
| phba->lpfc_hbq_pool = pci_pool_create("lpfc_hbq_pool", |
| phba->pcidev, LPFC_BPL_SIZE, align, 0); |
| if (!phba->lpfc_hbq_pool) |
| goto fail_free_nlp_mem_pool; |
| phba->lpfc_hrb_pool = NULL; |
| phba->lpfc_drb_pool = NULL; |
| } |
| |
| return 0; |
| fail_free_hrb_pool: |
| pci_pool_destroy(phba->lpfc_hrb_pool); |
| phba->lpfc_hrb_pool = NULL; |
| fail_free_rrq_mem_pool: |
| mempool_destroy(phba->rrq_pool); |
| phba->rrq_pool = NULL; |
| fail_free_nlp_mem_pool: |
| mempool_destroy(phba->nlp_mem_pool); |
| phba->nlp_mem_pool = NULL; |
| fail_free_mbox_pool: |
| mempool_destroy(phba->mbox_mem_pool); |
| phba->mbox_mem_pool = NULL; |
| fail_free_mbuf_pool: |
| while (i--) |
| pci_pool_free(phba->lpfc_mbuf_pool, pool->elements[i].virt, |
| pool->elements[i].phys); |
| kfree(pool->elements); |
| fail_free_lpfc_mbuf_pool: |
| pci_pool_destroy(phba->lpfc_mbuf_pool); |
| phba->lpfc_mbuf_pool = NULL; |
| fail_free_dma_buf_pool: |
| pci_pool_destroy(phba->lpfc_scsi_dma_buf_pool); |
| phba->lpfc_scsi_dma_buf_pool = NULL; |
| fail: |
| return -ENOMEM; |
| } |
| |
| /** |
| * lpfc_mem_free - Frees memory allocated by lpfc_mem_alloc |
| * @phba: HBA to free memory for |
| * |
| * Description: Free the memory allocated by lpfc_mem_alloc routine. This |
| * routine is a the counterpart of lpfc_mem_alloc. |
| * |
| * Returns: None |
| **/ |
| void |
| lpfc_mem_free(struct lpfc_hba *phba) |
| { |
| int i; |
| struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool; |
| |
| /* Free HBQ pools */ |
| lpfc_sli_hbqbuf_free_all(phba); |
| if (phba->lpfc_drb_pool) |
| pci_pool_destroy(phba->lpfc_drb_pool); |
| phba->lpfc_drb_pool = NULL; |
| if (phba->lpfc_hrb_pool) |
| pci_pool_destroy(phba->lpfc_hrb_pool); |
| phba->lpfc_hrb_pool = NULL; |
| |
| if (phba->lpfc_hbq_pool) |
| pci_pool_destroy(phba->lpfc_hbq_pool); |
| phba->lpfc_hbq_pool = NULL; |
| |
| if (phba->rrq_pool) |
| mempool_destroy(phba->rrq_pool); |
| phba->rrq_pool = NULL; |
| |
| /* Free NLP memory pool */ |
| mempool_destroy(phba->nlp_mem_pool); |
| phba->nlp_mem_pool = NULL; |
| |
| /* Free mbox memory pool */ |
| mempool_destroy(phba->mbox_mem_pool); |
| phba->mbox_mem_pool = NULL; |
| |
| /* Free MBUF memory pool */ |
| for (i = 0; i < pool->current_count; i++) |
| pci_pool_free(phba->lpfc_mbuf_pool, pool->elements[i].virt, |
| pool->elements[i].phys); |
| kfree(pool->elements); |
| |
| pci_pool_destroy(phba->lpfc_mbuf_pool); |
| phba->lpfc_mbuf_pool = NULL; |
| |
| /* Free DMA buffer memory pool */ |
| pci_pool_destroy(phba->lpfc_scsi_dma_buf_pool); |
| phba->lpfc_scsi_dma_buf_pool = NULL; |
| |
| return; |
| } |
| |
| /** |
| * lpfc_mem_free_all - Frees all PCI and driver memory |
| * @phba: HBA to free memory for |
| * |
| * Description: Free memory from PCI and driver memory pools and also those |
| * used : lpfc_scsi_dma_buf_pool, lpfc_mbuf_pool, lpfc_hrb_pool. Frees |
| * kmalloc-backed mempools for LPFC_MBOXQ_t and lpfc_nodelist. Also frees |
| * the VPI bitmask. |
| * |
| * Returns: None |
| **/ |
| void |
| lpfc_mem_free_all(struct lpfc_hba *phba) |
| { |
| struct lpfc_sli *psli = &phba->sli; |
| LPFC_MBOXQ_t *mbox, *next_mbox; |
| struct lpfc_dmabuf *mp; |
| |
| /* Free memory used in mailbox queue back to mailbox memory pool */ |
| list_for_each_entry_safe(mbox, next_mbox, &psli->mboxq, list) { |
| mp = (struct lpfc_dmabuf *) (mbox->context1); |
| if (mp) { |
| lpfc_mbuf_free(phba, mp->virt, mp->phys); |
| kfree(mp); |
| } |
| list_del(&mbox->list); |
| mempool_free(mbox, phba->mbox_mem_pool); |
| } |
| /* Free memory used in mailbox cmpl list back to mailbox memory pool */ |
| list_for_each_entry_safe(mbox, next_mbox, &psli->mboxq_cmpl, list) { |
| mp = (struct lpfc_dmabuf *) (mbox->context1); |
| if (mp) { |
| lpfc_mbuf_free(phba, mp->virt, mp->phys); |
| kfree(mp); |
| } |
| list_del(&mbox->list); |
| mempool_free(mbox, phba->mbox_mem_pool); |
| } |
| /* Free the active mailbox command back to the mailbox memory pool */ |
| spin_lock_irq(&phba->hbalock); |
| psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE; |
| spin_unlock_irq(&phba->hbalock); |
| if (psli->mbox_active) { |
| mbox = psli->mbox_active; |
| mp = (struct lpfc_dmabuf *) (mbox->context1); |
| if (mp) { |
| lpfc_mbuf_free(phba, mp->virt, mp->phys); |
| kfree(mp); |
| } |
| mempool_free(mbox, phba->mbox_mem_pool); |
| psli->mbox_active = NULL; |
| } |
| |
| /* Free and destroy all the allocated memory pools */ |
| lpfc_mem_free(phba); |
| |
| /* Free the iocb lookup array */ |
| kfree(psli->iocbq_lookup); |
| psli->iocbq_lookup = NULL; |
| |
| return; |
| } |
| |
| /** |
| * lpfc_mbuf_alloc - Allocate an mbuf from the lpfc_mbuf_pool PCI pool |
| * @phba: HBA which owns the pool to allocate from |
| * @mem_flags: indicates if this is a priority (MEM_PRI) allocation |
| * @handle: used to return the DMA-mapped address of the mbuf |
| * |
| * Description: Allocates a DMA-mapped buffer from the lpfc_mbuf_pool PCI pool. |
| * Allocates from generic pci_pool_alloc function first and if that fails and |
| * mem_flags has MEM_PRI set (the only defined flag), returns an mbuf from the |
| * HBA's pool. |
| * |
| * Notes: Not interrupt-safe. Must be called with no locks held. Takes |
| * phba->hbalock. |
| * |
| * Returns: |
| * pointer to the allocated mbuf on success |
| * NULL on failure |
| **/ |
| void * |
| lpfc_mbuf_alloc(struct lpfc_hba *phba, int mem_flags, dma_addr_t *handle) |
| { |
| struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool; |
| unsigned long iflags; |
| void *ret; |
| |
| ret = pci_pool_alloc(phba->lpfc_mbuf_pool, GFP_KERNEL, handle); |
| |
| spin_lock_irqsave(&phba->hbalock, iflags); |
| if (!ret && (mem_flags & MEM_PRI) && pool->current_count) { |
| pool->current_count--; |
| ret = pool->elements[pool->current_count].virt; |
| *handle = pool->elements[pool->current_count].phys; |
| } |
| spin_unlock_irqrestore(&phba->hbalock, iflags); |
| return ret; |
| } |
| |
| /** |
| * __lpfc_mbuf_free - Free an mbuf from the lpfc_mbuf_pool PCI pool (locked) |
| * @phba: HBA which owns the pool to return to |
| * @virt: mbuf to free |
| * @dma: the DMA-mapped address of the lpfc_mbuf_pool to be freed |
| * |
| * Description: Returns an mbuf lpfc_mbuf_pool to the lpfc_mbuf_safety_pool if |
| * it is below its max_count, frees the mbuf otherwise. |
| * |
| * Notes: Must be called with phba->hbalock held to synchronize access to |
| * lpfc_mbuf_safety_pool. |
| * |
| * Returns: None |
| **/ |
| void |
| __lpfc_mbuf_free(struct lpfc_hba * phba, void *virt, dma_addr_t dma) |
| { |
| struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool; |
| |
| if (pool->current_count < pool->max_count) { |
| pool->elements[pool->current_count].virt = virt; |
| pool->elements[pool->current_count].phys = dma; |
| pool->current_count++; |
| } else { |
| pci_pool_free(phba->lpfc_mbuf_pool, virt, dma); |
| } |
| return; |
| } |
| |
| /** |
| * lpfc_mbuf_free - Free an mbuf from the lpfc_mbuf_pool PCI pool (unlocked) |
| * @phba: HBA which owns the pool to return to |
| * @virt: mbuf to free |
| * @dma: the DMA-mapped address of the lpfc_mbuf_pool to be freed |
| * |
| * Description: Returns an mbuf lpfc_mbuf_pool to the lpfc_mbuf_safety_pool if |
| * it is below its max_count, frees the mbuf otherwise. |
| * |
| * Notes: Takes phba->hbalock. Can be called with or without other locks held. |
| * |
| * Returns: None |
| **/ |
| void |
| lpfc_mbuf_free(struct lpfc_hba * phba, void *virt, dma_addr_t dma) |
| { |
| unsigned long iflags; |
| |
| spin_lock_irqsave(&phba->hbalock, iflags); |
| __lpfc_mbuf_free(phba, virt, dma); |
| spin_unlock_irqrestore(&phba->hbalock, iflags); |
| return; |
| } |
| |
| /** |
| * lpfc_els_hbq_alloc - Allocate an HBQ buffer |
| * @phba: HBA to allocate HBQ buffer for |
| * |
| * Description: Allocates a DMA-mapped HBQ buffer from the lpfc_hrb_pool PCI |
| * pool along a non-DMA-mapped container for it. |
| * |
| * Notes: Not interrupt-safe. Must be called with no locks held. |
| * |
| * Returns: |
| * pointer to HBQ on success |
| * NULL on failure |
| **/ |
| struct hbq_dmabuf * |
| lpfc_els_hbq_alloc(struct lpfc_hba *phba) |
| { |
| struct hbq_dmabuf *hbqbp; |
| |
| hbqbp = kzalloc(sizeof(struct hbq_dmabuf), GFP_KERNEL); |
| if (!hbqbp) |
| return NULL; |
| |
| hbqbp->dbuf.virt = pci_pool_alloc(phba->lpfc_hbq_pool, GFP_KERNEL, |
| &hbqbp->dbuf.phys); |
| if (!hbqbp->dbuf.virt) { |
| kfree(hbqbp); |
| return NULL; |
| } |
| hbqbp->size = LPFC_BPL_SIZE; |
| return hbqbp; |
| } |
| |
| /** |
| * lpfc_els_hbq_free - Frees an HBQ buffer allocated with lpfc_els_hbq_alloc |
| * @phba: HBA buffer was allocated for |
| * @hbqbp: HBQ container returned by lpfc_els_hbq_alloc |
| * |
| * Description: Frees both the container and the DMA-mapped buffer returned by |
| * lpfc_els_hbq_alloc. |
| * |
| * Notes: Can be called with or without locks held. |
| * |
| * Returns: None |
| **/ |
| void |
| lpfc_els_hbq_free(struct lpfc_hba *phba, struct hbq_dmabuf *hbqbp) |
| { |
| pci_pool_free(phba->lpfc_hbq_pool, hbqbp->dbuf.virt, hbqbp->dbuf.phys); |
| kfree(hbqbp); |
| return; |
| } |
| |
| /** |
| * lpfc_sli4_rb_alloc - Allocate an SLI4 Receive buffer |
| * @phba: HBA to allocate a receive buffer for |
| * |
| * Description: Allocates a DMA-mapped receive buffer from the lpfc_hrb_pool PCI |
| * pool along a non-DMA-mapped container for it. |
| * |
| * Notes: Not interrupt-safe. Must be called with no locks held. |
| * |
| * Returns: |
| * pointer to HBQ on success |
| * NULL on failure |
| **/ |
| struct hbq_dmabuf * |
| lpfc_sli4_rb_alloc(struct lpfc_hba *phba) |
| { |
| struct hbq_dmabuf *dma_buf; |
| |
| dma_buf = kzalloc(sizeof(struct hbq_dmabuf), GFP_KERNEL); |
| if (!dma_buf) |
| return NULL; |
| |
| dma_buf->hbuf.virt = pci_pool_alloc(phba->lpfc_hrb_pool, GFP_KERNEL, |
| &dma_buf->hbuf.phys); |
| if (!dma_buf->hbuf.virt) { |
| kfree(dma_buf); |
| return NULL; |
| } |
| dma_buf->dbuf.virt = pci_pool_alloc(phba->lpfc_drb_pool, GFP_KERNEL, |
| &dma_buf->dbuf.phys); |
| if (!dma_buf->dbuf.virt) { |
| pci_pool_free(phba->lpfc_hrb_pool, dma_buf->hbuf.virt, |
| dma_buf->hbuf.phys); |
| kfree(dma_buf); |
| return NULL; |
| } |
| dma_buf->size = LPFC_BPL_SIZE; |
| return dma_buf; |
| } |
| |
| /** |
| * lpfc_sli4_rb_free - Frees a receive buffer |
| * @phba: HBA buffer was allocated for |
| * @dmab: DMA Buffer container returned by lpfc_sli4_hbq_alloc |
| * |
| * Description: Frees both the container and the DMA-mapped buffers returned by |
| * lpfc_sli4_rb_alloc. |
| * |
| * Notes: Can be called with or without locks held. |
| * |
| * Returns: None |
| **/ |
| void |
| lpfc_sli4_rb_free(struct lpfc_hba *phba, struct hbq_dmabuf *dmab) |
| { |
| pci_pool_free(phba->lpfc_hrb_pool, dmab->hbuf.virt, dmab->hbuf.phys); |
| pci_pool_free(phba->lpfc_drb_pool, dmab->dbuf.virt, dmab->dbuf.phys); |
| kfree(dmab); |
| return; |
| } |
| |
| /** |
| * lpfc_in_buf_free - Free a DMA buffer |
| * @phba: HBA buffer is associated with |
| * @mp: Buffer to free |
| * |
| * Description: Frees the given DMA buffer in the appropriate way given if the |
| * HBA is running in SLI3 mode with HBQs enabled. |
| * |
| * Notes: Takes phba->hbalock. Can be called with or without other locks held. |
| * |
| * Returns: None |
| **/ |
| void |
| lpfc_in_buf_free(struct lpfc_hba *phba, struct lpfc_dmabuf *mp) |
| { |
| struct hbq_dmabuf *hbq_entry; |
| unsigned long flags; |
| |
| if (!mp) |
| return; |
| |
| if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) { |
| /* Check whether HBQ is still in use */ |
| spin_lock_irqsave(&phba->hbalock, flags); |
| if (!phba->hbq_in_use) { |
| spin_unlock_irqrestore(&phba->hbalock, flags); |
| return; |
| } |
| hbq_entry = container_of(mp, struct hbq_dmabuf, dbuf); |
| list_del(&hbq_entry->dbuf.list); |
| if (hbq_entry->tag == -1) { |
| (phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer) |
| (phba, hbq_entry); |
| } else { |
| lpfc_sli_free_hbq(phba, hbq_entry); |
| } |
| spin_unlock_irqrestore(&phba->hbalock, flags); |
| } else { |
| lpfc_mbuf_free(phba, mp->virt, mp->phys); |
| kfree(mp); |
| } |
| return; |
| } |