ichspi.c 17.9 KB
Newer Older
1 2 3 4 5 6
/*
 * This file is part of the flashrom project.
 *
 * Copyright (C) 2008 Stefan Wildemann <stefan.wildemann@kontron.com>
 * Copyright (C) 2008 Claus Gindhart <claus.gindhart@kontron.com>
 * Copyright (C) 2008 Dominik Geyer <dominik.geyer@kontron.com>
Stefan Reinauer's avatar
Stefan Reinauer committed
7
 * Copyright (C) 2008 coresystems GmbH <info@coresystems.de>
8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
 */

/*
 * This module is designed for supporting the devices
 * ST M25P40
 * ST M25P80
 * ST M25P16
 * ST M25P32 already tested
 * ST M25P64
 * AT 25DF321 already tested
 *
 */

#include <string.h>
#include <sys/mman.h>
#include "flash.h"
#include "spi.h"

Stefan Reinauer's avatar
Stefan Reinauer committed
40 41 42 43 44
/* ICH9 controller register definition */
#define ICH9_REG_FADDR         0x08	/* 32 Bits */
#define ICH9_REG_FDATA0                0x10	/* 64 Bytes */

#define ICH9_REG_SSFS          0x90	/* 08 Bits */
45 46 47 48
#define SSFS_SCIP		0x00000001
#define SSFS_CDS		0x00000004
#define SSFS_FCERR		0x00000008
#define SSFS_AEL		0x00000010
Stefan Reinauer's avatar
Stefan Reinauer committed
49 50

#define ICH9_REG_SSFC          0x91	/* 24 Bits */
51 52 53 54 55 56 57 58 59 60
#define SSFC_SCGO		0x00000200
#define SSFC_ACS		0x00000400
#define SSFC_SPOP		0x00000800
#define SSFC_COP		0x00001000
#define SSFC_DBC		0x00010000
#define SSFC_DS			0x00400000
#define SSFC_SME		0x00800000
#define SSFC_SCF		0x01000000
#define SSFC_SCF_20MHZ 0x00000000
#define SSFC_SCF_33MHZ 0x01000000
Stefan Reinauer's avatar
Stefan Reinauer committed
61 62 63 64

#define ICH9_REG_PREOP         0x94	/* 16 Bits */
#define ICH9_REG_OPTYPE                0x96	/* 16 Bits */
#define ICH9_REG_OPMENU                0x98	/* 64 Bits */
65 66 67 68 69 70 71

// ICH9R SPI commands
#define SPI_OPCODE_TYPE_READ_NO_ADDRESS     0
#define SPI_OPCODE_TYPE_WRITE_NO_ADDRESS    1
#define SPI_OPCODE_TYPE_READ_WITH_ADDRESS   2
#define SPI_OPCODE_TYPE_WRITE_WITH_ADDRESS  3

Stefan Reinauer's avatar
Stefan Reinauer committed
72 73 74 75 76 77
// ICH7 registers
#define ICH7_REG_SPIS          0x00	/* 16 Bits */
#define SPIS_SCIP              0x00000001
#define SPIS_CDS               0x00000004
#define SPIS_FCERR             0x00000008

78 79 80 81 82 83 84 85 86 87
/* VIA SPI is compatible with ICH7, but maxdata
   to transfer is 16 bytes.

   DATA byte count on ICH7 is 8:13, on VIA 8:11

   bit 12 is port select CS0 CS1
   bit 13 is FAST READ enable
   bit 7  is used with fast read and one shot controls CS de-assert?
*/

Stefan Reinauer's avatar
Stefan Reinauer committed
88 89 90 91
#define ICH7_REG_SPIC          0x02	/* 16 Bits */
#define SPIC_SCGO              0x0002
#define SPIC_ACS               0x0004
#define SPIC_SPOP              0x0008
92
#define SPIC_DS                0x4000
Stefan Reinauer's avatar
Stefan Reinauer committed
93 94 95 96 97 98 99

#define ICH7_REG_SPIA          0x04	/* 32 Bits */
#define ICH7_REG_SPID0         0x08	/* 64 Bytes */
#define ICH7_REG_PREOP         0x54	/* 16 Bits */
#define ICH7_REG_OPTYPE                0x56	/* 16 Bits */
#define ICH7_REG_OPMENU                0x58	/* 64 Bits */

100 101 102
/* ICH SPI configuration lock-down. May be set during chipset enabling. */
int ichspi_lock = 0;

103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126
typedef struct _OPCODE {
	uint8_t opcode;		//This commands spi opcode
	uint8_t spi_type;	//This commands spi type
	uint8_t atomic;		//Use preop: (0: none, 1: preop0, 2: preop1
} OPCODE;

/* Opcode definition:
 * Preop 1: Write Enable
 * Preop 2: Write Status register enable
 *
 * OP 0: Write address
 * OP 1: Read Address
 * OP 2: ERASE block
 * OP 3: Read Status register
 * OP 4: Read ID
 * OP 5: Write Status register
 * OP 6: chip private (read JDEC id)
 * OP 7: Chip erase
 */
typedef struct _OPCODES {
	uint8_t preop[2];
	OPCODE opcode[8];
} OPCODES;

127
static OPCODES *curopcodes = NULL;
128 129

/* HW access functions */
130
static uint32_t REGREAD32(int X)
131
{
132
	return mmio_readl(spibar + X);
Stefan Reinauer's avatar
Stefan Reinauer committed
133 134
}

135
static uint16_t REGREAD16(int X)
Stefan Reinauer's avatar
Stefan Reinauer committed
136
{
137
	return mmio_readw(spibar + X);
138 139
}

140 141 142
#define REGWRITE32(X,Y) mmio_writel(Y, spibar+X)
#define REGWRITE16(X,Y) mmio_writew(Y, spibar+X)
#define REGWRITE8(X,Y)  mmio_writeb(Y, spibar+X)
143 144

/* Common SPI functions */
145 146
static int find_opcode(OPCODES *op, uint8_t opcode);
static int find_preop(OPCODES *op, uint8_t preop);
FENG yu ning's avatar
FENG yu ning committed
147
static int generate_opcodes(OPCODES * op);
148
static int program_opcodes(OPCODES * op);
149
static int run_opcode(OPCODE op, uint32_t offset,
150 151
		      uint8_t datalength, uint8_t * data);
static int ich_spi_write_page(struct flashchip *flash, uint8_t * bytes,
152
			      int offset, int maxdata);
153

FENG yu ning's avatar
FENG yu ning committed
154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170
/* for pairing opcodes with their required preop */
struct preop_opcode_pair {
	uint8_t preop;
	uint8_t opcode;
};

struct preop_opcode_pair pops[] = {
	{JEDEC_WREN, JEDEC_BYTE_PROGRAM},
	{JEDEC_WREN, JEDEC_SE}, /* sector erase */
	{JEDEC_WREN, JEDEC_BE_52}, /* block erase */
	{JEDEC_WREN, JEDEC_BE_D8}, /* block erase */
	{JEDEC_WREN, JEDEC_CE_60}, /* chip erase */
	{JEDEC_WREN, JEDEC_CE_C7}, /* chip erase */
	{JEDEC_EWSR, JEDEC_WRSR},
	{0,}
};

171 172 173
OPCODES O_ST_M25P = {
	{
	 JEDEC_WREN,
174
	 0},
175
	{
176 177 178 179
	 {JEDEC_BYTE_PROGRAM, SPI_OPCODE_TYPE_WRITE_WITH_ADDRESS, 1},	// Write Byte
	 {JEDEC_READ, SPI_OPCODE_TYPE_READ_WITH_ADDRESS, 0},	// Read Data
	 {JEDEC_BE_D8, SPI_OPCODE_TYPE_WRITE_WITH_ADDRESS, 1},	// Erase Sector
	 {JEDEC_RDSR, SPI_OPCODE_TYPE_READ_NO_ADDRESS, 0},	// Read Device Status Reg
180
	 {JEDEC_REMS, SPI_OPCODE_TYPE_READ_WITH_ADDRESS, 0},	// Read Electronic Manufacturer Signature
181 182 183 184
	 {JEDEC_WRSR, SPI_OPCODE_TYPE_WRITE_NO_ADDRESS, 1},	// Write Status Register
	 {JEDEC_RDID, SPI_OPCODE_TYPE_READ_NO_ADDRESS, 0},	// Read JDEC ID
	 {JEDEC_CE_C7, SPI_OPCODE_TYPE_WRITE_NO_ADDRESS, 1},	// Bulk erase
	 }
185 186
};

187 188
OPCODES O_EXISTING = {};

189
static int find_opcode(OPCODES *op, uint8_t opcode)
190 191 192 193 194 195 196 197 198 199 200
{
	int a;

	for (a = 0; a < 8; a++) {
		if (op->opcode[a].opcode == opcode)
			return a;
	}

	return -1;
}

201
static int find_preop(OPCODES *op, uint8_t preop)
202 203 204 205 206 207 208 209 210 211 212
{
	int a;

	for (a = 0; a < 2; a++) {
		if (op->preop[a] == preop)
			return a;
	}

	return -1;
}

FENG yu ning's avatar
FENG yu ning committed
213
static int generate_opcodes(OPCODES * op)
214
{
FENG yu ning's avatar
FENG yu ning committed
215
	int a, b, i;
216 217 218 219 220 221 222 223
	uint16_t preop, optype;
	uint32_t opmenu[2];

	if (op == NULL) {
		printf_debug("\n%s: null OPCODES pointer!\n", __FUNCTION__);
		return -1;
	}

224 225 226
	switch (spi_controller) {
	case SPI_CONTROLLER_ICH7:
	case SPI_CONTROLLER_VIA:
227 228 229 230 231
		preop = REGREAD16(ICH7_REG_PREOP);
		optype = REGREAD16(ICH7_REG_OPTYPE);
		opmenu[0] = REGREAD32(ICH7_REG_OPMENU);
		opmenu[1] = REGREAD32(ICH7_REG_OPMENU + 4);
		break;
232
	case SPI_CONTROLLER_ICH9:
233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264
		preop = REGREAD16(ICH9_REG_PREOP);
		optype = REGREAD16(ICH9_REG_OPTYPE);
		opmenu[0] = REGREAD32(ICH9_REG_OPMENU);
		opmenu[1] = REGREAD32(ICH9_REG_OPMENU + 4);
		break;
	default:
		printf_debug("%s: unsupported chipset\n", __FUNCTION__);
		return -1;
	}

	op->preop[0] = (uint8_t) preop;
	op->preop[1] = (uint8_t) (preop >> 8);

	for (a = 0; a < 8; a++) {
		op->opcode[a].spi_type = (uint8_t) (optype & 0x3);
		optype >>= 2;
	}

	for (a = 0; a < 4; a++) {
		op->opcode[a].opcode = (uint8_t) (opmenu[0] & 0xff);
		opmenu[0] >>= 8;
	}

	for (a = 4; a < 8; a++) {
		op->opcode[a].opcode = (uint8_t) (opmenu[1] & 0xff);
		opmenu[1] >>= 8;
	}

	/* atomic (link opcode with required pre-op) */
	for (a = 4; a < 8; a++)
		op->opcode[a].atomic = 0;

FENG yu ning's avatar
FENG yu ning committed
265 266 267 268 269
	for (i = 0; pops[i].opcode; i++) {
		a = find_opcode(op, pops[i].opcode);
		b = find_preop(op, pops[i].preop);
		if ((a != -1) && (b != -1))
			op->opcode[a].atomic = (uint8_t) ++b;
270 271 272 273 274
	}

	return 0;
}

275 276 277
int program_opcodes(OPCODES * op)
{
	uint8_t a;
278 279
	uint16_t preop, optype;
	uint32_t opmenu[2];
280 281 282

	/* Program Prefix Opcodes */
	/* 0:7 Prefix Opcode 1 */
283
	preop = (op->preop[0]);
284
	/* 8:16 Prefix Opcode 2 */
285
	preop |= ((uint16_t) op->preop[1]) << 8;
286

Stefan Reinauer's avatar
Stefan Reinauer committed
287
	/* Program Opcode Types 0 - 7 */
288
	optype = 0;
289
	for (a = 0; a < 8; a++) {
290
		optype |= ((uint16_t) op->opcode[a].spi_type) << (a * 2);
291
	}
292

Stefan Reinauer's avatar
Stefan Reinauer committed
293
	/* Program Allowable Opcodes 0 - 3 */
294
	opmenu[0] = 0;
295
	for (a = 0; a < 4; a++) {
296
		opmenu[0] |= ((uint32_t) op->opcode[a].opcode) << (a * 8);
Stefan Reinauer's avatar
Stefan Reinauer committed
297 298
	}

299
	/*Program Allowable Opcodes 4 - 7 */
300
	opmenu[1] = 0;
301
	for (a = 4; a < 8; a++) {
302
		opmenu[1] |= ((uint32_t) op->opcode[a].opcode) << ((a - 4) * 8);
Stefan Reinauer's avatar
Stefan Reinauer committed
303 304
	}

Peter Stuge's avatar
Peter Stuge committed
305
	printf_debug("\n%s: preop=%04x optype=%04x opmenu=%08x%08x\n", __func__, preop, optype, opmenu[0], opmenu[1]);
306 307 308
	switch (spi_controller) {
	case SPI_CONTROLLER_ICH7:
	case SPI_CONTROLLER_VIA:
309 310 311 312 313
		REGWRITE16(ICH7_REG_PREOP, preop);
		REGWRITE16(ICH7_REG_OPTYPE, optype);
		REGWRITE32(ICH7_REG_OPMENU, opmenu[0]);
		REGWRITE32(ICH7_REG_OPMENU + 4, opmenu[1]);
		break;
314
	case SPI_CONTROLLER_ICH9:
315 316 317 318 319 320 321 322
		REGWRITE16(ICH9_REG_PREOP, preop);
		REGWRITE16(ICH9_REG_OPTYPE, optype);
		REGWRITE32(ICH9_REG_OPMENU, opmenu[0]);
		REGWRITE32(ICH9_REG_OPMENU + 4, opmenu[1]);
		break;
	default:
		printf_debug("%s: unsupported chipset\n", __FUNCTION__);
		return -1;
Stefan Reinauer's avatar
Stefan Reinauer committed
323 324 325 326 327
	}

	return 0;
}

FENG yu ning's avatar
FENG yu ning committed
328 329
/* This function generates OPCODES from or programs OPCODES to ICH according to
 * the chipset's SPI configuration lock.
330
 *
FENG yu ning's avatar
FENG yu ning committed
331
 * It should be called before ICH sends any spi command.
332
 */
333
int ich_init_opcodes(void)
334 335 336 337 338 339 340 341 342 343
{
	int rc = 0;
	OPCODES *curopcodes_done;

	if (curopcodes)
		return 0;

	if (ichspi_lock) {
		printf_debug("Generating OPCODES... ");
		curopcodes_done = &O_EXISTING;
FENG yu ning's avatar
FENG yu ning committed
344
		rc = generate_opcodes(curopcodes_done);
345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361
	} else {
		printf_debug("Programming OPCODES... ");
		curopcodes_done = &O_ST_M25P;
		rc = program_opcodes(curopcodes_done);
	}

	if (rc) {
		curopcodes = NULL;
		printf_debug("failed\n");
		return 1;
	} else {
		curopcodes = curopcodes_done;
		printf_debug("done\n");
		return 0;
	}
}

362
static int ich7_run_opcode(OPCODE op, uint32_t offset,
363
			   uint8_t datalength, uint8_t * data, int maxdata)
Stefan Reinauer's avatar
Stefan Reinauer committed
364 365 366
{
	int write_cmd = 0;
	int timeout;
367
	uint32_t temp32 = 0;
Stefan Reinauer's avatar
Stefan Reinauer committed
368 369
	uint16_t temp16;
	uint32_t a;
370 371
	uint64_t opmenu;
	int opcode_index;
Stefan Reinauer's avatar
Stefan Reinauer committed
372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414

	/* Is it a write command? */
	if ((op.spi_type == SPI_OPCODE_TYPE_WRITE_NO_ADDRESS)
	    || (op.spi_type == SPI_OPCODE_TYPE_WRITE_WITH_ADDRESS)) {
		write_cmd = 1;
	}

	/* Programm Offset in Flash into FADDR */
	REGWRITE32(ICH7_REG_SPIA, (offset & 0x00FFFFFF));	/* SPI addresses are 24 BIT only */

	/* Program data into FDATA0 to N */
	if (write_cmd && (datalength != 0)) {
		temp32 = 0;
		for (a = 0; a < datalength; a++) {
			if ((a % 4) == 0) {
				temp32 = 0;
			}

			temp32 |= ((uint32_t) data[a]) << ((a % 4) * 8);

			if ((a % 4) == 3) {
				REGWRITE32(ICH7_REG_SPID0 + (a - (a % 4)),
					   temp32);
			}
		}
		if (((a - 1) % 4) != 3) {
			REGWRITE32(ICH7_REG_SPID0 +
				   ((a - 1) - ((a - 1) % 4)), temp32);
		}

	}

	/* Assemble SPIS */
	temp16 = 0;
	/* clear error status registers */
	temp16 |= (SPIS_CDS + SPIS_FCERR);
	REGWRITE16(ICH7_REG_SPIS, temp16);

	/* Assemble SPIC */
	temp16 = 0;

	if (datalength != 0) {
		temp16 |= SPIC_DS;
415
		temp16 |= ((uint32_t) ((datalength - 1) & (maxdata - 1))) << 8;
Stefan Reinauer's avatar
Stefan Reinauer committed
416 417 418
	}

	/* Select opcode */
419 420 421
	opmenu = REGREAD32(ICH7_REG_OPMENU);
	opmenu |= ((uint64_t)REGREAD32(ICH7_REG_OPMENU + 4)) << 32;

422 423
	for (opcode_index = 0; opcode_index < 8; opcode_index++) {
		if ((opmenu & 0xff) == op.opcode) {
424 425 426 427 428 429 430 431 432
			break;
		}
		opmenu >>= 8;
	}
	if (opcode_index == 8) {
		printf_debug("Opcode %x not found.\n", op.opcode);
		return 1;
	}
	temp16 |= ((uint16_t) (opcode_index & 0x07)) << 4;
Stefan Reinauer's avatar
Stefan Reinauer committed
433 434 435 436 437

	/* Handle Atomic */
	if (op.atomic != 0) {
		/* Select atomic command */
		temp16 |= SPIC_ACS;
438
		/* Select prefix opcode */
Stefan Reinauer's avatar
Stefan Reinauer committed
439 440 441 442 443 444 445 446 447 448 449 450 451
		if ((op.atomic - 1) == 1) {
			/*Select prefix opcode 2 */
			temp16 |= SPIC_SPOP;
		}
	}

	/* Start */
	temp16 |= SPIC_SCGO;

	/* write it */
	REGWRITE16(ICH7_REG_SPIC, temp16);

	/* wait for cycle complete */
452
	timeout = 100 * 1000 * 60;	// 60s is a looong timeout.
Stefan Reinauer's avatar
Stefan Reinauer committed
453
	while (((REGREAD16(ICH7_REG_SPIS) & SPIS_CDS) == 0) && --timeout) {
454
		programmer_delay(10);
Stefan Reinauer's avatar
Stefan Reinauer committed
455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474
	}
	if (!timeout) {
		printf_debug("timeout\n");
	}

	if ((REGREAD16(ICH7_REG_SPIS) & SPIS_FCERR) != 0) {
		printf_debug("Transaction error!\n");
		return 1;
	}

	if ((!write_cmd) && (datalength != 0)) {
		for (a = 0; a < datalength; a++) {
			if ((a % 4) == 0) {
				temp32 = REGREAD32(ICH7_REG_SPID0 + (a));
			}

			data[a] =
			    (temp32 & (((uint32_t) 0xff) << ((a % 4) * 8)))
			    >> ((a % 4) * 8);
		}
475 476 477 478 479
	}

	return 0;
}

480
static int ich9_run_opcode(OPCODE op, uint32_t offset,
Stefan Reinauer's avatar
Stefan Reinauer committed
481
			   uint8_t datalength, uint8_t * data)
482 483
{
	int write_cmd = 0;
484
	int timeout;
485 486
	uint32_t temp32;
	uint32_t a;
487 488
	uint64_t opmenu;
	int opcode_index;
489 490 491 492 493 494 495 496

	/* Is it a write command? */
	if ((op.spi_type == SPI_OPCODE_TYPE_WRITE_NO_ADDRESS)
	    || (op.spi_type == SPI_OPCODE_TYPE_WRITE_WITH_ADDRESS)) {
		write_cmd = 1;
	}

	/* Programm Offset in Flash into FADDR */
Stefan Reinauer's avatar
Stefan Reinauer committed
497
	REGWRITE32(ICH9_REG_FADDR, (offset & 0x00FFFFFF));	/* SPI addresses are 24 BIT only */
498 499 500 501 502 503 504 505 506 507 508 509

	/* Program data into FDATA0 to N */
	if (write_cmd && (datalength != 0)) {
		temp32 = 0;
		for (a = 0; a < datalength; a++) {
			if ((a % 4) == 0) {
				temp32 = 0;
			}

			temp32 |= ((uint32_t) data[a]) << ((a % 4) * 8);

			if ((a % 4) == 3) {
Stefan Reinauer's avatar
Stefan Reinauer committed
510 511
				REGWRITE32(ICH9_REG_FDATA0 + (a - (a % 4)),
					   temp32);
512 513 514
			}
		}
		if (((a - 1) % 4) != 3) {
Stefan Reinauer's avatar
Stefan Reinauer committed
515 516
			REGWRITE32(ICH9_REG_FDATA0 +
				   ((a - 1) - ((a - 1) % 4)), temp32);
517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535
		}
	}

	/* Assemble SSFS + SSFC */
	temp32 = 0;

	/* clear error status registers */
	temp32 |= (SSFS_CDS + SSFS_FCERR);
	/* USE 20 MhZ */
	temp32 |= SSFC_SCF_20MHZ;

	if (datalength != 0) {
		uint32_t datatemp;
		temp32 |= SSFC_DS;
		datatemp = ((uint32_t) ((datalength - 1) & 0x3f)) << (8 + 8);
		temp32 |= datatemp;
	}

	/* Select opcode */
536 537 538
	opmenu = REGREAD32(ICH9_REG_OPMENU);
	opmenu |= ((uint64_t)REGREAD32(ICH9_REG_OPMENU + 4)) << 32;

539 540
	for (opcode_index = 0; opcode_index < 8; opcode_index++) {
		if ((opmenu & 0xff) == op.opcode) {
541 542 543 544 545 546 547 548 549
			break;
		}
		opmenu >>= 8;
	}
	if (opcode_index == 8) {
		printf_debug("Opcode %x not found.\n", op.opcode);
		return 1;
	}
	temp32 |= ((uint32_t) (opcode_index & 0x07)) << (8 + 4);
550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565

	/* Handle Atomic */
	if (op.atomic != 0) {
		/* Select atomic command */
		temp32 |= SSFC_ACS;
		/* Selct prefix opcode */
		if ((op.atomic - 1) == 1) {
			/*Select prefix opcode 2 */
			temp32 |= SSFC_SPOP;
		}
	}

	/* Start */
	temp32 |= SSFC_SCGO;

	/* write it */
Stefan Reinauer's avatar
Stefan Reinauer committed
566
	REGWRITE32(ICH9_REG_SSFS, temp32);
567 568

	/*wait for cycle complete */
569
	timeout = 100 * 1000 * 60;	// 60s is a looong timeout.
570
	while (((REGREAD32(ICH9_REG_SSFS) & SSFS_CDS) == 0) && --timeout) {
571
		programmer_delay(10);
572 573 574
	}
	if (!timeout) {
		printf_debug("timeout\n");
575 576
	}

Stefan Reinauer's avatar
Stefan Reinauer committed
577
	if ((REGREAD32(ICH9_REG_SSFS) & SSFS_FCERR) != 0) {
578 579 580 581 582 583 584
		printf_debug("Transaction error!\n");
		return 1;
	}

	if ((!write_cmd) && (datalength != 0)) {
		for (a = 0; a < datalength; a++) {
			if ((a % 4) == 0) {
Stefan Reinauer's avatar
Stefan Reinauer committed
585
				temp32 = REGREAD32(ICH9_REG_FDATA0 + (a));
586 587 588
			}

			data[a] =
Stefan Reinauer's avatar
Stefan Reinauer committed
589 590
			    (temp32 & (((uint32_t) 0xff) << ((a % 4) * 8)))
			    >> ((a % 4) * 8);
591 592 593 594 595 596
		}
	}

	return 0;
}

597
static int run_opcode(OPCODE op, uint32_t offset,
Stefan Reinauer's avatar
Stefan Reinauer committed
598 599
		      uint8_t datalength, uint8_t * data)
{
600 601
	switch (spi_controller) {
	case SPI_CONTROLLER_VIA:
602
		return ich7_run_opcode(op, offset, datalength, data, 16);
603
	case SPI_CONTROLLER_ICH7:
604
		return ich7_run_opcode(op, offset, datalength, data, 64);
605
	case SPI_CONTROLLER_ICH9:
606
		return ich9_run_opcode(op, offset, datalength, data);
607 608 609
	default:
		printf_debug("%s: unsupported chipset\n", __FUNCTION__);
	}
Stefan Reinauer's avatar
Stefan Reinauer committed
610 611 612 613 614

	/* If we ever get here, something really weird happened */
	return -1;
}

615
static int ich_spi_write_page(struct flashchip *flash, uint8_t * bytes,
616
			      int offset, int maxdata)
617 618 619
{
	int page_size = flash->page_size;
	uint32_t remaining = page_size;
620
	int towrite;
621

Stefan Reinauer's avatar
Stefan Reinauer committed
622 623
	printf_debug("ich_spi_write_page: offset=%d, number=%d, buf=%p\n",
		     offset, page_size, bytes);
624

625 626 627 628 629 630
	for (; remaining > 0; remaining -= towrite) {
		towrite = min(remaining, maxdata);
		if (spi_nbyte_program(offset + (page_size - remaining),
				      &bytes[page_size - remaining], towrite)) {
			printf_debug("Error writing");
			return 1;
631 632 633 634 635 636
		}
	}

	return 0;
}

637
int ich_spi_read(struct flashchip *flash, uint8_t * buf, int start, int len)
638
{
639 640
	int maxdata = 64;

641
	if (spi_controller == SPI_CONTROLLER_VIA)
642
		maxdata = 16;
643

644
	return spi_read_chunked(flash, buf, start, len, maxdata);
645 646
}

647
int ich_spi_write_256(struct flashchip *flash, uint8_t * buf)
648 649 650 651 652
{
	int i, j, rc = 0;
	int total_size = flash->total_size * 1024;
	int page_size = flash->page_size;
	int erase_size = 64 * 1024;
653
	int maxdata = 64;
654 655 656 657 658 659

	spi_disable_blockprotect();

	printf("Programming page: \n");

	for (i = 0; i < total_size / erase_size; i++) {
660 661 662 663
		/* FIMXE: call the chip-specific spi_block_erase_XX instead.
		 * For this, we need to add a block erase function to
		 * struct flashchip.
		 */
664
		rc = spi_block_erase_d8(flash, i * erase_size, erase_size);
665 666 667 668
		if (rc) {
			printf("Error erasing block at 0x%x\n", i);
			break;
		}
669

670
		if (spi_controller == SPI_CONTROLLER_VIA)
Peter Stuge's avatar
Peter Stuge committed
671 672
			maxdata = 16;

673
		for (j = 0; j < erase_size / page_size; j++) {
674 675 676
			ich_spi_write_page(flash,
			   (void *)(buf + (i * erase_size) + (j * page_size)),
			   (i * erase_size) + (j * page_size), maxdata);
677 678 679 680 681 682 683 684
		}
	}

	printf("\n");

	return rc;
}

685
int ich_spi_send_command(unsigned int writecnt, unsigned int readcnt,
686
		    const unsigned char *writearr, unsigned char *readarr)
687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706
{
	int a;
	int opcode_index = -1;
	const unsigned char cmd = *writearr;
	OPCODE *opcode;
	uint32_t addr = 0;
	uint8_t *data;
	int count;

	/* find cmd in opcodes-table */
	for (a = 0; a < 8; a++) {
		if ((curopcodes->opcode[a]).opcode == cmd) {
			opcode_index = a;
			break;
		}
	}

	/* unknown / not programmed command */
	if (opcode_index == -1) {
		printf_debug("Invalid OPCODE 0x%02x\n", cmd);
707
		return SPI_INVALID_OPCODE;
708 709 710 711 712 713 714
	}

	opcode = &(curopcodes->opcode[opcode_index]);

	/* if opcode-type requires an address */
	if (opcode->spi_type == SPI_OPCODE_TYPE_READ_WITH_ADDRESS ||
	    opcode->spi_type == SPI_OPCODE_TYPE_WRITE_WITH_ADDRESS) {
715 716
		addr = (writearr[1] << 16) |
		    (writearr[2] << 8) | (writearr[3] << 0);
717
	}
718

719 720
	/* translate read/write array/count */
	if (opcode->spi_type == SPI_OPCODE_TYPE_WRITE_NO_ADDRESS) {
721 722 723 724 725 726 727
		data = (uint8_t *) (writearr + 1);
		count = writecnt - 1;
	} else if (opcode->spi_type == SPI_OPCODE_TYPE_WRITE_WITH_ADDRESS) {
		data = (uint8_t *) (writearr + 4);
		count = writecnt - 4;
	} else {
		data = (uint8_t *) readarr;
728 729
		count = readcnt;
	}
730

731
	if (run_opcode(*opcode, addr, count, data) != 0) {
732 733 734 735 736 737
		printf_debug("run OPCODE 0x%02x failed\n", opcode->opcode);
		return 1;
	}

	return 0;
}