OpenCores
URL https://opencores.org/ocsvn/xulalx25soc/xulalx25soc/trunk

Subversion Repositories xulalx25soc

[/] [xulalx25soc/] [trunk/] [sw/] [cpuscope.cpp] - Diff between revs 17 and 105

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 17 Rev 105
Line 1... Line 1...
//
////////////////////////////////////////////////////////////////////////////////
//
//
// Filename:    cpuscope.cpp
// Filename:    cpuscope.cpp
//
//
// Project:     FPGA library development (Basys-3 development board)
// Project:     XuLA2-LX25 SoC based upon the ZipCPU
//
//
// Purpose:     To read out, and decompose, the results of the wishbone scope
// Purpose:     To read out, and decompose, the results of the wishbone scope
//              as applied to the ICAPE2 interaction.
//              as applied to the ICAPE2 interaction.
//
//
// Creator:     Dan Gisselquist
// Creator:     Dan Gisselquist, Ph.D.
//              Gisselquist Tecnology, LLC
//              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.
//
//
// Copyright:   2015
// License:     GPL, v3, as defined and found on www.gnu.org,
 
//              http://www.gnu.org/licenses/gpl.html
 
//
 
//
 
////////////////////////////////////////////////////////////////////////////////
//
//
//
//
#include <stdio.h>
#include <stdio.h>
#include <stdlib.h>
#include <stdlib.h>
#include <unistd.h>
#include <unistd.h>
Line 53... Line 76...
        unsigned r = brev(v&0x0ff);
        unsigned r = brev(v&0x0ff);
        r |= brev((v>>8)&0x0ff)<<8;
        r |= brev((v>>8)&0x0ff)<<8;
        return r;
        return r;
}
}
 
 
 
void    decode(DEVBUS::BUSW val) {
 
 
 
}
int main(int argc, char **argv) {
int main(int argc, char **argv) {
        FPGAOPEN(m_fpga);
        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(SIGSTOP, closeup);
        signal(SIGHUP, closeup);
        signal(SIGHUP, closeup);
 
 
        unsigned        v, lgln, scoplen;
        unsigned        v, lgln, scoplen;
Line 79... Line 126...
        scoplen = (1<<lgln);
        scoplen = (1<<lgln);
 
 
        DEVBUS::BUSW    *buf;
        DEVBUS::BUSW    *buf;
        buf = new DEVBUS::BUSW[scoplen];
        buf = new DEVBUS::BUSW[scoplen];
 
 
        if (false) {
        bool    compressed = false, vector_read = true;
 
        DEVBUS::BUSW    addrv = 0;
 
 
 
        if (vector_read) {
                m_fpga->readz(WBSCOPEDATA, scoplen, buf);
                m_fpga->readz(WBSCOPEDATA, scoplen, buf);
        } else {
        } else {
                for(unsigned int i=0; i<scoplen; i++)
                for(unsigned int i=0; i<scoplen; i++)
                        buf[i] = m_fpga->readio(WBSCOPEDATA);
                        buf[i] = m_fpga->readio(WBSCOPEDATA);
        }
        }
 
 
        for(unsigned int i=0; i<scoplen; i++) {
        if(compressed) {
                char    sbuf[64];
                for(int i=0; i<(int)scoplen; i++) {
 
                        if ((buf[i]>>31)&1) {
                if ((i>0)&&(buf[i] == buf[i-1])&&
                                addrv += (buf[i]&0x7fffffff);
                                (i<scoplen-1)&&(buf[i] == buf[i+1]))
                                printf(" ** \n");
                        continue;
                        continue;
                printf("%6d %08x:", i, buf[i]);
                        }
 
                        printf("%10d %08x: ", addrv++, buf[i]);
                unsigned addr = (buf[i]>>24)&0x0ff;
                        decode(buf[i]);
                zipi_to_string(m_fpga->readio(0x02000+addr),sbuf);
 
                printf(" %2x %-24s", (buf[i]>>24)&0x0ff, sbuf);
 
                printf(" %s%s%s%s%s %s%s%s",
 
                        ((buf[i]>>23)&1)?"P":" ",
 
                        ((buf[i]>>22)&1)?"D":" ",
 
                        ((buf[i]>>21)&1)?"O":" ",
 
                        ((buf[i]>>20)&1)?"A":" ",
 
                        ((buf[i]>>19)&1)?"M":" ",
 
                        ((buf[i]>>18)&1)?"o":" ",
 
                        ((buf[i]>>17)&1)?"a":" ",
 
                        ((buf[i]>>16)&1)?"m":" ");
 
                printf(" A=%02x ", (buf[i]>>8)&0x0ff);
 
                printf(" %s%02x ",
 
                        (((buf[i]>>16)&3)!=0)?"W->":"(w)",
 
                        (buf[i]&0x0ff));
 
                /*
 
                printf("%s", ((buf[i]>>31)&1)?"OpV":"   ");
 
                printf("%s", ((buf[i]>>30)&1)?"opA":"   ");
 
                printf("%s", ((buf[i]>>29)&1)?"AlV":"   ");
 
                printf("%s", ((buf[i]>>28)&1)?"AlW":"   ");
 
                printf("%s", ((buf[i]>>27)&1)?"opM":"   ");
 
                printf("%s", ((buf[i]>>26)&1)?"MmV":"   ");
 
                if (true) {
 
                        int     op = (buf[i]>>22)&0x0f;
 
                        switch(op) {
 
                        case  0: printf("CMP "); break;
 
                        case  1: printf("TST "); break;
 
                        case  2: printf("MOV "); break;
 
                        case  3: printf("LDI "); break;
 
                        case  4: printf("AUX "); break;
 
                        case  5: printf("ROL "); break;
 
                        case  6: printf("LOD "); break;
 
                        case  7: printf("STO "); break;
 
                        case  8: printf("SUB "); break;
 
                        case  9: printf("AND "); break;
 
                        case 10: printf("ADD "); break;
 
                        case 11: printf(" OR "); break;
 
                        case 12: printf("XOR "); break;
 
                        case 13: printf("LSL "); break;
 
                        case 14: printf("ASR "); break;
 
                        case 15: printf("LSR "); break;
 
                        default: printf("ILL "); break;
 
                        }
 
                } else
 
                        printf("%x", (buf[i]>>22)&0x0f);
 
                printf(" %s", ((buf[i]>>21)&1)?"W":" ");
 
                if ((buf[i]>>21)&1)
 
                        printf("[%X]", ((buf[i]>>17)&0x0f));
 
                else
 
                        printf("(%x)", ((buf[i]>>17)&0x0f));
 
                printf("D[%X]", ((buf[i]>>13)&0x0f));
 
                printf(" r_opA=..%02x", (buf[i]>>7)&0x3f);
 
                printf(" opA=..%02x", (buf[i]>>1)&0x3f);
 
                printf(" ALU=..%d", buf[i]&1);
 
                */
 
 
 
                printf("\n");
                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()) {
        if (m_fpga->poll()) {
                printf("FPGA was interrupted\n");
                printf("FPGA was interrupted\n");
                m_fpga->clear();
                m_fpga->clear();
                m_fpga->writeio(R_ICONTROL, SCOPEN);
                m_fpga->writeio(R_ICONTROL, SCOPEN);
        }
        }
 
 
 
        delete[] buf;
        delete  m_fpga;
        delete  m_fpga;
}
}
 
 
 
 
 No newline at end of file
 No newline at end of file

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.