/*
 * Copyright (C) 2014 Yoshinori Sato
 * (C) Copyright 2000-2003
 *     Wolfgang Denk, DENX Software Engineering, wd@denx.de.
 *
 * board/hokuto/HSBRX63N/hsbrx63n.c
 *
 * 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., 59 Temple Place, Suite 330, Boston,
 * MA 02111-1307 USA
 */

#include <common.h>
#include <mmc.h>
#include <spi.h>
#include <netdev.h>
#include <asm/io.h>
#include <asm/processor.h>
#include <asm/sections.h>
#include <linux/usb/r8a66597.h>

int checkboard(void)
{
	puts("BOARD: HSBRX63NC\n");
	return 0;
}

static void sdram_init(void)
{
	*(volatile unsigned short *)0x00080006 = 0x5a03;
	*(volatile unsigned long *)0x00080020 |= (1 << 22);
	*(volatile unsigned char *)0x0008c104 = 0xff;
	*(volatile unsigned char *)0x0008c106 = 0x11;
	*(volatile unsigned char *)0x0008c107 = 0xd0;
	*(volatile unsigned long *)0x00080020 &= ~(1 << 22);

	*(volatile unsigned char *)0x00083c00 = 0x00;
	*(volatile unsigned char *)0x00083c10 = 0x00;
	*(volatile unsigned char *)0x00083c16 = 0x00;
	*(volatile unsigned short *)0x00083c24 = 0x0588;
	*(volatile unsigned char *)0x00083c20 = 0x01;
	while(*(volatile unsigned char *)0x00083c50 & 0x08);

	*(volatile unsigned char *)0x00083c00 = 0x00;
	*(volatile unsigned short *)0x00083c48 = 0x0040;
	while(*(volatile unsigned char *)0x00083c50);
	
	*(volatile unsigned long *)0x00083c44 = 0x00020202;
	*(volatile unsigned char *)0x00083c40 = 0x01;

	*(volatile unsigned short *)0x00083c14 = 0x32e0;
	*(volatile unsigned char *)0x00083c02 = 0x00;
	*(volatile unsigned char *)0x00083c16 = 0x01;
	*(volatile unsigned char *)0x00083c10 = 0x00;

	*(volatile unsigned char *)0x00083c00 = 0x01;
	memset(__bss_start, 0, (void *)&__bss_end - (void *)__bss_start);
}

int board_early_init_f(void)
{
	*(volatile unsigned long *)0x00080010 &= ~0x00008000;
	*(volatile unsigned long *)0x00080014 &= ~0x20000000;
	/* P13 - SCI2:TxD / P12 - SCI2:RxD */
	*(volatile unsigned char *)0x0008c11f &= ~0x80;
	*(volatile unsigned char *)0x0008c11f |= 0x40;
	*(volatile unsigned char *)0x0008c14a |= 0x0a;
	*(volatile unsigned char *)0x0008c14b |= 0x0a;
	*(volatile unsigned char *)0x0008c061 |= 0x0c;
#if defined(CONFIG_SH_ETHER)
	*(volatile unsigned long *)0x00080014 &= ~0x00008000;
#endif
#if defined(CONFIG_SPI_FLASH) || defined(CONFIG_MMC_SPI)
	*(volatile unsigned char *)0x0008c156 |= 0x0d;
	*(volatile unsigned char *)0x0008c157 |= 0x0d;
	*(volatile unsigned char *)0x0008c158 |= 0x0d;
	*(volatile unsigned char *)0x0008c062 |= 0xc0;
	*(volatile unsigned char *)0x0008c063 |= 0x01;
	*(volatile unsigned long *)0x00080014 &= ~0x00010000;
#endif
#if defined(CONFIG_SPI_FLASH)
	*(volatile unsigned char *)0x0008c028 |= 0x10;
	*(volatile unsigned char *)0x0008c008 |= 0x10;
#endif
#if defined(CONFIG_MMC_SPI)
	*(volatile unsigned char *)0x0008c028 |= 0x20;
	*(volatile unsigned char *)0x0008c008 |= 0x20;
#endif
#if defined(CONFIG_USB_R8A66597_HCD)
	*(volatile unsigned long *)0x00080014 &= ~0x00080000;
	*(volatile unsigned char *)0x0008c14c = 0x12;
	*(volatile unsigned char *)0x0008c14e = 0x12;
	*(volatile unsigned char *)0x0008c061 |= 0x50;
#endif
#if defined(CONFIG_USB_GADGET_R8A66597)
	*(volatile unsigned long *)0x00080014 &= ~0x00040000;
	*(volatile unsigned char *)0x0008c14d = 0x11;
	*(volatile unsigned char *)0x0008c14d = 0x11;
	*(volatile unsigned char *)0x0008c115 = 0x4;
	*(volatile unsigned char *)0x0008c061 |= 0xa0;
#endif
	*(volatile unsigned char *)0x0008c11f &= ~0x40;
	*(volatile unsigned char *)0x0008c11f |= 0x80;
	sdram_init();
	return 0;
}

int board_late_init(void)
{
	DECLARE_GLOBAL_DATA_PTR;
#if defined(CONFIG_MMC_SPI)
	mmc_initialize(gd->bd);
#endif
#if defined(CONFIG_USB_GADGET_R8A66597)
	static struct r8a66597_platdata r8a66597pd = {
		.port_power = NULL,
		.buswait = 0,
		.on_chip = ON_CHIP_RX600,
		.xtal = 0,
		.vif = 1,
		.wr0_shorted_to_wr1 = 0,
	};
	r8a66597_probe(&r8a66597pd);
#endif
	/* RTC clock initialize */
	*(volatile unsigned char *)0x0008c428 &= ~0x01;
	*(volatile unsigned char *)0x00080033 |= 0x01;
	while ((*(volatile unsigned char *)0x00080033 & 0x01) == 0x00);
	*(volatile unsigned char *)0x0008c426 &= ~0x01;
	while ((*(volatile unsigned char *)0x0008c426 & 0x01) == 0x01);
	udelay(200);
	*(volatile unsigned char *)0x0008c426 = 
		(*(volatile unsigned char *)0x0008c426 & 0xf1) | 0x0c;
	while ((*(volatile unsigned char *)0x0008c426 & 0x0e) != 0x0c);
	*(volatile unsigned char *)0x0008c426 |= 0x01;
	while ((*(volatile unsigned char *)0x0008c426 & 0x01) == 0x00);
	udelay(1000 * 1000);

	return 0;
}

#if defined(CONFIG_SH_ETHER)
int board_eth_init(bd_t *bis)
{
	*(volatile unsigned char *)0x0008c00c |= 0x10;
	*(volatile unsigned char *)0x0008c02c &= ~0x10;
	udelay(200);
	*(volatile unsigned char *)0x0008c02c |= 0x10;

	*(volatile unsigned char *)0x0008c11f = 0x00;
	*(volatile unsigned char *)0x0008c11f = 0x40;
	*(volatile unsigned char *)0x0008c179 = 0x11;
	*(volatile unsigned char *)0x0008c17a = 0x11;
	*(volatile unsigned char *)0x0008c17c = 0x12;
	*(volatile unsigned char *)0x0008c17d = 0x12;
	*(volatile unsigned char *)0x0008c17e = 0x12;
	*(volatile unsigned char *)0x0008c17f = 0x12;
	*(volatile unsigned char *)0x0008c180 = 0x12;
	*(volatile unsigned char *)0x0008c181 = 0x12;
	*(volatile unsigned char *)0x0008c182 = 0x12;
	*(volatile unsigned char *)0x0008c183 = 0x12;
	*(volatile unsigned char *)0x0008c11f = 0x00;
	*(volatile unsigned char *)0x0008c11f = 0x80;
	*(volatile unsigned char *)0x0008c067 |= 0xf6;
	*(volatile unsigned char *)0x0008c068 |= 0x0f;
	return sh_eth_initialize(bis);
}
#endif

#if defined(CONFIG_SPI_FLASH) || defined(CONFIG_MMC_SPI)
int spi_cs_is_valid(unsigned int bus, unsigned int cs)
{
	return (bus == 1) && ((cs == 0) || (cs == 1));
}

void spi_cs_activate(struct spi_slave *slave)
{
	switch(slave->cs) {
	case 0:
		*(volatile unsigned char *)0x0008c028 &= ~0x10;
		break;
	case 1:
		*(volatile unsigned char *)0x0008c028 &= ~0x20;
		break;
	}
}

void spi_cs_deactivate(struct spi_slave *slave)
{
	switch(slave->cs) {
	case 0:
		*(volatile unsigned char *)0x0008c028 |= 0x10;
		break;
	case 1:
		*(volatile unsigned char *)0x0008c028 |= 0x20;
		break;
	}
}
#endif
