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;
}