drivers/scsi/aic94xx/aic94xx_sds.c

   1 /*
   2  * Aic94xx SAS/SATA driver access to shared data structures and memory
   3  * maps.
   4  *
   5  * Copyright (C) 2005 Adaptec, Inc.  All rights reserved.
   6  * Copyright (C) 2005 Luben Tuikov <luben_tuikov@adaptec.com>
   7  *
   8  * This file is licensed under GPLv2.
   9  *
  10  * This file is part of the aic94xx driver.
  11  *
  12  * The aic94xx driver is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU General Public License as
  14  * published by the Free Software Foundation; version 2 of the
  15  * License.
  16  *
  17  * The aic94xx driver is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  20  * General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU General Public License
  23  * along with the aic94xx driver; if not, write to the Free Software
  24  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  25  *
  26  */
  27
  28 #include <linux/pci.h>
  29 #include <linux/delay.h>
  30
  31 #include "aic94xx.h"
  32 #include "aic94xx_reg.h"
  33 #include "aic94xx_sds.h"
  34
  35 /* ---------- OCM stuff ---------- */
  36
  37 struct asd_ocm_dir_ent {
  38         u8 type;
  39         u8 offs[3];
  40         u8 _r1;
  41         u8 size[3];
  42 } __attribute__ ((packed));
  43
  44 struct asd_ocm_dir {
  45         char sig[2];
  46         u8   _r1[2];
  47         u8   major;          /* 0 */
  48         u8   minor;          /* 0 */
  49         u8   _r2;
  50         u8   num_de;
  51         struct asd_ocm_dir_ent entry[15];
  52 } __attribute__ ((packed));
  53
  54 #define OCM_DE_OCM_DIR                  0x00
  55 #define OCM_DE_WIN_DRVR                 0x01
  56 #define OCM_DE_BIOS_CHIM                0x02
  57 #define OCM_DE_RAID_ENGN                0x03
  58 #define OCM_DE_BIOS_INTL                0x04
  59 #define OCM_DE_BIOS_CHIM_OSM            0x05
  60 #define OCM_DE_BIOS_CHIM_DYNAMIC        0x06
  61 #define OCM_DE_ADDC2C_RES0              0x07
  62 #define OCM_DE_ADDC2C_RES1              0x08
  63 #define OCM_DE_ADDC2C_RES2              0x09
  64 #define OCM_DE_ADDC2C_RES3              0x0A
  65
  66 #define OCM_INIT_DIR_ENTRIES    5
  67 /***************************************************************************
  68 *  OCM directory default
  69 ***************************************************************************/
  70 static struct asd_ocm_dir OCMDirInit =
  71 {
  72         .sig = {0x4D, 0x4F},    /* signature */
  73         .num_de = OCM_INIT_DIR_ENTRIES, /* no. of directory entries */
  74 };
  75
  76 /***************************************************************************
  77 *  OCM directory Entries default
  78 ***************************************************************************/
  79 static struct asd_ocm_dir_ent OCMDirEntriesInit[OCM_INIT_DIR_ENTRIES] =
  80 {
  81         {
  82                 .type = (OCM_DE_ADDC2C_RES0),   /* Entry type  */
  83                 .offs = {128},                  /* Offset */
  84                 .size = {0, 4},                 /* size */
  85         },
  86         {
  87                 .type = (OCM_DE_ADDC2C_RES1),   /* Entry type  */
  88                 .offs = {128, 4},               /* Offset */
  89                 .size = {0, 4},                 /* size */
  90         },
  91         {
  92                 .type = (OCM_DE_ADDC2C_RES2),   /* Entry type  */
  93                 .offs = {128, 8},               /* Offset */
  94                 .size = {0, 4},                 /* size */
  95         },
  96         {
  97                 .type = (OCM_DE_ADDC2C_RES3),   /* Entry type  */
  98                 .offs = {128, 12},              /* Offset */
  99                 .size = {0, 4},                 /* size */
 100         },
 101         {
 102                 .type = (OCM_DE_WIN_DRVR),      /* Entry type  */
 103                 .offs = {128, 16},              /* Offset */
 104                 .size = {128, 235, 1},          /* size */
 105         },
 106 };
 107
 108 struct asd_bios_chim_struct {
 109         char sig[4];
 110         u8   major;          /* 1 */
 111         u8   minor;          /* 0 */
 112         u8   bios_major;
 113         u8   bios_minor;
 114         __le32  bios_build;
 115         u8   flags;
 116         u8   pci_slot;
 117         __le16  ue_num;
 118         __le16  ue_size;
 119         u8  _r[14];
 120         /* The unit element array is right here.
 121          */
 122 } __attribute__ ((packed));
 123
 124 /**
 125  * asd_read_ocm_seg - read an on chip memory (OCM) segment
 126  * @asd_ha: pointer to the host adapter structure
 127  * @buffer: where to write the read data
 128  * @offs: offset into OCM where to read from
 129  * @size: how many bytes to read
 130  *
 131  * Return the number of bytes not read. Return 0 on success.
 132  */
 133 static int asd_read_ocm_seg(struct asd_ha_struct *asd_ha, void *buffer,
 134                             u32 offs, int size)
 135 {
 136         u8 *p = buffer;
 137         if (unlikely(asd_ha->iospace))
 138                 asd_read_reg_string(asd_ha, buffer, offs+OCM_BASE_ADDR, size);
 139         else {
 140                 for ( ; size > 0; size--, offs++, p++)
 141                         *p = asd_read_ocm_byte(asd_ha, offs);
 142         }
 143         return size;
 144 }
 145
 146 static int asd_read_ocm_dir(struct asd_ha_struct *asd_ha,
 147                             struct asd_ocm_dir *dir, u32 offs)
 148 {
 149         int err = asd_read_ocm_seg(asd_ha, dir, offs, sizeof(*dir));
 150         if (err) {
 151                 ASD_DPRINTK("couldn't read ocm segment\n");
 152                 return err;
 153         }
 154
 155         if (dir->sig[0] != 'M' || dir->sig[1] != 'O') {
 156                 ASD_DPRINTK("no valid dir signature(%c%c) at start of OCM\n",
 157                             dir->sig[0], dir->sig[1]);
 158                 return -ENOENT;
 159         }
 160         if (dir->major != 0) {
 161                 asd_printk("unsupported major version of ocm dir:0x%x\n",
 162                            dir->major);
 163                 return -ENOENT;
 164         }
 165         dir->num_de &= 0xf;
 166         return 0;
 167 }
 168
 169 /**
 170  * asd_write_ocm_seg - write an on chip memory (OCM) segment
 171  * @asd_ha: pointer to the host adapter structure
 172  * @buffer: where to read the write data
 173  * @offs: offset into OCM to write to
 174  * @size: how many bytes to write
 175  *
 176  * Return the number of bytes not written. Return 0 on success.
 177  */
 178 static void asd_write_ocm_seg(struct asd_ha_struct *asd_ha, void *buffer,
 179                             u32 offs, int size)
 180 {
 181         u8 *p = buffer;
 182         if (unlikely(asd_ha->iospace))
 183                 asd_write_reg_string(asd_ha, buffer, offs+OCM_BASE_ADDR, size);
 184         else {
 185                 for ( ; size > 0; size--, offs++, p++)
 186                         asd_write_ocm_byte(asd_ha, offs, *p);
 187         }
 188         return;
 189 }
 190
 191 #define THREE_TO_NUM(X) ((X)[0] | ((X)[1] << 8) | ((X)[2] << 16))
 192
 193 static int asd_find_dir_entry(struct asd_ocm_dir *dir, u8 type,
 194                               u32 *offs, u32 *size)
 195 {
 196         int i;
 197         struct asd_ocm_dir_ent *ent;
 198
 199         for (i = 0; i < dir->num_de; i++) {
 200                 if (dir->entry[i].type == type)
 201                         break;
 202         }
 203         if (i >= dir->num_de)
 204                 return -ENOENT;
 205         ent = &dir->entry[i];
 206         *offs = (u32) THREE_TO_NUM(ent->offs);
 207         *size = (u32) THREE_TO_NUM(ent->size);
 208         return 0;
 209 }
 210
 211 #define OCM_BIOS_CHIM_DE  2
 212 #define BC_BIOS_PRESENT   1
 213
 214 static int asd_get_bios_chim(struct asd_ha_struct *asd_ha,
 215                              struct asd_ocm_dir *dir)
 216 {
 217         int err;
 218         struct asd_bios_chim_struct *bc_struct;
 219         u32 offs, size;
 220
 221         err = asd_find_dir_entry(dir, OCM_BIOS_CHIM_DE, &offs, &size);
 222         if (err) {
 223                 ASD_DPRINTK("couldn't find BIOS_CHIM dir ent\n");
 224                 goto out;
 225         }
 226         err = -ENOMEM;
 227         bc_struct = kmalloc(sizeof(*bc_struct), GFP_KERNEL);
 228         if (!bc_struct) {
 229                 asd_printk("no memory for bios_chim struct\n");
 230                 goto out;
 231         }
 232         err = asd_read_ocm_seg(asd_ha, (void *)bc_struct, offs,
 233                                sizeof(*bc_struct));
 234         if (err) {
 235                 ASD_DPRINTK("couldn't read ocm segment\n");
 236                 goto out2;
 237         }
 238         if (strncmp(bc_struct->sig, "SOIB", 4)
 239             && strncmp(bc_struct->sig, "IPSA", 4)) {
 240                 ASD_DPRINTK("BIOS_CHIM entry has no valid sig(%c%c%c%c)\n",
 241                             bc_struct->sig[0], bc_struct->sig[1],
 242                             bc_struct->sig[2], bc_struct->sig[3]);
 243                 err = -ENOENT;
 244                 goto out2;
 245         }
 246         if (bc_struct->major != 1) {
 247                 asd_printk("BIOS_CHIM unsupported major version:0x%x\n",
 248                            bc_struct->major);
 249                 err = -ENOENT;
 250                 goto out2;
 251         }
 252         if (bc_struct->flags & BC_BIOS_PRESENT) {
 253                 asd_ha->hw_prof.bios.present = 1;
 254                 asd_ha->hw_prof.bios.maj = bc_struct->bios_major;
 255                 asd_ha->hw_prof.bios.min = bc_struct->bios_minor;
 256                 asd_ha->hw_prof.bios.bld = le32_to_cpu(bc_struct->bios_build);
 257                 ASD_DPRINTK("BIOS present (%d,%d), %d\n",
 258                             asd_ha->hw_prof.bios.maj,
 259                             asd_ha->hw_prof.bios.min,
 260                             asd_ha->hw_prof.bios.bld);
 261         }
 262         asd_ha->hw_prof.ue.num = le16_to_cpu(bc_struct->ue_num);
 263         asd_ha->hw_prof.ue.size= le16_to_cpu(bc_struct->ue_size);
 264         ASD_DPRINTK("ue num:%d, ue size:%d\n", asd_ha->hw_prof.ue.num,
 265                     asd_ha->hw_prof.ue.size);
 266         size = asd_ha->hw_prof.ue.num * asd_ha->hw_prof.ue.size;
 267         if (size > 0) {
 268                 err = -ENOMEM;
 269                 asd_ha->hw_prof.ue.area = kmalloc(size, GFP_KERNEL);
 270                 if (!asd_ha->hw_prof.ue.area)
 271                         goto out2;
 272                 err = asd_read_ocm_seg(asd_ha, (void *)asd_ha->hw_prof.ue.area,
 273                                        offs + sizeof(*bc_struct), size);
 274                 if (err) {
 275                         kfree(asd_ha->hw_prof.ue.area);
 276                         asd_ha->hw_prof.ue.area = NULL;
 277                         asd_ha->hw_prof.ue.num  = 0;
 278                         asd_ha->hw_prof.ue.size = 0;
 279                         ASD_DPRINTK("couldn't read ue entries(%d)\n", err);
 280                 }
 281         }
 282 out2:
 283         kfree(bc_struct);
 284 out:
 285         return err;
 286 }
 287
 288 static void
 289 asd_hwi_initialize_ocm_dir (struct asd_ha_struct *asd_ha)
 290 {
 291         int i;
 292
 293         /* Zero OCM */
 294         for (i = 0; i < OCM_MAX_SIZE; i += 4)
 295                 asd_write_ocm_dword(asd_ha, i, 0);
 296
 297         /* Write Dir */
 298         asd_write_ocm_seg(asd_ha, &OCMDirInit, 0,
 299                           sizeof(struct asd_ocm_dir));
 300
 301         /* Write Dir Entries */
 302         for (i = 0; i < OCM_INIT_DIR_ENTRIES; i++)
 303                 asd_write_ocm_seg(asd_ha, &OCMDirEntriesInit[i],
 304                                   sizeof(struct asd_ocm_dir) +
 305                                   (i * sizeof(struct asd_ocm_dir_ent))
 306                                   , sizeof(struct asd_ocm_dir_ent));
 307
 308 }
 309
 310 static int
 311 asd_hwi_check_ocm_access (struct asd_ha_struct *asd_ha)
 312 {
 313         struct pci_dev *pcidev = asd_ha->pcidev;
 314         u32 reg;
 315         int err = 0;
 316         u32 v;
 317
 318         /* check if OCM has been initialized by BIOS */
 319         reg = asd_read_reg_dword(asd_ha, EXSICNFGR);
 320
 321         if (!(reg & OCMINITIALIZED)) {
 322                 err = pci_read_config_dword(pcidev, PCIC_INTRPT_STAT, &v);
 323                 if (err) {
 324                         asd_printk("couldn't access PCIC_INTRPT_STAT of %s\n",
 325                                         pci_name(pcidev));
 326                         goto out;
 327                 }
 328
 329                 printk(KERN_INFO "OCM is not initialized by BIOS,"
 330                        "reinitialize it and ignore it, current IntrptStatus"
 331                        "is 0x%x\n", v);
 332
 333                 if (v)
 334                         err = pci_write_config_dword(pcidev,
 335                                                      PCIC_INTRPT_STAT, v);
 336                 if (err) {
 337                         asd_printk("couldn't write PCIC_INTRPT_STAT of %s\n",
 338                                         pci_name(pcidev));
 339                         goto out;
 340                 }
 341
 342                 asd_hwi_initialize_ocm_dir(asd_ha);
 343
 344         }
 345 out:
 346         return err;
 347 }
 348
 349 /**
 350  * asd_read_ocm - read on chip memory (OCM)
 351  * @asd_ha: pointer to the host adapter structure
 352  */
 353 int asd_read_ocm(struct asd_ha_struct *asd_ha)
 354 {
 355         int err;
 356         struct asd_ocm_dir *dir;
 357
 358         if (asd_hwi_check_ocm_access(asd_ha))
 359                 return -1;
 360
 361         dir = kmalloc(sizeof(*dir), GFP_KERNEL);
 362         if (!dir) {
 363                 asd_printk("no memory for ocm dir\n");
 364                 return -ENOMEM;
 365         }
 366
 367         err = asd_read_ocm_dir(asd_ha, dir, 0);
 368         if (err)
 369                 goto out;
 370
 371         err = asd_get_bios_chim(asd_ha, dir);
 372 out:
 373         kfree(dir);
 374         return err;
 375 }
 376
 377 /* ---------- FLASH stuff ---------- */
 378
 379 #define FLASH_RESET                     0xF0
 380
 381 #define ASD_FLASH_SIZE                  0x200000
 382 #define FLASH_DIR_COOKIE                "*** ADAPTEC FLASH DIRECTORY *** "
 383 #define FLASH_NEXT_ENTRY_OFFS           0x2000
 384 #define FLASH_MAX_DIR_ENTRIES           32
 385
 386 #define FLASH_DE_TYPE_MASK              0x3FFFFFFF
 387 #define FLASH_DE_MS                     0x120
 388 #define FLASH_DE_CTRL_A_USER            0xE0
 389
 390 struct asd_flash_de {
 391         __le32   type;
 392         __le32   offs;
 393         __le32   pad_size;
 394         __le32   image_size;
 395         __le32   chksum;
 396         u8       _r[12];
 397         u8       version[32];
 398 } __attribute__ ((packed));
 399
 400 struct asd_flash_dir {
 401         u8    cookie[32];
 402         __le32   rev;             /* 2 */
 403         __le32   chksum;
 404         __le32   chksum_antidote;
 405         __le32   bld;
 406         u8    bld_id[32];         /* build id data */
 407         u8    ver_data[32];       /* date and time of build */
 408         __le32   ae_mask;
 409         __le32   v_mask;
 410         __le32   oc_mask;
 411         u8    _r[20];
 412         struct asd_flash_de dir_entry[FLASH_MAX_DIR_ENTRIES];
 413 } __attribute__ ((packed));
 414
 415 struct asd_manuf_sec {
 416         char  sig[2];             /* 'S', 'M' */
 417         u16   offs_next;
 418         u8    maj;           /* 0 */
 419         u8    min;           /* 0 */
 420         u16   chksum;
 421         u16   size;
 422         u8    _r[6];
 423         u8    sas_addr[SAS_ADDR_SIZE];
 424         u8    pcba_sn[ASD_PCBA_SN_SIZE];
 425         /* Here start the other segments */
 426         u8    linked_list[0];
 427 } __attribute__ ((packed));
 428
 429 struct asd_manuf_phy_desc {
 430         u8    state;         /* low 4 bits */
 431 #define MS_PHY_STATE_ENABLED    0
 432 #define MS_PHY_STATE_REPORTED   1
 433 #define MS_PHY_STATE_HIDDEN     2
 434         u8    phy_id;
 435         u16   _r;
 436         u8    phy_control_0; /* mode 5 reg 0x160 */
 437         u8    phy_control_1; /* mode 5 reg 0x161 */
 438         u8    phy_control_2; /* mode 5 reg 0x162 */
 439         u8    phy_control_3; /* mode 5 reg 0x163 */
 440 } __attribute__ ((packed));
 441
 442 struct asd_manuf_phy_param {
 443         char  sig[2];             /* 'P', 'M' */
 444         u16   next;
 445         u8    maj;           /* 0 */
 446         u8    min;           /* 2 */
 447         u8    num_phy_desc;  /* 8 */
 448         u8    phy_desc_size; /* 8 */
 449         u8    _r[3];
 450         u8    usage_model_id;
 451         u32   _r2;
 452         struct asd_manuf_phy_desc phy_desc[ASD_MAX_PHYS];
 453 } __attribute__ ((packed));
 454
 455 #if 0
 456 static const char *asd_sb_type[] = {
 457         "unknown",
 458         "SGPIO",
 459         [2 ... 0x7F] = "unknown",
 460         [0x80] = "ADPT_I2C",
 461         [0x81 ... 0xFF] = "VENDOR_UNIQUExx"
 462 };
 463 #endif
 464
 465 struct asd_ms_sb_desc {
 466         u8    type;
 467         u8    node_desc_index;
 468         u8    conn_desc_index;
 469         u8    _recvd[0];
 470 } __attribute__ ((packed));
 471
 472 #if 0
 473 static const char *asd_conn_type[] = {
 474         [0 ... 7] = "unknown",
 475         "SFF8470",
 476         "SFF8482",
 477         "SFF8484",
 478         [0x80] = "PCIX_DAUGHTER0",
 479         [0x81] = "SAS_DAUGHTER0",
 480         [0x82 ... 0xFF] = "VENDOR_UNIQUExx"
 481 };
 482
 483 static const char *asd_conn_location[] = {
 484         "unknown",
 485         "internal",
 486         "external",
 487         "board_to_board",
 488 };
 489 #endif
 490
 491 struct asd_ms_conn_desc {
 492         u8    type;
 493         u8    location;
 494         u8    num_sideband_desc;
 495         u8    size_sideband_desc;
 496         u32   _resvd;
 497         u8    name[16];
 498         struct asd_ms_sb_desc sb_desc[0];
 499 } __attribute__ ((packed));
 500
 501 struct asd_nd_phy_desc {
 502         u8    vp_attch_type;
 503         u8    attch_specific[0];
 504 } __attribute__ ((packed));
 505
 506 #if 0
 507 static const char *asd_node_type[] = {
 508         "IOP",
 509         "IO_CONTROLLER",
 510         "EXPANDER",
 511         "PORT_MULTIPLIER",
 512         "PORT_MULTIPLEXER",
 513         "MULTI_DROP_I2C_BUS",
 514 };
 515 #endif
 516
 517 struct asd_ms_node_desc {
 518         u8    type;
 519         u8    num_phy_desc;
 520         u8    size_phy_desc;
 521         u8    _resvd;
 522         u8    name[16];
 523         struct asd_nd_phy_desc phy_desc[0];
 524 } __attribute__ ((packed));
 525
 526 struct asd_ms_conn_map {
 527         char  sig[2];             /* 'M', 'C' */
 528         __le16 next;
 529         u8    maj;                /* 0 */
 530         u8    min;                /* 0 */
 531         __le16 cm_size;           /* size of this struct */
 532         u8    num_conn;
 533         u8    conn_size;
 534         u8    num_nodes;
 535         u8    usage_model_id;
 536         u32   _resvd;
 537         struct asd_ms_conn_desc conn_desc[0];
 538         struct asd_ms_node_desc node_desc[0];
 539 } __attribute__ ((packed));
 540
 541 struct asd_ctrla_phy_entry {
 542         u8    sas_addr[SAS_ADDR_SIZE];
 543         u8    sas_link_rates;  /* max in hi bits, min in low bits */
 544         u8    flags;
 545         u8    sata_link_rates;
 546         u8    _r[5];
 547 } __attribute__ ((packed));
 548
 549 struct asd_ctrla_phy_settings {
 550         u8    id0;                /* P'h'y */
 551         u8    _r;
 552         u16   next;
 553         u8    num_phys;       /* number of PHYs in the PCI function */
 554         u8    _r2[3];
 555         struct asd_ctrla_phy_entry phy_ent[ASD_MAX_PHYS];
 556 } __attribute__ ((packed));
 557
 558 struct asd_ll_el {
 559         u8   id0;
 560         u8   id1;
 561         __le16  next;
 562         u8   something_here[0];
 563 } __attribute__ ((packed));
 564
 565 static int asd_poll_flash(struct asd_ha_struct *asd_ha)
 566 {
 567         int c;
 568         u8 d;
 569
 570         for (c = 5000; c > 0; c--) {
 571                 d  = asd_read_reg_byte(asd_ha, asd_ha->hw_prof.flash.bar);
 572                 d ^= asd_read_reg_byte(asd_ha, asd_ha->hw_prof.flash.bar);
 573                 if (!d)
 574                         return 0;
 575                 udelay(5);
 576         }
 577         return -ENOENT;
 578 }
 579
 580 static int asd_reset_flash(struct asd_ha_struct *asd_ha)
 581 {
 582         int err;
 583
 584         err = asd_poll_flash(asd_ha);
 585         if (err)
 586                 return err;
 587         asd_write_reg_byte(asd_ha, asd_ha->hw_prof.flash.bar, FLASH_RESET);
 588         err = asd_poll_flash(asd_ha);
 589
 590         return err;
 591 }
 592
 593 static inline int asd_read_flash_seg(struct asd_ha_struct *asd_ha,
 594                                      void *buffer, u32 offs, int size)
 595 {
 596         asd_read_reg_string(asd_ha, buffer, asd_ha->hw_prof.flash.bar+offs,
 597                             size);
 598         return 0;
 599 }
 600
 601 /**
 602  * asd_find_flash_dir - finds and reads the flash directory
 603  * @asd_ha: pointer to the host adapter structure
 604  * @flash_dir: pointer to flash directory structure
 605  *
 606  * If found, the flash directory segment will be copied to
 607  * @flash_dir.  Return 1 if found, 0 if not.
 608  */
 609 static int asd_find_flash_dir(struct asd_ha_struct *asd_ha,
 610                               struct asd_flash_dir *flash_dir)
 611 {
 612         u32 v;
 613         for (v = 0; v < ASD_FLASH_SIZE; v += FLASH_NEXT_ENTRY_OFFS) {
 614                 asd_read_flash_seg(asd_ha, flash_dir, v,
 615                                    sizeof(FLASH_DIR_COOKIE)-1);
 616                 if (memcmp(flash_dir->cookie, FLASH_DIR_COOKIE,
 617                            sizeof(FLASH_DIR_COOKIE)-1) == 0) {
 618                         asd_ha->hw_prof.flash.dir_offs = v;
 619                         asd_read_flash_seg(asd_ha, flash_dir, v,
 620                                            sizeof(*flash_dir));
 621                         return 1;
 622                 }
 623         }
 624         return 0;
 625 }
 626
 627 static int asd_flash_getid(struct asd_ha_struct *asd_ha)
 628 {
 629         int err = 0;
 630         u32 reg;
 631
 632         reg = asd_read_reg_dword(asd_ha, EXSICNFGR);
 633
 634         if (pci_read_config_dword(asd_ha->pcidev, PCI_CONF_FLSH_BAR,
 635                                   &asd_ha->hw_prof.flash.bar)) {
 636                 asd_printk("couldn't read PCI_CONF_FLSH_BAR of %s\n",
 637                            pci_name(asd_ha->pcidev));
 638                 return -ENOENT;
 639         }
 640         asd_ha->hw_prof.flash.present = 1;
 641         asd_ha->hw_prof.flash.wide = reg & FLASHW ? 1 : 0;
 642         err = asd_reset_flash(asd_ha);
 643         if (err) {
 644                 ASD_DPRINTK("couldn't reset flash(%d)\n", err);
 645                 return err;
 646         }
 647         return 0;
 648 }
 649
 650 static u16 asd_calc_flash_chksum(u16 *p, int size)
 651 {
 652         u16 chksum = 0;
 653
 654         while (size-- > 0)
 655                 chksum += *p++;
 656
 657         return chksum;
 658 }
 659
 660
 661 static int asd_find_flash_de(struct asd_flash_dir *flash_dir, u32 entry_type,
 662                              u32 *offs, u32 *size)
 663 {
 664         int i;
 665         struct asd_flash_de *de;
 666
 667         for (i = 0; i < FLASH_MAX_DIR_ENTRIES; i++) {
 668                 u32 type = le32_to_cpu(flash_dir->dir_entry[i].type);
 669
 670                 type &= FLASH_DE_TYPE_MASK;
 671                 if (type == entry_type)
 672                         break;
 673         }
 674         if (i >= FLASH_MAX_DIR_ENTRIES)
 675                 return -ENOENT;
 676         de = &flash_dir->dir_entry[i];
 677         *offs = le32_to_cpu(de->offs);
 678         *size = le32_to_cpu(de->pad_size);
 679         return 0;
 680 }
 681
 682 static int asd_validate_ms(struct asd_manuf_sec *ms)
 683 {
 684         if (ms->sig[0] != 'S' || ms->sig[1] != 'M') {
 685                 ASD_DPRINTK("manuf sec: no valid sig(%c%c)\n",
 686                             ms->sig[0], ms->sig[1]);
 687                 return -ENOENT;
 688         }
 689         if (ms->maj != 0) {
 690                 asd_printk("unsupported manuf. sector. major version:%x\n",
 691                            ms->maj);
 692                 return -ENOENT;
 693         }
 694         ms->offs_next = le16_to_cpu((__force __le16) ms->offs_next);
 695         ms->chksum = le16_to_cpu((__force __le16) ms->chksum);
 696         ms->size = le16_to_cpu((__force __le16) ms->size);
 697
 698         if (asd_calc_flash_chksum((u16 *)ms, ms->size/2)) {
 699                 asd_printk("failed manuf sector checksum\n");
 700         }
 701
 702         return 0;
 703 }
 704
 705 static int asd_ms_get_sas_addr(struct asd_ha_struct *asd_ha,
 706                                struct asd_manuf_sec *ms)
 707 {
 708         memcpy(asd_ha->hw_prof.sas_addr, ms->sas_addr, SAS_ADDR_SIZE);
 709         return 0;
 710 }
 711
 712 static int asd_ms_get_pcba_sn(struct asd_ha_struct *asd_ha,
 713                               struct asd_manuf_sec *ms)
 714 {
 715         memcpy(asd_ha->hw_prof.pcba_sn, ms->pcba_sn, ASD_PCBA_SN_SIZE);
 716         asd_ha->hw_prof.pcba_sn[ASD_PCBA_SN_SIZE] = '\0';
 717         return 0;
 718 }
 719
 720 /**
 721  * asd_find_ll_by_id - find a linked list entry by its id
 722  * @start: void pointer to the first element in the linked list
 723  * @id0: the first byte of the id  (offs 0)
 724  * @id1: the second byte of the id (offs 1)
 725  *
 726  * @start has to be the _base_ element start, since the
 727  * linked list entries's offset is from this pointer.
 728  * Some linked list entries use only the first id, in which case
 729  * you can pass 0xFF for the second.
 730  */
 731 static void *asd_find_ll_by_id(void * const start, const u8 id0, const u8 id1)
 732 {
 733         struct asd_ll_el *el = start;
 734
 735         do {
 736                 switch (id1) {
 737                 default:
 738                         if (el->id1 == id1)
 739                 case 0xFF:
 740                                 if (el->id0 == id0)
 741                                         return el;
 742                 }
 743                 el = start + le16_to_cpu(el->next);
 744         } while (el != start);
 745
 746         return NULL;
 747 }
 748
 749 /**
 750  * asd_ms_get_phy_params - get phy parameters from the manufacturing sector
 751  * @asd_ha: pointer to the host adapter structure
 752  * @manuf_sec: pointer to the manufacturing sector
 753  *
 754  * The manufacturing sector contans also the linked list of sub-segments,
 755  * since when it was read, its size was taken from the flash directory,
 756  * not from the structure size.
 757  *
 758  * HIDDEN phys do not count in the total count.  REPORTED phys cannot
 759  * be enabled but are reported and counted towards the total.
 760  * ENABLED phys are enabled by default and count towards the total.
 761  * The absolute total phy number is ASD_MAX_PHYS.  hw_prof->num_phys
 762  * merely specifies the number of phys the host adapter decided to
 763  * report.  E.g., it is possible for phys 0, 1 and 2 to be HIDDEN,
 764  * phys 3, 4 and 5 to be REPORTED and phys 6 and 7 to be ENABLED.
 765  * In this case ASD_MAX_PHYS is 8, hw_prof->num_phys is 5, and only 2
 766  * are actually enabled (enabled by default, max number of phys
 767  * enableable in this case).
 768  */
 769 static int asd_ms_get_phy_params(struct asd_ha_struct *asd_ha,
 770                                  struct asd_manuf_sec *manuf_sec)
 771 {
 772         int i;
 773         int en_phys = 0;
 774         int rep_phys = 0;
 775         struct asd_manuf_phy_param *phy_param;
 776         struct asd_manuf_phy_param dflt_phy_param;
 777
 778         phy_param = asd_find_ll_by_id(manuf_sec, 'P', 'M');
 779         if (!phy_param) {
 780                 ASD_DPRINTK("ms: no phy parameters found\n");
 781                 ASD_DPRINTK("ms: Creating default phy parameters\n");
 782                 dflt_phy_param.sig[0] = 'P';
 783                 dflt_phy_param.sig[1] = 'M';
 784                 dflt_phy_param.maj = 0;
 785                 dflt_phy_param.min = 2;
 786                 dflt_phy_param.num_phy_desc = 8;
 787                 dflt_phy_param.phy_desc_size = sizeof(struct asd_manuf_phy_desc);
 788                 for (i =0; i < ASD_MAX_PHYS; i++) {
 789                         dflt_phy_param.phy_desc[i].state = 0;
 790                         dflt_phy_param.phy_desc[i].phy_id = i;
 791                         dflt_phy_param.phy_desc[i].phy_control_0 = 0xf6;
 792                         dflt_phy_param.phy_desc[i].phy_control_1 = 0x10;
 793                         dflt_phy_param.phy_desc[i].phy_control_2 = 0x43;
 794                         dflt_phy_param.phy_desc[i].phy_control_3 = 0xeb;
 795                 }
 796
 797                 phy_param = &dflt_phy_param;
 798
 799         }
 800
 801         if (phy_param->maj != 0) {
 802                 asd_printk("unsupported manuf. phy param major version:0x%x\n",
 803                            phy_param->maj);
 804                 return -ENOENT;
 805         }
 806
 807         ASD_DPRINTK("ms: num_phy_desc: %d\n", phy_param->num_phy_desc);
 808         asd_ha->hw_prof.enabled_phys = 0;
 809         for (i = 0; i < phy_param->num_phy_desc; i++) {
 810                 struct asd_manuf_phy_desc *pd = &phy_param->phy_desc[i];
 811                 switch (pd->state & 0xF) {
 812                 case MS_PHY_STATE_HIDDEN:
 813                         ASD_DPRINTK("ms: phy%d: HIDDEN\n", i);
 814                         continue;
 815                 case MS_PHY_STATE_REPORTED:
 816                         ASD_DPRINTK("ms: phy%d: REPORTED\n", i);
 817                         asd_ha->hw_prof.enabled_phys &= ~(1 << i);
 818                         rep_phys++;
 819                         continue;
 820                 case MS_PHY_STATE_ENABLED:
 821                         ASD_DPRINTK("ms: phy%d: ENABLED\n", i);
 822                         asd_ha->hw_prof.enabled_phys |= (1 << i);
 823                         en_phys++;
 824                         break;
 825                 }
 826                 asd_ha->hw_prof.phy_desc[i].phy_control_0 = pd->phy_control_0;
 827                 asd_ha->hw_prof.phy_desc[i].phy_control_1 = pd->phy_control_1;
 828                 asd_ha->hw_prof.phy_desc[i].phy_control_2 = pd->phy_control_2;
 829                 asd_ha->hw_prof.phy_desc[i].phy_control_3 = pd->phy_control_3;
 830         }
 831         asd_ha->hw_prof.max_phys = rep_phys + en_phys;
 832         asd_ha->hw_prof.num_phys = en_phys;
 833         ASD_DPRINTK("ms: max_phys:0x%x, num_phys:0x%x\n",
 834                     asd_ha->hw_prof.max_phys, asd_ha->hw_prof.num_phys);
 835         ASD_DPRINTK("ms: enabled_phys:0x%x\n", asd_ha->hw_prof.enabled_phys);
 836         return 0;
 837 }
 838
 839 static int asd_ms_get_connector_map(struct asd_ha_struct *asd_ha,
 840                                     struct asd_manuf_sec *manuf_sec)
 841 {
 842         struct asd_ms_conn_map *cm;
 843
 844         cm = asd_find_ll_by_id(manuf_sec, 'M', 'C');
 845         if (!cm) {
 846                 ASD_DPRINTK("ms: no connector map found\n");
 847                 return 0;
 848         }
 849
 850         if (cm->maj != 0) {
 851                 ASD_DPRINTK("ms: unsupported: connector map major version 0x%x"
 852                             "\n", cm->maj);
 853                 return -ENOENT;
 854         }
 855
 856         /* XXX */
 857
 858         return 0;
 859 }
 860
 861
 862 /**
 863  * asd_process_ms - find and extract information from the manufacturing sector
 864  * @asd_ha: pointer to the host adapter structure
 865  * @flash_dir: pointer to the flash directory
 866  */
 867 static int asd_process_ms(struct asd_ha_struct *asd_ha,
 868                           struct asd_flash_dir *flash_dir)
 869 {
 870         int err;
 871         struct asd_manuf_sec *manuf_sec;
 872         u32 offs, size;
 873
 874         err = asd_find_flash_de(flash_dir, FLASH_DE_MS, &offs, &size);
 875         if (err) {
 876                 ASD_DPRINTK("Couldn't find the manuf. sector\n");
 877                 goto out;
 878         }
 879
 880         if (size == 0)
 881                 goto out;
 882
 883         err = -ENOMEM;
 884         manuf_sec = kmalloc(size, GFP_KERNEL);
 885         if (!manuf_sec) {
 886                 ASD_DPRINTK("no mem for manuf sector\n");
 887                 goto out;
 888         }
 889
 890         err = asd_read_flash_seg(asd_ha, (void *)manuf_sec, offs, size);
 891         if (err) {
 892                 ASD_DPRINTK("couldn't read manuf sector at 0x%x, size 0x%x\n",
 893                             offs, size);
 894                 goto out2;
 895         }
 896
 897         err = asd_validate_ms(manuf_sec);
 898         if (err) {
 899                 ASD_DPRINTK("couldn't validate manuf sector\n");
 900                 goto out2;
 901         }
 902
 903         err = asd_ms_get_sas_addr(asd_ha, manuf_sec);
 904         if (err) {
 905                 ASD_DPRINTK("couldn't read the SAS_ADDR\n");
 906                 goto out2;
 907         }
 908         ASD_DPRINTK("manuf sect SAS_ADDR %llx\n",
 909                     SAS_ADDR(asd_ha->hw_prof.sas_addr));
 910
 911         err = asd_ms_get_pcba_sn(asd_ha, manuf_sec);
 912         if (err) {
 913                 ASD_DPRINTK("couldn't read the PCBA SN\n");
 914                 goto out2;
 915         }
 916         ASD_DPRINTK("manuf sect PCBA SN %s\n", asd_ha->hw_prof.pcba_sn);
 917
 918         err = asd_ms_get_phy_params(asd_ha, manuf_sec);
 919         if (err) {
 920                 ASD_DPRINTK("ms: couldn't get phy parameters\n");
 921                 goto out2;
 922         }
 923
 924         err = asd_ms_get_connector_map(asd_ha, manuf_sec);
 925         if (err) {
 926                 ASD_DPRINTK("ms: couldn't get connector map\n");
 927                 goto out2;
 928         }
 929
 930 out2:
 931         kfree(manuf_sec);
 932 out:
 933         return err;
 934 }
 935
 936 static int asd_process_ctrla_phy_settings(struct asd_ha_struct *asd_ha,
 937                                           struct asd_ctrla_phy_settings *ps)
 938 {
 939         int i;
 940         for (i = 0; i < ps->num_phys; i++) {
 941                 struct asd_ctrla_phy_entry *pe = &ps->phy_ent[i];
 942
 943                 if (!PHY_ENABLED(asd_ha, i))
 944                         continue;
 945                 if (*(u64 *)pe->sas_addr == 0) {
 946                         asd_ha->hw_prof.enabled_phys &= ~(1 << i);
 947                         continue;
 948                 }
 949                 /* This is the SAS address which should be sent in IDENTIFY. */
 950                 memcpy(asd_ha->hw_prof.phy_desc[i].sas_addr, pe->sas_addr,
 951                        SAS_ADDR_SIZE);
 952                 asd_ha->hw_prof.phy_desc[i].max_sas_lrate =
 953                         (pe->sas_link_rates & 0xF0) >> 4;
 954                 asd_ha->hw_prof.phy_desc[i].min_sas_lrate =
 955                         (pe->sas_link_rates & 0x0F);
 956                 asd_ha->hw_prof.phy_desc[i].max_sata_lrate =
 957                         (pe->sata_link_rates & 0xF0) >> 4;
 958                 asd_ha->hw_prof.phy_desc[i].min_sata_lrate =
 959                         (pe->sata_link_rates & 0x0F);
 960                 asd_ha->hw_prof.phy_desc[i].flags = pe->flags;
 961                 ASD_DPRINTK("ctrla: phy%d: sas_addr: %llx, sas rate:0x%x-0x%x,"
 962                             " sata rate:0x%x-0x%x, flags:0x%x\n",
 963                             i,
 964                             SAS_ADDR(asd_ha->hw_prof.phy_desc[i].sas_addr),
 965                             asd_ha->hw_prof.phy_desc[i].max_sas_lrate,
 966                             asd_ha->hw_prof.phy_desc[i].min_sas_lrate,
 967                             asd_ha->hw_prof.phy_desc[i].max_sata_lrate,
 968                             asd_ha->hw_prof.phy_desc[i].min_sata_lrate,
 969                             asd_ha->hw_prof.phy_desc[i].flags);
 970         }
 971
 972         return 0;
 973 }
 974
 975 /**
 976  * asd_process_ctrl_a_user - process CTRL-A user settings
 977  * @asd_ha: pointer to the host adapter structure
 978  * @flash_dir: pointer to the flash directory
 979  */
 980 static int asd_process_ctrl_a_user(struct asd_ha_struct *asd_ha,
 981                                    struct asd_flash_dir *flash_dir)
 982 {
 983         int err, i;
 984         u32 offs, size;
 985         struct asd_ll_el *el;
 986         struct asd_ctrla_phy_settings *ps;
 987         struct asd_ctrla_phy_settings dflt_ps;
 988
 989         err = asd_find_flash_de(flash_dir, FLASH_DE_CTRL_A_USER, &offs, &size);
 990         if (err) {
 991                 ASD_DPRINTK("couldn't find CTRL-A user settings section\n");
 992                 ASD_DPRINTK("Creating default CTRL-A user settings section\n");
 993
 994                 dflt_ps.id0 = 'h';
 995                 dflt_ps.num_phys = 8;
 996                 for (i =0; i < ASD_MAX_PHYS; i++) {
 997                         memcpy(dflt_ps.phy_ent[i].sas_addr,
 998                                asd_ha->hw_prof.sas_addr, SAS_ADDR_SIZE);
 999                         dflt_ps.phy_ent[i].sas_link_rates = 0x98;
1000                         dflt_ps.phy_ent[i].flags = 0x0;
1001                         dflt_ps.phy_ent[i].sata_link_rates = 0x0;
1002                 }
1003
1004                 size = sizeof(struct asd_ctrla_phy_settings);
1005                 ps = &dflt_ps;
1006         }
1007
1008         if (size == 0)
1009                 goto out;
1010
1011         err = -ENOMEM;
1012         el = kmalloc(size, GFP_KERNEL);
1013         if (!el) {
1014                 ASD_DPRINTK("no mem for ctrla user settings section\n");
1015                 goto out;
1016         }
1017
1018         err = asd_read_flash_seg(asd_ha, (void *)el, offs, size);
1019         if (err) {
1020                 ASD_DPRINTK("couldn't read ctrla phy settings section\n");
1021                 goto out2;
1022         }
1023
1024         err = -ENOENT;
1025         ps = asd_find_ll_by_id(el, 'h', 0xFF);
1026         if (!ps) {
1027                 ASD_DPRINTK("couldn't find ctrla phy settings struct\n");
1028                 goto out2;
1029         }
1030
1031         err = asd_process_ctrla_phy_settings(asd_ha, ps);
1032         if (err) {
1033                 ASD_DPRINTK("couldn't process ctrla phy settings\n");
1034                 goto out2;
1035         }
1036 out2:
1037         kfree(el);
1038 out:
1039         return err;
1040 }
1041
1042 /**
1043  * asd_read_flash - read flash memory
1044  * @asd_ha: pointer to the host adapter structure
1045  */
1046 int asd_read_flash(struct asd_ha_struct *asd_ha)
1047 {
1048         int err;
1049         struct asd_flash_dir *flash_dir;
1050
1051         err = asd_flash_getid(asd_ha);
1052         if (err)
1053                 return err;
1054
1055         flash_dir = kmalloc(sizeof(*flash_dir), GFP_KERNEL);
1056         if (!flash_dir)
1057                 return -ENOMEM;
1058
1059         err = -ENOENT;
1060         if (!asd_find_flash_dir(asd_ha, flash_dir)) {
1061                 ASD_DPRINTK("couldn't find flash directory\n");
1062                 goto out;
1063         }
1064
1065         if (le32_to_cpu(flash_dir->rev) != 2) {
1066                 asd_printk("unsupported flash dir version:0x%x\n",
1067                            le32_to_cpu(flash_dir->rev));
1068                 goto out;
1069         }
1070
1071         err = asd_process_ms(asd_ha, flash_dir);
1072         if (err) {
1073                 ASD_DPRINTK("couldn't process manuf sector settings\n");
1074                 goto out;
1075         }
1076
1077         err = asd_process_ctrl_a_user(asd_ha, flash_dir);
1078         if (err) {
1079                 ASD_DPRINTK("couldn't process CTRL-A user settings\n");
1080                 goto out;
1081         }
1082
1083 out:
1084         kfree(flash_dir);
1085         return err;
1086 }
1087
1088 /**
1089  * asd_verify_flash_seg - verify data with flash memory
1090  * @asd_ha: pointer to the host adapter structure
1091  * @src: pointer to the source data to be verified
1092  * @dest_offset: offset from flash memory
1093  * @bytes_to_verify: total bytes to verify
1094  */
1095 int asd_verify_flash_seg(struct asd_ha_struct *asd_ha,
1096                 void *src, u32 dest_offset, u32 bytes_to_verify)
1097 {
1098         u8 *src_buf;
1099         u8 flash_char;
1100         int err;
1101         u32 nv_offset, reg, i;
1102
1103         reg = asd_ha->hw_prof.flash.bar;
1104         src_buf = NULL;
1105
1106         err = FLASH_OK;
1107         nv_offset = dest_offset;
1108         src_buf = (u8 *)src;
1109         for (i = 0; i < bytes_to_verify; i++) {
1110                 flash_char = asd_read_reg_byte(asd_ha, reg + nv_offset + i);
1111                 if (flash_char != src_buf[i]) {
1112                         err = FAIL_VERIFY;
1113                         break;
1114                 }
1115         }
1116         return err;
1117 }
1118
1119 /**
1120  * asd_write_flash_seg - write data into flash memory
1121  * @asd_ha: pointer to the host adapter structure
1122  * @src: pointer to the source data to be written
1123  * @dest_offset: offset from flash memory
1124  * @bytes_to_write: total bytes to write
1125  */
1126 int asd_write_flash_seg(struct asd_ha_struct *asd_ha,
1127                 void *src, u32 dest_offset, u32 bytes_to_write)
1128 {
1129         u8 *src_buf;
1130         u32 nv_offset, reg, i;
1131         int err;
1132
1133         reg = asd_ha->hw_prof.flash.bar;
1134         src_buf = NULL;
1135
1136         err = asd_check_flash_type(asd_ha);
1137         if (err) {
1138                 ASD_DPRINTK("couldn't find the type of flash. err=%d\n", err);
1139                 return err;
1140         }
1141
1142         nv_offset = dest_offset;
1143         err = asd_erase_nv_sector(asd_ha, nv_offset, bytes_to_write);
1144         if (err) {
1145                 ASD_DPRINTK("Erase failed at offset:0x%x\n",
1146                         nv_offset);
1147                 return err;
1148         }
1149
1150         err = asd_reset_flash(asd_ha);
1151         if (err) {
1152                 ASD_DPRINTK("couldn't reset flash. err=%d\n", err);
1153                 return err;
1154         }
1155
1156         src_buf = (u8 *)src;
1157         for (i = 0; i < bytes_to_write; i++) {
1158                 /* Setup program command sequence */
1159                 switch (asd_ha->hw_prof.flash.method) {
1160                 case FLASH_METHOD_A:
1161                 {
1162                         asd_write_reg_byte(asd_ha,
1163                                         (reg + 0xAAA), 0xAA);
1164                         asd_write_reg_byte(asd_ha,
1165                                         (reg + 0x555), 0x55);
1166                         asd_write_reg_byte(asd_ha,
1167                                         (reg + 0xAAA), 0xA0);
1168                         asd_write_reg_byte(asd_ha,
1169                                         (reg + nv_offset + i),
1170                                         (*(src_buf + i)));
1171                         break;
1172                 }
1173                 case FLASH_METHOD_B:
1174                 {
1175                         asd_write_reg_byte(asd_ha,
1176                                         (reg + 0x555), 0xAA);
1177                         asd_write_reg_byte(asd_ha,
1178                                         (reg + 0x2AA), 0x55);
1179                         asd_write_reg_byte(asd_ha,
1180                                         (reg + 0x555), 0xA0);
1181                         asd_write_reg_byte(asd_ha,
1182                                         (reg + nv_offset + i),
1183                                         (*(src_buf + i)));
1184                         break;
1185                 }
1186                 default:
1187                         break;
1188                 }
1189                 if (asd_chk_write_status(asd_ha,
1190                                 (nv_offset + i), 0) != 0) {
1191                         ASD_DPRINTK("aicx: Write failed at offset:0x%x\n",
1192                                 reg + nv_offset + i);
1193                         return FAIL_WRITE_FLASH;
1194                 }
1195         }
1196
1197         err = asd_reset_flash(asd_ha);
1198         if (err) {
1199                 ASD_DPRINTK("couldn't reset flash. err=%d\n", err);
1200                 return err;
1201         }
1202         return 0;
1203 }
1204
1205 int asd_chk_write_status(struct asd_ha_struct *asd_ha,
1206          u32 sector_addr, u8 erase_flag)
1207 {
1208         u32 reg;
1209         u32 loop_cnt;
1210         u8  nv_data1, nv_data2;
1211         u8  toggle_bit1;
1212
1213         /*
1214          * Read from DQ2 requires sector address
1215          * while it's dont care for DQ6
1216          */
1217         reg = asd_ha->hw_prof.flash.bar;
1218
1219         for (loop_cnt = 0; loop_cnt < 50000; loop_cnt++) {
1220                 nv_data1 = asd_read_reg_byte(asd_ha, reg);
1221                 nv_data2 = asd_read_reg_byte(asd_ha, reg);
1222
1223                 toggle_bit1 = ((nv_data1 & FLASH_STATUS_BIT_MASK_DQ6)
1224                                  ^ (nv_data2 & FLASH_STATUS_BIT_MASK_DQ6));
1225
1226                 if (toggle_bit1 == 0) {
1227                         return 0;
1228                 } else {
1229                         if (nv_data2 & FLASH_STATUS_BIT_MASK_DQ5) {
1230                                 nv_data1 = asd_read_reg_byte(asd_ha,
1231                                                                 reg);
1232                                 nv_data2 = asd_read_reg_byte(asd_ha,
1233                                                                 reg);
1234                                 toggle_bit1 =
1235                                 ((nv_data1 & FLASH_STATUS_BIT_MASK_DQ6)
1236                                 ^ (nv_data2 & FLASH_STATUS_BIT_MASK_DQ6));
1237
1238                                 if (toggle_bit1 == 0)
1239                                         return 0;
1240                         }
1241                 }
1242
1243                 /*
1244                  * ERASE is a sector-by-sector operation and requires
1245                  * more time to finish while WRITE is byte-byte-byte
1246                  * operation and takes lesser time to finish.
1247                  *
1248                  * For some strange reason a reduced ERASE delay gives different
1249                  * behaviour across different spirit boards. Hence we set
1250                  * a optimum balance of 50mus for ERASE which works well
1251                  * across all boards.
1252                  */
1253                 if (erase_flag) {
1254                         udelay(FLASH_STATUS_ERASE_DELAY_COUNT);
1255                 } else {
1256                         udelay(FLASH_STATUS_WRITE_DELAY_COUNT);
1257                 }
1258         }
1259         return -1;
1260 }
1261
1262 /**
1263  * asd_hwi_erase_nv_sector - Erase the flash memory sectors.
1264  * @asd_ha: pointer to the host adapter structure
1265  * @flash_addr: pointer to offset from flash memory
1266  * @size: total bytes to erase.
1267  */
1268 int asd_erase_nv_sector(struct asd_ha_struct *asd_ha, u32 flash_addr, u32 size)
1269 {
1270         u32 reg;
1271         u32 sector_addr;
1272
1273         reg = asd_ha->hw_prof.flash.bar;
1274
1275         /* sector staring address */
1276         sector_addr = flash_addr & FLASH_SECTOR_SIZE_MASK;
1277
1278         /*
1279          * Erasing an flash sector needs to be done in six consecutive
1280          * write cyles.
1281          */
1282         while (sector_addr < flash_addr+size) {
1283                 switch (asd_ha->hw_prof.flash.method) {
1284                 case FLASH_METHOD_A:
1285                         asd_write_reg_byte(asd_ha, (reg + 0xAAA), 0xAA);
1286                         asd_write_reg_byte(asd_ha, (reg + 0x555), 0x55);
1287                         asd_write_reg_byte(asd_ha, (reg + 0xAAA), 0x80);
1288                         asd_write_reg_byte(asd_ha, (reg + 0xAAA), 0xAA);
1289                         asd_write_reg_byte(asd_ha, (reg + 0x555), 0x55);
1290                         asd_write_reg_byte(asd_ha, (reg + sector_addr), 0x30);
1291                         break;
1292                 case FLASH_METHOD_B:
1293                         asd_write_reg_byte(asd_ha, (reg + 0x555), 0xAA);
1294                         asd_write_reg_byte(asd_ha, (reg + 0x2AA), 0x55);
1295                         asd_write_reg_byte(asd_ha, (reg + 0x555), 0x80);
1296                         asd_write_reg_byte(asd_ha, (reg + 0x555), 0xAA);
1297                         asd_write_reg_byte(asd_ha, (reg + 0x2AA), 0x55);
1298                         asd_write_reg_byte(asd_ha, (reg + sector_addr), 0x30);
1299                         break;
1300                 default:
1301                         break;
1302                 }
1303
1304                 if (asd_chk_write_status(asd_ha, sector_addr, 1) != 0)
1305                         return FAIL_ERASE_FLASH;
1306
1307                 sector_addr += FLASH_SECTOR_SIZE;
1308         }
1309
1310         return 0;
1311 }
1312
1313 int asd_check_flash_type(struct asd_ha_struct *asd_ha)
1314 {
1315         u8 manuf_id;
1316         u8 dev_id;
1317         u8 sec_prot;
1318         u32 inc;
1319         u32 reg;
1320         int err;
1321
1322         /* get Flash memory base address */
1323         reg = asd_ha->hw_prof.flash.bar;
1324
1325         /* Determine flash info */
1326         err = asd_reset_flash(asd_ha);
1327         if (err) {
1328                 ASD_DPRINTK("couldn't reset flash. err=%d\n", err);
1329                 return err;
1330         }
1331
1332         asd_ha->hw_prof.flash.method = FLASH_METHOD_UNKNOWN;
1333         asd_ha->hw_prof.flash.manuf = FLASH_MANUF_ID_UNKNOWN;
1334         asd_ha->hw_prof.flash.dev_id = FLASH_DEV_ID_UNKNOWN;
1335
1336         /* Get flash info. This would most likely be AMD Am29LV family flash.
1337          * First try the sequence for word mode.  It is the same as for
1338          * 008B (byte mode only), 160B (word mode) and 800D (word mode).
1339          */
1340         inc = asd_ha->hw_prof.flash.wide ? 2 : 1;
1341         asd_write_reg_byte(asd_ha, reg + 0xAAA, 0xAA);
1342         asd_write_reg_byte(asd_ha, reg + 0x555, 0x55);
1343         asd_write_reg_byte(asd_ha, reg + 0xAAA, 0x90);
1344         manuf_id = asd_read_reg_byte(asd_ha, reg);
1345         dev_id = asd_read_reg_byte(asd_ha, reg + inc);
1346         sec_prot = asd_read_reg_byte(asd_ha, reg + inc + inc);
1347         /* Get out of autoselect mode. */
1348         err = asd_reset_flash(asd_ha);
1349         if (err) {
1350                 ASD_DPRINTK("couldn't reset flash. err=%d\n", err);
1351                 return err;
1352         }
1353         ASD_DPRINTK("Flash MethodA manuf_id(0x%x) dev_id(0x%x) "
1354                 "sec_prot(0x%x)\n", manuf_id, dev_id, sec_prot);
1355         err = asd_reset_flash(asd_ha);
1356         if (err != 0)
1357                 return err;
1358
1359         switch (manuf_id) {
1360         case FLASH_MANUF_ID_AMD:
1361                 switch (sec_prot) {
1362                 case FLASH_DEV_ID_AM29LV800DT:
1363                 case FLASH_DEV_ID_AM29LV640MT:
1364                 case FLASH_DEV_ID_AM29F800B:
1365                         asd_ha->hw_prof.flash.method = FLASH_METHOD_A;
1366                         break;
1367                 default:
1368                         break;
1369                 }
1370                 break;
1371         case FLASH_MANUF_ID_ST:
1372                 switch (sec_prot) {
1373                 case FLASH_DEV_ID_STM29W800DT:
1374                 case FLASH_DEV_ID_STM29LV640:
1375                         asd_ha->hw_prof.flash.method = FLASH_METHOD_A;
1376                         break;
1377                 default:
1378                         break;
1379                 }
1380                 break;
1381         case FLASH_MANUF_ID_FUJITSU:
1382                 switch (sec_prot) {
1383                 case FLASH_DEV_ID_MBM29LV800TE:
1384                 case FLASH_DEV_ID_MBM29DL800TA:
1385                         asd_ha->hw_prof.flash.method = FLASH_METHOD_A;
1386                         break;
1387                 }
1388                 break;
1389         case FLASH_MANUF_ID_MACRONIX:
1390                 switch (sec_prot) {
1391                 case FLASH_DEV_ID_MX29LV800BT:
1392                         asd_ha->hw_prof.flash.method = FLASH_METHOD_A;
1393                         break;
1394                 }
1395                 break;
1396         }
1397
1398         if (asd_ha->hw_prof.flash.method == FLASH_METHOD_UNKNOWN) {
1399                 err = asd_reset_flash(asd_ha);
1400                 if (err) {
1401                         ASD_DPRINTK("couldn't reset flash. err=%d\n", err);
1402                         return err;
1403                 }
1404
1405                 /* Issue Unlock sequence for AM29LV008BT */
1406                 asd_write_reg_byte(asd_ha, (reg + 0x555), 0xAA);
1407                 asd_write_reg_byte(asd_ha, (reg + 0x2AA), 0x55);
1408                 asd_write_reg_byte(asd_ha, (reg + 0x555), 0x90);
1409                 manuf_id = asd_read_reg_byte(asd_ha, reg);
1410                 dev_id = asd_read_reg_byte(asd_ha, reg + inc);
1411                 sec_prot = asd_read_reg_byte(asd_ha, reg + inc + inc);
1412
1413                 ASD_DPRINTK("Flash MethodB manuf_id(0x%x) dev_id(0x%x) sec_prot"
1414                         "(0x%x)\n", manuf_id, dev_id, sec_prot);
1415
1416                 err = asd_reset_flash(asd_ha);
1417                 if (err != 0) {
1418                         ASD_DPRINTK("couldn't reset flash. err=%d\n", err);
1419                         return err;
1420                 }
1421
1422                 switch (manuf_id) {
1423                 case FLASH_MANUF_ID_AMD:
1424                         switch (dev_id) {
1425                         case FLASH_DEV_ID_AM29LV008BT:
1426                                 asd_ha->hw_prof.flash.method = FLASH_METHOD_B;
1427                                 break;
1428                         default:
1429                                 break;
1430                         }
1431                         break;
1432                 case FLASH_MANUF_ID_ST:
1433                         switch (dev_id) {
1434                         case FLASH_DEV_ID_STM29008:
1435                                 asd_ha->hw_prof.flash.method = FLASH_METHOD_B;
1436                                 break;
1437                         default:
1438                                 break;
1439                         }
1440                         break;
1441                 case FLASH_MANUF_ID_FUJITSU:
1442                         switch (dev_id) {
1443                         case FLASH_DEV_ID_MBM29LV008TA:
1444                                 asd_ha->hw_prof.flash.method = FLASH_METHOD_B;
1445                                 break;
1446                         }
1447                         break;
1448                 case FLASH_MANUF_ID_INTEL:
1449                         switch (dev_id) {
1450                         case FLASH_DEV_ID_I28LV00TAT:
1451                                 asd_ha->hw_prof.flash.method = FLASH_METHOD_B;
1452                                 break;
1453                         }
1454                         break;
1455                 case FLASH_MANUF_ID_MACRONIX:
1456                         switch (dev_id) {
1457                         case FLASH_DEV_ID_I28LV00TAT:
1458                                 asd_ha->hw_prof.flash.method = FLASH_METHOD_B;
1459                                 break;
1460                         }
1461                         break;
1462                 default:
1463                         return FAIL_FIND_FLASH_ID;
1464                 }
1465         }
1466
1467         if (asd_ha->hw_prof.flash.method == FLASH_METHOD_UNKNOWN)
1468               return FAIL_FIND_FLASH_ID;
1469
1470         asd_ha->hw_prof.flash.manuf = manuf_id;
1471         asd_ha->hw_prof.flash.dev_id = dev_id;
1472         asd_ha->hw_prof.flash.sec_prot = sec_prot;
1473         return 0;
1474 }