// SPDX-License-Identifier: GPL-2.0-or-later
/*
 * arch/powerpc/boot/ugecon.c
 *
 * USB Gecko bootwrapper console.
 * Copyright (C) 2008-2009 The GameCube Linux Team
 * Copyright (C) 2008,2009 Albert Herranz
 */

#include <stddef.h>
#include "stdio.h"
#include "types.h"
#include "io.h"
#include "ops.h"


#define EXI_CLK_32MHZ           5

#define EXI_CSR                 0x00
#define   EXI_CSR_CLKMASK       (0x7<<4)
#define     EXI_CSR_CLK_32MHZ   (EXI_CLK_32MHZ<<4)
#define   EXI_CSR_CSMASK        (0x7<<7)
#define     EXI_CSR_CS_0        (0x1<<7)  /* Chip Select 001 */

#define EXI_CR                  0x0c
#define   EXI_CR_TSTART         (1<<0)
#define   EXI_CR_WRITE  (1<<2)
#define   EXI_CR_READ_WRITE     (2<<2)
#define   EXI_CR_TLEN(len)      (((len)-1)<<4)

#define EXI_DATA                0x10


/* virtual address base for input/output, retrieved from device tree */
static void *ug_io_base;


static u32 ug_io_transaction(u32 in)
{
 u32 *csr_reg = ug_io_base + EXI_CSR;
 u32 *data_reg = ug_io_base + EXI_DATA;
 u32 *cr_reg = ug_io_base + EXI_CR;
 u32 csr, data, cr;

 /* select */
 csr = EXI_CSR_CLK_32MHZ | EXI_CSR_CS_0;
 out_be32(csr_reg, csr);

 /* read/write */
 data = in;
 out_be32(data_reg, data);
 cr = EXI_CR_TLEN(2) | EXI_CR_READ_WRITE | EXI_CR_TSTART;
 out_be32(cr_reg, cr);

 while (in_be32(cr_reg) & EXI_CR_TSTART)
  barrier();

 /* deselect */
 out_be32(csr_reg, 0);

 data = in_be32(data_reg);
 return data;
}

static int ug_is_txfifo_ready(void)
{
 return ug_io_transaction(0xc0000000) & 0x04000000;
}

static void ug_raw_putc(char ch)
{
 ug_io_transaction(0xb0000000 | (ch << 20));
}

static void ug_putc(char ch)
{
 int count = 16;

 if (!ug_io_base)
  return;

 while (!ug_is_txfifo_ready() && count--)
  barrier();
 if (count >= 0)
  ug_raw_putc(ch);
}

void ug_console_write(const char *buf, int len)
{
 char *b = (char *)buf;

 while (len--) {
  if (*b == '\n')
   ug_putc('\r');
  ug_putc(*b++);
 }
}

static int ug_is_adapter_present(void)
{
 if (!ug_io_base)
  return 0;
 return ug_io_transaction(0x90000000) == 0x04700000;
}

static void *ug_grab_exi_io_base(void)
{
 u32 v;
 void *devp;

 devp = find_node_by_compatible(NULL, "nintendo,flipper-exi");
 if (devp == NULL)
  goto err_out;
 if (getprop(devp, "virtual-reg", &v, sizeof(v)) != sizeof(v))
  goto err_out;

 return (void *)v;

err_out:
 return NULL;
}

void *ug_probe(void)
{
 void *exi_io_base;
 int i;

 exi_io_base = ug_grab_exi_io_base();
 if (!exi_io_base)
  return NULL;

 /* look for a usbgecko on memcard slots A and B */
 for (i = 0; i < 2; i++) {
  ug_io_base = exi_io_base + 0x14 * i;
  if (ug_is_adapter_present())
   break;
 }
 if (i == 2)
  ug_io_base = NULL;
 return ug_io_base;
}