1
0
Files
2022-09-29 17:59:04 +03:00

948 lines
14 KiB
Plaintext

# This is an ide startup file intended for use in the field by customers
# and Field Engineers.
if ($1 == "fe") {
report=4;
echo "Report level set to VERBOSE";
}
else {
report=0;
}
fi
# Initialize script variables
# NOTE: At the end of the startup script each variable that is still set
# to 2 will indicate some tests that haven't been run (like after
# an error).
$cpufailed=2;
$scsifailed=2;
$gr2failed=2;
$audiofailed=0;
# THE FOLLOWING IS THE STARTUP SCRIPT FOR THE CPU DIAGNOSTICS.
#
# IN ORDER FOR THE SCRIPT TO RUN PROPERLY, THE FOLLOWING MUST BE DONE:
# 1. CONNECT THE TRANSMIT AND RECEIVE PINS ON CHANNEL A AND B OF DUART 0,
# CHANNEL B OF DUART 1 (FOR CHANNEL B OF DUART 1, THE REQUEST_TO_SEND
# AND CLEAR_TO_SEND PINS MUST ALSO BE CONNECTED).
ip26{
$cpufailed=0;
# Interrupt mask registers data test.";
if (int2) {
if (!$report) {
emfail 3;
wait;
exit;
}
$cpufailed=1;
}
# Real time clock test. Verify the accuracy of the real time clock and the carry
# circuitry by using the timer within the ctl1 gate array.
if (clock) {
if (!$report) {
emfail 7;
wait;
exit;
}
$cpufailed=1;
}
# Interval timer test. Verify the accuracy of the interval timer by using the
# real time clock.
if (timer) {
if (!$report) {
emfail 7;
wait;
exit;
}
$cpufailed=1;
}
# fast iu test
if (fast_iu) {
if (!$report) {
emfail 1;
wait;
exit;
}
$cpufailed=1;
}
# basic EISA register test (report error on HPC emfail number).
if (eisa) {
if (!$report) {
emfail 10;
wait;
exit;
}
$cpufailed=1;
}
# DUART 1B/modem, internal loopback test. Execute the internal loopback
# diagnostics provided by the DUART chips.
$tmp = duart -i1;
if ($tmp) {
resetcons 1;
if (!$report) {
emfail 8;
wait;
exit;
}
$cpufailed=1;
}
# EEPROM pin signal test. Verify the pin signals provided for the EEPROM.
if (nvram5) {
if (!$report) {
emfail 9;
wait;
exit;
}
$cpufailed=1;
}
# HPC3 peripheral controller register data test.
if (hpc3) {
if (!$report) {
emfail 10;
wait;
exit;
}
$cpufailed=1;
}
# Test floating point unit
$fpufailed=0;
if (fpu) {
if (!$report) {
emfail 5;
wait;
exit;
}
$fpufailed=1;
}
# Test TCC FIFO
if (tccfifo) {
if (!$report) {
emfail 1;
wait;
exit;
}
$cpufailed=1;
}
# Test TCC Prefetch
if (tccpref) {
if (!$report) {
emfail 1;
wait;
exit;
}
$cpufailed=1;
}
# Test ECC
if (ecc) {
if (!$report) {
emfail 13;
wait;
exit;
}
$cpufailed=1;
}
# Test Dcache
$tmp = dcache;
if ($tmp) {
if (!$report) {
emfail 1;
wait;
exit;
}
$cpufailed=1;
}
# Test Secondary cache
if (scache) {
if (!$report) {
emfail 1;
wait;
exit;
}
$cpufailed=1;
}
# Test low local memory (0-16MB)
if (lkh_aa) {
if (!$report) {
emfail 13;
wait;
exit;
}
$cpufailed=1;
}
# Test rest of local memory
# Kh test
tmp = memtest2 3
if ($tmp) {
if (!$report) {
emfail 13;
wait;
exit;
}
$cpufailed=1;
}
# Address uniqueness test
tmp = memtest2 0
if ($tmp) {
if (!$report) {
emfail 13;
wait;
exit;
}
$cpufailed=1;
}
# Butterfly test
tmp = memtest2 11
if ($tmp) {
if (!$report) {
emfail 13;
wait;
exit;
}
$cpufailed=1;
}
# March Y test
tmp = memtest2 9
if ($tmp) {
if (!$report) {
emfail 13;
wait;
exit;
}
$cpufailed=1;
}
# Walking Bit Test
tmp = memtest2 7
if ($tmp) {
if (!$report) {
emfail 13;
wait;
exit;
}
$cpufailed=1;
}
if (audiofield) {
if (!$report) {
emfail 14;
wait;
exit;
}
$audiofailed=1;
}
# Test SCSI devices
$status1=scsi;
$status2=xscsi;
$scsi_status=$status1 | $status2;
$scsifailed = 0;
if ($scsi_status & 257) {
# SCSI chip 0 or 1 failure
if (!$report) {
emfail 15;
wait;
exit;
}
$cpufailed=1;
}
if ($scsi_status & 98175) {
# 0x10000 (cabling) or any scsi device failure (not 1 or 0x100, which
# means chip failure, since for now, chip is always ID 0)
# scsi() puts the failure in a global for emfail.
if (!$report) {
emfail 6;
wait;
exit;
}
$scsifailed=1;
}
# END OF IP26 SCRIPT
}
# Start of GR2 diagnostics
$mon=0
gr2_vhwinit {
#Assume that GR2 rev.2 is not used. So, can write 0x47 to bdvers.rd0
gr2_videoclk 0x47
if ($mon ==1 ) gr2_initclock 0x132;
else gr2_initclock 0x107;
fi
gr2_wrconfig 0x0
gr2_delay 3
gr2_wrconfig 0x1
gr2_vinitdac
}
gr2_initre {
$a = gr2_getGR2ver;
if ($a < 4) gr2_wrfifo 0 0;
else if ($a == 4) gr2_wrfifo 0 1;
else gr2_wrfifo 0 2;
}
gr2_initsys {
gr2_reset
gr2_vhwinit
$mon = gr2_getMonType;
if ($mon == 1) gr2_initvc1 4;
else gr2_initvc1 20;
fi
gr2_xcol
gr2_inithq
gr2_load_ucode ge
gr2_load_ucode hq
gr2_unstall
gr2_initre
}
clear {
gr2_wrfifo 35 0
gr2_wrfifo 6 0
}
gr2_quad {
gr2_wrfifo 33 0
}
gr2_fourquad {
gr2_wrfifo 34 0
}
$gr2_failed = 0;
test_xmap{
gr2_initsys;
$a=gr2_txmap;
return $a;
}
test_xmap_clut{
gr2_initsys;
$a=gr2_txmap_clut;
return $a;
}
gr2 {
$vc1_sram_failed=0;
$tram0_failed=0;
$tram1_failed=0;
$tram2_failed=0;
$tram3_failed=0;
$tram4_failed=0;
$tram5_failed=0;
$tram6_failed=0;
$tram7_failed=0;
$tram8_failed=0;
$tram9_failed=0;
$tram10_failed=0;
$hq2test_failed=0;
$shram_failed=0;
$ram12_failed=0;
$seedrom_failed=0;
$sqrom_failed=0;
$gebus_failed=0;
$gefloat_failed=0;
$chkbt457_failed=0;
$shramre3_failed=0;
$cpushram_failed=0;
$cpure3_failed=0;
$vdma_failed=0;
$ctxsw_failed=0;
$bp_failed=0;
$stride_failed=0 ;
$zb_failed=0;
$test_xmap_failed=0;
$test_xmap_clut_failed=0;
$quad_failed=0;
$fourquad_failed=0;
$gr2failed=0;
gr2_reset;
buffon
# HQ2 internal register 19 must read 0xdeadbeef
gr2_rdhqint 19;
# Test VC1 SRAM
gr2_vhwinit
if (gr2_vc1_sram) {
if (!$report) {
emfail 2;
wait;
exit;
}
$vc1_sram_failed = 1;
}
# Test ram 0 at Ge7 at 0
$tmp = gr2_tram 0;
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$tram0_failed = 1;
}
# Test ram 0 at Ge7 at 1
$tmp = gr2_tram 1;
if ($tmp){
if (!$report) {
emfail 2;
wait;
exit;
}
$tram1_failed = $tmp;
}
# Test ram 0 at Ge7 at 2
$tmp = gr2_tram 2;
if ($tmp){
if (!$report) {
emfail 2;
wait;
exit;
}
$tram2_failed = 1;
}
# Test ram 0 at Ge7 at 3
$tmp = gr2_tram 3 ;
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$tram3_failed = 1;
}
# Test ram 0 at Ge7 at 4
$tmp = gr2_tram 4 ;
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$tram4_failed = 1;
}
# Test ram 0 at Ge7 at 5
$tmp = gr2_tram 5 ;
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$tram5_failed = 1;
}
# Test ram 0 at Ge7 at 6
$tmp = gr2_tram 6 ;
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$tram6_failed = 1;
}
# Test ram 0 at Ge7 at 7
$tmp = gr2_tram 7 ;
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$tram7_failed = 1;
}
# Test shram
$tmp = gr2_tram 8 ;
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$tram8_failed = 1;
}
# Test Hq2uram
$tmp = gr2_tram 9 ;
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$tram9_failed = $tmp;
}
# Test ge7uram
$tmp = gr2_tram 10;
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$tram10_failed = $tmp;
}
gr2_initsys;
clear;
# Test HQ2
if (gr2_hq2test) {
if (!$report) {
emfail 2;
wait;
exit;
}
$hq2test_failed = 1;
}
# Test shareram using Ucode
if (gr2_shram) {
if (!$report) {
emfail 2;
wait;
exit;
}
$shram_failed = 1;
}
# Test internal GE7 ram
if (gr2_ram12) {
if (!$report) {
emfail 2;
wait;
exit;
}
$ram12_failed =1;
}
# Test seedrom
if (gr2_seedrom) {
if (!$report) {
emfail 2;
wait;
exit;
}
$seedrom_failed =1;
}
# Test the squaroot rom
if (gr2_sqrom) {
if (!$report) {
emfail 2;
wait;
exit;
}
$sqrom_failed =1;
}
# needed again ???
gr2_initsys ;
# Test Ge 7 bus
if (gr2_gebus) {
if (!$report) {
emfail 2;
wait;
exit;
}
$gebus_failed =1;
}
# Test ge floating point unit
if (gr2_gefloat) {
if (!$report) {
emfail 2;
wait;
exit;
}
$gefloat_failed = 1;
}
gr2_initsys;
clear;
resetcons
buffoff
$err = 0;
if ($vc1_sram_failed)
{
echo "VC1 SRAM test failed";
$err = 1
}
if ($tram0_failed)
{
echo "Ram 0 at GE7 - 0 failed ";
$err = 1
}
if ($tram1_failed)
{
echo "Ram 0 at GE7 - 1 failed ";
$err = 1
}
if ($tram2_failed)
{
echo "Ram 0 at GE7 - 2 failed ";
$err = 1
}
if ($tram3_failed)
{
echo "Ram 0 at GE7 - 3 failed ";
$err = 1
}
if ($tram4_failed)
{
echo "Ram 0 at GE7 - 4 failed ";
$err = 1
}
if ($tram5_failed)
{
echo "Ram 0 at GE7 - 5 failed ";
$err = 1
}
if ($tram6_failed)
{
echo "Ram 0 at GE7 - 6 failed ";
$err = 1
}
if ($tram7_failed)
{
echo "Ram 0 at GE7 - 7 failed ";
$err = 1
}
if ($tram8_failed)
{
echo "Share ram test failed ";
$err = 1
}
if ($tram9_failed)
{
echo "Hq2uram ram failed ";
$err = 1
}
if ($tram10_failed)
{
echo "ge7uram failed " ;
$err = 1
}
if ($hq2test_failed)
{
echo "HQ2 Test failed ";
$err = 1
}
if ($shram_failed)
{
echo "shram test failed";
$err = 1
}
if ($ram12_failed)
{
echo "GE7 ram 1/2 test failed ";
$err = 1
}
if ($seedrom_failed)
{
echo "seedrom test failed ";
$err = 1
}
if ($sqrom_failed)
{
echo "squaroot teste failed";
$err = 1
}
if ($gebus_failed)
{
echo "gebus test failed";
$err = 1
}
if ($gefloat_failed)
{
echo "gefloat test failed";
$err = 1
}
if ( $err )
{
if (!$report) {
emfail 2;
wait;
exit;
}
echo "HQ & GE Tests failed\n";
wait
$err=0
$gr2_failed=1
}
else echo "HQ & GE Tests passed\n"
buffon
# Test bt457
if (gr2_chkbt457) {
if (!$report) {
emfail 2;
wait;
exit;
}
$chkbt457_failed = 1;
$err=1;
}
# Test Shared ram and Re
gr2_initsys
$tmp = gr2_shramre3
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$shramre3_failed =1;
$err=1;
}
# Test DMA between host and GE7 shared ram
gr2_initsys
clear
$tmp = gr2_cpushram
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$cpushram_failed =1;
$err=1;
}
# Test DMA between host and and RE3
resetcons
buffon
gr2_initsys
$tmp = gr2_cpure3
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$cpure3_failed =1;
$err=1;
}
# Test stride DMA between shram and re3
if(gr2_ctxsw) {
if (!$report) {
emfail 2;
wait;
exit;
}
$ctxsw_failed =1;
$err=1;
}
clear;
# Test quad drawing
$tmp = gr2_quad
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$quad_failed =1;
$err=1;
}
$tmp = gr2_fourquad
if ($tmp){
if (!$report) {
emfail 2;
wait;
exit;
}
$fourquad_failed = 1;
$err=1;
}
clear;
resetcons
buffoff
if ($chkbt457_failed) echo "Bt457 test failed";
if ($shramre3_failed) echo "shramre3 test failed"
if ($cpushram_failed) echo "CPU shram test failed";
if ($cpure3_failed) echo "cpure3 test failed ";
if ($ctxsw_failed) echo "context switching test failed ";
if ($quad_failed) echo "quad test failed";
if ($fourquad_failed) echo "fourquad test failed";
if ($err) {
echo "****** PRESS RETURN TO CONTINUE OR ^C TO EXIT *********"
wait
$err=0
$gr2failed=1
}
else echo "BT457, DMA and QUADs Tests Passed.\n"
buffon
# Test bitplane VM2
gr2_initsys
if (gr2_bp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$bp_failed = 1;
$err=1;
}
# Test stridedma between shram and re3
resetcons
buffon
gr2_initsys
$tmp = gr2_stride
if ($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$stride_failed =1 ;
$err=1;
}
# Test Zbuffer
gr2_initsys
$tmp=gr2_zb
if($tmp) {
if (!$report) {
emfail 2;
wait;
exit;
}
$zb_failed =1;
$err=1;
}
# Test Xmap
if (test_xmap) {
if (!$report) {
emfail 2;
wait;
exit;
}
$test_xmap_failed =1;
$err=1;
}
# Test Xmap CLUT
if (test_xmap_clut) {
if (!$report) {
emfail 2;
wait;
exit;
}
$test_xmap_clut_failed =1;
$err=1;
}
resetcons
buffoff
echo "************************* RESULTS ******************************"
if ($bp_failed) {
echo "bitplane test failed";
$gr2failed = 1;
}
if ($stride_failed) {
echo "stride test failed";
$gr2failed = 1;
}
if ($zb_failed) {
echo "Zbuffer test failed";
$gr2failed = 1;
}
if ($test_xmap_failed) {
echo "test_xmap test failed";
$gr2failed = 1;
}
if ($test_xmap_clut_failed) {
echo "test_xmap_clut test failed";
$gr2failed = 1;
}
if (!$err) echo "Frame Buffer, Bit-Plane, and XMAPs Test Passed.\n"
clear
resetcons
buffoff
if ($gr2failed) echo "ERROR: Failure detected on graphics board."
else echo "graphics board tests passed"
fi
echo " *****************END OF THE TEST *****************"
}
gr2_all {
$gfxslot = gr2_setboard 0;
if ($gfxslot) {
buffoff
echo "Testing gfx in slot 0.\n"
gr2;
if ($gr2_failed) {
echo "ERROR: Failure detected on gfx in slot 0."
}
}
$gfxslot = gr2_setboard 1;
if ($gfxslot) {
buffoff
echo "Testing gfx in slot 1.\n"
gr2;
if ($gr2_failed) {
echo "ERROR: Failure detected on gfx in slot 1."
}
}
}
# END OF GR2 SUPPORT
# Here lies what is actually executed at start-up
hinv;
echo "";
ip26;
$express = gr2_probe;
if ($express) {
gr2_all;
}
echo "TEST RESULTS:";
if ($cpufailed == 1) echo "Failure detected on CPU board.";
if ($cpufailed == 2) echo "CPU tests NOT completed.";
if (!$cpufailed) echo "CPU tests completed.";
if ($fpufailed == 1) echo "Failure detected on FPU.";
if ($fpufailed == 2) echo "FPU tests NOT completed.";
if (!$fpufailed) echo "FPU tests completed.";
if ($audiofailed == 1) echo "Failure detected on audio.";
if ($audiofailed == 0) echo "Audio tests completed.";
if ($scsifailed == 1) echo "Failure detected on SCSI device[s].";
if ($scsifailed == 2) echo "SCSI tests NOT completed.";
if (!$scsifailed) echo "SCSI tests completed.";
if ($express) {
if ($gr2failed == 1) echo "Failure detected on GR2 graphics board.";
if ($gr2failed == 2) echo "GR2 graphics board tests NOT completed.";
if (!$gr2failed) echo "GR2 graphics board tests completed.";
}
wait "Diagnostics completed";