release/src-rt/cfe/cfe/arch/mips/board/carmel/src/xilinx.c

   1 /*  *********************************************************************
   2     *  SB1125 Board Support Package
   3     *
   4     *  Xilinx programming module                File: xilinx.c
   5     *
   6     *  Routines to program Xilinx FPGAs.
   7     *
   8     *  Author:  Stefan Ludwig, Mitch Lichtenberg
   9     *
  10     *********************************************************************
  11     *
  12     *  Copyright 2000,2001,2002,2003
  13     *  Broadcom Corporation. All rights reserved.
  14     *
  15     *  This software is furnished under license and may be used and
  16     *  copied only in accordance with the following terms and
  17     *  conditions.  Subject to these conditions, you may download,
  18     *  copy, install, use, modify and distribute modified or unmodified
  19     *  copies of this software in source and/or binary form.  No title
  20     *  or ownership is transferred hereby.
  21     *
  22     *  1) Any source code used, modified or distributed must reproduce
  23     *     and retain this copyright notice and list of conditions
  24     *     as they appear in the source file.
  25     *
  26     *  2) No right is granted to use any trade name, trademark, or
  27     *     logo of Broadcom Corporation.  The "Broadcom Corporation"
  28     *     name may not be used to endorse or promote products derived
  29     *     from this software without the prior written permission of
  30     *     Broadcom Corporation.
  31     *
  32     *  3) THIS SOFTWARE IS PROVIDED "AS-IS" AND ANY EXPRESS OR
  33     *     IMPLIED WARRANTIES, INCLUDING BUT NOT LIMITED TO, ANY IMPLIED
  34     *     WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
  35     *     PURPOSE, OR NON-INFRINGEMENT ARE DISCLAIMED. IN NO EVENT
  36     *     SHALL BROADCOM BE LIABLE FOR ANY DAMAGES WHATSOEVER, AND IN
  37     *     PARTICULAR, BROADCOM SHALL NOT BE LIABLE FOR DIRECT, INDIRECT,
  38     *     INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  39     *     (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  40     *     GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
  41     *     BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
  42     *     OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
  43     *     TORT (INCLUDING NEGLIGENCE OR OTHERWISE), EVEN IF ADVISED OF
  44     *     THE POSSIBILITY OF SUCH DAMAGE.
  45     ********************************************************************* */
  46
  47
  48 #include "lib_types.h"
  49 #include "lib_printf.h"
  50 #include "sbmips.h"
  51 #include "sb1250_defs.h"
  52 #include "sb1250_regs.h"
  53
  54 #include "xilinx.h"
  55
  56 #define DEBUG
  57
  58 static int xilinx_open(xpgminfo_t *xi)
  59 {
  60     uint64_t val = SBREADCSR(A_GPIO_DIRECTION);
  61
  62     /*
  63      * Save old direction register and set things the way
  64      * we want for programming.
  65      */
  66
  67     xi->olddir = val;
  68
  69     /* set GPIO PROGRAM_pin, DIN_pin and CCLK_pin to output */
  70     val |= (xi->PGMpin | xi->DINpin | xi->CCLKpin);
  71
  72     SBWRITECSR(A_GPIO_DIRECTION,val);
  73     return 0;
  74 }
  75
  76 static int xilinx_close(xpgminfo_t *xi)
  77 {
  78     /*
  79      * Set the direction bits back the way they were.
  80      */
  81
  82     SBWRITECSR(A_GPIO_DIRECTION,(xi->olddir));
  83
  84     return 0;
  85 }
  86
  87 static int xilinx_reset(xpgminfo_t *xi)
  88 {
  89     int i;
  90
  91     /* pull PROG and CCLK low */
  92     SBWRITECSR(A_GPIO_PIN_CLR,(xi->PGMpin | xi->CCLKpin));
  93
  94     /* wait for INIT low */
  95     for (i = 0; i != XPGM_TIMEOUT; i++) {
  96         if (!(SBREADCSR(A_GPIO_READ) & (xi->INITpin))) break;
  97         }
  98
  99     if (i == XPGM_TIMEOUT) {
 100         return XPGM_ERR_INIT_NEVER_LOW;
 101         }
 102
 103     /* pull prog high */
 104     SBWRITECSR(A_GPIO_PIN_SET,(xi->PGMpin));
 105
 106     /* wait for INIT high */
 107     for (i = 0; i != XPGM_TIMEOUT; i++) {
 108         if ((SBREADCSR(A_GPIO_READ) & (xi->INITpin))) break;
 109         }
 110
 111     if (i == XPGM_TIMEOUT) {
 112         return XPGM_ERR_INIT_NEVER_HIGH;
 113         }
 114     return 0;
 115 }
 116
 117
 118 int xilinx_program(xpgminfo_t *xi,uint8_t *configBits, int nofBits)
 119 {
 120
 121     int i, rc;
 122
 123     if (xilinx_open(xi)) {
 124         return XPGM_ERR_OPEN_FAILED;
 125         }
 126
 127     rc = xilinx_reset(xi);
 128     if (rc) {
 129         xilinx_close(xi);
 130         return rc;
 131         }
 132
 133     /* wait for 4 us */
 134     for (i = 0; i < 4000; i++) {
 135         SBREADCSR(A_GPIO_READ);
 136         }
 137
 138     /* load bitstream */
 139     for (i = 0; i < nofBits; i++) {
 140         if ((configBits[i / 8] << (i % 8)) & 0x80) {
 141             SBWRITECSR(A_GPIO_PIN_SET,xi->DINpin);
 142             }
 143         else {
 144             SBWRITECSR(A_GPIO_PIN_CLR,xi->DINpin);
 145             }
 146         SBWRITECSR(A_GPIO_PIN_CLR,xi->CCLKpin);
 147         SBWRITECSR(A_GPIO_PIN_SET,xi->CCLKpin);
 148
 149
 150         /* ensure INIT high */
 151 #ifndef DEBUG
 152         if (!(SBREADCSR(A_GPIO_READ) & xi->INITpin)) {
 153             xilinx_close(xi);
 154             return XPGM_ERR_INIT_NOT_HIGH;
 155             }
 156 #endif
 157         }
 158
 159     /* wait for 4 us */
 160     for (i = 0; i < 4000; i++) {
 161         SBREADCSR(A_GPIO_READ);
 162         }
 163
 164     /* if DONE not high, give it a few CCLKs */
 165     if (!(SBREADCSR(A_GPIO_READ) & xi->DONEpin)) {
 166
 167         SBWRITECSR(A_GPIO_PIN_SET,xi->DINpin);
 168         for (i = 0; i < 10; i++) {
 169             SBWRITECSR(A_GPIO_PIN_CLR,xi->CCLKpin);
 170             SBWRITECSR(A_GPIO_PIN_SET,xi->CCLKpin);
 171             }
 172         }
 173
 174     if (!(SBREADCSR(A_GPIO_READ) & xi->DONEpin)) {
 175         xilinx_close(xi);
 176         return XPGM_ERR_DONE_NOT_HIGH;
 177         }
 178
 179     xilinx_close(xi);
 180     return 0;
 181 }