drivers/acpi/nfit.c

   1 /*
   2  * Copyright(c) 2013-2015 Intel Corporation. All rights reserved.
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of version 2 of the GNU General Public License as
   6  * published by the Free Software Foundation.
   7  *
   8  * This program is distributed in the hope that it will be useful, but
   9  * WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11  * General Public License for more details.
  12  */
  13 #include <linux/list_sort.h>
  14 #include <linux/libnvdimm.h>
  15 #include <linux/module.h>
  16 #include <linux/mutex.h>
  17 #include <linux/ndctl.h>
  18 #include <linux/list.h>
  19 #include <linux/acpi.h>
  20 #include <linux/sort.h>
  21 #include <linux/pmem.h>
  22 #include <linux/io.h>
  23 #include <asm/cacheflush.h>
  24 #include "nfit.h"
  25
  26 /*
  27  * For readq() and writeq() on 32-bit builds, the hi-lo, lo-hi order is
  28  * irrelevant.
  29  */
  30 #include <linux/io-64-nonatomic-hi-lo.h>
  31
  32 static bool force_enable_dimms;
  33 module_param(force_enable_dimms, bool, S_IRUGO|S_IWUSR);
  34 MODULE_PARM_DESC(force_enable_dimms, "Ignore _STA (ACPI DIMM device) status");
  35
  36 struct nfit_table_prev {
  37         struct list_head spas;
  38         struct list_head memdevs;
  39         struct list_head dcrs;
  40         struct list_head bdws;
  41         struct list_head idts;
  42         struct list_head flushes;
  43 };
  44
  45 static u8 nfit_uuid[NFIT_UUID_MAX][16];
  46
  47 const u8 *to_nfit_uuid(enum nfit_uuids id)
  48 {
  49         return nfit_uuid[id];
  50 }
  51 EXPORT_SYMBOL(to_nfit_uuid);
  52
  53 static struct acpi_nfit_desc *to_acpi_nfit_desc(
  54                 struct nvdimm_bus_descriptor *nd_desc)
  55 {
  56         return container_of(nd_desc, struct acpi_nfit_desc, nd_desc);
  57 }
  58
  59 static struct acpi_device *to_acpi_dev(struct acpi_nfit_desc *acpi_desc)
  60 {
  61         struct nvdimm_bus_descriptor *nd_desc = &acpi_desc->nd_desc;
  62
  63         /*
  64          * If provider == 'ACPI.NFIT' we can assume 'dev' is a struct
  65          * acpi_device.
  66          */
  67         if (!nd_desc->provider_name
  68                         || strcmp(nd_desc->provider_name, "ACPI.NFIT") != 0)
  69                 return NULL;
  70
  71         return to_acpi_device(acpi_desc->dev);
  72 }
  73
  74 static int acpi_nfit_ctl(struct nvdimm_bus_descriptor *nd_desc,
  75                 struct nvdimm *nvdimm, unsigned int cmd, void *buf,
  76                 unsigned int buf_len)
  77 {
  78         struct acpi_nfit_desc *acpi_desc = to_acpi_nfit_desc(nd_desc);
  79         const struct nd_cmd_desc *desc = NULL;
  80         union acpi_object in_obj, in_buf, *out_obj;
  81         struct device *dev = acpi_desc->dev;
  82         const char *cmd_name, *dimm_name;
  83         unsigned long dsm_mask;
  84         acpi_handle handle;
  85         const u8 *uuid;
  86         u32 offset;
  87         int rc, i;
  88
  89         if (nvdimm) {
  90                 struct nfit_mem *nfit_mem = nvdimm_provider_data(nvdimm);
  91                 struct acpi_device *adev = nfit_mem->adev;
  92
  93                 if (!adev)
  94                         return -ENOTTY;
  95                 dimm_name = nvdimm_name(nvdimm);
  96                 cmd_name = nvdimm_cmd_name(cmd);
  97                 dsm_mask = nfit_mem->dsm_mask;
  98                 desc = nd_cmd_dimm_desc(cmd);
  99                 uuid = to_nfit_uuid(NFIT_DEV_DIMM);
 100                 handle = adev->handle;
 101         } else {
 102                 struct acpi_device *adev = to_acpi_dev(acpi_desc);
 103
 104                 cmd_name = nvdimm_bus_cmd_name(cmd);
 105                 dsm_mask = nd_desc->dsm_mask;
 106                 desc = nd_cmd_bus_desc(cmd);
 107                 uuid = to_nfit_uuid(NFIT_DEV_BUS);
 108                 handle = adev->handle;
 109                 dimm_name = "bus";
 110         }
 111
 112         if (!desc || (cmd && (desc->out_num + desc->in_num == 0)))
 113                 return -ENOTTY;
 114
 115         if (!test_bit(cmd, &dsm_mask))
 116                 return -ENOTTY;
 117
 118         in_obj.type = ACPI_TYPE_PACKAGE;
 119         in_obj.package.count = 1;
 120         in_obj.package.elements = &in_buf;
 121         in_buf.type = ACPI_TYPE_BUFFER;
 122         in_buf.buffer.pointer = buf;
 123         in_buf.buffer.length = 0;
 124
 125         /* libnvdimm has already validated the input envelope */
 126         for (i = 0; i < desc->in_num; i++)
 127                 in_buf.buffer.length += nd_cmd_in_size(nvdimm, cmd, desc,
 128                                 i, buf);
 129
 130         if (IS_ENABLED(CONFIG_ACPI_NFIT_DEBUG)) {
 131                 dev_dbg(dev, "%s:%s cmd: %s input length: %d\n", __func__,
 132                                 dimm_name, cmd_name, in_buf.buffer.length);
 133                 print_hex_dump_debug(cmd_name, DUMP_PREFIX_OFFSET, 4,
 134                                 4, in_buf.buffer.pointer, min_t(u32, 128,
 135                                         in_buf.buffer.length), true);
 136         }
 137
 138         out_obj = acpi_evaluate_dsm(handle, uuid, 1, cmd, &in_obj);
 139         if (!out_obj) {
 140                 dev_dbg(dev, "%s:%s _DSM failed cmd: %s\n", __func__, dimm_name,
 141                                 cmd_name);
 142                 return -EINVAL;
 143         }
 144
 145         if (out_obj->package.type != ACPI_TYPE_BUFFER) {
 146                 dev_dbg(dev, "%s:%s unexpected output object type cmd: %s type: %d\n",
 147                                 __func__, dimm_name, cmd_name, out_obj->type);
 148                 rc = -EINVAL;
 149                 goto out;
 150         }
 151
 152         if (IS_ENABLED(CONFIG_ACPI_NFIT_DEBUG)) {
 153                 dev_dbg(dev, "%s:%s cmd: %s output length: %d\n", __func__,
 154                                 dimm_name, cmd_name, out_obj->buffer.length);
 155                 print_hex_dump_debug(cmd_name, DUMP_PREFIX_OFFSET, 4,
 156                                 4, out_obj->buffer.pointer, min_t(u32, 128,
 157                                         out_obj->buffer.length), true);
 158         }
 159
 160         for (i = 0, offset = 0; i < desc->out_num; i++) {
 161                 u32 out_size = nd_cmd_out_size(nvdimm, cmd, desc, i, buf,
 162                                 (u32 *) out_obj->buffer.pointer);
 163
 164                 if (offset + out_size > out_obj->buffer.length) {
 165                         dev_dbg(dev, "%s:%s output object underflow cmd: %s field: %d\n",
 166                                         __func__, dimm_name, cmd_name, i);
 167                         break;
 168                 }
 169
 170                 if (in_buf.buffer.length + offset + out_size > buf_len) {
 171                         dev_dbg(dev, "%s:%s output overrun cmd: %s field: %d\n",
 172                                         __func__, dimm_name, cmd_name, i);
 173                         rc = -ENXIO;
 174                         goto out;
 175                 }
 176                 memcpy(buf + in_buf.buffer.length + offset,
 177                                 out_obj->buffer.pointer + offset, out_size);
 178                 offset += out_size;
 179         }
 180         if (offset + in_buf.buffer.length < buf_len) {
 181                 if (i >= 1) {
 182                         /*
 183                          * status valid, return the number of bytes left
 184                          * unfilled in the output buffer
 185                          */
 186                         rc = buf_len - offset - in_buf.buffer.length;
 187                 } else {
 188                         dev_err(dev, "%s:%s underrun cmd: %s buf_len: %d out_len: %d\n",
 189                                         __func__, dimm_name, cmd_name, buf_len,
 190                                         offset);
 191                         rc = -ENXIO;
 192                 }
 193         } else
 194                 rc = 0;
 195
 196  out:
 197         ACPI_FREE(out_obj);
 198
 199         return rc;
 200 }
 201
 202 static const char *spa_type_name(u16 type)
 203 {
 204         static const char *to_name[] = {
 205                 [NFIT_SPA_VOLATILE] = "volatile",
 206                 [NFIT_SPA_PM] = "pmem",
 207                 [NFIT_SPA_DCR] = "dimm-control-region",
 208                 [NFIT_SPA_BDW] = "block-data-window",
 209                 [NFIT_SPA_VDISK] = "volatile-disk",
 210                 [NFIT_SPA_VCD] = "volatile-cd",
 211                 [NFIT_SPA_PDISK] = "persistent-disk",
 212                 [NFIT_SPA_PCD] = "persistent-cd",
 213
 214         };
 215
 216         if (type > NFIT_SPA_PCD)
 217                 return "unknown";
 218
 219         return to_name[type];
 220 }
 221
 222 static int nfit_spa_type(struct acpi_nfit_system_address *spa)
 223 {
 224         int i;
 225
 226         for (i = 0; i < NFIT_UUID_MAX; i++)
 227                 if (memcmp(to_nfit_uuid(i), spa->range_guid, 16) == 0)
 228                         return i;
 229         return -1;
 230 }
 231
 232 static bool add_spa(struct acpi_nfit_desc *acpi_desc,
 233                 struct nfit_table_prev *prev,
 234                 struct acpi_nfit_system_address *spa)
 235 {
 236         size_t length = min_t(size_t, sizeof(*spa), spa->header.length);
 237         struct device *dev = acpi_desc->dev;
 238         struct nfit_spa *nfit_spa;
 239
 240         list_for_each_entry(nfit_spa, &prev->spas, list) {
 241                 if (memcmp(nfit_spa->spa, spa, length) == 0) {
 242                         list_move_tail(&nfit_spa->list, &acpi_desc->spas);
 243                         return true;
 244                 }
 245         }
 246
 247         nfit_spa = devm_kzalloc(dev, sizeof(*nfit_spa), GFP_KERNEL);
 248         if (!nfit_spa)
 249                 return false;
 250         INIT_LIST_HEAD(&nfit_spa->list);
 251         nfit_spa->spa = spa;
 252         list_add_tail(&nfit_spa->list, &acpi_desc->spas);
 253         dev_dbg(dev, "%s: spa index: %d type: %s\n", __func__,
 254                         spa->range_index,
 255                         spa_type_name(nfit_spa_type(spa)));
 256         return true;
 257 }
 258
 259 static bool add_memdev(struct acpi_nfit_desc *acpi_desc,
 260                 struct nfit_table_prev *prev,
 261                 struct acpi_nfit_memory_map *memdev)
 262 {
 263         size_t length = min_t(size_t, sizeof(*memdev), memdev->header.length);
 264         struct device *dev = acpi_desc->dev;
 265         struct nfit_memdev *nfit_memdev;
 266
 267         list_for_each_entry(nfit_memdev, &prev->memdevs, list)
 268                 if (memcmp(nfit_memdev->memdev, memdev, length) == 0) {
 269                         list_move_tail(&nfit_memdev->list, &acpi_desc->memdevs);
 270                         return true;
 271                 }
 272
 273         nfit_memdev = devm_kzalloc(dev, sizeof(*nfit_memdev), GFP_KERNEL);
 274         if (!nfit_memdev)
 275                 return false;
 276         INIT_LIST_HEAD(&nfit_memdev->list);
 277         nfit_memdev->memdev = memdev;
 278         list_add_tail(&nfit_memdev->list, &acpi_desc->memdevs);
 279         dev_dbg(dev, "%s: memdev handle: %#x spa: %d dcr: %d\n",
 280                         __func__, memdev->device_handle, memdev->range_index,
 281                         memdev->region_index);
 282         return true;
 283 }
 284
 285 static bool add_dcr(struct acpi_nfit_desc *acpi_desc,
 286                 struct nfit_table_prev *prev,
 287                 struct acpi_nfit_control_region *dcr)
 288 {
 289         size_t length = min_t(size_t, sizeof(*dcr), dcr->header.length);
 290         struct device *dev = acpi_desc->dev;
 291         struct nfit_dcr *nfit_dcr;
 292
 293         list_for_each_entry(nfit_dcr, &prev->dcrs, list)
 294                 if (memcmp(nfit_dcr->dcr, dcr, length) == 0) {
 295                         list_move_tail(&nfit_dcr->list, &acpi_desc->dcrs);
 296                         return true;
 297                 }
 298
 299         nfit_dcr = devm_kzalloc(dev, sizeof(*nfit_dcr), GFP_KERNEL);
 300         if (!nfit_dcr)
 301                 return false;
 302         INIT_LIST_HEAD(&nfit_dcr->list);
 303         nfit_dcr->dcr = dcr;
 304         list_add_tail(&nfit_dcr->list, &acpi_desc->dcrs);
 305         dev_dbg(dev, "%s: dcr index: %d windows: %d\n", __func__,
 306                         dcr->region_index, dcr->windows);
 307         return true;
 308 }
 309
 310 static bool add_bdw(struct acpi_nfit_desc *acpi_desc,
 311                 struct nfit_table_prev *prev,
 312                 struct acpi_nfit_data_region *bdw)
 313 {
 314         size_t length = min_t(size_t, sizeof(*bdw), bdw->header.length);
 315         struct device *dev = acpi_desc->dev;
 316         struct nfit_bdw *nfit_bdw;
 317
 318         list_for_each_entry(nfit_bdw, &prev->bdws, list)
 319                 if (memcmp(nfit_bdw->bdw, bdw, length) == 0) {
 320                         list_move_tail(&nfit_bdw->list, &acpi_desc->bdws);
 321                         return true;
 322                 }
 323
 324         nfit_bdw = devm_kzalloc(dev, sizeof(*nfit_bdw), GFP_KERNEL);
 325         if (!nfit_bdw)
 326                 return false;
 327         INIT_LIST_HEAD(&nfit_bdw->list);
 328         nfit_bdw->bdw = bdw;
 329         list_add_tail(&nfit_bdw->list, &acpi_desc->bdws);
 330         dev_dbg(dev, "%s: bdw dcr: %d windows: %d\n", __func__,
 331                         bdw->region_index, bdw->windows);
 332         return true;
 333 }
 334
 335 static bool add_idt(struct acpi_nfit_desc *acpi_desc,
 336                 struct nfit_table_prev *prev,
 337                 struct acpi_nfit_interleave *idt)
 338 {
 339         size_t length = min_t(size_t, sizeof(*idt), idt->header.length);
 340         struct device *dev = acpi_desc->dev;
 341         struct nfit_idt *nfit_idt;
 342
 343         list_for_each_entry(nfit_idt, &prev->idts, list)
 344                 if (memcmp(nfit_idt->idt, idt, length) == 0) {
 345                         list_move_tail(&nfit_idt->list, &acpi_desc->idts);
 346                         return true;
 347                 }
 348
 349         nfit_idt = devm_kzalloc(dev, sizeof(*nfit_idt), GFP_KERNEL);
 350         if (!nfit_idt)
 351                 return false;
 352         INIT_LIST_HEAD(&nfit_idt->list);
 353         nfit_idt->idt = idt;
 354         list_add_tail(&nfit_idt->list, &acpi_desc->idts);
 355         dev_dbg(dev, "%s: idt index: %d num_lines: %d\n", __func__,
 356                         idt->interleave_index, idt->line_count);
 357         return true;
 358 }
 359
 360 static bool add_flush(struct acpi_nfit_desc *acpi_desc,
 361                 struct nfit_table_prev *prev,
 362                 struct acpi_nfit_flush_address *flush)
 363 {
 364         size_t length = min_t(size_t, sizeof(*flush), flush->header.length);
 365         struct device *dev = acpi_desc->dev;
 366         struct nfit_flush *nfit_flush;
 367
 368         list_for_each_entry(nfit_flush, &prev->flushes, list)
 369                 if (memcmp(nfit_flush->flush, flush, length) == 0) {
 370                         list_move_tail(&nfit_flush->list, &acpi_desc->flushes);
 371                         return true;
 372                 }
 373
 374         nfit_flush = devm_kzalloc(dev, sizeof(*nfit_flush), GFP_KERNEL);
 375         if (!nfit_flush)
 376                 return false;
 377         INIT_LIST_HEAD(&nfit_flush->list);
 378         nfit_flush->flush = flush;
 379         list_add_tail(&nfit_flush->list, &acpi_desc->flushes);
 380         dev_dbg(dev, "%s: nfit_flush handle: %d hint_count: %d\n", __func__,
 381                         flush->device_handle, flush->hint_count);
 382         return true;
 383 }
 384
 385 static void *add_table(struct acpi_nfit_desc *acpi_desc,
 386                 struct nfit_table_prev *prev, void *table, const void *end)
 387 {
 388         struct device *dev = acpi_desc->dev;
 389         struct acpi_nfit_header *hdr;
 390         void *err = ERR_PTR(-ENOMEM);
 391
 392         if (table >= end)
 393                 return NULL;
 394
 395         hdr = table;
 396         if (!hdr->length) {
 397                 dev_warn(dev, "found a zero length table '%d' parsing nfit\n",
 398                         hdr->type);
 399                 return NULL;
 400         }
 401
 402         switch (hdr->type) {
 403         case ACPI_NFIT_TYPE_SYSTEM_ADDRESS:
 404                 if (!add_spa(acpi_desc, prev, table))
 405                         return err;
 406                 break;
 407         case ACPI_NFIT_TYPE_MEMORY_MAP:
 408                 if (!add_memdev(acpi_desc, prev, table))
 409                         return err;
 410                 break;
 411         case ACPI_NFIT_TYPE_CONTROL_REGION:
 412                 if (!add_dcr(acpi_desc, prev, table))
 413                         return err;
 414                 break;
 415         case ACPI_NFIT_TYPE_DATA_REGION:
 416                 if (!add_bdw(acpi_desc, prev, table))
 417                         return err;
 418                 break;
 419         case ACPI_NFIT_TYPE_INTERLEAVE:
 420                 if (!add_idt(acpi_desc, prev, table))
 421                         return err;
 422                 break;
 423         case ACPI_NFIT_TYPE_FLUSH_ADDRESS:
 424                 if (!add_flush(acpi_desc, prev, table))
 425                         return err;
 426                 break;
 427         case ACPI_NFIT_TYPE_SMBIOS:
 428                 dev_dbg(dev, "%s: smbios\n", __func__);
 429                 break;
 430         default:
 431                 dev_err(dev, "unknown table '%d' parsing nfit\n", hdr->type);
 432                 break;
 433         }
 434
 435         return table + hdr->length;
 436 }
 437
 438 static void nfit_mem_find_spa_bdw(struct acpi_nfit_desc *acpi_desc,
 439                 struct nfit_mem *nfit_mem)
 440 {
 441         u32 device_handle = __to_nfit_memdev(nfit_mem)->device_handle;
 442         u16 dcr = nfit_mem->dcr->region_index;
 443         struct nfit_spa *nfit_spa;
 444
 445         list_for_each_entry(nfit_spa, &acpi_desc->spas, list) {
 446                 u16 range_index = nfit_spa->spa->range_index;
 447                 int type = nfit_spa_type(nfit_spa->spa);
 448                 struct nfit_memdev *nfit_memdev;
 449
 450                 if (type != NFIT_SPA_BDW)
 451                         continue;
 452
 453                 list_for_each_entry(nfit_memdev, &acpi_desc->memdevs, list) {
 454                         if (nfit_memdev->memdev->range_index != range_index)
 455                                 continue;
 456                         if (nfit_memdev->memdev->device_handle != device_handle)
 457                                 continue;
 458                         if (nfit_memdev->memdev->region_index != dcr)
 459                                 continue;
 460
 461                         nfit_mem->spa_bdw = nfit_spa->spa;
 462                         return;
 463                 }
 464         }
 465
 466         dev_dbg(acpi_desc->dev, "SPA-BDW not found for SPA-DCR %d\n",
 467                         nfit_mem->spa_dcr->range_index);
 468         nfit_mem->bdw = NULL;
 469 }
 470
 471 static void nfit_mem_init_bdw(struct acpi_nfit_desc *acpi_desc,
 472                 struct nfit_mem *nfit_mem, struct acpi_nfit_system_address *spa)
 473 {
 474         u16 dcr = __to_nfit_memdev(nfit_mem)->region_index;
 475         struct nfit_memdev *nfit_memdev;
 476         struct nfit_flush *nfit_flush;
 477         struct nfit_bdw *nfit_bdw;
 478         struct nfit_idt *nfit_idt;
 479         u16 idt_idx, range_index;
 480
 481         list_for_each_entry(nfit_bdw, &acpi_desc->bdws, list) {
 482                 if (nfit_bdw->bdw->region_index != dcr)
 483                         continue;
 484                 nfit_mem->bdw = nfit_bdw->bdw;
 485                 break;
 486         }
 487
 488         if (!nfit_mem->bdw)
 489                 return;
 490
 491         nfit_mem_find_spa_bdw(acpi_desc, nfit_mem);
 492
 493         if (!nfit_mem->spa_bdw)
 494                 return;
 495
 496         range_index = nfit_mem->spa_bdw->range_index;
 497         list_for_each_entry(nfit_memdev, &acpi_desc->memdevs, list) {
 498                 if (nfit_memdev->memdev->range_index != range_index ||
 499                                 nfit_memdev->memdev->region_index != dcr)
 500                         continue;
 501                 nfit_mem->memdev_bdw = nfit_memdev->memdev;
 502                 idt_idx = nfit_memdev->memdev->interleave_index;
 503                 list_for_each_entry(nfit_idt, &acpi_desc->idts, list) {
 504                         if (nfit_idt->idt->interleave_index != idt_idx)
 505                                 continue;
 506                         nfit_mem->idt_bdw = nfit_idt->idt;
 507                         break;
 508                 }
 509
 510                 list_for_each_entry(nfit_flush, &acpi_desc->flushes, list) {
 511                         if (nfit_flush->flush->device_handle !=
 512                                         nfit_memdev->memdev->device_handle)
 513                                 continue;
 514                         nfit_mem->nfit_flush = nfit_flush;
 515                         break;
 516                 }
 517                 break;
 518         }
 519 }
 520
 521 static int nfit_mem_dcr_init(struct acpi_nfit_desc *acpi_desc,
 522                 struct acpi_nfit_system_address *spa)
 523 {
 524         struct nfit_mem *nfit_mem, *found;
 525         struct nfit_memdev *nfit_memdev;
 526         int type = nfit_spa_type(spa);
 527
 528         switch (type) {
 529         case NFIT_SPA_DCR:
 530         case NFIT_SPA_PM:
 531                 break;
 532         default:
 533                 return 0;
 534         }
 535
 536         list_for_each_entry(nfit_memdev, &acpi_desc->memdevs, list) {
 537                 struct nfit_dcr *nfit_dcr;
 538                 u32 device_handle;
 539                 u16 dcr;
 540
 541                 if (nfit_memdev->memdev->range_index != spa->range_index)
 542                         continue;
 543                 found = NULL;
 544                 dcr = nfit_memdev->memdev->region_index;
 545                 device_handle = nfit_memdev->memdev->device_handle;
 546                 list_for_each_entry(nfit_mem, &acpi_desc->dimms, list)
 547                         if (__to_nfit_memdev(nfit_mem)->device_handle
 548                                         == device_handle) {
 549                                 found = nfit_mem;
 550                                 break;
 551                         }
 552
 553                 if (found)
 554                         nfit_mem = found;
 555                 else {
 556                         nfit_mem = devm_kzalloc(acpi_desc->dev,
 557                                         sizeof(*nfit_mem), GFP_KERNEL);
 558                         if (!nfit_mem)
 559                                 return -ENOMEM;
 560                         INIT_LIST_HEAD(&nfit_mem->list);
 561                         list_add(&nfit_mem->list, &acpi_desc->dimms);
 562                 }
 563
 564                 list_for_each_entry(nfit_dcr, &acpi_desc->dcrs, list) {
 565                         if (nfit_dcr->dcr->region_index != dcr)
 566                                 continue;
 567                         /*
 568                          * Record the control region for the dimm.  For
 569                          * the ACPI 6.1 case, where there are separate
 570                          * control regions for the pmem vs blk
 571                          * interfaces, be sure to record the extended
 572                          * blk details.
 573                          */
 574                         if (!nfit_mem->dcr)
 575                                 nfit_mem->dcr = nfit_dcr->dcr;
 576                         else if (nfit_mem->dcr->windows == 0
 577                                         && nfit_dcr->dcr->windows)
 578                                 nfit_mem->dcr = nfit_dcr->dcr;
 579                         break;
 580                 }
 581
 582                 if (dcr && !nfit_mem->dcr) {
 583                         dev_err(acpi_desc->dev, "SPA %d missing DCR %d\n",
 584                                         spa->range_index, dcr);
 585                         return -ENODEV;
 586                 }
 587
 588                 if (type == NFIT_SPA_DCR) {
 589                         struct nfit_idt *nfit_idt;
 590                         u16 idt_idx;
 591
 592                         /* multiple dimms may share a SPA when interleaved */
 593                         nfit_mem->spa_dcr = spa;
 594                         nfit_mem->memdev_dcr = nfit_memdev->memdev;
 595                         idt_idx = nfit_memdev->memdev->interleave_index;
 596                         list_for_each_entry(nfit_idt, &acpi_desc->idts, list) {
 597                                 if (nfit_idt->idt->interleave_index != idt_idx)
 598                                         continue;
 599                                 nfit_mem->idt_dcr = nfit_idt->idt;
 600                                 break;
 601                         }
 602                         nfit_mem_init_bdw(acpi_desc, nfit_mem, spa);
 603                 } else {
 604                         /*
 605                          * A single dimm may belong to multiple SPA-PM
 606                          * ranges, record at least one in addition to
 607                          * any SPA-DCR range.
 608                          */
 609                         nfit_mem->memdev_pmem = nfit_memdev->memdev;
 610                 }
 611         }
 612
 613         return 0;
 614 }
 615
 616 static int nfit_mem_cmp(void *priv, struct list_head *_a, struct list_head *_b)
 617 {
 618         struct nfit_mem *a = container_of(_a, typeof(*a), list);
 619         struct nfit_mem *b = container_of(_b, typeof(*b), list);
 620         u32 handleA, handleB;
 621
 622         handleA = __to_nfit_memdev(a)->device_handle;
 623         handleB = __to_nfit_memdev(b)->device_handle;
 624         if (handleA < handleB)
 625                 return -1;
 626         else if (handleA > handleB)
 627                 return 1;
 628         return 0;
 629 }
 630
 631 static int nfit_mem_init(struct acpi_nfit_desc *acpi_desc)
 632 {
 633         struct nfit_spa *nfit_spa;
 634
 635         /*
 636          * For each SPA-DCR or SPA-PMEM address range find its
 637          * corresponding MEMDEV(s).  From each MEMDEV find the
 638          * corresponding DCR.  Then, if we're operating on a SPA-DCR,
 639          * try to find a SPA-BDW and a corresponding BDW that references
 640          * the DCR.  Throw it all into an nfit_mem object.  Note, that
 641          * BDWs are optional.
 642          */
 643         list_for_each_entry(nfit_spa, &acpi_desc->spas, list) {
 644                 int rc;
 645
 646                 rc = nfit_mem_dcr_init(acpi_desc, nfit_spa->spa);
 647                 if (rc)
 648                         return rc;
 649         }
 650
 651         list_sort(NULL, &acpi_desc->dimms, nfit_mem_cmp);
 652
 653         return 0;
 654 }
 655
 656 static ssize_t revision_show(struct device *dev,
 657                 struct device_attribute *attr, char *buf)
 658 {
 659         struct nvdimm_bus *nvdimm_bus = to_nvdimm_bus(dev);
 660         struct nvdimm_bus_descriptor *nd_desc = to_nd_desc(nvdimm_bus);
 661         struct acpi_nfit_desc *acpi_desc = to_acpi_desc(nd_desc);
 662
 663         return sprintf(buf, "%d\n", acpi_desc->acpi_header.revision);
 664 }
 665 static DEVICE_ATTR_RO(revision);
 666
 667 static struct attribute *acpi_nfit_attributes[] = {
 668         &dev_attr_revision.attr,
 669         NULL,
 670 };
 671
 672 static struct attribute_group acpi_nfit_attribute_group = {
 673         .name = "nfit",
 674         .attrs = acpi_nfit_attributes,
 675 };
 676
 677 const struct attribute_group *acpi_nfit_attribute_groups[] = {
 678         &nvdimm_bus_attribute_group,
 679         &acpi_nfit_attribute_group,
 680         NULL,
 681 };
 682 EXPORT_SYMBOL_GPL(acpi_nfit_attribute_groups);
 683
 684 static struct acpi_nfit_memory_map *to_nfit_memdev(struct device *dev)
 685 {
 686         struct nvdimm *nvdimm = to_nvdimm(dev);
 687         struct nfit_mem *nfit_mem = nvdimm_provider_data(nvdimm);
 688
 689         return __to_nfit_memdev(nfit_mem);
 690 }
 691
 692 static struct acpi_nfit_control_region *to_nfit_dcr(struct device *dev)
 693 {
 694         struct nvdimm *nvdimm = to_nvdimm(dev);
 695         struct nfit_mem *nfit_mem = nvdimm_provider_data(nvdimm);
 696
 697         return nfit_mem->dcr;
 698 }
 699
 700 static ssize_t handle_show(struct device *dev,
 701                 struct device_attribute *attr, char *buf)
 702 {
 703         struct acpi_nfit_memory_map *memdev = to_nfit_memdev(dev);
 704
 705         return sprintf(buf, "%#x\n", memdev->device_handle);
 706 }
 707 static DEVICE_ATTR_RO(handle);
 708
 709 static ssize_t phys_id_show(struct device *dev,
 710                 struct device_attribute *attr, char *buf)
 711 {
 712         struct acpi_nfit_memory_map *memdev = to_nfit_memdev(dev);
 713
 714         return sprintf(buf, "%#x\n", memdev->physical_id);
 715 }
 716 static DEVICE_ATTR_RO(phys_id);
 717
 718 static ssize_t vendor_show(struct device *dev,
 719                 struct device_attribute *attr, char *buf)
 720 {
 721         struct acpi_nfit_control_region *dcr = to_nfit_dcr(dev);
 722
 723         return sprintf(buf, "%#x\n", dcr->vendor_id);
 724 }
 725 static DEVICE_ATTR_RO(vendor);
 726
 727 static ssize_t rev_id_show(struct device *dev,
 728                 struct device_attribute *attr, char *buf)
 729 {
 730         struct acpi_nfit_control_region *dcr = to_nfit_dcr(dev);
 731
 732         return sprintf(buf, "%#x\n", dcr->revision_id);
 733 }
 734 static DEVICE_ATTR_RO(rev_id);
 735
 736 static ssize_t device_show(struct device *dev,
 737                 struct device_attribute *attr, char *buf)
 738 {
 739         struct acpi_nfit_control_region *dcr = to_nfit_dcr(dev);
 740
 741         return sprintf(buf, "%#x\n", dcr->device_id);
 742 }
 743 static DEVICE_ATTR_RO(device);
 744
 745 static ssize_t format_show(struct device *dev,
 746                 struct device_attribute *attr, char *buf)
 747 {
 748         struct acpi_nfit_control_region *dcr = to_nfit_dcr(dev);
 749
 750         return sprintf(buf, "%#x\n", dcr->code);
 751 }
 752 static DEVICE_ATTR_RO(format);
 753
 754 static ssize_t serial_show(struct device *dev,
 755                 struct device_attribute *attr, char *buf)
 756 {
 757         struct acpi_nfit_control_region *dcr = to_nfit_dcr(dev);
 758
 759         return sprintf(buf, "%#x\n", dcr->serial_number);
 760 }
 761 static DEVICE_ATTR_RO(serial);
 762
 763 static ssize_t flags_show(struct device *dev,
 764                 struct device_attribute *attr, char *buf)
 765 {
 766         u16 flags = to_nfit_memdev(dev)->flags;
 767
 768         return sprintf(buf, "%s%s%s%s%s\n",
 769                 flags & ACPI_NFIT_MEM_SAVE_FAILED ? "save_fail " : "",
 770                 flags & ACPI_NFIT_MEM_RESTORE_FAILED ? "restore_fail " : "",
 771                 flags & ACPI_NFIT_MEM_FLUSH_FAILED ? "flush_fail " : "",
 772                 flags & ACPI_NFIT_MEM_NOT_ARMED ? "not_armed " : "",
 773                 flags & ACPI_NFIT_MEM_HEALTH_OBSERVED ? "smart_event " : "");
 774 }
 775 static DEVICE_ATTR_RO(flags);
 776
 777 static struct attribute *acpi_nfit_dimm_attributes[] = {
 778         &dev_attr_handle.attr,
 779         &dev_attr_phys_id.attr,
 780         &dev_attr_vendor.attr,
 781         &dev_attr_device.attr,
 782         &dev_attr_format.attr,
 783         &dev_attr_serial.attr,
 784         &dev_attr_rev_id.attr,
 785         &dev_attr_flags.attr,
 786         NULL,
 787 };
 788
 789 static umode_t acpi_nfit_dimm_attr_visible(struct kobject *kobj,
 790                 struct attribute *a, int n)
 791 {
 792         struct device *dev = container_of(kobj, struct device, kobj);
 793
 794         if (to_nfit_dcr(dev))
 795                 return a->mode;
 796         else
 797                 return 0;
 798 }
 799
 800 static struct attribute_group acpi_nfit_dimm_attribute_group = {
 801         .name = "nfit",
 802         .attrs = acpi_nfit_dimm_attributes,
 803         .is_visible = acpi_nfit_dimm_attr_visible,
 804 };
 805
 806 static const struct attribute_group *acpi_nfit_dimm_attribute_groups[] = {
 807         &nvdimm_attribute_group,
 808         &nd_device_attribute_group,
 809         &acpi_nfit_dimm_attribute_group,
 810         NULL,
 811 };
 812
 813 static struct nvdimm *acpi_nfit_dimm_by_handle(struct acpi_nfit_desc *acpi_desc,
 814                 u32 device_handle)
 815 {
 816         struct nfit_mem *nfit_mem;
 817
 818         list_for_each_entry(nfit_mem, &acpi_desc->dimms, list)
 819                 if (__to_nfit_memdev(nfit_mem)->device_handle == device_handle)
 820                         return nfit_mem->nvdimm;
 821
 822         return NULL;
 823 }
 824
 825 static int acpi_nfit_add_dimm(struct acpi_nfit_desc *acpi_desc,
 826                 struct nfit_mem *nfit_mem, u32 device_handle)
 827 {
 828         struct acpi_device *adev, *adev_dimm;
 829         struct device *dev = acpi_desc->dev;
 830         const u8 *uuid = to_nfit_uuid(NFIT_DEV_DIMM);
 831         int i;
 832
 833         nfit_mem->dsm_mask = acpi_desc->dimm_dsm_force_en;
 834         adev = to_acpi_dev(acpi_desc);
 835         if (!adev)
 836                 return 0;
 837
 838         adev_dimm = acpi_find_child_device(adev, device_handle, false);
 839         nfit_mem->adev = adev_dimm;
 840         if (!adev_dimm) {
 841                 dev_err(dev, "no ACPI.NFIT device with _ADR %#x, disabling...\n",
 842                                 device_handle);
 843                 return force_enable_dimms ? 0 : -ENODEV;
 844         }
 845
 846         for (i = ND_CMD_SMART; i <= ND_CMD_VENDOR; i++)
 847                 if (acpi_check_dsm(adev_dimm->handle, uuid, 1, 1ULL << i))
 848                         set_bit(i, &nfit_mem->dsm_mask);
 849
 850         return 0;
 851 }
 852
 853 static int acpi_nfit_register_dimms(struct acpi_nfit_desc *acpi_desc)
 854 {
 855         struct nfit_mem *nfit_mem;
 856         int dimm_count = 0;
 857
 858         list_for_each_entry(nfit_mem, &acpi_desc->dimms, list) {
 859                 struct nvdimm *nvdimm;
 860                 unsigned long flags = 0;
 861                 u32 device_handle;
 862                 u16 mem_flags;
 863                 int rc;
 864
 865                 device_handle = __to_nfit_memdev(nfit_mem)->device_handle;
 866                 nvdimm = acpi_nfit_dimm_by_handle(acpi_desc, device_handle);
 867                 if (nvdimm) {
 868                         dimm_count++;
 869                         continue;
 870                 }
 871
 872                 if (nfit_mem->bdw && nfit_mem->memdev_pmem)
 873                         flags |= NDD_ALIASING;
 874
 875                 mem_flags = __to_nfit_memdev(nfit_mem)->flags;
 876                 if (mem_flags & ACPI_NFIT_MEM_NOT_ARMED)
 877                         flags |= NDD_UNARMED;
 878
 879                 rc = acpi_nfit_add_dimm(acpi_desc, nfit_mem, device_handle);
 880                 if (rc)
 881                         continue;
 882
 883                 nvdimm = nvdimm_create(acpi_desc->nvdimm_bus, nfit_mem,
 884                                 acpi_nfit_dimm_attribute_groups,
 885                                 flags, &nfit_mem->dsm_mask);
 886                 if (!nvdimm)
 887                         return -ENOMEM;
 888
 889                 nfit_mem->nvdimm = nvdimm;
 890                 dimm_count++;
 891
 892                 if ((mem_flags & ACPI_NFIT_MEM_FAILED_MASK) == 0)
 893                         continue;
 894
 895                 dev_info(acpi_desc->dev, "%s flags:%s%s%s%s\n",
 896                                 nvdimm_name(nvdimm),
 897                   mem_flags & ACPI_NFIT_MEM_SAVE_FAILED ? " save_fail" : "",
 898                   mem_flags & ACPI_NFIT_MEM_RESTORE_FAILED ? " restore_fail":"",
 899                   mem_flags & ACPI_NFIT_MEM_FLUSH_FAILED ? " flush_fail" : "",
 900                   mem_flags & ACPI_NFIT_MEM_NOT_ARMED ? " not_armed" : "");
 901
 902         }
 903
 904         return nvdimm_bus_check_dimm_count(acpi_desc->nvdimm_bus, dimm_count);
 905 }
 906
 907 static void acpi_nfit_init_dsms(struct acpi_nfit_desc *acpi_desc)
 908 {
 909         struct nvdimm_bus_descriptor *nd_desc = &acpi_desc->nd_desc;
 910         const u8 *uuid = to_nfit_uuid(NFIT_DEV_BUS);
 911         struct acpi_device *adev;
 912         int i;
 913
 914         nd_desc->dsm_mask = acpi_desc->bus_dsm_force_en;
 915         adev = to_acpi_dev(acpi_desc);
 916         if (!adev)
 917                 return;
 918
 919         for (i = ND_CMD_ARS_CAP; i <= ND_CMD_ARS_STATUS; i++)
 920                 if (acpi_check_dsm(adev->handle, uuid, 1, 1ULL << i))
 921                         set_bit(i, &nd_desc->dsm_mask);
 922 }
 923
 924 static ssize_t range_index_show(struct device *dev,
 925                 struct device_attribute *attr, char *buf)
 926 {
 927         struct nd_region *nd_region = to_nd_region(dev);
 928         struct nfit_spa *nfit_spa = nd_region_provider_data(nd_region);
 929
 930         return sprintf(buf, "%d\n", nfit_spa->spa->range_index);
 931 }
 932 static DEVICE_ATTR_RO(range_index);
 933
 934 static struct attribute *acpi_nfit_region_attributes[] = {
 935         &dev_attr_range_index.attr,
 936         NULL,
 937 };
 938
 939 static struct attribute_group acpi_nfit_region_attribute_group = {
 940         .name = "nfit",
 941         .attrs = acpi_nfit_region_attributes,
 942 };
 943
 944 static const struct attribute_group *acpi_nfit_region_attribute_groups[] = {
 945         &nd_region_attribute_group,
 946         &nd_mapping_attribute_group,
 947         &nd_device_attribute_group,
 948         &nd_numa_attribute_group,
 949         &acpi_nfit_region_attribute_group,
 950         NULL,
 951 };
 952
 953 /* enough info to uniquely specify an interleave set */
 954 struct nfit_set_info {
 955         struct nfit_set_info_map {
 956                 u64 region_offset;
 957                 u32 serial_number;
 958                 u32 pad;
 959         } mapping[0];
 960 };
 961
 962 static size_t sizeof_nfit_set_info(int num_mappings)
 963 {
 964         return sizeof(struct nfit_set_info)
 965                 + num_mappings * sizeof(struct nfit_set_info_map);
 966 }
 967
 968 static int cmp_map_compat(const void *m0, const void *m1)
 969 {
 970         const struct nfit_set_info_map *map0 = m0;
 971         const struct nfit_set_info_map *map1 = m1;
 972
 973         return memcmp(&map0->region_offset, &map1->region_offset,
 974                         sizeof(u64));
 975 }
 976
 977 static int cmp_map(const void *m0, const void *m1)
 978 {
 979         const struct nfit_set_info_map *map0 = m0;
 980         const struct nfit_set_info_map *map1 = m1;
 981
 982         return map0->region_offset - map1->region_offset;
 983 }
 984
 985 /* Retrieve the nth entry referencing this spa */
 986 static struct acpi_nfit_memory_map *memdev_from_spa(
 987                 struct acpi_nfit_desc *acpi_desc, u16 range_index, int n)
 988 {
 989         struct nfit_memdev *nfit_memdev;
 990
 991         list_for_each_entry(nfit_memdev, &acpi_desc->memdevs, list)
 992                 if (nfit_memdev->memdev->range_index == range_index)
 993                         if (n-- == 0)
 994                                 return nfit_memdev->memdev;
 995         return NULL;
 996 }
 997
 998 static int acpi_nfit_init_interleave_set(struct acpi_nfit_desc *acpi_desc,
 999                 struct nd_region_desc *ndr_desc,
1000                 struct acpi_nfit_system_address *spa)
1001 {
1002         int i, spa_type = nfit_spa_type(spa);
1003         struct device *dev = acpi_desc->dev;
1004         struct nd_interleave_set *nd_set;
1005         u16 nr = ndr_desc->num_mappings;
1006         struct nfit_set_info *info;
1007
1008         if (spa_type == NFIT_SPA_PM || spa_type == NFIT_SPA_VOLATILE)
1009                 /* pass */;
1010         else
1011                 return 0;
1012
1013         nd_set = devm_kzalloc(dev, sizeof(*nd_set), GFP_KERNEL);
1014         if (!nd_set)
1015                 return -ENOMEM;
1016
1017         info = devm_kzalloc(dev, sizeof_nfit_set_info(nr), GFP_KERNEL);
1018         if (!info)
1019                 return -ENOMEM;
1020         for (i = 0; i < nr; i++) {
1021                 struct nd_mapping *nd_mapping = &ndr_desc->nd_mapping[i];
1022                 struct nfit_set_info_map *map = &info->mapping[i];
1023                 struct nvdimm *nvdimm = nd_mapping->nvdimm;
1024                 struct nfit_mem *nfit_mem = nvdimm_provider_data(nvdimm);
1025                 struct acpi_nfit_memory_map *memdev = memdev_from_spa(acpi_desc,
1026                                 spa->range_index, i);
1027
1028                 if (!memdev || !nfit_mem->dcr) {
1029                         dev_err(dev, "%s: failed to find DCR\n", __func__);
1030                         return -ENODEV;
1031                 }
1032
1033                 map->region_offset = memdev->region_offset;
1034                 map->serial_number = nfit_mem->dcr->serial_number;
1035         }
1036
1037         sort(&info->mapping[0], nr, sizeof(struct nfit_set_info_map),
1038                         cmp_map, NULL);
1039         nd_set->cookie = nd_fletcher64(info, sizeof_nfit_set_info(nr), 0);
1040
1041         /* support namespaces created with the wrong sort order */
1042         sort(&info->mapping[0], nr, sizeof(struct nfit_set_info_map),
1043                         cmp_map_compat, NULL);
1044         nd_set->altcookie = nd_fletcher64(info, sizeof_nfit_set_info(nr), 0);
1045
1046         ndr_desc->nd_set = nd_set;
1047         devm_kfree(dev, info);
1048
1049         return 0;
1050 }
1051
1052 static u64 to_interleave_offset(u64 offset, struct nfit_blk_mmio *mmio)
1053 {
1054         struct acpi_nfit_interleave *idt = mmio->idt;
1055         u32 sub_line_offset, line_index, line_offset;
1056         u64 line_no, table_skip_count, table_offset;
1057
1058         line_no = div_u64_rem(offset, mmio->line_size, &sub_line_offset);
1059         table_skip_count = div_u64_rem(line_no, mmio->num_lines, &line_index);
1060         line_offset = idt->line_offset[line_index]
1061                 * mmio->line_size;
1062         table_offset = table_skip_count * mmio->table_size;
1063
1064         return mmio->base_offset + line_offset + table_offset + sub_line_offset;
1065 }
1066
1067 static void wmb_blk(struct nfit_blk *nfit_blk)
1068 {
1069
1070         if (nfit_blk->nvdimm_flush) {
1071                 /*
1072                  * The first wmb() is needed to 'sfence' all previous writes
1073                  * such that they are architecturally visible for the platform
1074                  * buffer flush.  Note that we've already arranged for pmem
1075                  * writes to avoid the cache via arch_memcpy_to_pmem().  The
1076                  * final wmb() ensures ordering for the NVDIMM flush write.
1077                  */
1078                 wmb();
1079                 writeq(1, nfit_blk->nvdimm_flush);
1080                 wmb();
1081         } else
1082                 wmb_pmem();
1083 }
1084
1085 static u32 read_blk_stat(struct nfit_blk *nfit_blk, unsigned int bw)
1086 {
1087         struct nfit_blk_mmio *mmio = &nfit_blk->mmio[DCR];
1088         u64 offset = nfit_blk->stat_offset + mmio->size * bw;
1089         const u32 STATUS_MASK = 0x80000037;
1090
1091         if (mmio->num_lines)
1092                 offset = to_interleave_offset(offset, mmio);
1093
1094         return readl(mmio->addr.base + offset) & STATUS_MASK;
1095 }
1096
1097 static void write_blk_ctl(struct nfit_blk *nfit_blk, unsigned int bw,
1098                 resource_size_t dpa, unsigned int len, unsigned int write)
1099 {
1100         u64 cmd, offset;
1101         struct nfit_blk_mmio *mmio = &nfit_blk->mmio[DCR];
1102
1103         enum {
1104                 BCW_OFFSET_MASK = (1ULL << 48)-1,
1105                 BCW_LEN_SHIFT = 48,
1106                 BCW_LEN_MASK = (1ULL << 8) - 1,
1107                 BCW_CMD_SHIFT = 56,
1108         };
1109
1110         cmd = (dpa >> L1_CACHE_SHIFT) & BCW_OFFSET_MASK;
1111         len = len >> L1_CACHE_SHIFT;
1112         cmd |= ((u64) len & BCW_LEN_MASK) << BCW_LEN_SHIFT;
1113         cmd |= ((u64) write) << BCW_CMD_SHIFT;
1114
1115         offset = nfit_blk->cmd_offset + mmio->size * bw;
1116         if (mmio->num_lines)
1117                 offset = to_interleave_offset(offset, mmio);
1118
1119         writeq(cmd, mmio->addr.base + offset);
1120         wmb_blk(nfit_blk);
1121
1122         if (nfit_blk->dimm_flags & ND_BLK_DCR_LATCH)
1123                 readq(mmio->addr.base + offset);
1124 }
1125
1126 static int acpi_nfit_blk_single_io(struct nfit_blk *nfit_blk,
1127                 resource_size_t dpa, void *iobuf, size_t len, int rw,
1128                 unsigned int lane)
1129 {
1130         struct nfit_blk_mmio *mmio = &nfit_blk->mmio[BDW];
1131         unsigned int copied = 0;
1132         u64 base_offset;
1133         int rc;
1134
1135         base_offset = nfit_blk->bdw_offset + dpa % L1_CACHE_BYTES
1136                 + lane * mmio->size;
1137         write_blk_ctl(nfit_blk, lane, dpa, len, rw);
1138         while (len) {
1139                 unsigned int c;
1140                 u64 offset;
1141
1142                 if (mmio->num_lines) {
1143                         u32 line_offset;
1144
1145                         offset = to_interleave_offset(base_offset + copied,
1146                                         mmio);
1147                         div_u64_rem(offset, mmio->line_size, &line_offset);
1148                         c = min_t(size_t, len, mmio->line_size - line_offset);
1149                 } else {
1150                         offset = base_offset + nfit_blk->bdw_offset;
1151                         c = len;
1152                 }
1153
1154                 if (rw)
1155                         memcpy_to_pmem(mmio->addr.aperture + offset,
1156                                         iobuf + copied, c);
1157                 else {
1158                         if (nfit_blk->dimm_flags & ND_BLK_READ_FLUSH)
1159                                 mmio_flush_range((void __force *)
1160                                         mmio->addr.aperture + offset, c);
1161
1162                         memcpy_from_pmem(iobuf + copied,
1163                                         mmio->addr.aperture + offset, c);
1164                 }
1165
1166                 copied += c;
1167                 len -= c;
1168         }
1169
1170         if (rw)
1171                 wmb_blk(nfit_blk);
1172
1173         rc = read_blk_stat(nfit_blk, lane) ? -EIO : 0;
1174         return rc;
1175 }
1176
1177 static int acpi_nfit_blk_region_do_io(struct nd_blk_region *ndbr,
1178                 resource_size_t dpa, void *iobuf, u64 len, int rw)
1179 {
1180         struct nfit_blk *nfit_blk = nd_blk_region_provider_data(ndbr);
1181         struct nfit_blk_mmio *mmio = &nfit_blk->mmio[BDW];
1182         struct nd_region *nd_region = nfit_blk->nd_region;
1183         unsigned int lane, copied = 0;
1184         int rc = 0;
1185
1186         lane = nd_region_acquire_lane(nd_region);
1187         while (len) {
1188                 u64 c = min(len, mmio->size);
1189
1190                 rc = acpi_nfit_blk_single_io(nfit_blk, dpa + copied,
1191                                 iobuf + copied, c, rw, lane);
1192                 if (rc)
1193                         break;
1194
1195                 copied += c;
1196                 len -= c;
1197         }
1198         nd_region_release_lane(nd_region, lane);
1199
1200         return rc;
1201 }
1202
1203 static void nfit_spa_mapping_release(struct kref *kref)
1204 {
1205         struct nfit_spa_mapping *spa_map = to_spa_map(kref);
1206         struct acpi_nfit_system_address *spa = spa_map->spa;
1207         struct acpi_nfit_desc *acpi_desc = spa_map->acpi_desc;
1208
1209         WARN_ON(!mutex_is_locked(&acpi_desc->spa_map_mutex));
1210         dev_dbg(acpi_desc->dev, "%s: SPA%d\n", __func__, spa->range_index);
1211         if (spa_map->type == SPA_MAP_APERTURE)
1212                 memunmap((void __force *)spa_map->addr.aperture);
1213         else
1214                 iounmap(spa_map->addr.base);
1215         release_mem_region(spa->address, spa->length);
1216         list_del(&spa_map->list);
1217         kfree(spa_map);
1218 }
1219
1220 static struct nfit_spa_mapping *find_spa_mapping(
1221                 struct acpi_nfit_desc *acpi_desc,
1222                 struct acpi_nfit_system_address *spa)
1223 {
1224         struct nfit_spa_mapping *spa_map;
1225
1226         WARN_ON(!mutex_is_locked(&acpi_desc->spa_map_mutex));
1227         list_for_each_entry(spa_map, &acpi_desc->spa_maps, list)
1228                 if (spa_map->spa == spa)
1229                         return spa_map;
1230
1231         return NULL;
1232 }
1233
1234 static void nfit_spa_unmap(struct acpi_nfit_desc *acpi_desc,
1235                 struct acpi_nfit_system_address *spa)
1236 {
1237         struct nfit_spa_mapping *spa_map;
1238
1239         mutex_lock(&acpi_desc->spa_map_mutex);
1240         spa_map = find_spa_mapping(acpi_desc, spa);
1241
1242         if (spa_map)
1243                 kref_put(&spa_map->kref, nfit_spa_mapping_release);
1244         mutex_unlock(&acpi_desc->spa_map_mutex);
1245 }
1246
1247 static void __iomem *__nfit_spa_map(struct acpi_nfit_desc *acpi_desc,
1248                 struct acpi_nfit_system_address *spa, enum spa_map_type type)
1249 {
1250         resource_size_t start = spa->address;
1251         resource_size_t n = spa->length;
1252         struct nfit_spa_mapping *spa_map;
1253         struct resource *res;
1254
1255         WARN_ON(!mutex_is_locked(&acpi_desc->spa_map_mutex));
1256
1257         spa_map = find_spa_mapping(acpi_desc, spa);
1258         if (spa_map) {
1259                 kref_get(&spa_map->kref);
1260                 return spa_map->addr.base;
1261         }
1262
1263         spa_map = kzalloc(sizeof(*spa_map), GFP_KERNEL);
1264         if (!spa_map)
1265                 return NULL;
1266
1267         INIT_LIST_HEAD(&spa_map->list);
1268         spa_map->spa = spa;
1269         kref_init(&spa_map->kref);
1270         spa_map->acpi_desc = acpi_desc;
1271
1272         res = request_mem_region(start, n, dev_name(acpi_desc->dev));
1273         if (!res)
1274                 goto err_mem;
1275
1276         spa_map->type = type;
1277         if (type == SPA_MAP_APERTURE)
1278                 spa_map->addr.aperture = (void __pmem *)memremap(start, n,
1279                                                         ARCH_MEMREMAP_PMEM);
1280         else
1281                 spa_map->addr.base = ioremap_nocache(start, n);
1282
1283
1284         if (!spa_map->addr.base)
1285                 goto err_map;
1286
1287         list_add_tail(&spa_map->list, &acpi_desc->spa_maps);
1288         return spa_map->addr.base;
1289
1290  err_map:
1291         release_mem_region(start, n);
1292  err_mem:
1293         kfree(spa_map);
1294         return NULL;
1295 }
1296
1297 /**
1298  * nfit_spa_map - interleave-aware managed-mappings of acpi_nfit_system_address ranges
1299  * @nvdimm_bus: NFIT-bus that provided the spa table entry
1300  * @nfit_spa: spa table to map
1301  * @type: aperture or control region
1302  *
1303  * In the case where block-data-window apertures and
1304  * dimm-control-regions are interleaved they will end up sharing a
1305  * single request_mem_region() + ioremap() for the address range.  In
1306  * the style of devm nfit_spa_map() mappings are automatically dropped
1307  * when all region devices referencing the same mapping are disabled /
1308  * unbound.
1309  */
1310 static void __iomem *nfit_spa_map(struct acpi_nfit_desc *acpi_desc,
1311                 struct acpi_nfit_system_address *spa, enum spa_map_type type)
1312 {
1313         void __iomem *iomem;
1314
1315         mutex_lock(&acpi_desc->spa_map_mutex);
1316         iomem = __nfit_spa_map(acpi_desc, spa, type);
1317         mutex_unlock(&acpi_desc->spa_map_mutex);
1318
1319         return iomem;
1320 }
1321
1322 static int nfit_blk_init_interleave(struct nfit_blk_mmio *mmio,
1323                 struct acpi_nfit_interleave *idt, u16 interleave_ways)
1324 {
1325         if (idt) {
1326                 mmio->num_lines = idt->line_count;
1327                 mmio->line_size = idt->line_size;
1328                 if (interleave_ways == 0)
1329                         return -ENXIO;
1330                 mmio->table_size = mmio->num_lines * interleave_ways
1331                         * mmio->line_size;
1332         }
1333
1334         return 0;
1335 }
1336
1337 static int acpi_nfit_blk_get_flags(struct nvdimm_bus_descriptor *nd_desc,
1338                 struct nvdimm *nvdimm, struct nfit_blk *nfit_blk)
1339 {
1340         struct nd_cmd_dimm_flags flags;
1341         int rc;
1342
1343         memset(&flags, 0, sizeof(flags));
1344         rc = nd_desc->ndctl(nd_desc, nvdimm, ND_CMD_DIMM_FLAGS, &flags,
1345                         sizeof(flags));
1346
1347         if (rc >= 0 && flags.status == 0)
1348                 nfit_blk->dimm_flags = flags.flags;
1349         else if (rc == -ENOTTY) {
1350                 /* fall back to a conservative default */
1351                 nfit_blk->dimm_flags = ND_BLK_DCR_LATCH | ND_BLK_READ_FLUSH;
1352                 rc = 0;
1353         } else
1354                 rc = -ENXIO;
1355
1356         return rc;
1357 }
1358
1359 static int acpi_nfit_blk_region_enable(struct nvdimm_bus *nvdimm_bus,
1360                 struct device *dev)
1361 {
1362         struct nvdimm_bus_descriptor *nd_desc = to_nd_desc(nvdimm_bus);
1363         struct acpi_nfit_desc *acpi_desc = to_acpi_desc(nd_desc);
1364         struct nd_blk_region *ndbr = to_nd_blk_region(dev);
1365         struct nfit_flush *nfit_flush;
1366         struct nfit_blk_mmio *mmio;
1367         struct nfit_blk *nfit_blk;
1368         struct nfit_mem *nfit_mem;
1369         struct nvdimm *nvdimm;
1370         int rc;
1371
1372         nvdimm = nd_blk_region_to_dimm(ndbr);
1373         nfit_mem = nvdimm_provider_data(nvdimm);
1374         if (!nfit_mem || !nfit_mem->dcr || !nfit_mem->bdw) {
1375                 dev_dbg(dev, "%s: missing%s%s%s\n", __func__,
1376                                 nfit_mem ? "" : " nfit_mem",
1377                                 (nfit_mem && nfit_mem->dcr) ? "" : " dcr",
1378                                 (nfit_mem && nfit_mem->bdw) ? "" : " bdw");
1379                 return -ENXIO;
1380         }
1381
1382         nfit_blk = devm_kzalloc(dev, sizeof(*nfit_blk), GFP_KERNEL);
1383         if (!nfit_blk)
1384                 return -ENOMEM;
1385         nd_blk_region_set_provider_data(ndbr, nfit_blk);
1386         nfit_blk->nd_region = to_nd_region(dev);
1387
1388         /* map block aperture memory */
1389         nfit_blk->bdw_offset = nfit_mem->bdw->offset;
1390         mmio = &nfit_blk->mmio[BDW];
1391         mmio->addr.base = nfit_spa_map(acpi_desc, nfit_mem->spa_bdw,
1392                         SPA_MAP_APERTURE);
1393         if (!mmio->addr.base) {
1394                 dev_dbg(dev, "%s: %s failed to map bdw\n", __func__,
1395                                 nvdimm_name(nvdimm));
1396                 return -ENOMEM;
1397         }
1398         mmio->size = nfit_mem->bdw->size;
1399         mmio->base_offset = nfit_mem->memdev_bdw->region_offset;
1400         mmio->idt = nfit_mem->idt_bdw;
1401         mmio->spa = nfit_mem->spa_bdw;
1402         rc = nfit_blk_init_interleave(mmio, nfit_mem->idt_bdw,
1403                         nfit_mem->memdev_bdw->interleave_ways);
1404         if (rc) {
1405                 dev_dbg(dev, "%s: %s failed to init bdw interleave\n",
1406                                 __func__, nvdimm_name(nvdimm));
1407                 return rc;
1408         }
1409
1410         /* map block control memory */
1411         nfit_blk->cmd_offset = nfit_mem->dcr->command_offset;
1412         nfit_blk->stat_offset = nfit_mem->dcr->status_offset;
1413         mmio = &nfit_blk->mmio[DCR];
1414         mmio->addr.base = nfit_spa_map(acpi_desc, nfit_mem->spa_dcr,
1415                         SPA_MAP_CONTROL);
1416         if (!mmio->addr.base) {
1417                 dev_dbg(dev, "%s: %s failed to map dcr\n", __func__,
1418                                 nvdimm_name(nvdimm));
1419                 return -ENOMEM;
1420         }
1421         mmio->size = nfit_mem->dcr->window_size;
1422         mmio->base_offset = nfit_mem->memdev_dcr->region_offset;
1423         mmio->idt = nfit_mem->idt_dcr;
1424         mmio->spa = nfit_mem->spa_dcr;
1425         rc = nfit_blk_init_interleave(mmio, nfit_mem->idt_dcr,
1426                         nfit_mem->memdev_dcr->interleave_ways);
1427         if (rc) {
1428                 dev_dbg(dev, "%s: %s failed to init dcr interleave\n",
1429                                 __func__, nvdimm_name(nvdimm));
1430                 return rc;
1431         }
1432
1433         rc = acpi_nfit_blk_get_flags(nd_desc, nvdimm, nfit_blk);
1434         if (rc < 0) {
1435                 dev_dbg(dev, "%s: %s failed get DIMM flags\n",
1436                                 __func__, nvdimm_name(nvdimm));
1437                 return rc;
1438         }
1439
1440         nfit_flush = nfit_mem->nfit_flush;
1441         if (nfit_flush && nfit_flush->flush->hint_count != 0) {
1442                 nfit_blk->nvdimm_flush = devm_ioremap_nocache(dev,
1443                                 nfit_flush->flush->hint_address[0], 8);
1444                 if (!nfit_blk->nvdimm_flush)
1445                         return -ENOMEM;
1446         }
1447
1448         if (!arch_has_wmb_pmem() && !nfit_blk->nvdimm_flush)
1449                 dev_warn(dev, "unable to guarantee persistence of writes\n");
1450
1451         if (mmio->line_size == 0)
1452                 return 0;
1453
1454         if ((u32) nfit_blk->cmd_offset % mmio->line_size
1455                         + 8 > mmio->line_size) {
1456                 dev_dbg(dev, "cmd_offset crosses interleave boundary\n");
1457                 return -ENXIO;
1458         } else if ((u32) nfit_blk->stat_offset % mmio->line_size
1459                         + 8 > mmio->line_size) {
1460                 dev_dbg(dev, "stat_offset crosses interleave boundary\n");
1461                 return -ENXIO;
1462         }
1463
1464         return 0;
1465 }
1466
1467 static void acpi_nfit_blk_region_disable(struct nvdimm_bus *nvdimm_bus,
1468                 struct device *dev)
1469 {
1470         struct nvdimm_bus_descriptor *nd_desc = to_nd_desc(nvdimm_bus);
1471         struct acpi_nfit_desc *acpi_desc = to_acpi_desc(nd_desc);
1472         struct nd_blk_region *ndbr = to_nd_blk_region(dev);
1473         struct nfit_blk *nfit_blk = nd_blk_region_provider_data(ndbr);
1474         int i;
1475
1476         if (!nfit_blk)
1477                 return; /* never enabled */
1478
1479         /* auto-free BLK spa mappings */
1480         for (i = 0; i < 2; i++) {
1481                 struct nfit_blk_mmio *mmio = &nfit_blk->mmio[i];
1482
1483                 if (mmio->addr.base)
1484                         nfit_spa_unmap(acpi_desc, mmio->spa);
1485         }
1486         nd_blk_region_set_provider_data(ndbr, NULL);
1487         /* devm will free nfit_blk */
1488 }
1489
1490 static int acpi_nfit_init_mapping(struct acpi_nfit_desc *acpi_desc,
1491                 struct nd_mapping *nd_mapping, struct nd_region_desc *ndr_desc,
1492                 struct acpi_nfit_memory_map *memdev,
1493                 struct acpi_nfit_system_address *spa)
1494 {
1495         struct nvdimm *nvdimm = acpi_nfit_dimm_by_handle(acpi_desc,
1496                         memdev->device_handle);
1497         struct nd_blk_region_desc *ndbr_desc;
1498         struct nfit_mem *nfit_mem;
1499         int blk_valid = 0;
1500
1501         if (!nvdimm) {
1502                 dev_err(acpi_desc->dev, "spa%d dimm: %#x not found\n",
1503                                 spa->range_index, memdev->device_handle);
1504                 return -ENODEV;
1505         }
1506
1507         nd_mapping->nvdimm = nvdimm;
1508         switch (nfit_spa_type(spa)) {
1509         case NFIT_SPA_PM:
1510         case NFIT_SPA_VOLATILE:
1511                 nd_mapping->start = memdev->address;
1512                 nd_mapping->size = memdev->region_size;
1513                 break;
1514         case NFIT_SPA_DCR:
1515                 nfit_mem = nvdimm_provider_data(nvdimm);
1516                 if (!nfit_mem || !nfit_mem->bdw) {
1517                         dev_dbg(acpi_desc->dev, "spa%d %s missing bdw\n",
1518                                         spa->range_index, nvdimm_name(nvdimm));
1519                 } else {
1520                         nd_mapping->size = nfit_mem->bdw->capacity;
1521                         nd_mapping->start = nfit_mem->bdw->start_address;
1522                         ndr_desc->num_lanes = nfit_mem->bdw->windows;
1523                         blk_valid = 1;
1524                 }
1525
1526                 ndr_desc->nd_mapping = nd_mapping;
1527                 ndr_desc->num_mappings = blk_valid;
1528                 ndbr_desc = to_blk_region_desc(ndr_desc);
1529                 ndbr_desc->enable = acpi_nfit_blk_region_enable;
1530                 ndbr_desc->disable = acpi_nfit_blk_region_disable;
1531                 ndbr_desc->do_io = acpi_desc->blk_do_io;
1532                 if (!nvdimm_blk_region_create(acpi_desc->nvdimm_bus, ndr_desc))
1533                         return -ENOMEM;
1534                 break;
1535         }
1536
1537         return 0;
1538 }
1539
1540 static int acpi_nfit_register_region(struct acpi_nfit_desc *acpi_desc,
1541                 struct nfit_spa *nfit_spa)
1542 {
1543         static struct nd_mapping nd_mappings[ND_MAX_MAPPINGS];
1544         struct acpi_nfit_system_address *spa = nfit_spa->spa;
1545         struct nd_blk_region_desc ndbr_desc;
1546         struct nd_region_desc *ndr_desc;
1547         struct nfit_memdev *nfit_memdev;
1548         struct nvdimm_bus *nvdimm_bus;
1549         struct resource res;
1550         int count = 0, rc;
1551
1552         if (nfit_spa->is_registered)
1553                 return 0;
1554
1555         if (spa->range_index == 0) {
1556                 dev_dbg(acpi_desc->dev, "%s: detected invalid spa index\n",
1557                                 __func__);
1558                 return 0;
1559         }
1560
1561         memset(&res, 0, sizeof(res));
1562         memset(&nd_mappings, 0, sizeof(nd_mappings));
1563         memset(&ndbr_desc, 0, sizeof(ndbr_desc));
1564         res.start = spa->address;
1565         res.end = res.start + spa->length - 1;
1566         ndr_desc = &ndbr_desc.ndr_desc;
1567         ndr_desc->res = &res;
1568         ndr_desc->provider_data = nfit_spa;
1569         ndr_desc->attr_groups = acpi_nfit_region_attribute_groups;
1570         if (spa->flags & ACPI_NFIT_PROXIMITY_VALID)
1571                 ndr_desc->numa_node = acpi_map_pxm_to_online_node(
1572                                                 spa->proximity_domain);
1573         else
1574                 ndr_desc->numa_node = NUMA_NO_NODE;
1575
1576         list_for_each_entry(nfit_memdev, &acpi_desc->memdevs, list) {
1577                 struct acpi_nfit_memory_map *memdev = nfit_memdev->memdev;
1578                 struct nd_mapping *nd_mapping;
1579
1580                 if (memdev->range_index != spa->range_index)
1581                         continue;
1582                 if (count >= ND_MAX_MAPPINGS) {
1583                         dev_err(acpi_desc->dev, "spa%d exceeds max mappings %d\n",
1584                                         spa->range_index, ND_MAX_MAPPINGS);
1585                         return -ENXIO;
1586                 }
1587                 nd_mapping = &nd_mappings[count++];
1588                 rc = acpi_nfit_init_mapping(acpi_desc, nd_mapping, ndr_desc,
1589                                 memdev, spa);
1590                 if (rc)
1591                         return rc;
1592         }
1593
1594         ndr_desc->nd_mapping = nd_mappings;
1595         ndr_desc->num_mappings = count;
1596         rc = acpi_nfit_init_interleave_set(acpi_desc, ndr_desc, spa);
1597         if (rc)
1598                 return rc;
1599
1600         nvdimm_bus = acpi_desc->nvdimm_bus;
1601         if (nfit_spa_type(spa) == NFIT_SPA_PM) {
1602                 if (!nvdimm_pmem_region_create(nvdimm_bus, ndr_desc))
1603                         return -ENOMEM;
1604         } else if (nfit_spa_type(spa) == NFIT_SPA_VOLATILE) {
1605                 if (!nvdimm_volatile_region_create(nvdimm_bus, ndr_desc))
1606                         return -ENOMEM;
1607         }
1608
1609         nfit_spa->is_registered = 1;
1610         return 0;
1611 }
1612
1613 static int acpi_nfit_register_regions(struct acpi_nfit_desc *acpi_desc)
1614 {
1615         struct nfit_spa *nfit_spa;
1616
1617         list_for_each_entry(nfit_spa, &acpi_desc->spas, list) {
1618                 int rc = acpi_nfit_register_region(acpi_desc, nfit_spa);
1619
1620                 if (rc)
1621                         return rc;
1622         }
1623         return 0;
1624 }
1625
1626 static int acpi_nfit_check_deletions(struct acpi_nfit_desc *acpi_desc,
1627                 struct nfit_table_prev *prev)
1628 {
1629         struct device *dev = acpi_desc->dev;
1630
1631         if (!list_empty(&prev->spas) ||
1632                         !list_empty(&prev->memdevs) ||
1633                         !list_empty(&prev->dcrs) ||
1634                         !list_empty(&prev->bdws) ||
1635                         !list_empty(&prev->idts) ||
1636                         !list_empty(&prev->flushes)) {
1637                 dev_err(dev, "new nfit deletes entries (unsupported)\n");
1638                 return -ENXIO;
1639         }
1640         return 0;
1641 }
1642
1643 int acpi_nfit_init(struct acpi_nfit_desc *acpi_desc, acpi_size sz)
1644 {
1645         struct device *dev = acpi_desc->dev;
1646         struct nfit_table_prev prev;
1647         const void *end;
1648         u8 *data;
1649         int rc;
1650
1651         mutex_lock(&acpi_desc->init_mutex);
1652
1653         INIT_LIST_HEAD(&prev.spas);
1654         INIT_LIST_HEAD(&prev.memdevs);
1655         INIT_LIST_HEAD(&prev.dcrs);
1656         INIT_LIST_HEAD(&prev.bdws);
1657         INIT_LIST_HEAD(&prev.idts);
1658         INIT_LIST_HEAD(&prev.flushes);
1659
1660         list_cut_position(&prev.spas, &acpi_desc->spas,
1661                                 acpi_desc->spas.prev);
1662         list_cut_position(&prev.memdevs, &acpi_desc->memdevs,
1663                                 acpi_desc->memdevs.prev);
1664         list_cut_position(&prev.dcrs, &acpi_desc->dcrs,
1665                                 acpi_desc->dcrs.prev);
1666         list_cut_position(&prev.bdws, &acpi_desc->bdws,
1667                                 acpi_desc->bdws.prev);
1668         list_cut_position(&prev.idts, &acpi_desc->idts,
1669                                 acpi_desc->idts.prev);
1670         list_cut_position(&prev.flushes, &acpi_desc->flushes,
1671                                 acpi_desc->flushes.prev);
1672
1673         data = (u8 *) acpi_desc->nfit;
1674         end = data + sz;
1675         while (!IS_ERR_OR_NULL(data))
1676                 data = add_table(acpi_desc, &prev, data, end);
1677
1678         if (IS_ERR(data)) {
1679                 dev_dbg(dev, "%s: nfit table parsing error: %ld\n", __func__,
1680                                 PTR_ERR(data));
1681                 rc = PTR_ERR(data);
1682                 goto out_unlock;
1683         }
1684
1685         rc = acpi_nfit_check_deletions(acpi_desc, &prev);
1686         if (rc)
1687                 goto out_unlock;
1688
1689         if (nfit_mem_init(acpi_desc) != 0) {
1690                 rc = -ENOMEM;
1691                 goto out_unlock;
1692         }
1693
1694         acpi_nfit_init_dsms(acpi_desc);
1695
1696         rc = acpi_nfit_register_dimms(acpi_desc);
1697         if (rc)
1698                 goto out_unlock;
1699
1700         rc = acpi_nfit_register_regions(acpi_desc);
1701
1702  out_unlock:
1703         mutex_unlock(&acpi_desc->init_mutex);
1704         return rc;
1705 }
1706 EXPORT_SYMBOL_GPL(acpi_nfit_init);
1707
1708 static struct acpi_nfit_desc *acpi_nfit_desc_init(struct acpi_device *adev)
1709 {
1710         struct nvdimm_bus_descriptor *nd_desc;
1711         struct acpi_nfit_desc *acpi_desc;
1712         struct device *dev = &adev->dev;
1713
1714         acpi_desc = devm_kzalloc(dev, sizeof(*acpi_desc), GFP_KERNEL);
1715         if (!acpi_desc)
1716                 return ERR_PTR(-ENOMEM);
1717
1718         dev_set_drvdata(dev, acpi_desc);
1719         acpi_desc->dev = dev;
1720         acpi_desc->blk_do_io = acpi_nfit_blk_region_do_io;
1721         nd_desc = &acpi_desc->nd_desc;
1722         nd_desc->provider_name = "ACPI.NFIT";
1723         nd_desc->ndctl = acpi_nfit_ctl;
1724         nd_desc->attr_groups = acpi_nfit_attribute_groups;
1725
1726         acpi_desc->nvdimm_bus = nvdimm_bus_register(dev, nd_desc);
1727         if (!acpi_desc->nvdimm_bus) {
1728                 devm_kfree(dev, acpi_desc);
1729                 return ERR_PTR(-ENXIO);
1730         }
1731
1732         INIT_LIST_HEAD(&acpi_desc->spa_maps);
1733         INIT_LIST_HEAD(&acpi_desc->spas);
1734         INIT_LIST_HEAD(&acpi_desc->dcrs);
1735         INIT_LIST_HEAD(&acpi_desc->bdws);
1736         INIT_LIST_HEAD(&acpi_desc->idts);
1737         INIT_LIST_HEAD(&acpi_desc->flushes);
1738         INIT_LIST_HEAD(&acpi_desc->memdevs);
1739         INIT_LIST_HEAD(&acpi_desc->dimms);
1740         mutex_init(&acpi_desc->spa_map_mutex);
1741         mutex_init(&acpi_desc->init_mutex);
1742
1743         return acpi_desc;
1744 }
1745
1746 static int acpi_nfit_add(struct acpi_device *adev)
1747 {
1748         struct acpi_buffer buf = { ACPI_ALLOCATE_BUFFER, NULL };
1749         struct acpi_nfit_desc *acpi_desc;
1750         struct device *dev = &adev->dev;
1751         struct acpi_table_header *tbl;
1752         acpi_status status = AE_OK;
1753         acpi_size sz;
1754         int rc;
1755
1756         status = acpi_get_table_with_size("NFIT", 0, &tbl, &sz);
1757         if (ACPI_FAILURE(status)) {
1758                 /* This is ok, we could have an nvdimm hotplugged later */
1759                 dev_dbg(dev, "failed to find NFIT at startup\n");
1760                 return 0;
1761         }
1762
1763         acpi_desc = acpi_nfit_desc_init(adev);
1764         if (IS_ERR(acpi_desc)) {
1765                 dev_err(dev, "%s: error initializing acpi_desc: %ld\n",
1766                                 __func__, PTR_ERR(acpi_desc));
1767                 return PTR_ERR(acpi_desc);
1768         }
1769
1770         /*
1771          * Save the acpi header for later and then skip it,
1772          * making nfit point to the first nfit table header.
1773          */
1774         acpi_desc->acpi_header = *tbl;
1775         acpi_desc->nfit = (void *) tbl + sizeof(struct acpi_table_nfit);
1776         sz -= sizeof(struct acpi_table_nfit);
1777
1778         /* Evaluate _FIT and override with that if present */
1779         status = acpi_evaluate_object(adev->handle, "_FIT", NULL, &buf);
1780         if (ACPI_SUCCESS(status) && buf.length > 0) {
1781                 union acpi_object *obj;
1782                 /*
1783                  * Adjust for the acpi_object header of the _FIT
1784                  */
1785                 obj = buf.pointer;
1786                 if (obj->type == ACPI_TYPE_BUFFER) {
1787                         acpi_desc->nfit =
1788                                 (struct acpi_nfit_header *)obj->buffer.pointer;
1789                         sz = obj->buffer.length;
1790                 } else
1791                         dev_dbg(dev, "%s invalid type %d, ignoring _FIT\n",
1792                                  __func__, (int) obj->type);
1793         }
1794
1795         rc = acpi_nfit_init(acpi_desc, sz);
1796         if (rc) {
1797                 nvdimm_bus_unregister(acpi_desc->nvdimm_bus);
1798                 return rc;
1799         }
1800         return 0;
1801 }
1802
1803 static int acpi_nfit_remove(struct acpi_device *adev)
1804 {
1805         struct acpi_nfit_desc *acpi_desc = dev_get_drvdata(&adev->dev);
1806
1807         nvdimm_bus_unregister(acpi_desc->nvdimm_bus);
1808         return 0;
1809 }
1810
1811 static void acpi_nfit_notify(struct acpi_device *adev, u32 event)
1812 {
1813         struct acpi_nfit_desc *acpi_desc = dev_get_drvdata(&adev->dev);
1814         struct acpi_buffer buf = { ACPI_ALLOCATE_BUFFER, NULL };
1815         struct acpi_nfit_header *nfit_saved;
1816         union acpi_object *obj;
1817         struct device *dev = &adev->dev;
1818         acpi_status status;
1819         int ret;
1820
1821         dev_dbg(dev, "%s: event: %d\n", __func__, event);
1822
1823         if (event != NFIT_NOTIFY_UPDATE)
1824                 return;
1825
1826         device_lock(dev);
1827         if (!dev->driver) {
1828                 /* dev->driver may be null if we're being removed */
1829                 dev_dbg(dev, "%s: no driver found for dev\n", __func__);
1830                 goto out_unlock;
1831         }
1832
1833         if (!acpi_desc) {
1834                 acpi_desc = acpi_nfit_desc_init(adev);
1835                 if (IS_ERR(acpi_desc)) {
1836                         dev_err(dev, "%s: error initializing acpi_desc: %ld\n",
1837                                 __func__, PTR_ERR(acpi_desc));
1838                         goto out_unlock;
1839                 }
1840         }
1841
1842         /* Evaluate _FIT */
1843         status = acpi_evaluate_object(adev->handle, "_FIT", NULL, &buf);
1844         if (ACPI_FAILURE(status)) {
1845                 dev_err(dev, "failed to evaluate _FIT\n");
1846                 goto out_unlock;
1847         }
1848
1849         nfit_saved = acpi_desc->nfit;
1850         obj = buf.pointer;
1851         if (obj->type == ACPI_TYPE_BUFFER) {
1852                 acpi_desc->nfit =
1853                         (struct acpi_nfit_header *)obj->buffer.pointer;
1854                 ret = acpi_nfit_init(acpi_desc, obj->buffer.length);
1855                 if (ret) {
1856                         /* Merge failed, restore old nfit, and exit */
1857                         acpi_desc->nfit = nfit_saved;
1858                         dev_err(dev, "failed to merge updated NFIT\n");
1859                 }
1860         } else {
1861                 /* Bad _FIT, restore old nfit */
1862                 dev_err(dev, "Invalid _FIT\n");
1863         }
1864         kfree(buf.pointer);
1865
1866  out_unlock:
1867         device_unlock(dev);
1868 }
1869
1870 static const struct acpi_device_id acpi_nfit_ids[] = {
1871         { "ACPI0012", 0 },
1872         { "", 0 },
1873 };
1874 MODULE_DEVICE_TABLE(acpi, acpi_nfit_ids);
1875
1876 static struct acpi_driver acpi_nfit_driver = {
1877         .name = KBUILD_MODNAME,
1878         .ids = acpi_nfit_ids,
1879         .ops = {
1880                 .add = acpi_nfit_add,
1881                 .remove = acpi_nfit_remove,
1882                 .notify = acpi_nfit_notify,
1883         },
1884 };
1885
1886 static __init int nfit_init(void)
1887 {
1888         BUILD_BUG_ON(sizeof(struct acpi_table_nfit) != 40);
1889         BUILD_BUG_ON(sizeof(struct acpi_nfit_system_address) != 56);
1890         BUILD_BUG_ON(sizeof(struct acpi_nfit_memory_map) != 48);
1891         BUILD_BUG_ON(sizeof(struct acpi_nfit_interleave) != 20);
1892         BUILD_BUG_ON(sizeof(struct acpi_nfit_smbios) != 9);
1893         BUILD_BUG_ON(sizeof(struct acpi_nfit_control_region) != 80);
1894         BUILD_BUG_ON(sizeof(struct acpi_nfit_data_region) != 40);
1895
1896         acpi_str_to_uuid(UUID_VOLATILE_MEMORY, nfit_uuid[NFIT_SPA_VOLATILE]);
1897         acpi_str_to_uuid(UUID_PERSISTENT_MEMORY, nfit_uuid[NFIT_SPA_PM]);
1898         acpi_str_to_uuid(UUID_CONTROL_REGION, nfit_uuid[NFIT_SPA_DCR]);
1899         acpi_str_to_uuid(UUID_DATA_REGION, nfit_uuid[NFIT_SPA_BDW]);
1900         acpi_str_to_uuid(UUID_VOLATILE_VIRTUAL_DISK, nfit_uuid[NFIT_SPA_VDISK]);
1901         acpi_str_to_uuid(UUID_VOLATILE_VIRTUAL_CD, nfit_uuid[NFIT_SPA_VCD]);
1902         acpi_str_to_uuid(UUID_PERSISTENT_VIRTUAL_DISK, nfit_uuid[NFIT_SPA_PDISK]);
1903         acpi_str_to_uuid(UUID_PERSISTENT_VIRTUAL_CD, nfit_uuid[NFIT_SPA_PCD]);
1904         acpi_str_to_uuid(UUID_NFIT_BUS, nfit_uuid[NFIT_DEV_BUS]);
1905         acpi_str_to_uuid(UUID_NFIT_DIMM, nfit_uuid[NFIT_DEV_DIMM]);
1906
1907         return acpi_bus_register_driver(&acpi_nfit_driver);
1908 }
1909
1910 static __exit void nfit_exit(void)
1911 {
1912         acpi_bus_unregister_driver(&acpi_nfit_driver);
1913 }
1914
1915 module_init(nfit_init);
1916 module_exit(nfit_exit);
1917 MODULE_LICENSE("GPL v2");
1918 MODULE_AUTHOR("Intel Corporation");