/*
 * Copyright (c) 2008, Google Inc.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *  * Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 *  * Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in
 *    the documentation and/or other materials provided with the 
 *    distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
 * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
 * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED 
 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#include <debug.h>
#include <reg.h>
#include <platform/iomap.h>
#include <dev/gpio.h>

#include "gpio_hw.h"

typedef struct gpioregs gpioregs;

struct gpioregs
{
	unsigned out;
	unsigned in;
	unsigned int_status;
	unsigned int_clear;
	unsigned int_en;
	unsigned int_edge;
	unsigned int_pos;
	unsigned oe;
};

static gpioregs GPIO_REGS[] = {
	{
		.out =		 GPIO_OUT_0,
		.in =		  GPIO_IN_0,
		.int_status =  GPIO_INT_STATUS_0,
		.int_clear =   GPIO_INT_CLEAR_0,
		.int_en =	  GPIO_INT_EN_0,
		.int_edge =	GPIO_INT_EDGE_0,
		.int_pos =	 GPIO_INT_POS_0,
		.oe =		  GPIO_OE_0,
	},
	{
		.out =		GPIO_OUT_1,
		.in =		GPIO_IN_1,
		.int_status =	GPIO_INT_STATUS_1,
		.int_clear =	GPIO_INT_CLEAR_1,
		.int_en =	GPIO_INT_EN_1,
		.int_edge =	GPIO_INT_EDGE_1,
		.int_pos =	GPIO_INT_POS_1,
		.oe =		GPIO_OE_1,
	},
	{
		.out =		GPIO_OUT_2,
		.in =		GPIO_IN_2,
		.int_status =  GPIO_INT_STATUS_2,
		.int_clear =   GPIO_INT_CLEAR_2,
		.int_en =	GPIO_INT_EN_2,
		.int_edge =	GPIO_INT_EDGE_2,
		.int_pos =	GPIO_INT_POS_2,
		.oe =		GPIO_OE_2,
	},
	{
		.out =		GPIO_OUT_3,
		.in =		GPIO_IN_3,
		.int_status =	GPIO_INT_STATUS_3,
		.int_clear =	GPIO_INT_CLEAR_3,
		.int_en =	GPIO_INT_EN_3,
		.int_edge =	GPIO_INT_EDGE_3,
		.int_pos =	GPIO_INT_POS_3,
		.oe =		GPIO_OE_3,
	},
	{
		.out =		GPIO_OUT_4,
		.in =		GPIO_IN_4,
		.int_status =	GPIO_INT_STATUS_4,
		.int_clear =	GPIO_INT_CLEAR_4,
		.int_en =	GPIO_INT_EN_4,
		.int_edge =	GPIO_INT_EDGE_4,
		.int_pos =	GPIO_INT_POS_4,
		.oe =		GPIO_OE_4,
	},
	{
		.out =		GPIO_OUT_5,
		.in =		GPIO_IN_5,
		.int_status =	GPIO_INT_STATUS_5,
		.int_clear =	GPIO_INT_CLEAR_5,
		.int_en =	GPIO_INT_EN_5,
		.int_edge =	GPIO_INT_EDGE_5,
		.int_pos =	GPIO_INT_POS_5,
		.oe =		GPIO_OE_5,
	},
	{
		.out =		GPIO_OUT_6,
		.in =		GPIO_IN_6,
		.int_status =	GPIO_INT_STATUS_6,
		.int_clear =	GPIO_INT_CLEAR_6,
		.int_en =	GPIO_INT_EN_6,
		.int_edge =	GPIO_INT_EDGE_6,
		.int_pos =	GPIO_INT_POS_6,
		.oe =		GPIO_OE_6,
	},
	{
		.out =		GPIO_OUT_7,
		.in =		GPIO_IN_7,
		.int_status =	GPIO_INT_STATUS_7,
		.int_clear =	GPIO_INT_CLEAR_7,
		.int_en =	GPIO_INT_EN_7,
		.int_edge =	GPIO_INT_EDGE_7,
		.int_pos =	GPIO_INT_POS_7,
		.oe =		GPIO_OE_7,
	},
};

static gpioregs *find_gpio(unsigned n, unsigned *bit)
{
	if(n > 164) return 0;
	if(n > 152) {
		*bit = 1 << (n - 153);
		return GPIO_REGS + 7;
	}
	if(n > 121) {
		*bit = 1 << (n - 122);
		return GPIO_REGS + 6;
	}
	if(n > 103) {
		*bit = 1 << (n - 104);
		return GPIO_REGS + 5;
	}
	if(n > 94) {
		*bit = 1 << (n - 95);
		return GPIO_REGS + 4;
	}
	if(n > 67) {
		*bit = 1 << (n - 68);
		return GPIO_REGS + 3;
	}
	if(n > 42) {
		*bit = 1 << (n - 43);
		return GPIO_REGS + 2;
	}
	if(n > 15) {
		*bit = 1 << (n - 16);
		return GPIO_REGS + 1;
	}
	*bit = 1 << n;
	return GPIO_REGS + 0;
}

int gpio_config(unsigned n, unsigned flags)
{
	gpioregs *r;
	unsigned b;
	unsigned v;

	if ((r = find_gpio(n, &b)) == 0)
		return -1;

	v = readl(r->oe);
	if (flags & GPIO_OUTPUT) {
		writel(v | b, r->oe);
	} else {
		writel(v & (~b), r->oe);
	}
	return 0;
}

void gpio_set(unsigned n, unsigned on)
{
	gpioregs *r;
	unsigned b;
	unsigned v;
	
	if((r = find_gpio(n, &b)) == 0) return;

	v = readl(r->out);
	if(on) {
		writel(v | b, r->out);
	} else {
		writel(v & (~b), r->out);
	}
}

int gpio_get(unsigned n)
{
	gpioregs *r;
	unsigned b;

	if((r = find_gpio(n, &b)) == 0) return 0;

	return (readl(r->in) & b) ? 1 : 0;
}