/*****************************************************************************
 *
 *     Author: Xilinx, Inc.
 *
 *     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.
 *
 *     XILINX IS PROVIDING THIS DESIGN, CODE, OR INFORMATION "AS IS"
 *     AS A COURTESY TO YOU, SOLELY FOR USE IN DEVELOPING PROGRAMS AND
 *     SOLUTIONS FOR XILINX DEVICES.  BY PROVIDING THIS DESIGN, CODE,
 *     OR INFORMATION AS ONE POSSIBLE IMPLEMENTATION OF THIS FEATURE,
 *     APPLICATION OR STANDARD, XILINX IS MAKING NO REPRESENTATION
 *     THAT THIS IMPLEMENTATION IS FREE FROM ANY CLAIMS OF INFRINGEMENT,
 *     AND YOU ARE RESPONSIBLE FOR OBTAINING ANY RIGHTS YOU MAY REQUIRE
 *     FOR YOUR IMPLEMENTATION.  XILINX EXPRESSLY DISCLAIMS ANY
 *     WARRANTY WHATSOEVER WITH RESPECT TO THE ADEQUACY OF THE
 *     IMPLEMENTATION, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OR
 *     REPRESENTATIONS THAT THIS IMPLEMENTATION IS FREE FROM CLAIMS OF
 *     INFRINGEMENT, IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
 *     FOR A PARTICULAR PURPOSE.
 *
 *     (c) Copyright 2007-2008 Xilinx Inc.
 *     All rights reserved.
 *
 *     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.,
 *     675 Mass Ave, Cambridge, MA 02139, USA.
 *
 *****************************************************************************/

#include "fifo_icap.h"

/* Register offsets for the XHwIcap device. */
#define XHI_GIER_OFFSET 0x1C  /* Device Global Interrupt Enable Reg */
#define XHI_IPISR_OFFSET 0x20  /* Interrupt Status Register */
#define XHI_IPIER_OFFSET 0x28  /* Interrupt Enable Register */
#define XHI_WF_OFFSET 0x100 /* Write FIFO */
#define XHI_RF_OFFSET 0x104 /* Read FIFO */
#define XHI_SZ_OFFSET 0x108 /* Size Register */
#define XHI_CR_OFFSET 0x10C /* Control Register */
#define XHI_SR_OFFSET 0x110 /* Status Register */
#define XHI_WFV_OFFSET 0x114 /* Write FIFO Vacancy Register */
#define XHI_RFO_OFFSET 0x118 /* Read FIFO Occupancy Register */

/* Device Global Interrupt Enable Register (GIER) bit definitions */

#define XHI_GIER_GIE_MASK 0x80000000 /* Global Interrupt enable Mask */

/**
 * HwIcap Device Interrupt Status/Enable Registers
 *
 * Interrupt Status Register (IPISR) : This register holds the
 * interrupt status flags for the device. These bits are toggle on
 * write.
 *
 * Interrupt Enable Register (IPIER) : This register is used to enable
 * interrupt sources for the device.
 * Writing a '1' to a bit enables the corresponding interrupt.
 * Writing a '0' to a bit disables the corresponding interrupt.
 *
 * IPISR/IPIER registers have the same bit definitions and are only defined
 * once.
 */
#define XHI_IPIXR_RFULL_MASK 0x00000008 /* Read FIFO Full */
#define XHI_IPIXR_WEMPTY_MASK 0x00000004 /* Write FIFO Empty */
#define XHI_IPIXR_RDP_MASK 0x00000002 /* Read FIFO half full */
#define XHI_IPIXR_WRP_MASK 0x00000001 /* Write FIFO half full */
#define XHI_IPIXR_ALL_MASK 0x0000000F /* Mask of all interrupts */

/* Control Register (CR) */
#define XHI_CR_SW_RESET_MASK 0x00000008 /* SW Reset Mask */
#define XHI_CR_FIFO_CLR_MASK 0x00000004 /* FIFO Clear Mask */
#define XHI_CR_READ_MASK 0x00000002 /* Read from ICAP to FIFO */
#define XHI_CR_WRITE_MASK 0x00000001 /* Write from FIFO to ICAP */


#define XHI_WFO_MAX_VACANCY 1024 /* Max Write FIFO Vacancy, in words */
#define XHI_RFO_MAX_OCCUPANCY 256 /* Max Read FIFO Occupancy, in words */
/* The maximum amount we can request from fifo_icap_get_configuration
   at once, in bytes. */
#define XHI_MAX_READ_TRANSACTION_WORDS 0xFFF


/**
 * fifo_icap_fifo_write - Write data to the write FIFO.
 * @drvdata: a pointer to the drvdata.
 * @data: the 32-bit value to be written to the FIFO.
 *
 * This function will silently fail if the fifo is full.
 **/
static inline void fifo_icap_fifo_write(struct hwicap_drvdata *drvdata,
  u32 data)
{
 dev_dbg(drvdata->dev, "fifo_write: %x\n", data);
 out_be32(drvdata->base_address + XHI_WF_OFFSET, data);
}

/**
 * fifo_icap_fifo_read - Read data from the Read FIFO.
 * @drvdata: a pointer to the drvdata.
 *
 * This function will silently fail if the fifo is empty.
 **/
static inline u32 fifo_icap_fifo_read(struct hwicap_drvdata *drvdata)
{
 u32 data = in_be32(drvdata->base_address + XHI_RF_OFFSET);
 dev_dbg(drvdata->dev, "fifo_read: %x\n", data);
 return data;
}

/**
 * fifo_icap_set_read_size - Set the size register.
 * @drvdata: a pointer to the drvdata.
 * @data: the size of the following read transaction, in words.
 **/
static inline void fifo_icap_set_read_size(struct hwicap_drvdata *drvdata,
  u32 data)
{
 out_be32(drvdata->base_address + XHI_SZ_OFFSET, data);
}

/**
 * fifo_icap_start_config - Initiate a configuration (write) to the device.
 * @drvdata: a pointer to the drvdata.
 **/
static inline void fifo_icap_start_config(struct hwicap_drvdata *drvdata)
{
 out_be32(drvdata->base_address + XHI_CR_OFFSET, XHI_CR_WRITE_MASK);
 dev_dbg(drvdata->dev, "configuration started\n");
}

/**
 * fifo_icap_start_readback - Initiate a readback from the device.
 * @drvdata: a pointer to the drvdata.
 **/
static inline void fifo_icap_start_readback(struct hwicap_drvdata *drvdata)
{
 out_be32(drvdata->base_address + XHI_CR_OFFSET, XHI_CR_READ_MASK);
 dev_dbg(drvdata->dev, "readback started\n");
}

/**
 * fifo_icap_get_status - Get the contents of the status register.
 * @drvdata: a pointer to the drvdata.
 *
 * The status register contains the ICAP status and the done bit.
 *
 * D8 - cfgerr
 * D7 - dalign
 * D6 - rip
 * D5 - in_abort_l
 * D4 - Always 1
 * D3 - Always 1
 * D2 - Always 1
 * D1 - Always 1
 * D0 - Done bit
 **/
u32 fifo_icap_get_status(struct hwicap_drvdata *drvdata)
{
 u32 status = in_be32(drvdata->base_address + XHI_SR_OFFSET);
 dev_dbg(drvdata->dev, "Getting status = %x\n", status);
 return status;
}

/**
 * fifo_icap_busy - Return true if the ICAP is still processing a transaction.
 * @drvdata: a pointer to the drvdata.
 **/
static inline u32 fifo_icap_busy(struct hwicap_drvdata *drvdata)
{
 u32 status = in_be32(drvdata->base_address + XHI_SR_OFFSET);
 return (status & XHI_SR_DONE_MASK) ? 0 : 1;
}

/**
 * fifo_icap_write_fifo_vacancy - Query the write fifo available space.
 * @drvdata: a pointer to the drvdata.
 *
 * Return the number of words that can be safely pushed into the write fifo.
 **/
static inline u32 fifo_icap_write_fifo_vacancy(
  struct hwicap_drvdata *drvdata)
{
 return in_be32(drvdata->base_address + XHI_WFV_OFFSET);
}

/**
 * fifo_icap_read_fifo_occupancy - Query the read fifo available data.
 * @drvdata: a pointer to the drvdata.
 *
 * Return the number of words that can be safely read from the read fifo.
 **/
static inline u32 fifo_icap_read_fifo_occupancy(
  struct hwicap_drvdata *drvdata)
{
 return in_be32(drvdata->base_address + XHI_RFO_OFFSET);
}

/**
 * fifo_icap_set_configuration - Send configuration data to the ICAP.
 * @drvdata: a pointer to the drvdata.
 * @frame_buffer: a pointer to the data to be written to the
 *  ICAP device.
 * @num_words: the number of words (32 bit) to write to the ICAP
 *  device.

 * This function writes the given user data to the Write FIFO in
 * polled mode and starts the transfer of the data to
 * the ICAP device.
 **/
int fifo_icap_set_configuration(struct hwicap_drvdata *drvdata,
  u32 *frame_buffer, u32 num_words)
{

 u32 write_fifo_vacancy = 0;
 u32 retries = 0;
 u32 remaining_words;

 dev_dbg(drvdata->dev, "fifo_set_configuration\n");

 /*
  * Check if the ICAP device is Busy with the last Read/Write
 */
 if (fifo_icap_busy(drvdata))
  return -EBUSY;

 /*
  * Set up the buffer pointer and the words to be transferred.
 */
 remaining_words = num_words;

 while (remaining_words > 0) {
  /*
   * Wait until we have some data in the fifo.
 */
  while (write_fifo_vacancy == 0) {
   write_fifo_vacancy =
    fifo_icap_write_fifo_vacancy(drvdata);
   retries++;
   if (retries > XHI_MAX_RETRIES)
    return -EIO;
  }

  /*
   * Write data into the Write FIFO.
 */
  while ((write_fifo_vacancy != 0) &&
    (remaining_words > 0)) {
   fifo_icap_fifo_write(drvdata, *frame_buffer);

   remaining_words--;
   write_fifo_vacancy--;
   frame_buffer++;
  }
  /* Start pushing whatever is in the FIFO into the ICAP. */
  fifo_icap_start_config(drvdata);
 }

 /* Wait until the write has finished. */
 while (fifo_icap_busy(drvdata)) {
  retries++;
  if (retries > XHI_MAX_RETRIES)
   break;
 }

 dev_dbg(drvdata->dev, "done fifo_set_configuration\n");

 /*
  * If the requested number of words have not been read from
  * the device then indicate failure.
 */
 if (remaining_words != 0)
  return -EIO;

 return 0;
}

/**
 * fifo_icap_get_configuration - Read configuration data from the device.
 * @drvdata: a pointer to the drvdata.
 * @data: Address of the data representing the partial bitstream
 * @size: the size of the partial bitstream in 32 bit words.
 *
 * This function reads the specified number of words from the ICAP device in
 * the polled mode.
 */
int fifo_icap_get_configuration(struct hwicap_drvdata *drvdata,
  u32 *frame_buffer, u32 num_words)
{

 u32 read_fifo_occupancy = 0;
 u32 retries = 0;
 u32 *data = frame_buffer;
 u32 remaining_words;
 u32 words_to_read;

 dev_dbg(drvdata->dev, "fifo_get_configuration\n");

 /*
  * Check if the ICAP device is Busy with the last Write/Read
 */
 if (fifo_icap_busy(drvdata))
  return -EBUSY;

 remaining_words = num_words;

 while (remaining_words > 0) {
  words_to_read = remaining_words;
  /* The hardware has a limit on the number of words
   that can be read at one time.  */
  if (words_to_read > XHI_MAX_READ_TRANSACTION_WORDS)
   words_to_read = XHI_MAX_READ_TRANSACTION_WORDS;

  remaining_words -= words_to_read;

  fifo_icap_set_read_size(drvdata, words_to_read);
  fifo_icap_start_readback(drvdata);

  while (words_to_read > 0) {
   /* Wait until we have some data in the fifo. */
   while (read_fifo_occupancy == 0) {
    read_fifo_occupancy =
     fifo_icap_read_fifo_occupancy(drvdata);
    retries++;
    if (retries > XHI_MAX_RETRIES)
     return -EIO;
   }

   if (read_fifo_occupancy > words_to_read)
    read_fifo_occupancy = words_to_read;

   words_to_read -= read_fifo_occupancy;

   /* Read the data from the Read FIFO. */
   while (read_fifo_occupancy != 0) {
    *data++ = fifo_icap_fifo_read(drvdata);
    read_fifo_occupancy--;
   }
  }
 }

 dev_dbg(drvdata->dev, "done fifo_get_configuration\n");

 return 0;
}

/**
 * buffer_icap_reset - Reset the logic of the icap device.
 * @drvdata: a pointer to the drvdata.
 *
 * This function forces the software reset of the complete HWICAP device.
 * All the registers will return to the default value and the FIFO is also
 * flushed as a part of this software reset.
 */
void fifo_icap_reset(struct hwicap_drvdata *drvdata)
{
 u32 reg_data;
 /*
  * Reset the device by setting/clearing the RESET bit in the
  * Control Register.
 */
 reg_data = in_be32(drvdata->base_address + XHI_CR_OFFSET);

 out_be32(drvdata->base_address + XHI_CR_OFFSET,
    reg_data | XHI_CR_SW_RESET_MASK);

 out_be32(drvdata->base_address + XHI_CR_OFFSET,
    reg_data & (~XHI_CR_SW_RESET_MASK));

}

/**
 * fifo_icap_flush_fifo - This function flushes the FIFOs in the device.
 * @drvdata: a pointer to the drvdata.
 */
void fifo_icap_flush_fifo(struct hwicap_drvdata *drvdata)
{
 u32 reg_data;
 /*
  * Flush the FIFO by setting/clearing the FIFO Clear bit in the
  * Control Register.
 */
 reg_data = in_be32(drvdata->base_address + XHI_CR_OFFSET);

 out_be32(drvdata->base_address + XHI_CR_OFFSET,
    reg_data | XHI_CR_FIFO_CLR_MASK);

 out_be32(drvdata->base_address + XHI_CR_OFFSET,
    reg_data & (~XHI_CR_FIFO_CLR_MASK));
}