Subversion Repositories openarty

////////////////////////////////////////////////////////////////////////////////

//

// Filename:    wbprogram.cpp

//

// Project:     OpenArty, an entirely open SoC based upon the Arty platform

//

// Purpose:     Program the memory with a given '.bin' file.

//

// Creator:     Dan Gisselquist, Ph.D.

//              Gisselquist Technology, LLC

//

////////////////////////////////////////////////////////////////////////////////

//

// Copyright (C) 2015-2016, Gisselquist Technology, LLC

//

// This program is free software (firmware): 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 3 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 MERCHANTIBILITY 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.  (It's in the $(ROOT)/doc directory, run make with no

// target there if the PDF file isn't present.)  If not, see

// <http://www.gnu.org/licenses/> for a copy.

//

// License:     GPL, v3, as defined and found on www.gnu.org,

//              http://www.gnu.org/licenses/gpl.html

//

//

////////////////////////////////////////////////////////////////////////////////

//

//

//

#include <stdio.h>

#include <stdlib.h>

#include <unistd.h>

#include <strings.h>

#include <ctype.h>

#include <string.h>

#include <signal.h>

#include <assert.h>

#include "port.h"

#include "llcomms.h"

#include "regdefs.h"

#include "flashdrvr.h"

DEVBUS  *m_fpga;

void    closeup(int v) {

        m_fpga->kill();

        exit(0);

}

unsigned byteswap(unsigned x) {

        unsigned r;

        r  = x&0x0ff; x>>=8; r<<= 8;

        r |= x&0x0ff; x>>=8; r<<= 8;

        r |= x&0x0ff; x>>=8; r<<= 8;

        r |= x&0x0ff;

        return r;

}

void    usage(void) {

        printf("USAGE: wbprogram [@<Address>] file.bit\n");

        printf("\tYou can also use a .bin file in place of the file.bit.\n");

}

int main(int argc, char **argv) {

        FILE    *fp;

        const int       BUFLN = (1<<20); // 4MB Flash

        DEVBUS::BUSW    *buf = new DEVBUS::BUSW[BUFLN], v, addr = EQSPIFLASH;

        FLASHDRVR       *flash;

        int             argn = 1;

        if ((argc > argn)&&(NULL != strstr(argv[argn],"tty")))

                m_fpga = new FPGA(new TTYCOMMS(argv[argn++]));

        else if ((argc > argn)&&(NULL != strchr(argv[argn],':'))) {

                char *ptr = strchr(argv[argn],':');

                *ptr++ = '\n';

                m_fpga = new FPGA(new NETCOMMS(argv[argn++], atoi(ptr)));

        } else {

                FPGAOPEN(m_fpga);

        }

        // Start with testing the version:

        try {

                printf("VERSION: %08x\n", m_fpga->readio(R_VERSION));

        } catch(BUSERR b) {

                printf("VERSION: (Bus-Err)\n");

                exit(-1);

        }

        // SPI flash testing

        // Enable the faster (vector) reads

        bool    vector_read = true;

        unsigned        sz;

        bool            esectors[NSECTORS];

        argn = 1;

        if (argc <= argn) {

                usage();

                exit(-1);

        } else if (argv[argn][0] == '@') {

                addr = strtoul(&argv[argn][1], NULL, 0);

                if ((addr < EQSPIFLASH)||(addr > EQSPIFLASH*2)) {

                        printf("BAD ADDRESS: 0x%08x (from %s)\n", addr, argv[argn]);

                        printf("The address you've selected, 0x%08x, is outside the range", addr);

                        printf("from 0x%08x to 0x%08x\n", EQSPIFLASH, EQSPIFLASH*2);

                        exit(-1);

                } argn++;

        }

        if (argc<= argn) {

                printf("BAD USAGE: no file argument\n");

                exit(-1);

        } else if (0 != access(argv[argn], R_OK)) {

                printf("Cannot access %s\n", argv[argn]);

                exit(-1);

        }

        flash = new FLASHDRVR(m_fpga);

        if ((strcmp(&argv[argn][strlen(argv[argn])-4],".bit")!=0)

                &&(strcmp(&argv[argn][strlen(argv[argn])-4],".bin")!=0)) {

                printf("I'm expecting a '.bit' or \'.bin\' file extension\n");

                exit(-1);

        }

        fp = fopen(argv[argn], "r");

        if (strcmp(&argv[argn][strlen(argv[argn])-4],".bit")==0)

                fseek(fp, 0x5dl, SEEK_SET);

        sz = fread(buf, sizeof(buf[0]), BUFLN, fp);

        fclose(fp);

        for(int i=0; i<sz; i++) {

                buf[i] = byteswap(buf[i]);

        }

        try {

                flash->write(addr, sz, buf, true);

        } catch(BUSERR b) {

                fprintf(stderr, "BUS-ERR @0x%08x\n", b.addr);

                exit(-1);

        }

        try {

                // Turn on the write protect flag

                m_fpga->writeio(R_QSPI_EREG, 0);

        } catch(BUSERR b) {

                fprintf(stderr, "BUS-ERR, trying to read QSPI port\n");

                exit(-1);

        }

        printf("ALL-DONE\n");

        delete  m_fpga;

}