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-2009 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/slab.h>
  24 #include <linux/pci.h>
  25 #include <linux/interrupt.h>
  26
  27 #include <scsi/scsi_device.h>
  28 #include <scsi/scsi_transport_fc.h>
  29
  30 #include <scsi/scsi.h>
  31
  32 #include "lpfc_hw4.h"
  33 #include "lpfc_hw.h"
  34 #include "lpfc_sli.h"
  35 #include "lpfc_sli4.h"
  36 #include "lpfc_nl.h"
  37 #include "lpfc_disc.h"
  38 #include "lpfc_scsi.h"
  39 #include "lpfc.h"
  40 #include "lpfc_crtn.h"
  41
  42 #define LPFC_MBUF_POOL_SIZE     64      /* max elements in MBUF safety pool */
  43 #define LPFC_MEM_POOL_SIZE      64      /* max elem in non-DMA safety pool */
  44
  45
  46 /**
  47  * lpfc_mem_alloc - create and allocate all PCI and memory pools
  48  * @phba: HBA to allocate pools for
  49  *
  50  * Description: Creates and allocates PCI pools lpfc_scsi_dma_buf_pool,
  51  * lpfc_mbuf_pool, lpfc_hrb_pool.  Creates and allocates kmalloc-backed mempools
  52  * for LPFC_MBOXQ_t and lpfc_nodelist.  Also allocates the VPI bitmask.
  53  *
  54  * Notes: Not interrupt-safe.  Must be called with no locks held.  If any
  55  * allocation fails, frees all successfully allocated memory before returning.
  56  *
  57  * Returns:
  58  *   0 on success
  59  *   -ENOMEM on failure (if any memory allocations fail)
  60  **/
  61 int
  62 lpfc_mem_alloc(struct lpfc_hba *phba, int align)
  63 {
  64         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
  65         int i;
  66
  67         if (phba->sli_rev == LPFC_SLI_REV4)
  68                 phba->lpfc_scsi_dma_buf_pool =
  69                         pci_pool_create("lpfc_scsi_dma_buf_pool",
  70                                 phba->pcidev,
  71                                 phba->cfg_sg_dma_buf_size,
  72                                 phba->cfg_sg_dma_buf_size,
  73                                 0);
  74         else
  75                 phba->lpfc_scsi_dma_buf_pool =
  76                         pci_pool_create("lpfc_scsi_dma_buf_pool",
  77                                 phba->pcidev, phba->cfg_sg_dma_buf_size,
  78                                 align, 0);
  79         if (!phba->lpfc_scsi_dma_buf_pool)
  80                 goto fail;
  81
  82         phba->lpfc_mbuf_pool = pci_pool_create("lpfc_mbuf_pool", phba->pcidev,
  83                                                         LPFC_BPL_SIZE,
  84                                                         align, 0);
  85         if (!phba->lpfc_mbuf_pool)
  86                 goto fail_free_dma_buf_pool;
  87
  88         pool->elements = kmalloc(sizeof(struct lpfc_dmabuf) *
  89                                          LPFC_MBUF_POOL_SIZE, GFP_KERNEL);
  90         if (!pool->elements)
  91                 goto fail_free_lpfc_mbuf_pool;
  92
  93         pool->max_count = 0;
  94         pool->current_count = 0;
  95         for ( i = 0; i < LPFC_MBUF_POOL_SIZE; i++) {
  96                 pool->elements[i].virt = pci_pool_alloc(phba->lpfc_mbuf_pool,
  97                                        GFP_KERNEL, &pool->elements[i].phys);
  98                 if (!pool->elements[i].virt)
  99                         goto fail_free_mbuf_pool;
 100                 pool->max_count++;
 101                 pool->current_count++;
 102         }
 103
 104         phba->mbox_mem_pool = mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE,
 105                                                          sizeof(LPFC_MBOXQ_t));
 106         if (!phba->mbox_mem_pool)
 107                 goto fail_free_mbuf_pool;
 108
 109         phba->nlp_mem_pool = mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE,
 110                                                 sizeof(struct lpfc_nodelist));
 111         if (!phba->nlp_mem_pool)
 112                 goto fail_free_mbox_pool;
 113
 114         if (phba->sli_rev == LPFC_SLI_REV4) {
 115                 phba->rrq_pool =
 116                         mempool_create_kmalloc_pool(LPFC_MEM_POOL_SIZE,
 117                                                 sizeof(struct lpfc_node_rrq));
 118                 if (!phba->rrq_pool)
 119                         goto fail_free_nlp_mem_pool;
 120                 phba->lpfc_hrb_pool = pci_pool_create("lpfc_hrb_pool",
 121                                               phba->pcidev,
 122                                               LPFC_HDR_BUF_SIZE, align, 0);
 123                 if (!phba->lpfc_hrb_pool)
 124                         goto fail_free_rrq_mem_pool;
 125
 126                 phba->lpfc_drb_pool = pci_pool_create("lpfc_drb_pool",
 127                                               phba->pcidev,
 128                                               LPFC_DATA_BUF_SIZE, align, 0);
 129                 if (!phba->lpfc_drb_pool)
 130                         goto fail_free_hrb_pool;
 131                 phba->lpfc_hbq_pool = NULL;
 132         } else {
 133                 phba->lpfc_hbq_pool = pci_pool_create("lpfc_hbq_pool",
 134                         phba->pcidev, LPFC_BPL_SIZE, align, 0);
 135                 if (!phba->lpfc_hbq_pool)
 136                         goto fail_free_nlp_mem_pool;
 137                 phba->lpfc_hrb_pool = NULL;
 138                 phba->lpfc_drb_pool = NULL;
 139         }
 140
 141         return 0;
 142  fail_free_hrb_pool:
 143         pci_pool_destroy(phba->lpfc_hrb_pool);
 144         phba->lpfc_hrb_pool = NULL;
 145  fail_free_rrq_mem_pool:
 146         mempool_destroy(phba->rrq_pool);
 147         phba->rrq_pool = NULL;
 148  fail_free_nlp_mem_pool:
 149         mempool_destroy(phba->nlp_mem_pool);
 150         phba->nlp_mem_pool = NULL;
 151  fail_free_mbox_pool:
 152         mempool_destroy(phba->mbox_mem_pool);
 153         phba->mbox_mem_pool = NULL;
 154  fail_free_mbuf_pool:
 155         while (i--)
 156                 pci_pool_free(phba->lpfc_mbuf_pool, pool->elements[i].virt,
 157                                                  pool->elements[i].phys);
 158         kfree(pool->elements);
 159  fail_free_lpfc_mbuf_pool:
 160         pci_pool_destroy(phba->lpfc_mbuf_pool);
 161         phba->lpfc_mbuf_pool = NULL;
 162  fail_free_dma_buf_pool:
 163         pci_pool_destroy(phba->lpfc_scsi_dma_buf_pool);
 164         phba->lpfc_scsi_dma_buf_pool = NULL;
 165  fail:
 166         return -ENOMEM;
 167 }
 168
 169 /**
 170  * lpfc_mem_free - Frees memory allocated by lpfc_mem_alloc
 171  * @phba: HBA to free memory for
 172  *
 173  * Description: Free the memory allocated by lpfc_mem_alloc routine. This
 174  * routine is a the counterpart of lpfc_mem_alloc.
 175  *
 176  * Returns: None
 177  **/
 178 void
 179 lpfc_mem_free(struct lpfc_hba *phba)
 180 {
 181         int i;
 182         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
 183
 184         /* Free HBQ pools */
 185         lpfc_sli_hbqbuf_free_all(phba);
 186         if (phba->lpfc_drb_pool)
 187                 pci_pool_destroy(phba->lpfc_drb_pool);
 188         phba->lpfc_drb_pool = NULL;
 189         if (phba->lpfc_hrb_pool)
 190                 pci_pool_destroy(phba->lpfc_hrb_pool);
 191         phba->lpfc_hrb_pool = NULL;
 192
 193         if (phba->lpfc_hbq_pool)
 194                 pci_pool_destroy(phba->lpfc_hbq_pool);
 195         phba->lpfc_hbq_pool = NULL;
 196
 197         /* Free NLP memory pool */
 198         mempool_destroy(phba->nlp_mem_pool);
 199         phba->nlp_mem_pool = NULL;
 200
 201         /* Free mbox memory pool */
 202         mempool_destroy(phba->mbox_mem_pool);
 203         phba->mbox_mem_pool = NULL;
 204
 205         /* Free MBUF memory pool */
 206         for (i = 0; i < pool->current_count; i++)
 207                 pci_pool_free(phba->lpfc_mbuf_pool, pool->elements[i].virt,
 208                               pool->elements[i].phys);
 209         kfree(pool->elements);
 210
 211         pci_pool_destroy(phba->lpfc_mbuf_pool);
 212         phba->lpfc_mbuf_pool = NULL;
 213
 214         /* Free DMA buffer memory pool */
 215         pci_pool_destroy(phba->lpfc_scsi_dma_buf_pool);
 216         phba->lpfc_scsi_dma_buf_pool = NULL;
 217
 218         return;
 219 }
 220
 221 /**
 222  * lpfc_mem_free_all - Frees all PCI and driver memory
 223  * @phba: HBA to free memory for
 224  *
 225  * Description: Free memory from PCI and driver memory pools and also those
 226  * used : lpfc_scsi_dma_buf_pool, lpfc_mbuf_pool, lpfc_hrb_pool. Frees
 227  * kmalloc-backed mempools for LPFC_MBOXQ_t and lpfc_nodelist. Also frees
 228  * the VPI bitmask.
 229  *
 230  * Returns: None
 231  **/
 232 void
 233 lpfc_mem_free_all(struct lpfc_hba *phba)
 234 {
 235         struct lpfc_sli *psli = &phba->sli;
 236         LPFC_MBOXQ_t *mbox, *next_mbox;
 237         struct lpfc_dmabuf   *mp;
 238
 239         /* Free memory used in mailbox queue back to mailbox memory pool */
 240         list_for_each_entry_safe(mbox, next_mbox, &psli->mboxq, list) {
 241                 mp = (struct lpfc_dmabuf *) (mbox->context1);
 242                 if (mp) {
 243                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
 244                         kfree(mp);
 245                 }
 246                 list_del(&mbox->list);
 247                 mempool_free(mbox, phba->mbox_mem_pool);
 248         }
 249         /* Free memory used in mailbox cmpl list back to mailbox memory pool */
 250         list_for_each_entry_safe(mbox, next_mbox, &psli->mboxq_cmpl, list) {
 251                 mp = (struct lpfc_dmabuf *) (mbox->context1);
 252                 if (mp) {
 253                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
 254                         kfree(mp);
 255                 }
 256                 list_del(&mbox->list);
 257                 mempool_free(mbox, phba->mbox_mem_pool);
 258         }
 259         /* Free the active mailbox command back to the mailbox memory pool */
 260         spin_lock_irq(&phba->hbalock);
 261         psli->sli_flag &= ~LPFC_SLI_MBOX_ACTIVE;
 262         spin_unlock_irq(&phba->hbalock);
 263         if (psli->mbox_active) {
 264                 mbox = psli->mbox_active;
 265                 mp = (struct lpfc_dmabuf *) (mbox->context1);
 266                 if (mp) {
 267                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
 268                         kfree(mp);
 269                 }
 270                 mempool_free(mbox, phba->mbox_mem_pool);
 271                 psli->mbox_active = NULL;
 272         }
 273
 274         /* Free and destroy all the allocated memory pools */
 275         lpfc_mem_free(phba);
 276
 277         /* Free the iocb lookup array */
 278         kfree(psli->iocbq_lookup);
 279         psli->iocbq_lookup = NULL;
 280
 281         return;
 282 }
 283
 284 /**
 285  * lpfc_mbuf_alloc - Allocate an mbuf from the lpfc_mbuf_pool PCI pool
 286  * @phba: HBA which owns the pool to allocate from
 287  * @mem_flags: indicates if this is a priority (MEM_PRI) allocation
 288  * @handle: used to return the DMA-mapped address of the mbuf
 289  *
 290  * Description: Allocates a DMA-mapped buffer from the lpfc_mbuf_pool PCI pool.
 291  * Allocates from generic pci_pool_alloc function first and if that fails and
 292  * mem_flags has MEM_PRI set (the only defined flag), returns an mbuf from the
 293  * HBA's pool.
 294  *
 295  * Notes: Not interrupt-safe.  Must be called with no locks held.  Takes
 296  * phba->hbalock.
 297  *
 298  * Returns:
 299  *   pointer to the allocated mbuf on success
 300  *   NULL on failure
 301  **/
 302 void *
 303 lpfc_mbuf_alloc(struct lpfc_hba *phba, int mem_flags, dma_addr_t *handle)
 304 {
 305         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
 306         unsigned long iflags;
 307         void *ret;
 308
 309         ret = pci_pool_alloc(phba->lpfc_mbuf_pool, GFP_KERNEL, handle);
 310
 311         spin_lock_irqsave(&phba->hbalock, iflags);
 312         if (!ret && (mem_flags & MEM_PRI) && pool->current_count) {
 313                 pool->current_count--;
 314                 ret = pool->elements[pool->current_count].virt;
 315                 *handle = pool->elements[pool->current_count].phys;
 316         }
 317         spin_unlock_irqrestore(&phba->hbalock, iflags);
 318         return ret;
 319 }
 320
 321 /**
 322  * __lpfc_mbuf_free - Free an mbuf from the lpfc_mbuf_pool PCI pool (locked)
 323  * @phba: HBA which owns the pool to return to
 324  * @virt: mbuf to free
 325  * @dma: the DMA-mapped address of the lpfc_mbuf_pool to be freed
 326  *
 327  * Description: Returns an mbuf lpfc_mbuf_pool to the lpfc_mbuf_safety_pool if
 328  * it is below its max_count, frees the mbuf otherwise.
 329  *
 330  * Notes: Must be called with phba->hbalock held to synchronize access to
 331  * lpfc_mbuf_safety_pool.
 332  *
 333  * Returns: None
 334  **/
 335 void
 336 __lpfc_mbuf_free(struct lpfc_hba * phba, void *virt, dma_addr_t dma)
 337 {
 338         struct lpfc_dma_pool *pool = &phba->lpfc_mbuf_safety_pool;
 339
 340         if (pool->current_count < pool->max_count) {
 341                 pool->elements[pool->current_count].virt = virt;
 342                 pool->elements[pool->current_count].phys = dma;
 343                 pool->current_count++;
 344         } else {
 345                 pci_pool_free(phba->lpfc_mbuf_pool, virt, dma);
 346         }
 347         return;
 348 }
 349
 350 /**
 351  * lpfc_mbuf_free - Free an mbuf from the lpfc_mbuf_pool PCI pool (unlocked)
 352  * @phba: HBA which owns the pool to return to
 353  * @virt: mbuf to free
 354  * @dma: the DMA-mapped address of the lpfc_mbuf_pool to be freed
 355  *
 356  * Description: Returns an mbuf lpfc_mbuf_pool to the lpfc_mbuf_safety_pool if
 357  * it is below its max_count, frees the mbuf otherwise.
 358  *
 359  * Notes: Takes phba->hbalock.  Can be called with or without other locks held.
 360  *
 361  * Returns: None
 362  **/
 363 void
 364 lpfc_mbuf_free(struct lpfc_hba * phba, void *virt, dma_addr_t dma)
 365 {
 366         unsigned long iflags;
 367
 368         spin_lock_irqsave(&phba->hbalock, iflags);
 369         __lpfc_mbuf_free(phba, virt, dma);
 370         spin_unlock_irqrestore(&phba->hbalock, iflags);
 371         return;
 372 }
 373
 374 /**
 375  * lpfc_els_hbq_alloc - Allocate an HBQ buffer
 376  * @phba: HBA to allocate HBQ buffer for
 377  *
 378  * Description: Allocates a DMA-mapped HBQ buffer from the lpfc_hrb_pool PCI
 379  * pool along a non-DMA-mapped container for it.
 380  *
 381  * Notes: Not interrupt-safe.  Must be called with no locks held.
 382  *
 383  * Returns:
 384  *   pointer to HBQ on success
 385  *   NULL on failure
 386  **/
 387 struct hbq_dmabuf *
 388 lpfc_els_hbq_alloc(struct lpfc_hba *phba)
 389 {
 390         struct hbq_dmabuf *hbqbp;
 391
 392         hbqbp = kmalloc(sizeof(struct hbq_dmabuf), GFP_KERNEL);
 393         if (!hbqbp)
 394                 return NULL;
 395
 396         hbqbp->dbuf.virt = pci_pool_alloc(phba->lpfc_hbq_pool, GFP_KERNEL,
 397                                           &hbqbp->dbuf.phys);
 398         if (!hbqbp->dbuf.virt) {
 399                 kfree(hbqbp);
 400                 return NULL;
 401         }
 402         hbqbp->size = LPFC_BPL_SIZE;
 403         return hbqbp;
 404 }
 405
 406 /**
 407  * lpfc_els_hbq_free - Frees an HBQ buffer allocated with lpfc_els_hbq_alloc
 408  * @phba: HBA buffer was allocated for
 409  * @hbqbp: HBQ container returned by lpfc_els_hbq_alloc
 410  *
 411  * Description: Frees both the container and the DMA-mapped buffer returned by
 412  * lpfc_els_hbq_alloc.
 413  *
 414  * Notes: Can be called with or without locks held.
 415  *
 416  * Returns: None
 417  **/
 418 void
 419 lpfc_els_hbq_free(struct lpfc_hba *phba, struct hbq_dmabuf *hbqbp)
 420 {
 421         pci_pool_free(phba->lpfc_hbq_pool, hbqbp->dbuf.virt, hbqbp->dbuf.phys);
 422         kfree(hbqbp);
 423         return;
 424 }
 425
 426 /**
 427  * lpfc_sli4_rb_alloc - Allocate an SLI4 Receive buffer
 428  * @phba: HBA to allocate a receive buffer for
 429  *
 430  * Description: Allocates a DMA-mapped receive buffer from the lpfc_hrb_pool PCI
 431  * pool along a non-DMA-mapped container for it.
 432  *
 433  * Notes: Not interrupt-safe.  Must be called with no locks held.
 434  *
 435  * Returns:
 436  *   pointer to HBQ on success
 437  *   NULL on failure
 438  **/
 439 struct hbq_dmabuf *
 440 lpfc_sli4_rb_alloc(struct lpfc_hba *phba)
 441 {
 442         struct hbq_dmabuf *dma_buf;
 443
 444         dma_buf = kmalloc(sizeof(struct hbq_dmabuf), GFP_KERNEL);
 445         if (!dma_buf)
 446                 return NULL;
 447
 448         dma_buf->hbuf.virt = pci_pool_alloc(phba->lpfc_hrb_pool, GFP_KERNEL,
 449                                             &dma_buf->hbuf.phys);
 450         if (!dma_buf->hbuf.virt) {
 451                 kfree(dma_buf);
 452                 return NULL;
 453         }
 454         dma_buf->dbuf.virt = pci_pool_alloc(phba->lpfc_drb_pool, GFP_KERNEL,
 455                                             &dma_buf->dbuf.phys);
 456         if (!dma_buf->dbuf.virt) {
 457                 pci_pool_free(phba->lpfc_hrb_pool, dma_buf->hbuf.virt,
 458                               dma_buf->hbuf.phys);
 459                 kfree(dma_buf);
 460                 return NULL;
 461         }
 462         dma_buf->size = LPFC_BPL_SIZE;
 463         return dma_buf;
 464 }
 465
 466 /**
 467  * lpfc_sli4_rb_free - Frees a receive buffer
 468  * @phba: HBA buffer was allocated for
 469  * @dmab: DMA Buffer container returned by lpfc_sli4_hbq_alloc
 470  *
 471  * Description: Frees both the container and the DMA-mapped buffers returned by
 472  * lpfc_sli4_rb_alloc.
 473  *
 474  * Notes: Can be called with or without locks held.
 475  *
 476  * Returns: None
 477  **/
 478 void
 479 lpfc_sli4_rb_free(struct lpfc_hba *phba, struct hbq_dmabuf *dmab)
 480 {
 481         pci_pool_free(phba->lpfc_hrb_pool, dmab->hbuf.virt, dmab->hbuf.phys);
 482         pci_pool_free(phba->lpfc_drb_pool, dmab->dbuf.virt, dmab->dbuf.phys);
 483         kfree(dmab);
 484         return;
 485 }
 486
 487 /**
 488  * lpfc_in_buf_free - Free a DMA buffer
 489  * @phba: HBA buffer is associated with
 490  * @mp: Buffer to free
 491  *
 492  * Description: Frees the given DMA buffer in the appropriate way given if the
 493  * HBA is running in SLI3 mode with HBQs enabled.
 494  *
 495  * Notes: Takes phba->hbalock.  Can be called with or without other locks held.
 496  *
 497  * Returns: None
 498  **/
 499 void
 500 lpfc_in_buf_free(struct lpfc_hba *phba, struct lpfc_dmabuf *mp)
 501 {
 502         struct hbq_dmabuf *hbq_entry;
 503         unsigned long flags;
 504
 505         if (!mp)
 506                 return;
 507
 508         if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
 509                 /* Check whether HBQ is still in use */
 510                 spin_lock_irqsave(&phba->hbalock, flags);
 511                 if (!phba->hbq_in_use) {
 512                         spin_unlock_irqrestore(&phba->hbalock, flags);
 513                         return;
 514                 }
 515                 hbq_entry = container_of(mp, struct hbq_dmabuf, dbuf);
 516                 list_del(&hbq_entry->dbuf.list);
 517                 if (hbq_entry->tag == -1) {
 518                         (phba->hbqs[LPFC_ELS_HBQ].hbq_free_buffer)
 519                                 (phba, hbq_entry);
 520                 } else {
 521                         lpfc_sli_free_hbq(phba, hbq_entry);
 522                 }
 523                 spin_unlock_irqrestore(&phba->hbalock, flags);
 524         } else {
 525                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
 526                 kfree(mp);
 527         }
 528         return;
 529 }