Subversion Repositories xulalx25soc

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

//

// Filename:    uartscope.cpp

//

// Project:     XuLA2-LX25 SoC based upon the ZipCPU

//

// Purpose:     To read out, and decompose, the results of the wishbone scope

//              as applied to the UART interaction within the XuLA2-LX9(25)

//      board--particularly the UART interaction that will talk with a RPi.

//

//

// 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 "llcomms.h"

#include "usbi.h"

#include "port.h"

#include "regdefs.h"

#define WBSCOPE         R_RAMSCOPE

#define WBSCOPEDATA     R_RAMSCOPED

FPGA    *m_fpga;

void    closeup(int v) {

        m_fpga->kill();

        exit(0);

}

void    decode(DEVBUS::BUSW val) {

        int     trig, txbusy, tx_stb, tx_data, tx_uart;

        int     rx_rdy, rx_stb, rx_data, rx_uart;

        int     rx_break, rx_frame, rx_parity;

        int     wbcyc, wbstb, wbwe, wback, wbaddr;

        trig    = ((val>>31)&1);

        txbusy  = ((val>>30)&1);

        wbaddr  = ((val>>28)&3);

        rx_break  = (val>>27)&1;

        rx_frame  = (val>>26)&1;

        rx_parity = (val>>25)&1;

        rx_rdy    = (val>>24)&1;

        wbcyc     = (val>>23)&1;

        wbstb     = (val>>22)&1;

        wbwe      = (val>>21)&1;

        wback     = (val>>20)&1;

        rx_stb    = (val>>19)&1;

        rx_data   = (val>>11)&0x0ff;

        tx_stb    = (val>>10)&1;

        tx_data   = (val>> 2)&0x0ff;

        rx_uart   = (val>> 1)&1;

        tx_uart   = (val    )&1;

        printf(" UART %s %s [%s:%02x%s] [%s:%02x%s] %s%s%s@%08x %s %s%s%s",

                (rx_uart)?"RXD":"   ", (tx_uart)?"TXD":"   ",

                (rx_stb)?"RX!":"   ", rx_data, rx_rdy?"/RDY":"    ",

                (tx_stb)?"TX!":"   ", tx_data, txbusy?"/BSY":"    ",

                (wbcyc)?"C":" ", (wbstb)?"S":" ", (wbwe)?"W":"R",

                wbaddr, wback?"A":" ",

                rx_break?" BRK":"", rx_frame?" FERR":"", rx_parity?" PERR":"");

}

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

        int     skp=0, port = FPGAPORT;

        bool    use_usb = true;

        skp=1;

        for(int argn=0; argn<argc-skp; argn++) {

                if (argv[argn+skp][0] == '-') {

                        if (argv[argn+skp][1] == 'u')

                                use_usb = true;

                        else if (argv[argn+skp][1] == 'p') {

                                use_usb = false;

                                if (isdigit(argv[argn+skp][2]))

                                        port = atoi(&argv[argn+skp][2]);

                        }

                        skp++; argn--;

                } else

                        argv[argn] = argv[argn+skp];

        } argc -= skp;

        if (use_usb)

                m_fpga = new FPGA(new USBI());

        else

                m_fpga = new FPGA(new NETCOMMS(FPGAHOST, port));

        signal(SIGSTOP, closeup);

        signal(SIGHUP, closeup);

        unsigned        v, lgln, scoplen;

        v = m_fpga->readio(WBSCOPE);

        if (0x60000000 != (v & 0x60000000)) {

                printf("Scope is not yet ready:\n");

                printf("\tRESET:\t\t%s\n", (v&0x80000000)?"Ongoing":"Complete");

                printf("\tSTOPPED:\t%s\n", (v&0x40000000)?"Yes":"No");

                printf("\tTRIGGERED:\t%s\n", (v&0x20000000)?"Yes":"No");

                printf("\tPRIMED:\t\t%s\n", (v&0x10000000)?"Yes":"No");

                printf("\tMANUAL:\t\t%s\n", (v&0x08000000)?"Yes":"No");

                printf("\tDISABLED:\t%s\n", (v&0x04000000)?"Yes":"No");

                printf("\tZERO:\t\t%s\n", (v&0x02000000)?"Yes":"No");

                exit(0);

        } else printf("SCOPD = %08x\n", v);

        lgln = (v>>20) & 0x1f;

        scoplen = (1<<lgln);

        DEVBUS::BUSW    *buf;

        buf = new DEVBUS::BUSW[scoplen];

        bool    compressed = false, vector_read = true;

        DEVBUS::BUSW    addrv = 0;

        if (vector_read) {

                m_fpga->readz(WBSCOPEDATA, scoplen, buf);

        } else {

                for(unsigned int i=0; i<scoplen; i++)

                        buf[i] = m_fpga->readio(WBSCOPEDATA);

        }

        if(compressed) {

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

                        if ((buf[i]>>31)&1) {

                                addrv += (buf[i]&0x7fffffff);

                                printf(" ** \n");

                                continue;

                        }

                        printf("%10d %08x: ", addrv++, buf[i]);

                        decode(buf[i]);

                        printf("\n");

                }

        } else {

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

                        if ((i>0)&&(buf[i] == buf[i-1])&&(i<(int)(scoplen-1))) {

                                if ((i>2)&&(buf[i] != buf[i-2]))

                                        printf(" **** ****\n");

                                continue;

                        } printf("%9d %08x: ", i, buf[i]);

                        decode(buf[i]);

                        printf("\n");

                }

        }

        if (m_fpga->poll()) {

                printf("FPGA was interrupted\n");

                m_fpga->clear();

        }

        delete[] buf;

        delete  m_fpga;

}