1/*
  2 *  IBM eServer eHCA Infiniband device driver for Linux on POWER
  3 *
  4 *  PD functions
  5 *
  6 *  Authors: Christoph Raisch <raisch@de.ibm.com>
  7 *
  8 *  Copyright (c) 2005 IBM Corporation
  9 *
 10 *  All rights reserved.
 11 *
 12 *  This source code is distributed under a dual license of GPL v2.0 and OpenIB
 13 *  BSD.
 14 *
 15 * OpenIB BSD License
 16 *
 17 * Redistribution and use in source and binary forms, with or without
 18 * modification, are permitted provided that the following conditions are met:
 19 *
 20 * Redistributions of source code must retain the above copyright notice, this
 21 * list of conditions and the following disclaimer.
 22 *
 23 * Redistributions in binary form must reproduce the above copyright notice,
 24 * this list of conditions and the following disclaimer in the documentation
 25 * and/or other materials
 26 * provided with the distribution.
 27 *
 28 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 29 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 31 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
 32 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 33 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 34 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
 35 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
 36 * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 37 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 38 * POSSIBILITY OF SUCH DAMAGE.
 39 */
 40
 41#include <linux/slab.h>
 42
 43#include "ehca_tools.h"
 44#include "ehca_iverbs.h"
 45
 46static struct kmem_cache *pd_cache;
 47
 48struct ib_pd *ehca_alloc_pd(struct ib_device *device,
 49			    struct ib_ucontext *context, struct ib_udata *udata)
 50{
 51	struct ehca_pd *pd;
 52	int i;
 53
 54	pd = kmem_cache_zalloc(pd_cache, GFP_KERNEL);
 55	if (!pd) {
 56		ehca_err(device, "device=%p context=%p out of memory",
 57			 device, context);
 58		return ERR_PTR(-ENOMEM);
 59	}
 60
 61	for (i = 0; i < 2; i++) {
 62		INIT_LIST_HEAD(&pd->free[i]);
 63		INIT_LIST_HEAD(&pd->full[i]);
 64	}
 65	mutex_init(&pd->lock);
 66
 67	/*
 68	 * Kernel PD: when device = -1, 0
 69	 * User   PD: when context != -1
 70	 */
 71	if (!context) {
 72		/*
 73		 * Kernel PDs after init reuses always
 74		 * the one created in ehca_shca_reopen()
 75		 */
 76		struct ehca_shca *shca = container_of(device, struct ehca_shca,
 77						      ib_device);
 78		pd->fw_pd.value = shca->pd->fw_pd.value;
 79	} else
 80		pd->fw_pd.value = (u64)pd;
 81
 82	return &pd->ib_pd;
 83}
 84
 85int ehca_dealloc_pd(struct ib_pd *pd)
 86{
 87	struct ehca_pd *my_pd = container_of(pd, struct ehca_pd, ib_pd);
 88	int i, leftovers = 0;
 89	struct ipz_small_queue_page *page, *tmp;
 90
 91	for (i = 0; i < 2; i++) {
 92		list_splice(&my_pd->full[i], &my_pd->free[i]);
 93		list_for_each_entry_safe(page, tmp, &my_pd->free[i], list) {
 94			leftovers = 1;
 95			free_page(page->page);
 96			kmem_cache_free(small_qp_cache, page);
 97		}
 98	}
 99
100	if (leftovers)
101		ehca_warn(pd->device,
102			  "Some small queue pages were not freed");
103
104	kmem_cache_free(pd_cache, my_pd);
105
106	return 0;
107}
108
109int ehca_init_pd_cache(void)
110{
111	pd_cache = kmem_cache_create("ehca_cache_pd",
112				     sizeof(struct ehca_pd), 0,
113				     SLAB_HWCACHE_ALIGN,
114				     NULL);
115	if (!pd_cache)
116		return -ENOMEM;
117	return 0;
118}
119
120void ehca_cleanup_pd_cache(void)
121{
122	if (pd_cache)
123		kmem_cache_destroy(pd_cache);
124}