drivers/infiniband/hw/mthca/mthca_main.c

   1 /*
   2  * Copyright (c) 2004, 2005 Topspin Communications.  All rights reserved.
   3  *
   4  * This software is available to you under a choice of one of two
   5  * licenses.  You may choose to be licensed under the terms of the GNU
   6  * General Public License (GPL) Version 2, available from the file
   7  * COPYING in the main directory of this source tree, or the
   8  * OpenIB.org BSD license below:
   9  *
  10  *     Redistribution and use in source and binary forms, with or
  11  *     without modification, are permitted provided that the following
  12  *     conditions are met:
  13  *
  14  *      - Redistributions of source code must retain the above
  15  *        copyright notice, this list of conditions and the following
  16  *        disclaimer.
  17  *
  18  *      - Redistributions in binary form must reproduce the above
  19  *        copyright notice, this list of conditions and the following
  20  *        disclaimer in the documentation and/or other materials
  21  *        provided with the distribution.
  22  *
  23  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  24  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  25  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  26  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
  27  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
  28  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  29  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  30  * SOFTWARE.
  31  *
  32  * $Id: mthca_main.c 1396 2004-12-28 04:10:27Z roland $
  33  */
  34
  35 #include <linux/config.h>
  36 #include <linux/version.h>
  37 #include <linux/module.h>
  38 #include <linux/init.h>
  39 #include <linux/errno.h>
  40 #include <linux/pci.h>
  41 #include <linux/interrupt.h>
  42
  43 #include "mthca_dev.h"
  44 #include "mthca_config_reg.h"
  45 #include "mthca_cmd.h"
  46 #include "mthca_profile.h"
  47 #include "mthca_memfree.h"
  48
  49 MODULE_AUTHOR("Roland Dreier");
  50 MODULE_DESCRIPTION("Mellanox InfiniBand HCA low-level driver");
  51 MODULE_LICENSE("Dual BSD/GPL");
  52 MODULE_VERSION(DRV_VERSION);
  53
  54 #ifdef CONFIG_PCI_MSI
  55
  56 static int msi_x = 0;
  57 module_param(msi_x, int, 0444);
  58 MODULE_PARM_DESC(msi_x, "attempt to use MSI-X if nonzero");
  59
  60 static int msi = 0;
  61 module_param(msi, int, 0444);
  62 MODULE_PARM_DESC(msi, "attempt to use MSI if nonzero");
  63
  64 #else /* CONFIG_PCI_MSI */
  65
  66 #define msi_x (0)
  67 #define msi   (0)
  68
  69 #endif /* CONFIG_PCI_MSI */
  70
  71 static const char mthca_version[] __devinitdata =
  72         "ib_mthca: Mellanox InfiniBand HCA driver v"
  73         DRV_VERSION " (" DRV_RELDATE ")\n";
  74
  75 static struct mthca_profile default_profile = {
  76         .num_qp     = 1 << 16,
  77         .rdb_per_qp = 4,
  78         .num_cq     = 1 << 16,
  79         .num_mcg    = 1 << 13,
  80         .num_mpt    = 1 << 17,
  81         .num_mtt    = 1 << 20,
  82         .num_udav   = 1 << 15,  /* Tavor only */
  83         .uarc_size  = 1 << 18,  /* Arbel only */
  84 };
  85
  86 static int __devinit mthca_tune_pci(struct mthca_dev *mdev)
  87 {
  88         int cap;
  89         u16 val;
  90
  91         /* First try to max out Read Byte Count */
  92         cap = pci_find_capability(mdev->pdev, PCI_CAP_ID_PCIX);
  93         if (cap) {
  94                 if (pci_read_config_word(mdev->pdev, cap + PCI_X_CMD, &val)) {
  95                         mthca_err(mdev, "Couldn't read PCI-X command register, "
  96                                   "aborting.\n");
  97                         return -ENODEV;
  98                 }
  99                 val = (val & ~PCI_X_CMD_MAX_READ) | (3 << 2);
 100                 if (pci_write_config_word(mdev->pdev, cap + PCI_X_CMD, val)) {
 101                         mthca_err(mdev, "Couldn't write PCI-X command register, "
 102                                   "aborting.\n");
 103                         return -ENODEV;
 104                 }
 105         } else if (mdev->hca_type == TAVOR)
 106                 mthca_info(mdev, "No PCI-X capability, not setting RBC.\n");
 107
 108         cap = pci_find_capability(mdev->pdev, PCI_CAP_ID_EXP);
 109         if (cap) {
 110                 if (pci_read_config_word(mdev->pdev, cap + PCI_EXP_DEVCTL, &val)) {
 111                         mthca_err(mdev, "Couldn't read PCI Express device control "
 112                                   "register, aborting.\n");
 113                         return -ENODEV;
 114                 }
 115                 val = (val & ~PCI_EXP_DEVCTL_READRQ) | (5 << 12);
 116                 if (pci_write_config_word(mdev->pdev, cap + PCI_EXP_DEVCTL, val)) {
 117                         mthca_err(mdev, "Couldn't write PCI Express device control "
 118                                   "register, aborting.\n");
 119                         return -ENODEV;
 120                 }
 121         } else if (mdev->hca_type == ARBEL_NATIVE ||
 122                    mdev->hca_type == ARBEL_COMPAT)
 123                 mthca_info(mdev, "No PCI Express capability, "
 124                            "not setting Max Read Request Size.\n");
 125
 126         return 0;
 127 }
 128
 129 static int __devinit mthca_dev_lim(struct mthca_dev *mdev, struct mthca_dev_lim *dev_lim)
 130 {
 131         int err;
 132         u8 status;
 133
 134         err = mthca_QUERY_DEV_LIM(mdev, dev_lim, &status);
 135         if (err) {
 136                 mthca_err(mdev, "QUERY_DEV_LIM command failed, aborting.\n");
 137                 return err;
 138         }
 139         if (status) {
 140                 mthca_err(mdev, "QUERY_DEV_LIM returned status 0x%02x, "
 141                           "aborting.\n", status);
 142                 return -EINVAL;
 143         }
 144         if (dev_lim->min_page_sz > PAGE_SIZE) {
 145                 mthca_err(mdev, "HCA minimum page size of %d bigger than "
 146                           "kernel PAGE_SIZE of %ld, aborting.\n",
 147                           dev_lim->min_page_sz, PAGE_SIZE);
 148                 return -ENODEV;
 149         }
 150         if (dev_lim->num_ports > MTHCA_MAX_PORTS) {
 151                 mthca_err(mdev, "HCA has %d ports, but we only support %d, "
 152                           "aborting.\n",
 153                           dev_lim->num_ports, MTHCA_MAX_PORTS);
 154                 return -ENODEV;
 155         }
 156
 157         mdev->limits.num_ports          = dev_lim->num_ports;
 158         mdev->limits.vl_cap             = dev_lim->max_vl;
 159         mdev->limits.mtu_cap            = dev_lim->max_mtu;
 160         mdev->limits.gid_table_len      = dev_lim->max_gids;
 161         mdev->limits.pkey_table_len     = dev_lim->max_pkeys;
 162         mdev->limits.local_ca_ack_delay = dev_lim->local_ca_ack_delay;
 163         mdev->limits.max_sg             = dev_lim->max_sg;
 164         mdev->limits.reserved_qps       = dev_lim->reserved_qps;
 165         mdev->limits.reserved_srqs      = dev_lim->reserved_srqs;
 166         mdev->limits.reserved_eecs      = dev_lim->reserved_eecs;
 167         mdev->limits.reserved_cqs       = dev_lim->reserved_cqs;
 168         mdev->limits.reserved_eqs       = dev_lim->reserved_eqs;
 169         mdev->limits.reserved_mtts      = dev_lim->reserved_mtts;
 170         mdev->limits.reserved_mrws      = dev_lim->reserved_mrws;
 171         mdev->limits.reserved_uars      = dev_lim->reserved_uars;
 172         mdev->limits.reserved_pds       = dev_lim->reserved_pds;
 173
 174         if (dev_lim->flags & DEV_LIM_FLAG_SRQ)
 175                 mdev->mthca_flags |= MTHCA_FLAG_SRQ;
 176
 177         return 0;
 178 }
 179
 180 static int __devinit mthca_init_tavor(struct mthca_dev *mdev)
 181 {
 182         u8 status;
 183         int err;
 184         struct mthca_dev_lim        dev_lim;
 185         struct mthca_profile        profile;
 186         struct mthca_init_hca_param init_hca;
 187         struct mthca_adapter        adapter;
 188
 189         err = mthca_SYS_EN(mdev, &status);
 190         if (err) {
 191                 mthca_err(mdev, "SYS_EN command failed, aborting.\n");
 192                 return err;
 193         }
 194         if (status) {
 195                 mthca_err(mdev, "SYS_EN returned status 0x%02x, "
 196                           "aborting.\n", status);
 197                 return -EINVAL;
 198         }
 199
 200         err = mthca_QUERY_FW(mdev, &status);
 201         if (err) {
 202                 mthca_err(mdev, "QUERY_FW command failed, aborting.\n");
 203                 goto err_disable;
 204         }
 205         if (status) {
 206                 mthca_err(mdev, "QUERY_FW returned status 0x%02x, "
 207                           "aborting.\n", status);
 208                 err = -EINVAL;
 209                 goto err_disable;
 210         }
 211         err = mthca_QUERY_DDR(mdev, &status);
 212         if (err) {
 213                 mthca_err(mdev, "QUERY_DDR command failed, aborting.\n");
 214                 goto err_disable;
 215         }
 216         if (status) {
 217                 mthca_err(mdev, "QUERY_DDR returned status 0x%02x, "
 218                           "aborting.\n", status);
 219                 err = -EINVAL;
 220                 goto err_disable;
 221         }
 222
 223         err = mthca_dev_lim(mdev, &dev_lim);
 224
 225         profile = default_profile;
 226         profile.num_uar   = dev_lim.uar_size / PAGE_SIZE;
 227         profile.uarc_size = 0;
 228
 229         err = mthca_make_profile(mdev, &profile, &dev_lim, &init_hca);
 230         if (err < 0)
 231                 goto err_disable;
 232
 233         err = mthca_INIT_HCA(mdev, &init_hca, &status);
 234         if (err) {
 235                 mthca_err(mdev, "INIT_HCA command failed, aborting.\n");
 236                 goto err_disable;
 237         }
 238         if (status) {
 239                 mthca_err(mdev, "INIT_HCA returned status 0x%02x, "
 240                           "aborting.\n", status);
 241                 err = -EINVAL;
 242                 goto err_disable;
 243         }
 244
 245         err = mthca_QUERY_ADAPTER(mdev, &adapter, &status);
 246         if (err) {
 247                 mthca_err(mdev, "QUERY_ADAPTER command failed, aborting.\n");
 248                 goto err_close;
 249         }
 250         if (status) {
 251                 mthca_err(mdev, "QUERY_ADAPTER returned status 0x%02x, "
 252                           "aborting.\n", status);
 253                 err = -EINVAL;
 254                 goto err_close;
 255         }
 256
 257         mdev->eq_table.inta_pin = adapter.inta_pin;
 258         mdev->rev_id            = adapter.revision_id;
 259
 260         return 0;
 261
 262 err_close:
 263         mthca_CLOSE_HCA(mdev, 0, &status);
 264
 265 err_disable:
 266         mthca_SYS_DIS(mdev, &status);
 267
 268         return err;
 269 }
 270
 271 static int __devinit mthca_load_fw(struct mthca_dev *mdev)
 272 {
 273         u8 status;
 274         int err;
 275
 276         /* FIXME: use HCA-attached memory for FW if present */
 277
 278         mdev->fw.arbel.fw_icm =
 279                 mthca_alloc_icm(mdev, mdev->fw.arbel.fw_pages,
 280                                 GFP_HIGHUSER | __GFP_NOWARN);
 281         if (!mdev->fw.arbel.fw_icm) {
 282                 mthca_err(mdev, "Couldn't allocate FW area, aborting.\n");
 283                 return -ENOMEM;
 284         }
 285
 286         err = mthca_MAP_FA(mdev, mdev->fw.arbel.fw_icm, &status);
 287         if (err) {
 288                 mthca_err(mdev, "MAP_FA command failed, aborting.\n");
 289                 goto err_free;
 290         }
 291         if (status) {
 292                 mthca_err(mdev, "MAP_FA returned status 0x%02x, aborting.\n", status);
 293                 err = -EINVAL;
 294                 goto err_free;
 295         }
 296         err = mthca_RUN_FW(mdev, &status);
 297         if (err) {
 298                 mthca_err(mdev, "RUN_FW command failed, aborting.\n");
 299                 goto err_unmap_fa;
 300         }
 301         if (status) {
 302                 mthca_err(mdev, "RUN_FW returned status 0x%02x, aborting.\n", status);
 303                 err = -EINVAL;
 304                 goto err_unmap_fa;
 305         }
 306
 307         return 0;
 308
 309 err_unmap_fa:
 310         mthca_UNMAP_FA(mdev, &status);
 311
 312 err_free:
 313         mthca_free_icm(mdev, mdev->fw.arbel.fw_icm);
 314         return err;
 315 }
 316
 317 static int __devinit mthca_init_icm(struct mthca_dev *mdev,
 318                                     struct mthca_dev_lim *dev_lim,
 319                                     struct mthca_init_hca_param *init_hca,
 320                                     u64 icm_size)
 321 {
 322         u64 aux_pages;
 323         u8 status;
 324         int err;
 325
 326         err = mthca_SET_ICM_SIZE(mdev, icm_size, &aux_pages, &status);
 327         if (err) {
 328                 mthca_err(mdev, "SET_ICM_SIZE command failed, aborting.\n");
 329                 return err;
 330         }
 331         if (status) {
 332                 mthca_err(mdev, "SET_ICM_SIZE returned status 0x%02x, "
 333                           "aborting.\n", status);
 334                 return -EINVAL;
 335         }
 336
 337         mthca_dbg(mdev, "%lld KB of HCA context requires %lld KB aux memory.\n",
 338                   (unsigned long long) icm_size >> 10,
 339                   (unsigned long long) aux_pages << 2);
 340
 341         mdev->fw.arbel.aux_icm = mthca_alloc_icm(mdev, aux_pages,
 342                                                  GFP_HIGHUSER | __GFP_NOWARN);
 343         if (!mdev->fw.arbel.aux_icm) {
 344                 mthca_err(mdev, "Couldn't allocate aux memory, aborting.\n");
 345                 return -ENOMEM;
 346         }
 347
 348         err = mthca_MAP_ICM_AUX(mdev, mdev->fw.arbel.aux_icm, &status);
 349         if (err) {
 350                 mthca_err(mdev, "MAP_ICM_AUX command failed, aborting.\n");
 351                 goto err_free_aux;
 352         }
 353         if (status) {
 354                 mthca_err(mdev, "MAP_ICM_AUX returned status 0x%02x, aborting.\n", status);
 355                 err = -EINVAL;
 356                 goto err_free_aux;
 357         }
 358
 359         err = mthca_map_eq_icm(mdev, init_hca->eqc_base);
 360         if (err) {
 361                 mthca_err(mdev, "Failed to map EQ context memory, aborting.\n");
 362                 goto err_unmap_aux;
 363         }
 364
 365         mdev->mr_table.mtt_table = mthca_alloc_icm_table(mdev, init_hca->mtt_base,
 366                                                          mdev->limits.num_mtt_segs *
 367                                                          init_hca->mtt_seg_sz,
 368                                                          mdev->limits.reserved_mtts *
 369                                                          init_hca->mtt_seg_sz, 1);
 370         if (!mdev->mr_table.mtt_table) {
 371                 mthca_err(mdev, "Failed to map MTT context memory, aborting.\n");
 372                 err = -ENOMEM;
 373                 goto err_unmap_eq;
 374         }
 375
 376         mdev->mr_table.mpt_table = mthca_alloc_icm_table(mdev, init_hca->mpt_base,
 377                                                          mdev->limits.num_mpts *
 378                                                          dev_lim->mpt_entry_sz,
 379                                                          mdev->limits.reserved_mrws *
 380                                                          dev_lim->mpt_entry_sz, 1);
 381         if (!mdev->mr_table.mpt_table) {
 382                 mthca_err(mdev, "Failed to map MPT context memory, aborting.\n");
 383                 err = -ENOMEM;
 384                 goto err_unmap_mtt;
 385         }
 386
 387         mdev->qp_table.qp_table = mthca_alloc_icm_table(mdev, init_hca->qpc_base,
 388                                                         mdev->limits.num_qps *
 389                                                         dev_lim->qpc_entry_sz,
 390                                                         mdev->limits.reserved_qps *
 391                                                         dev_lim->qpc_entry_sz, 1);
 392         if (!mdev->qp_table.qp_table) {
 393                 mthca_err(mdev, "Failed to map QP context memory, aborting.\n");
 394                 err = -ENOMEM;
 395                 goto err_unmap_mpt;
 396         }
 397
 398         mdev->qp_table.eqp_table = mthca_alloc_icm_table(mdev, init_hca->eqpc_base,
 399                                                          mdev->limits.num_qps *
 400                                                          dev_lim->eqpc_entry_sz,
 401                                                          mdev->limits.reserved_qps *
 402                                                          dev_lim->eqpc_entry_sz, 1);
 403         if (!mdev->qp_table.eqp_table) {
 404                 mthca_err(mdev, "Failed to map EQP context memory, aborting.\n");
 405                 err = -ENOMEM;
 406                 goto err_unmap_qp;
 407         }
 408
 409         mdev->cq_table.table = mthca_alloc_icm_table(mdev, init_hca->cqc_base,
 410                                                      mdev->limits.num_cqs *
 411                                                      dev_lim->cqc_entry_sz,
 412                                                      mdev->limits.reserved_cqs *
 413                                                      dev_lim->cqc_entry_sz, 1);
 414         if (!mdev->cq_table.table) {
 415                 mthca_err(mdev, "Failed to map CQ context memory, aborting.\n");
 416                 err = -ENOMEM;
 417                 goto err_unmap_eqp;
 418         }
 419
 420         return 0;
 421
 422 err_unmap_eqp:
 423         mthca_free_icm_table(mdev, mdev->qp_table.eqp_table);
 424
 425 err_unmap_qp:
 426         mthca_free_icm_table(mdev, mdev->qp_table.qp_table);
 427
 428 err_unmap_mpt:
 429         mthca_free_icm_table(mdev, mdev->mr_table.mpt_table);
 430
 431 err_unmap_mtt:
 432         mthca_free_icm_table(mdev, mdev->mr_table.mtt_table);
 433
 434 err_unmap_eq:
 435         mthca_unmap_eq_icm(mdev);
 436
 437 err_unmap_aux:
 438         mthca_UNMAP_ICM_AUX(mdev, &status);
 439
 440 err_free_aux:
 441         mthca_free_icm(mdev, mdev->fw.arbel.aux_icm);
 442
 443         return err;
 444 }
 445
 446 static int __devinit mthca_init_arbel(struct mthca_dev *mdev)
 447 {
 448         struct mthca_dev_lim        dev_lim;
 449         struct mthca_profile        profile;
 450         struct mthca_init_hca_param init_hca;
 451         struct mthca_adapter        adapter;
 452         u64 icm_size;
 453         u8 status;
 454         int err;
 455
 456         err = mthca_QUERY_FW(mdev, &status);
 457         if (err) {
 458                 mthca_err(mdev, "QUERY_FW command failed, aborting.\n");
 459                 return err;
 460         }
 461         if (status) {
 462                 mthca_err(mdev, "QUERY_FW returned status 0x%02x, "
 463                           "aborting.\n", status);
 464                 return -EINVAL;
 465         }
 466
 467         err = mthca_ENABLE_LAM(mdev, &status);
 468         if (err) {
 469                 mthca_err(mdev, "ENABLE_LAM command failed, aborting.\n");
 470                 return err;
 471         }
 472         if (status == MTHCA_CMD_STAT_LAM_NOT_PRE) {
 473                 mthca_dbg(mdev, "No HCA-attached memory (running in MemFree mode)\n");
 474                 mdev->mthca_flags |= MTHCA_FLAG_NO_LAM;
 475         } else if (status) {
 476                 mthca_err(mdev, "ENABLE_LAM returned status 0x%02x, "
 477                           "aborting.\n", status);
 478                 return -EINVAL;
 479         }
 480
 481         err = mthca_load_fw(mdev);
 482         if (err) {
 483                 mthca_err(mdev, "Failed to start FW, aborting.\n");
 484                 goto err_disable;
 485         }
 486
 487         err = mthca_dev_lim(mdev, &dev_lim);
 488         if (err) {
 489                 mthca_err(mdev, "QUERY_DEV_LIM command failed, aborting.\n");
 490                 goto err_stop_fw;
 491         }
 492
 493         profile = default_profile;
 494         profile.num_uar  = dev_lim.uar_size / PAGE_SIZE;
 495         profile.num_udav = 0;
 496
 497         icm_size = mthca_make_profile(mdev, &profile, &dev_lim, &init_hca);
 498         if ((int) icm_size < 0) {
 499                 err = icm_size;
 500                 goto err_stop_fw;
 501         }
 502
 503         err = mthca_init_icm(mdev, &dev_lim, &init_hca, icm_size);
 504         if (err)
 505                 goto err_stop_fw;
 506
 507         err = mthca_INIT_HCA(mdev, &init_hca, &status);
 508         if (err) {
 509                 mthca_err(mdev, "INIT_HCA command failed, aborting.\n");
 510                 goto err_free_icm;
 511         }
 512         if (status) {
 513                 mthca_err(mdev, "INIT_HCA returned status 0x%02x, "
 514                           "aborting.\n", status);
 515                 err = -EINVAL;
 516                 goto err_free_icm;
 517         }
 518
 519         err = mthca_QUERY_ADAPTER(mdev, &adapter, &status);
 520         if (err) {
 521                 mthca_err(mdev, "QUERY_ADAPTER command failed, aborting.\n");
 522                 goto err_free_icm;
 523         }
 524         if (status) {
 525                 mthca_err(mdev, "QUERY_ADAPTER returned status 0x%02x, "
 526                           "aborting.\n", status);
 527                 err = -EINVAL;
 528                 goto err_free_icm;
 529         }
 530
 531         mdev->eq_table.inta_pin = adapter.inta_pin;
 532         mdev->rev_id            = adapter.revision_id;
 533
 534         return 0;
 535
 536 err_free_icm:
 537         mthca_free_icm_table(mdev, mdev->cq_table.table);
 538         mthca_free_icm_table(mdev, mdev->qp_table.eqp_table);
 539         mthca_free_icm_table(mdev, mdev->qp_table.qp_table);
 540         mthca_free_icm_table(mdev, mdev->mr_table.mpt_table);
 541         mthca_free_icm_table(mdev, mdev->mr_table.mtt_table);
 542         mthca_unmap_eq_icm(mdev);
 543
 544         mthca_UNMAP_ICM_AUX(mdev, &status);
 545         mthca_free_icm(mdev, mdev->fw.arbel.aux_icm);
 546
 547 err_stop_fw:
 548         mthca_UNMAP_FA(mdev, &status);
 549         mthca_free_icm(mdev, mdev->fw.arbel.fw_icm);
 550
 551 err_disable:
 552         if (!(mdev->mthca_flags & MTHCA_FLAG_NO_LAM))
 553                 mthca_DISABLE_LAM(mdev, &status);
 554
 555         return err;
 556 }
 557
 558 static int __devinit mthca_init_hca(struct mthca_dev *mdev)
 559 {
 560         if (mdev->hca_type == ARBEL_NATIVE)
 561                 return mthca_init_arbel(mdev);
 562         else
 563                 return mthca_init_tavor(mdev);
 564 }
 565
 566 static int __devinit mthca_setup_hca(struct mthca_dev *dev)
 567 {
 568         int err;
 569         u8 status;
 570
 571         MTHCA_INIT_DOORBELL_LOCK(&dev->doorbell_lock);
 572
 573         err = mthca_init_pd_table(dev);
 574         if (err) {
 575                 mthca_err(dev, "Failed to initialize "
 576                           "protection domain table, aborting.\n");
 577                 return err;
 578         }
 579
 580         err = mthca_init_mr_table(dev);
 581         if (err) {
 582                 mthca_err(dev, "Failed to initialize "
 583                           "memory region table, aborting.\n");
 584                 goto err_pd_table_free;
 585         }
 586
 587         err = mthca_pd_alloc(dev, &dev->driver_pd);
 588         if (err) {
 589                 mthca_err(dev, "Failed to create driver PD, "
 590                           "aborting.\n");
 591                 goto err_mr_table_free;
 592         }
 593
 594         if (dev->hca_type == ARBEL_NATIVE) {
 595                 mthca_warn(dev, "Sorry, native MT25208 mode support is not done, "
 596                            "aborting.\n");
 597                 err = -ENODEV;
 598                 goto err_pd_free;
 599         }
 600
 601         err = mthca_init_eq_table(dev);
 602         if (err) {
 603                 mthca_err(dev, "Failed to initialize "
 604                           "event queue table, aborting.\n");
 605                 goto err_pd_free;
 606         }
 607
 608         err = mthca_cmd_use_events(dev);
 609         if (err) {
 610                 mthca_err(dev, "Failed to switch to event-driven "
 611                           "firmware commands, aborting.\n");
 612                 goto err_eq_table_free;
 613         }
 614
 615         err = mthca_NOP(dev, &status);
 616         if (err || status) {
 617                 mthca_err(dev, "NOP command failed to generate interrupt, aborting.\n");
 618                 if (dev->mthca_flags & (MTHCA_FLAG_MSI | MTHCA_FLAG_MSI_X))
 619                         mthca_err(dev, "Try again with MSI/MSI-X disabled.\n");
 620                 else
 621                         mthca_err(dev, "BIOS or ACPI interrupt routing problem?\n");
 622
 623                 goto err_cmd_poll;
 624         } else
 625                 mthca_dbg(dev, "NOP command IRQ test passed\n");
 626
 627         err = mthca_init_cq_table(dev);
 628         if (err) {
 629                 mthca_err(dev, "Failed to initialize "
 630                           "completion queue table, aborting.\n");
 631                 goto err_cmd_poll;
 632         }
 633
 634         err = mthca_init_qp_table(dev);
 635         if (err) {
 636                 mthca_err(dev, "Failed to initialize "
 637                           "queue pair table, aborting.\n");
 638                 goto err_cq_table_free;
 639         }
 640
 641         err = mthca_init_av_table(dev);
 642         if (err) {
 643                 mthca_err(dev, "Failed to initialize "
 644                           "address vector table, aborting.\n");
 645                 goto err_qp_table_free;
 646         }
 647
 648         err = mthca_init_mcg_table(dev);
 649         if (err) {
 650                 mthca_err(dev, "Failed to initialize "
 651                           "multicast group table, aborting.\n");
 652                 goto err_av_table_free;
 653         }
 654
 655         return 0;
 656
 657 err_av_table_free:
 658         mthca_cleanup_av_table(dev);
 659
 660 err_qp_table_free:
 661         mthca_cleanup_qp_table(dev);
 662
 663 err_cq_table_free:
 664         mthca_cleanup_cq_table(dev);
 665
 666 err_cmd_poll:
 667         mthca_cmd_use_polling(dev);
 668
 669 err_eq_table_free:
 670         mthca_cleanup_eq_table(dev);
 671
 672 err_pd_free:
 673         mthca_pd_free(dev, &dev->driver_pd);
 674
 675 err_mr_table_free:
 676         mthca_cleanup_mr_table(dev);
 677
 678 err_pd_table_free:
 679         mthca_cleanup_pd_table(dev);
 680         return err;
 681 }
 682
 683 static int __devinit mthca_request_regions(struct pci_dev *pdev,
 684                                            int ddr_hidden)
 685 {
 686         int err;
 687
 688         /*
 689          * We request our first BAR in two chunks, since the MSI-X
 690          * vector table is right in the middle.
 691          *
 692          * This is why we can't just use pci_request_regions() -- if
 693          * we did then setting up MSI-X would fail, since the PCI core
 694          * wants to do request_mem_region on the MSI-X vector table.
 695          */
 696         if (!request_mem_region(pci_resource_start(pdev, 0) +
 697                                 MTHCA_HCR_BASE,
 698                                 MTHCA_HCR_SIZE,
 699                                 DRV_NAME)) {
 700                 err = -EBUSY;
 701                 goto err_hcr_failed;
 702         }
 703
 704         if (!request_mem_region(pci_resource_start(pdev, 0) +
 705                                 MTHCA_ECR_BASE,
 706                                 MTHCA_MAP_ECR_SIZE,
 707                                 DRV_NAME)) {
 708                 err = -EBUSY;
 709                 goto err_ecr_failed;
 710         }
 711
 712         if (!request_mem_region(pci_resource_start(pdev, 0) +
 713                                 MTHCA_CLR_INT_BASE,
 714                                 MTHCA_CLR_INT_SIZE,
 715                                 DRV_NAME)) {
 716                 err = -EBUSY;
 717                 goto err_int_failed;
 718         }
 719
 720
 721         err = pci_request_region(pdev, 2, DRV_NAME);
 722         if (err)
 723                 goto err_bar2_failed;
 724
 725         if (!ddr_hidden) {
 726                 err = pci_request_region(pdev, 4, DRV_NAME);
 727                 if (err)
 728                         goto err_bar4_failed;
 729         }
 730
 731         return 0;
 732
 733 err_bar4_failed:
 734
 735         pci_release_region(pdev, 2);
 736 err_bar2_failed:
 737
 738         release_mem_region(pci_resource_start(pdev, 0) +
 739                            MTHCA_CLR_INT_BASE,
 740                            MTHCA_CLR_INT_SIZE);
 741 err_int_failed:
 742
 743         release_mem_region(pci_resource_start(pdev, 0) +
 744                            MTHCA_ECR_BASE,
 745                            MTHCA_MAP_ECR_SIZE);
 746 err_ecr_failed:
 747
 748         release_mem_region(pci_resource_start(pdev, 0) +
 749                            MTHCA_HCR_BASE,
 750                            MTHCA_HCR_SIZE);
 751 err_hcr_failed:
 752
 753         return err;
 754 }
 755
 756 static void mthca_release_regions(struct pci_dev *pdev,
 757                                   int ddr_hidden)
 758 {
 759         if (!ddr_hidden)
 760                 pci_release_region(pdev, 4);
 761
 762         pci_release_region(pdev, 2);
 763
 764         release_mem_region(pci_resource_start(pdev, 0) +
 765                            MTHCA_CLR_INT_BASE,
 766                            MTHCA_CLR_INT_SIZE);
 767
 768         release_mem_region(pci_resource_start(pdev, 0) +
 769                            MTHCA_ECR_BASE,
 770                            MTHCA_MAP_ECR_SIZE);
 771
 772         release_mem_region(pci_resource_start(pdev, 0) +
 773                            MTHCA_HCR_BASE,
 774                            MTHCA_HCR_SIZE);
 775 }
 776
 777 static int __devinit mthca_enable_msi_x(struct mthca_dev *mdev)
 778 {
 779         struct msix_entry entries[3];
 780         int err;
 781
 782         entries[0].entry = 0;
 783         entries[1].entry = 1;
 784         entries[2].entry = 2;
 785
 786         err = pci_enable_msix(mdev->pdev, entries, ARRAY_SIZE(entries));
 787         if (err) {
 788                 if (err > 0)
 789                         mthca_info(mdev, "Only %d MSI-X vectors available, "
 790                                    "not using MSI-X\n", err);
 791                 return err;
 792         }
 793
 794         mdev->eq_table.eq[MTHCA_EQ_COMP ].msi_x_vector = entries[0].vector;
 795         mdev->eq_table.eq[MTHCA_EQ_ASYNC].msi_x_vector = entries[1].vector;
 796         mdev->eq_table.eq[MTHCA_EQ_CMD  ].msi_x_vector = entries[2].vector;
 797
 798         return 0;
 799 }
 800
 801 static void mthca_close_hca(struct mthca_dev *mdev)
 802 {
 803         u8 status;
 804
 805         mthca_CLOSE_HCA(mdev, 0, &status);
 806
 807         if (mdev->hca_type == ARBEL_NATIVE) {
 808                 mthca_free_icm_table(mdev, mdev->cq_table.table);
 809                 mthca_free_icm_table(mdev, mdev->qp_table.eqp_table);
 810                 mthca_free_icm_table(mdev, mdev->qp_table.qp_table);
 811                 mthca_free_icm_table(mdev, mdev->mr_table.mpt_table);
 812                 mthca_free_icm_table(mdev, mdev->mr_table.mtt_table);
 813                 mthca_unmap_eq_icm(mdev);
 814
 815                 mthca_UNMAP_ICM_AUX(mdev, &status);
 816                 mthca_free_icm(mdev, mdev->fw.arbel.aux_icm);
 817
 818                 mthca_UNMAP_FA(mdev, &status);
 819                 mthca_free_icm(mdev, mdev->fw.arbel.fw_icm);
 820
 821                 if (!(mdev->mthca_flags & MTHCA_FLAG_NO_LAM))
 822                         mthca_DISABLE_LAM(mdev, &status);
 823         } else
 824                 mthca_SYS_DIS(mdev, &status);
 825 }
 826
 827 static int __devinit mthca_init_one(struct pci_dev *pdev,
 828                                     const struct pci_device_id *id)
 829 {
 830         static int mthca_version_printed = 0;
 831         int ddr_hidden = 0;
 832         int err;
 833         unsigned long mthca_base;
 834         struct mthca_dev *mdev;
 835
 836         if (!mthca_version_printed) {
 837                 printk(KERN_INFO "%s", mthca_version);
 838                 ++mthca_version_printed;
 839         }
 840
 841         printk(KERN_INFO PFX "Initializing %s (%s)\n",
 842                pci_pretty_name(pdev), pci_name(pdev));
 843
 844         err = pci_enable_device(pdev);
 845         if (err) {
 846                 dev_err(&pdev->dev, "Cannot enable PCI device, "
 847                         "aborting.\n");
 848                 return err;
 849         }
 850
 851         /*
 852          * Check for BARs.  We expect 0: 1MB, 2: 8MB, 4: DDR (may not
 853          * be present)
 854          */
 855         if (!(pci_resource_flags(pdev, 0) & IORESOURCE_MEM) ||
 856             pci_resource_len(pdev, 0) != 1 << 20) {
 857                 dev_err(&pdev->dev, "Missing DCS, aborting.");
 858                 err = -ENODEV;
 859                 goto err_disable_pdev;
 860         }
 861         if (!(pci_resource_flags(pdev, 2) & IORESOURCE_MEM) ||
 862             pci_resource_len(pdev, 2) != 1 << 23) {
 863                 dev_err(&pdev->dev, "Missing UAR, aborting.");
 864                 err = -ENODEV;
 865                 goto err_disable_pdev;
 866         }
 867         if (!(pci_resource_flags(pdev, 4) & IORESOURCE_MEM))
 868                 ddr_hidden = 1;
 869
 870         err = mthca_request_regions(pdev, ddr_hidden);
 871         if (err) {
 872                 dev_err(&pdev->dev, "Cannot obtain PCI resources, "
 873                         "aborting.\n");
 874                 goto err_disable_pdev;
 875         }
 876
 877         pci_set_master(pdev);
 878
 879         err = pci_set_dma_mask(pdev, DMA_64BIT_MASK);
 880         if (err) {
 881                 dev_warn(&pdev->dev, "Warning: couldn't set 64-bit PCI DMA mask.\n");
 882                 err = pci_set_dma_mask(pdev, DMA_32BIT_MASK);
 883                 if (err) {
 884                         dev_err(&pdev->dev, "Can't set PCI DMA mask, aborting.\n");
 885                         goto err_free_res;
 886                 }
 887         }
 888         err = pci_set_consistent_dma_mask(pdev, DMA_64BIT_MASK);
 889         if (err) {
 890                 dev_warn(&pdev->dev, "Warning: couldn't set 64-bit "
 891                          "consistent PCI DMA mask.\n");
 892                 err = pci_set_consistent_dma_mask(pdev, DMA_32BIT_MASK);
 893                 if (err) {
 894                         dev_err(&pdev->dev, "Can't set consistent PCI DMA mask, "
 895                                 "aborting.\n");
 896                         goto err_free_res;
 897                 }
 898         }
 899
 900         mdev = (struct mthca_dev *) ib_alloc_device(sizeof *mdev);
 901         if (!mdev) {
 902                 dev_err(&pdev->dev, "Device struct alloc failed, "
 903                         "aborting.\n");
 904                 err = -ENOMEM;
 905                 goto err_free_res;
 906         }
 907
 908         mdev->pdev     = pdev;
 909         mdev->hca_type = id->driver_data;
 910
 911         if (ddr_hidden)
 912                 mdev->mthca_flags |= MTHCA_FLAG_DDR_HIDDEN;
 913
 914         /*
 915          * Now reset the HCA before we touch the PCI capabilities or
 916          * attempt a firmware command, since a boot ROM may have left
 917          * the HCA in an undefined state.
 918          */
 919         err = mthca_reset(mdev);
 920         if (err) {
 921                 mthca_err(mdev, "Failed to reset HCA, aborting.\n");
 922                 goto err_free_dev;
 923         }
 924
 925         if (msi_x && !mthca_enable_msi_x(mdev))
 926                 mdev->mthca_flags |= MTHCA_FLAG_MSI_X;
 927         if (msi && !(mdev->mthca_flags & MTHCA_FLAG_MSI_X) &&
 928             !pci_enable_msi(pdev))
 929                 mdev->mthca_flags |= MTHCA_FLAG_MSI;
 930
 931         sema_init(&mdev->cmd.hcr_sem, 1);
 932         sema_init(&mdev->cmd.poll_sem, 1);
 933         mdev->cmd.use_events = 0;
 934
 935         mthca_base = pci_resource_start(pdev, 0);
 936         mdev->hcr = ioremap(mthca_base + MTHCA_HCR_BASE, MTHCA_HCR_SIZE);
 937         if (!mdev->hcr) {
 938                 mthca_err(mdev, "Couldn't map command register, "
 939                           "aborting.\n");
 940                 err = -ENOMEM;
 941                 goto err_free_dev;
 942         }
 943
 944         mdev->clr_base = ioremap(mthca_base + MTHCA_CLR_INT_BASE,
 945                                  MTHCA_CLR_INT_SIZE);
 946         if (!mdev->clr_base) {
 947                 mthca_err(mdev, "Couldn't map interrupt clear register, "
 948                           "aborting.\n");
 949                 err = -ENOMEM;
 950                 goto err_iounmap;
 951         }
 952
 953         mdev->ecr_base = ioremap(mthca_base + MTHCA_ECR_BASE,
 954                                  MTHCA_ECR_SIZE + MTHCA_ECR_CLR_SIZE);
 955         if (!mdev->ecr_base) {
 956                 mthca_err(mdev, "Couldn't map ecr register, "
 957                           "aborting.\n");
 958                 err = -ENOMEM;
 959                 goto err_iounmap_clr;
 960         }
 961
 962         mthca_base = pci_resource_start(pdev, 2);
 963         mdev->kar = ioremap(mthca_base + PAGE_SIZE * MTHCA_KAR_PAGE, PAGE_SIZE);
 964         if (!mdev->kar) {
 965                 mthca_err(mdev, "Couldn't map kernel access region, "
 966                           "aborting.\n");
 967                 err = -ENOMEM;
 968                 goto err_iounmap_ecr;
 969         }
 970
 971         err = mthca_tune_pci(mdev);
 972         if (err)
 973                 goto err_iounmap_kar;
 974
 975         err = mthca_init_hca(mdev);
 976         if (err)
 977                 goto err_iounmap_kar;
 978
 979         err = mthca_setup_hca(mdev);
 980         if (err)
 981                 goto err_close;
 982
 983         err = mthca_register_device(mdev);
 984         if (err)
 985                 goto err_cleanup;
 986
 987         err = mthca_create_agents(mdev);
 988         if (err)
 989                 goto err_unregister;
 990
 991         pci_set_drvdata(pdev, mdev);
 992
 993         return 0;
 994
 995 err_unregister:
 996         mthca_unregister_device(mdev);
 997
 998 err_cleanup:
 999         mthca_cleanup_mcg_table(mdev);
1000         mthca_cleanup_av_table(mdev);
1001         mthca_cleanup_qp_table(mdev);
1002         mthca_cleanup_cq_table(mdev);
1003         mthca_cmd_use_polling(mdev);
1004         mthca_cleanup_eq_table(mdev);
1005
1006         mthca_pd_free(mdev, &mdev->driver_pd);
1007
1008         mthca_cleanup_mr_table(mdev);
1009         mthca_cleanup_pd_table(mdev);
1010
1011 err_close:
1012         mthca_close_hca(mdev);
1013
1014 err_iounmap_kar:
1015         iounmap(mdev->kar);
1016
1017 err_iounmap_ecr:
1018         iounmap(mdev->ecr_base);
1019
1020 err_iounmap_clr:
1021         iounmap(mdev->clr_base);
1022
1023 err_iounmap:
1024         iounmap(mdev->hcr);
1025
1026 err_free_dev:
1027         if (mdev->mthca_flags & MTHCA_FLAG_MSI_X)
1028                 pci_disable_msix(pdev);
1029         if (mdev->mthca_flags & MTHCA_FLAG_MSI)
1030                 pci_disable_msi(pdev);
1031
1032         ib_dealloc_device(&mdev->ib_dev);
1033
1034 err_free_res:
1035         mthca_release_regions(pdev, ddr_hidden);
1036
1037 err_disable_pdev:
1038         pci_disable_device(pdev);
1039         pci_set_drvdata(pdev, NULL);
1040         return err;
1041 }
1042
1043 static void __devexit mthca_remove_one(struct pci_dev *pdev)
1044 {
1045         struct mthca_dev *mdev = pci_get_drvdata(pdev);
1046         u8 status;
1047         int p;
1048
1049         if (mdev) {
1050                 mthca_free_agents(mdev);
1051                 mthca_unregister_device(mdev);
1052
1053                 for (p = 1; p <= mdev->limits.num_ports; ++p)
1054                         mthca_CLOSE_IB(mdev, p, &status);
1055
1056                 mthca_cleanup_mcg_table(mdev);
1057                 mthca_cleanup_av_table(mdev);
1058                 mthca_cleanup_qp_table(mdev);
1059                 mthca_cleanup_cq_table(mdev);
1060                 mthca_cmd_use_polling(mdev);
1061                 mthca_cleanup_eq_table(mdev);
1062
1063                 mthca_pd_free(mdev, &mdev->driver_pd);
1064
1065                 mthca_cleanup_mr_table(mdev);
1066                 mthca_cleanup_pd_table(mdev);
1067
1068                 mthca_close_hca(mdev);
1069
1070                 iounmap(mdev->hcr);
1071                 iounmap(mdev->ecr_base);
1072                 iounmap(mdev->clr_base);
1073
1074                 if (mdev->mthca_flags & MTHCA_FLAG_MSI_X)
1075                         pci_disable_msix(pdev);
1076                 if (mdev->mthca_flags & MTHCA_FLAG_MSI)
1077                         pci_disable_msi(pdev);
1078
1079                 ib_dealloc_device(&mdev->ib_dev);
1080                 mthca_release_regions(pdev, mdev->mthca_flags &
1081                                       MTHCA_FLAG_DDR_HIDDEN);
1082                 pci_disable_device(pdev);
1083                 pci_set_drvdata(pdev, NULL);
1084         }
1085 }
1086
1087 static struct pci_device_id mthca_pci_table[] = {
1088         { PCI_DEVICE(PCI_VENDOR_ID_MELLANOX, PCI_DEVICE_ID_MELLANOX_TAVOR),
1089           .driver_data = TAVOR },
1090         { PCI_DEVICE(PCI_VENDOR_ID_TOPSPIN, PCI_DEVICE_ID_MELLANOX_TAVOR),
1091           .driver_data = TAVOR },
1092         { PCI_DEVICE(PCI_VENDOR_ID_MELLANOX, PCI_DEVICE_ID_MELLANOX_ARBEL_COMPAT),
1093           .driver_data = ARBEL_COMPAT },
1094         { PCI_DEVICE(PCI_VENDOR_ID_TOPSPIN, PCI_DEVICE_ID_MELLANOX_ARBEL_COMPAT),
1095           .driver_data = ARBEL_COMPAT },
1096         { PCI_DEVICE(PCI_VENDOR_ID_MELLANOX, PCI_DEVICE_ID_MELLANOX_ARBEL),
1097           .driver_data = ARBEL_NATIVE },
1098         { PCI_DEVICE(PCI_VENDOR_ID_TOPSPIN, PCI_DEVICE_ID_MELLANOX_ARBEL),
1099           .driver_data = ARBEL_NATIVE },
1100         { 0, }
1101 };
1102
1103 MODULE_DEVICE_TABLE(pci, mthca_pci_table);
1104
1105 static struct pci_driver mthca_driver = {
1106         .name           = "ib_mthca",
1107         .id_table       = mthca_pci_table,
1108         .probe          = mthca_init_one,
1109         .remove         = __devexit_p(mthca_remove_one)
1110 };
1111
1112 static int __init mthca_init(void)
1113 {
1114         int ret;
1115
1116         ret = pci_register_driver(&mthca_driver);
1117         return ret < 0 ? ret : 0;
1118 }
1119
1120 static void __exit mthca_cleanup(void)
1121 {
1122         pci_unregister_driver(&mthca_driver);
1123 }
1124
1125 module_init(mthca_init);
1126 module_exit(mthca_cleanup);