1 files changed, 314 insertions, 0 deletions

diff --git a/firmware/target/arm/pp/i2c-pp.c b/firmware/target/arm/pp/i2c-pp.c
new file mode 100644
index 0000000000..58740b5c66
--- /dev/null
+++ b/firmware/target/arm/pp/i2c-pp.c
@@ -0,0 +1,314 @@
+/***************************************************************************
+ *             __________               __   ___.
+ *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
+ *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
+ *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
+ *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
+ *                     \/            \/     \/    \/            \/
+ * $Id$
+ *
+ * PP502X and PP5002 I2C driver
+ *
+ * Based on code from the ipodlinux project - http://ipodlinux.org/
+ * Adapted for Rockbox in November 2005
+ *
+ * Original file: linux/arch/armnommu/mach-ipod/hardware.c
+ *
+ * Copyright (c) 2003-2005 Bernard Leach (leachbj@bouncycastle.org)
+ *
+ * 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 software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
+ * KIND, either express or implied.
+ *
+ ****************************************************************************/
+
+#include "cpu.h"
+#include "kernel.h"
+#include "thread.h"
+#include "logf.h"
+#include "system.h"
+#include "i2c.h"
+#include "i2c-pp.h"
+#include "ascodec.h"
+#include "as3514.h"
+
+#define I2C_CTRL    (*(volatile unsigned char*)(I2C_BASE+0x00))
+#define I2C_ADDR    (*(volatile unsigned char*)(I2C_BASE+0x04))
+#define I2C_DATA(X) (*(volatile unsigned char*)(I2C_BASE+0xc+(4*X)))
+#define I2C_STATUS  (*(volatile unsigned char*)(I2C_BASE+0x1c))
+
+/* I2C_CTRL bit definitions */
+#define I2C_SEND    0x80
+
+/* I2C_STATUS bit definitions */
+#define I2C_BUSY    (1<<6)
+
+/* Local functions definitions */
+static struct mutex i2c_mtx SHAREDBSS_ATTR;
+
+#define POLL_TIMEOUT (HZ)
+
+static int pp_i2c_wait_not_busy(void)
+{
+    unsigned long timeout;
+    timeout = current_tick + POLL_TIMEOUT;
+    while (TIME_BEFORE(current_tick, timeout)) {
+         if (!(I2C_STATUS & I2C_BUSY)) {
+            return 0;
+         }
+         yield();
+    }
+
+    return -1;
+}
+
+static int pp_i2c_read_bytes(unsigned int addr, int len, unsigned char *data)
+{
+    int i;
+
+    if (len < 1 || len > 4)
+    {
+        return -1;
+    }
+
+    if (pp_i2c_wait_not_busy() < 0)
+    {
+        return -2;
+    }
+
+    {
+        int old_irq_level = disable_irq_save();
+
+        /* clear top 15 bits, left shift 1, or in 0x1 for a read */
+        I2C_ADDR = ((addr << 17) >> 16) | 0x1;
+
+        I2C_CTRL |= 0x20;
+
+        I2C_CTRL = (I2C_CTRL & ~0x6) | ((len-1) << 1);
+
+        I2C_CTRL |= I2C_SEND;
+
+        restore_irq(old_irq_level);
+
+        if (pp_i2c_wait_not_busy() < 0)
+        {
+            return -2;
+        }
+
+        old_irq_level = disable_irq_save();
+
+        if (data)
+        {
+            for ( i = 0; i < len; i++ )
+                *data++ = I2C_DATA(i);
+        }
+
+        restore_irq(old_irq_level);
+    }
+
+    return 0;
+}
+
+static int pp_i2c_send_bytes(unsigned int addr, int len, unsigned char *data)
+{
+    int i;
+
+    if (len < 1 || len > 4)
+    {
+        return -1;
+    }
+
+    if (pp_i2c_wait_not_busy() < 0)
+    {
+        return -2;
+    }
+
+    {
+        int old_irq_level = disable_irq_save();
+
+        /* clear top 15 bits, left shift 1 */
+        I2C_ADDR = (addr << 17) >> 16;
+
+        I2C_CTRL &= ~0x20;
+
+        for ( i = 0; i < len; i++ )
+        {
+            I2C_DATA(i) = *data++;
+        }
+
+        I2C_CTRL = (I2C_CTRL & ~0x6) | ((len-1) << 1);
+
+        I2C_CTRL |= I2C_SEND;
+
+        restore_irq(old_irq_level);
+    }
+
+    return 0;
+}
+
+static int pp_i2c_send_byte(unsigned int addr, int data0)
+{
+    unsigned char data[1];
+
+    data[0] = data0;
+
+    return pp_i2c_send_bytes(addr, 1, data);
+}
+
+/* Public functions */
+void i2c_lock(void)
+{
+    mutex_lock(&i2c_mtx);
+}
+
+void i2c_unlock(void)
+{
+    mutex_unlock(&i2c_mtx);
+}
+
+int i2c_readbytes(unsigned int dev_addr, int addr, int len, unsigned char *data)
+{
+    int i, n;
+
+    mutex_lock(&i2c_mtx);
+
+    if (addr >= 0)
+        pp_i2c_send_byte(dev_addr, addr);
+
+    i = 0;
+    while (len > 0)
+    {
+        n = (len < 4) ? len : 4;
+
+        if (pp_i2c_read_bytes(dev_addr, n, data + i) < 0)
+            break;
+
+        len -= n;
+        i   += n;
+    }
+
+    mutex_unlock(&i2c_mtx);
+
+    return i;
+}
+
+int i2c_readbyte(unsigned int dev_addr, int addr)
+{
+    unsigned char data;
+
+    mutex_lock(&i2c_mtx);
+    pp_i2c_send_byte(dev_addr, addr);
+    pp_i2c_read_bytes(dev_addr, 1, &data);
+    mutex_unlock(&i2c_mtx);
+
+    return (int)data;
+}
+
+int i2c_sendbytes(unsigned int addr, int len, const unsigned char *data)
+{
+    int i, n;
+
+    mutex_lock(&i2c_mtx);
+
+    i = 0;
+    while (len > 0)
+    {
+        n = (len < 4) ? len : 4;
+
+        if (pp_i2c_send_bytes(addr, n, (unsigned char *)(data + i)) < 0)
+            break;
+
+        len -= n;
+        i   += n;
+    }
+
+    mutex_unlock(&i2c_mtx);
+
+    return i;
+}
+
+int pp_i2c_send(unsigned int addr, int data0, int data1)
+{
+    int retval;
+    unsigned char data[2];
+
+    data[0] = data0;
+    data[1] = data1;
+
+    mutex_lock(&i2c_mtx);
+    retval = pp_i2c_send_bytes(addr, 2, data);
+    mutex_unlock(&i2c_mtx);
+
+    return retval;
+}
+
+void i2c_init(void)
+{
+    /* From ipodlinux */
+    mutex_init(&i2c_mtx);
+
+#ifdef IPOD_MINI
+    /* GPIO port C disable port 0x10 */
+    GPIOC_ENABLE &= ~0x10;
+
+    /* GPIO port C disable port 0x20 */
+    GPIOC_ENABLE &= ~0x20;
+#endif
+
+#if CONFIG_I2C == I2C_PP5002
+    DEV_EN |= 0x2;
+#else
+    DEV_EN |= DEV_I2C;  /* Enable I2C */
+#endif
+    DEV_RS |= DEV_I2C;  /* Start I2C Reset */
+    DEV_RS &=~DEV_I2C;  /* End I2C Reset */
+
+#if CONFIG_I2C == I2C_PP5020
+    outl(0x0, 0x600060a4);
+#if defined(PHILIPS_HDD1630) || defined(PHILIPS_HDD6330) || \
+    defined(SAMSUNG_YH820) || defined(SAMSUNG_YH920) || \
+    defined(SAMSUNG_YH925) || defined(PBELL_VIBE500)
+    outl(inl(0x600060a4) | 0x20, 0x600060a4);
+    outl(inl(0x7000c020) | 0x3, 0x7000c020);
+    outl(0x55, 0x7000c02c);
+    outl(0x54, 0x7000c030);
+#else
+    outl(0x80 | (0 << 8), 0x600060a4);
+#endif
+#elif CONFIG_I2C == I2C_PP5024
+#if defined(SANSA_E200) || defined(PHILIPS_SA9200)
+    /* Sansa OF sets this to 0x20 first, communicates with the AS3514
+       then sets it to 0x23 - this still works fine though */
+    outl(0x0, 0x600060a4);
+    outl(0x23, 0x600060a4);
+#elif defined(SANSA_C200)
+    /* This is the init sequence from the Sansa c200 bootloader.
+       I'm not sure what's really necessary. */
+    pp_i2c_wait_not_busy();
+
+    outl(0, 0x600060a4);
+    outl(0x64, 0x600060a4);
+
+    outl(0x55, 0x7000c02c);
+    outl(0x54, 0x7000c030);
+
+    outl(0, 0x600060a4);
+    outl(0x1e, 0x600060a4);
+
+    ascodec_write(AS3514_SUPERVISOR, 5);
+#elif defined(PHILIPS_SA9200)
+    outl(0x0, 0x600060a4);
+    outl(inl(0x600060a4) | 0x20, 0x600060a4);
+
+    outl(inl(0x7000c020) | 0x3, 0x7000c020);
+    outl(0x55, 0x7000c02c);
+    outl(0x54, 0x7000c030);
+#endif
+#endif
+
+    i2c_readbyte(0x8, 0);
+}