/* Copyright (c) 2011,2012 Simon Schubert <2@0x2c.org>.
 * Modifications by Jacob Alexander 2014 <haata@kiibohd.com>
 *
 * 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 3 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, see <http://www.gnu.org/licenses/>.
 */

// ----- Local Includes -----

#include "mchck.h"



// ----- Variables -----

uint32_t flash_ALLOW_BRICKABLE_ADDRESSES;



// ----- Functions -----

/* This will have to live in SRAM. */
__attribute__((section(".ramtext.ftfl_submit_cmd"), long_call))
int ftfl_submit_cmd(void)
{
	FTFL.fstat.raw = ((struct FTFL_FSTAT_t){
			.ccif = 1,
				.rdcolerr = 1,
				.accerr = 1,
				.fpviol = 1
				}).raw;
	struct FTFL_FSTAT_t stat;
	while (!(stat = FTFL.fstat).ccif)
		/* NOTHING */; /* XXX maybe WFI? */
	return (!!stat.mgstat0);
}

int flash_prepare_flashing(void)
{
	/* switch to FlexRAM */
	if (!FTFL.fcnfg.ramrdy) {
		FTFL.fccob.set_flexram.fcmd = FTFL_FCMD_SET_FLEXRAM;
		FTFL.fccob.set_flexram.flexram_function = FTFL_FLEXRAM_RAM;
		return (ftfl_submit_cmd());
	}
	return (0);
}

int flash_erase_sector(uintptr_t addr)
{
	if (addr < (uintptr_t)&_app_rom &&
		flash_ALLOW_BRICKABLE_ADDRESSES != 0x00023420)
		return (-1);
	FTFL.fccob.erase.fcmd = FTFL_FCMD_ERASE_SECTOR;
	FTFL.fccob.erase.addr = addr;
	return (ftfl_submit_cmd());
}

int flash_program_section(uintptr_t addr, size_t num_words)
{
	FTFL.fccob.program_section.fcmd = FTFL_FCMD_PROGRAM_SECTION;
	FTFL.fccob.program_section.addr = addr;
	FTFL.fccob.program_section.num_words = num_words;
	return (ftfl_submit_cmd());
}

int flash_program_sector(uintptr_t addr, size_t len)
{
	return (len != FLASH_SECTOR_SIZE ||
		(addr & (FLASH_SECTOR_SIZE - 1)) != 0 ||
		flash_erase_sector(addr) ||
		flash_program_section(addr, FLASH_SECTOR_SIZE/4));
}

void *flash_get_staging_area(uintptr_t addr, size_t len)
{
	if ((addr & (FLASH_SECTOR_SIZE - 1)) != 0 ||
	    len != FLASH_SECTOR_SIZE)
		return (NULL);
	return (FlexRAM);
}