Initial commit of OpenSPARC T2 architecture model.

[OpenSPARC-T2-SAM] / hypervisor / src / sample / badtrap.c

/*
* ========== Copyright Header Begin ==========================================
*
* Hypervisor Software File: badtrap.c
* 
* Copyright (c) 2006 Sun Microsystems, Inc. All Rights Reserved.
* 
*  - Do no alter or remove copyright notices
* 
*  - Redistribution and use of this software in source and binary forms, with 
*    or without modification, are permitted provided that the following 
*    conditions are met: 
* 
*  - Redistribution of source code must retain the above copyright notice, 
*    this list of conditions and the following disclaimer.
* 
*  - Redistribution in binary form must reproduce the above copyright notice,
*    this list of conditions and the following disclaimer in the
*    documentation and/or other materials provided with the distribution. 
* 
*    Neither the name of Sun Microsystems, Inc. or the names of contributors 
* may be used to endorse or promote products derived from this software 
* without specific prior written permission. 
* 
*     This software is provided "AS IS," without a warranty of any kind. 
* ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND WARRANTIES, 
* INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS FOR A 
* PARTICULAR PURPOSE OR NON-INFRINGEMENT, ARE HEREBY EXCLUDED. SUN 
* MICROSYSTEMS, INC. ("SUN") AND ITS LICENSORS SHALL NOT BE LIABLE FOR 
* ANY DAMAGES SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING OR 
* DISTRIBUTING THIS SOFTWARE OR ITS DERIVATIVES. IN NO EVENT WILL SUN 
* OR ITS LICENSORS BE LIABLE FOR ANY LOST REVENUE, PROFIT OR DATA, OR 
* FOR DIRECT, INDIRECT, SPECIAL, CONSEQUENTIAL, INCIDENTAL OR PUNITIVE 
* DAMAGES, HOWEVER CAUSED AND REGARDLESS OF THE THEORY OF LIABILITY, 
* ARISING OUT OF THE USE OF OR INABILITY TO USE THIS SOFTWARE, EVEN IF 
* SUN HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
* 
* You acknowledge that this software is not designed, licensed or
* intended for use in the design, construction, operation or maintenance of
* any nuclear facility. 
* 
* ========== Copyright Header End ============================================
*/
/*
 * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#pragma ident	"@(#)badtrap.c	1.9	07/06/07 SMI"

#include <stdio.h>
#include <sys/types.h>

#include <sample/sample.h>

struct trapinfo {
	uint64_t	g[3][8];
	uint64_t	tpc;
	uint64_t	tnpc;
	uint64_t	tstate;

	uint8_t		tl;
	uint8_t		tt;
	uint8_t		pil;
	uint8_t		gl;
	uint8_t		align1[4];
};


void
stacktrace(uint64_t fp, uint64_t sp)
{
	uint64_t *ip, *lp, *op;
	int i;

	while (fp & 1) {
		lp = (uint64_t *)((uint64_t)(fp+(2048-1)));
		ip = lp + 8;
		op = ((uint64_t *)(sp+2048-1))+8;
		for (i = 0; i < 8; i++) {
			(void) printf("%%o%d=%016lx ", i, op[i]);
			(void) printf("%%l%d=%016lx ", i, lp[i]);
			(void) printf("%%i%d=%016lx ", i, ip[i]);
			(void) printf("\n");
		}
		(void) printf("\n");
		sp = fp;
		fp = ip[6];

	}
}

void
badtrap(struct trapinfo *ti)
{
	uint64_t fp, sp;
	int i, j;
	(void) printf("TT=%02x\n", ti->tt);
	(void) printf("TL=%02x\n", ti->tl);
	(void) printf("TPC=%016lx\n", ti->tpc);
	(void) printf("TnPC=%016lx\n", ti->tnpc);
	(void) printf("TSTATE=%010lx\n", ti->tstate);
	(void) printf("PIL=%x\n", ti->pil);
	(void) printf("\n");

	flushw();

	printf("GL=0\t\t\tGL=1\t\t\tGL=2\n");
	for (j = 0; j < 7; j++) {
		for (i = 0; i < 3; i++) {
			printf("%%g%d=%016x ", j, ti->g[i][j]);
		}
		printf("\n");
	}

	printf("\n");

	fp = (uint64_t)getfp();
	sp = (uint64_t)getsp();

	stacktrace(fp, sp);

#if 0
	if (ti->tt == 0x68) {
		ti->tpc = ti->tnpc;
		ti->tnpc += 4;
		rtt(ti);
		printf("XXX SHOULD NOT GET HERE!!!\n");
	}
#endif

	while (1) {
		/* LINTED */
	}
}