uboot-vybrid_public/lib_i386/ic/ali512x.c

/*
 * (C) Copyright 2002
 * Daniel Engström, Omicron Ceti AB <daniel@omicron.se>.
 *
 * See file CREDITS for list of people who contributed to this
 * project.
 *
 * 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
 */

/*
 * Based on sc520cdp.c from rolo 1.6:
 *----------------------------------------------------------------------
 * (C) Copyright 2000
 * Sysgo Real-Time Solutions GmbH
 * Klein-Winternheim, Germany
 *----------------------------------------------------------------------
 */

#include <common.h>
#include <asm/io.h>
#include <asm/ic/ali512x.h>


/* ALI M5123 Logical device numbers:
 * 0 FDC
 * 1 unused?
 * 2 unused?
 * 3 lpt
 * 4 UART1
 * 5 UART2
 * 6 RTC
 * 7 mouse/kbd
 * 8 CIO
 */

/*
 ************************************************************
 *  Some access primitives for the ALi chip:                *
 ************************************************************
 */

static void ali_write(u8 index, u8 value)
{	
	/* write an arbirary register */
	outb(index, ALI_INDEX);
	outb(value, ALI_DATA);
}

static int ali_read(u8 index)
{
	outb(index, ALI_INDEX);
	return inb(ALI_DATA);
}

#define ALI_OPEN() \
	outb(0x51, ALI_DATA); \
	outb(0x23, ALI_DATA)	


#define ALI_CLOSE() \
	outb(0xbb, ALI_DATA)

/* Select a logical device */
#define ALI_SELDEV(dev)	\
	ali_write(0x07, dev)	


void ali512x_init(void)
{
	ALI_OPEN();

	ali_write(0x02, 0x01);	/* soft reset */
	ali_write(0x03, 0x03);	/* disable access to CIOs */
	ali_write(0x22, 0x00);	/* disable direct powerdown */
	ali_write(0x23, 0x00);	/* disable auto powerdown */
	ali_write(0x24, 0x00);	/* IR 8 is active hi, pin26 is PDIR */

	ALI_CLOSE();
}

void ali512x_set_fdc(int enabled, u16 io, u8 irq, u8 dma_channel)
{
	ALI_OPEN();
	ALI_SELDEV(0);
	
	ali_write(0x30, enabled?1:0);
	if (enabled) {
		ali_write(0x60, io >> 8);
		ali_write(0x61, io & 0xff);
		ali_write(0x70, irq);
		ali_write(0x74, dma_channel);
		
		/* AT mode, no drive swap */
		ali_write(0xf0, 0x08);
		ali_write(0xf1, 0x00);
		ali_write(0xf2, 0xff);
		ali_write(0xf4, 0x00);
	}
	ALI_CLOSE();
}


void ali512x_set_pp(int enabled, u16 io, u8 irq, u8 dma_channel)
{
	ALI_OPEN();
	ALI_SELDEV(3);
	
	ali_write(0x30, enabled?1:0);
	if (enabled) {
		ali_write(0x60, io >> 8);
		ali_write(0x61, io & 0xff);
		ali_write(0x70, irq);
		ali_write(0x74, dma_channel);
		
		/* mode: EPP 1.9, ECP FIFO threshold = 7, IRQ active low */
		ali_write(0xf0, 0xbc);
		/* 12 MHz, Burst DMA in ECP */
		ali_write(0xf1, 0x05);
	}
	ALI_CLOSE();

}

void ali512x_set_uart(int enabled, int index, u16 io, u8 irq)
{
	ALI_OPEN();
	ALI_SELDEV(index?5:4);
	
	ali_write(0x30, enabled?1:0);
	if (enabled) {
		ali_write(0x60, io >> 8);
		ali_write(0x61, io & 0xff);
		ali_write(0x70, irq);
		
		ali_write(0xf0, 0x00);
		ali_write(0xf1, 0x00);
		
		/* huh? write 0xf2 twice - a typo in rolo
		 * or some secret ali errata? Who knows? 
		 */
		if (index) {
			ali_write(0xf2, 0x00);
		}
		ali_write(0xf2, 0x0c);
	}
	ALI_CLOSE();

}

void ali512x_set_uart2_irda(int enabled)
{
	ALI_OPEN();
	ALI_SELDEV(5);
	
	ali_write(0xf1, enabled?0x48:0x00); /* fullduplex IrDa */
	ALI_CLOSE();

}

void ali512x_set_rtc(int enabled, u16 io, u8 irq)
{
	ALI_OPEN();
	ALI_SELDEV(6);
	
	ali_write(0x30, enabled?1:0);
	if (enabled) {
		ali_write(0x60, io >> 8);
		ali_write(0x61, io & 0xff);
		ali_write(0x70, irq);

		ali_write(0xf0, 0x00);
	}
	ALI_CLOSE();
}

void ali512x_set_kbc(int enabled, u8 kbc_irq, u8 mouse_irq)
{
	ALI_OPEN();
	ALI_SELDEV(7);
	
	ali_write(0x30, enabled?1:0);
	if (enabled) {
		ali_write(0x70, kbc_irq);
		ali_write(0x72, mouse_irq);		
		
		ali_write(0xf0, 0x00);
	}
	ALI_CLOSE();
}


/* Common I/O
 * 
 * (This descripotsion is base on several incompete sources
 *  since I have not been able to obtain any datasheet for the device
 *  there may be some mis-understandings burried in here. 
 *  -- Daniel daniel@omicron.se)
 * 
 * There are 22 CIO pins numbered
 * 10-17
 * 20-25
 * 30-37
 * 
 * 20-24 are dedicated CIO pins, the other 17 are muliplexed with
 * other functions.
 * 
 *           Secondary 
 * CIO Pin   Function    Decription
 * =======================================================
 * CIO10     IRQIN1      Interrupt input 1?
 * CIO11     IRQIN2      Interrupt input 2?
 * CIO12     IRRX        IrDa Receive
 * CIO13     IRTX        IrDa Transmit
 * CIO14     P21         KBC P21 fucntion
 * CIO15     P20         KBC P21 fucntion
 * CIO16     I2C_CLK     I2C Clock
 * CIO17     I2C_DAT     I2C Data
 * 
 * CIO20     -
 * CIO21     -
 * CIO22     -
 * CIO23     -
 * CIO24     -
 * CIO25     LOCK        Keylock
 * 
 * CIO30     KBC_CLK     Keybaord Clock
 * CIO31     CS0J        General Chip Select decoder CS0J
 * CIO32     CS1J        General Chip Select decoder CS1J
 * CIO33     ALT_KCLK    Alternative Keyboard Clock
 * CIO34     ALT_KDAT    Alternative Keyboard Data
 * CIO35     ALT_MCLK    Alternative Mouse Clock
 * CIO36     ALT_MDAT    Alternative Mouse Data
 * CIO37     ALT_KBC     Alternative KBC select
 *
 * The CIO use a double indirect address scheme. 
 * 
 * Reigster 3 in the SIO is used to selectg where the CIO 
 * I/O registers show up under function 8. Note that these
 * registers clash with the CIO function select regsters,
 * below.
 * 
 * SIO reigster 3 (CIO Address Selection) bit definitions:
 * bit 7   CIO data register enabled
 * bit 1-0 CIO indirect registers select
 *     	 0  index = 0xE0 data = 0xE1
 *       1  index = 0xE2 data = 0xE3
 *       2  index = 0xE4 data = 0xE5
 *       3  index = 0xEA data = 0xEB
 * 
 * There are three CIO I/O register accessed via CIO index and CIO data
 * 0x01     CIO 10-17 data
 * 0x02     CIO 20-25 data (bits 7-6 unused)
 * 0x03     CIO 30-37 data
 * 
 * 
 * The pin function is accessed through normal 
 * SIO registers, each register have the same format:
 * 
 * Bit   Function                     Value
 * 0     Input/output                 1=input 
 * 1     Polarity of signal           1=inverted
 * 2     Unused                       ??
 * 3     Function (normal or special) 1=special
 * 7-4   Unused
 * 
 * SIO REG
 * 0xe0     CIO 10 Config
 * 0xe1     CIO 11 Config
 * 0xe2     CIO 12 Config
 * 0xe3     CIO 13 Config
 * 0xe4     CIO 14 Config
 * 0xe5     CIO 15 Config
 * 0xe6     CIO 16 Config
 * 0xe7     CIO 16 Config
 *
 * 0xe8     CIO 20 Config
 * 0xe9     CIO 21 Config
 * 0xea     CIO 22 Config
 * 0xeb     CIO 23 Config
 * 0xec     CIO 24 Config
 * 0xed     CIO 25 Config
 *
 * 0xf5     CIO 30 Config
 * 0xf6     CIO 31 Config
 * 0xf7     CIO 32 Config
 * 0xf8     CIO 33 Config
 * 0xf9     CIO 34 Config
 * 0xfa     CIO 35 Config
 * 0xfb     CIO 36 Config
 * 0xfc     CIO 37 Config
 * 
 */

void ali512x_set_cio(int enabled)
{
	int i;
	
	ALI_OPEN();
	ali_write(0x3, 3);    /* Disable CIO data register */
	
	ALI_SELDEV(8);
	ali_write(0x30, enabled?1:0);
	
	/* set all pins to input to start with */
	for (i=0xe0;i<0xee;i++) {
		ali_write(i, 1);
	}
	for (i=0xf5;i<0xfe;i++) {
		ali_write(i, 1);
	}
			
	ALI_CLOSE();
}

void ali512x_cio_function(int pin, int special, int inv, int input)
{
	u8 data;
	u8 addr;
	
	
	/* valid pins are 10-17, 20-25 and 30-37 */
	if (pin >= 10 && pin <= 17) { 
		addr = 0xe0+(pin-10);
	} else if (pin >= 20 && pin <= 25) {
		addr = 0xe8+(pin-20);
	} else if (pin >= 30 && pin <= 37) { 
		addr = 0xf5+(pin-30);
	} else {
		return;
	}
	
	ALI_OPEN();
	ALI_SELDEV(8);
	
	ali_write(0x03, 0x03);    /* Disable CIO data register */
	
	data=0;
	if (special) {
		data |= 0x08;
	} else {
		if (inv) {
			data |= 0x02;
		}
		if (input) {
			data |= 0x01;
		}
	}
	
	ali_write(addr, data);
	
	ALI_CLOSE();
}

void ali512x_cio_out(int pin, int value) 
{
	u8 reg;
	u8 data;
	u8 bit;
	
	/* valid pins are 10-17, 20-25 and 30-37 */
	if (pin >= 10 && pin <= 17) { 
		reg = 1;
		pin -= 10;
	} else if (pin >= 20 && pin <= 25) {
		reg = 2;
		pin -= 20;
	} else if (pin >= 30 && pin <= 37) { 
		reg = 3;
		pin -= 30;
	} else {
		return;
	}
	bit = 1 << pin;
	
	ALI_OPEN();
	ALI_SELDEV(8);
	
	ali_write(0x03, 0x83);    /* Enable CIO data register, use data port at 0xea */
	
	ali_write(0xea, reg);     /* select I/O register */
	data = ali_read(0xeb);
	if (value) {
		data |= bit;
	} else {
		data &= ~bit;
	}
	ali_write(0xeb, data);
	ali_write(0xea, 0);       /* select register 0 */
	ali_write(0x03, 0x03);    /* Disable CIO data register */
	ALI_CLOSE();
}

int ali512x_cio_in(int pin)
{
	u8 reg;
	u8 data;
	u8 bit;
	
	/* valid pins are 10-17, 20-25 and 30-37 */
	if (pin >= 10 && pin <= 17) { 
		reg = 1;
		pin -= 10;
	} else if (pin >= 20 && pin <= 25) {
		reg = 2;
		pin -= 20;
	} else if (pin >= 30 && pin <= 37) { 
		reg = 3;
		pin -= 30;
	} else {
		return -1; 
	}
	bit = 1 << pin;
	
	ALI_OPEN();
	ALI_SELDEV(8);
	
	ali_write(0x03, 0x83);    /* Enable CIO data register, use data port at 0xea */
	
	ali_write(0xea, reg);     /* select I/O register */
	data = ali_read(0xeb);
	ali_write(0xea, 0);       /* select register 0 */
	ali_write(0x03, 0x03);    /* Disable CIO data register */
	ALI_CLOSE();
	
	return data & bit; 
}