Search
lxdream.org :: lxdream/test/testta.c
lxdream 0.9.1
released Jun 29
Download Now
filename test/testta.c
changeset 190:f7653df5e832
prev185:6755a04c447f
next193:31151fcc3cb7
author nkeynes
date Wed Aug 02 04:13:15 2006 +0000 (15 years ago)
permissions -rw-r--r--
last change Add many more TA test cases (a couple of corner cases aren't 100% correct
yet, TBA)
Add new test "testregs" to check register masks (currently just PVR registers)
view annotate diff log raw
     1 /**
     2  * $Id: testta.c,v 1.2 2006-08-02 04:13:15 nkeynes Exp $
     3  * 
     4  * Tile Accelerator test cases 
     5  *
     6  * Copyright (c) 2006 Nathan Keynes.
     7  *
     8  * This program is free software; you can redistribute it and/or modify
     9  * it under the terms of the GNU General Public License as published by
    10  * the Free Software Foundation; either version 2 of the License, or
    11  * (at your option) any later version.
    12  *
    13  * This program is distributed in the hope that it will be useful,
    14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    16  * GNU General Public License for more details.
    17  */
    19 #include <stdio.h>
    20 #include "testdata.h"
    21 #include "pvr.h"
    22 #include "lib.h"
    23 #include "asic.h"
    25 #define DMA_ALIGN(x)   ((void *)((((unsigned int)(x))+0x1F)&0xFFFFFFE0))
    27 #define OBJ_START 0x00010000
    28 #define OBJ_LENGTH 0x00010000
    29 #define TILE_START 0x00060000
    30 #define TILE_LENGTH 0x00010000
    32 #define MEM_FILL 0xFE
    34 int ta_tile_sizes[4] = { 0, 32, 64, 128 };
    36 #define TILE_SIZE(cfg, tile) ta_tile_sizes[((((cfg->ta_cfg) >> (4*tile))&0x03))]
    38 struct ta_config default_ta_config = { 0x00111111, GRID_SIZE(640,480), OBJ_START,
    39 				       OBJ_START+OBJ_LENGTH, TILE_START+TILE_LENGTH,
    40 				       TILE_START, TILE_START+TILE_LENGTH };
    43 int tile_sizes[5];
    44 int tile_events[5] = { EVENT_PVR_OPAQUE_DONE, EVENT_PVR_OPAQUEMOD_DONE,
    45 		       EVENT_PVR_TRANS_DONE, EVENT_PVR_TRANSMOD_DONE,
    46 		       EVENT_PVR_PUNCHOUT_DONE };
    47 char *tile_names[5] = { "Opaque", "Opaque Mod", "Trans", "Trans Mod", "Punch Out" };
    49 #define FLOAT(p) *((float *)(p))
    51 void make_expected_buffer( test_data_block_t expected_block, char *expect, int length )
    52 {
    53     memset( expect, MEM_FILL,length );
    55     if( expected_block != NULL ) {
    56 	if( expected_block->length > length ) {
    57 	    fprintf( stderr, "Test data error: expected tile length is %d, but tile size is only %d\n", expected_block->length, length );
    58 	    return;
    59 	}
    60 	memcpy( expect, expected_block->data, expected_block->length );
    62 	if( expected_block->length <= length-4 ) {
    63 	    *((unsigned int *)&expect[expected_block->length]) = 0xF0000000;
    64 	}
    65     }
    66 }
    68 int tilematrix_block_compare( test_data_block_t expected_block, char *tile_ptrs[], int tile_type, int offset )
    69 {
    70     int tile_size = tile_sizes[tile_type];
    71     char expect[tile_size];
    73     make_expected_buffer(expected_block, expect, tile_size);
    74     return memcmp( expect, tile_ptrs[tile_type]+(offset*tile_sizes[tile_type]), tile_size );
    75 }
    77 int test_ta( test_data_t test_case )
    78 {
    79     char buf[1024];
    80     unsigned int *p = DMA_ALIGN(buf);
    81     unsigned int *data = p;
    82     int haveFailure = 0;
    83     int checkedTile[5] = {0,0,0,0,0};
    84     int i;
    85     int hsegs,vsegs;
    86     char *result = (char *)(PVR_VRAM_BASE+OBJ_START);
    87     char *tilematrix = (char *)(PVR_VRAM_BASE+TILE_START+TILE_LENGTH);
    88     char *tile_ptrs[5];
    90     asic_clear();
    92     memset( PVR_VRAM_BASE, MEM_FILL,  0x00090000 );
    93     test_data_block_t config_data = get_test_data( test_case, "config" );
    94     struct ta_config *config = &default_ta_config;
    95     if( config_data != NULL ) {
    96 	if( config_data->length != sizeof(struct ta_config) ) {
    97 	    fprintf( stderr, "Invalid config data length %d - aborting test %s\n",
    98 		     config_data->length, test_case->test_name );
    99 	    return -1;
   100 	}
   101 	config = (struct ta_config *)config_data->data;
   102     }
   103     ta_init(config);
   104     for( i=0; i<5; i++ ) {
   105 	tile_sizes[i] = TILE_SIZE(config,i);
   106     }
   107     hsegs = (config->grid_size & 0xFFFF)+1;
   108     vsegs = (config->grid_size >> 16) + 1;
   109     tile_ptrs[0] = tilematrix;
   110     tile_ptrs[1] = tile_ptrs[0] + (hsegs*vsegs*tile_sizes[0]);
   111     tile_ptrs[2] = tile_ptrs[1] + (hsegs*vsegs*tile_sizes[1]);
   112     tile_ptrs[3] = tile_ptrs[2] + (hsegs*vsegs*tile_sizes[2]);
   113     tile_ptrs[4] = tile_ptrs[3] + (hsegs*vsegs*tile_sizes[3]);
   116     test_data_block_t input = get_test_data(test_case, "input");
   117     test_data_block_t output = get_test_data(test_case, "output");
   118     test_data_block_t error = get_test_data(test_case, "error");
   119     if( input == NULL || output == NULL ) {
   120 	fprintf( stderr, "Skipping test case '%s': data incomplete\n", test_case->test_name );
   121 	return -1;
   122     }
   124     if( pvr_dma_write( 0x10000000, input->data, input->length, 0 ) == -1 ) {
   125 	return -1;
   126     }
   128     if( error != NULL ) {
   129 	for( i=0; i<error->length; i++ ) {
   130 	    if( asic_wait( error->data[i] ) == -1 ) {
   131 		fprintf( stderr, "Test %s: failed (Timeout waiting for error event %d)\n",
   132 			 test_case->test_name, error->data[i] );
   133 		asic_dump( stderr );
   134 		return -1;
   135 	    }
   136 	}
   137     }
   139     for( i=0; i<MAX_DATA_BLOCKS; i++ ) {
   140 	test_data_block_t data = &test_case->item[i];
   141 	int tile, x, y, offset;
   142 	if( data->name != NULL ) {
   143 	    int result = sscanf( data->name, "tile %d %dx%d", &tile, &x, &y );
   144 	    if( result == 1 ) {
   145 		x = y = 0;
   146 	    } else if( result != 3 ) {
   147 		continue;
   148 	    }
   149 	    tile--;
   150 	    offset = x + (y * hsegs);
   152 	    if( checkedTile[tile] == 0 ) {
   153 		if( asic_wait( tile_events[tile] ) == -1 ) {
   154 		    fprintf( stderr, "Test %s: failed (Timeout waiting for %s done event)\n", 
   155 			     test_case->test_name, tile_names[tile] );
   156 		    ta_dump_regs();
   157 		    asic_dump( stderr );
   158 		    haveFailure = 1;
   159 		}
   160 	    }
   162 	    if( tilematrix_block_compare( data, tile_ptrs, tile, offset ) != 0 ) {
   163 		fprintf( stderr, "Test %s: Failed (%s matrix %dx%d). ", 
   164 			 test_case->test_name, tile_names[tile], x, y );
   165 		fwrite_diff32( stderr, data->data, data->length, 
   166 			       tile_ptrs[tile] + (tile_sizes[tile]*offset), tile_sizes[tile] );
   167 		haveFailure = 1;
   168 	    }
   169 	    checkedTile[tile] = 1;
   170 	}
   171     }
   173     /* Overflow */
   174     test_data_block_t plist = get_test_data(test_case, "plist" );
   175     if( plist != NULL ) {
   176 	unsigned int plist_posn, plist_end;
   177 	if( config->ta_cfg & 0x00100000 ) { /* Descending */
   178 	    plist_posn = pvr_get_plist_posn() + tile_sizes[0];
   179 	    plist_end = config->plist_start;
   180 	} else {
   181 	    plist_posn = config->plist_start;
   182 	    plist_end = pvr_get_plist_posn();
   183 	}
   184 	char *plist_data = (char *)(PVR_VRAM_BASE + plist_posn);
   185 	if( test_block_compare( plist, plist_data, plist_end-plist_posn ) != 0 ) {
   186 	    fprintf( stderr, "Test %s: Failed (Plist buffer)", test_case->test_name );
   187 	    fwrite_diff32( stderr, plist->data, plist->length, (char *)plist_data, 
   188 			   plist_end - plist_posn );
   189 	    haveFailure = 1;
   190 	}
   191     }
   193     /* Vertex buffer */
   194     int result_length = pvr_get_objbuf_size();
   195     if( test_block_compare( output, result, result_length ) != 0 ) {
   196 	fprintf( stderr, "Test %s: Failed (Vertex buffer). ", test_case->test_name );
   197 	fwrite_diff32( stderr, output->data, output->length, result, result_length );
   198 	haveFailure = 1;
   199     }
   202     for( i=0; i<5; i++ ) {
   203 	if( checkedTile[i] == 0 ) {
   204 	    if( tilematrix_block_compare( NULL, tile_ptrs, i, 0 ) != 0 ) {
   205 		fprintf( stderr, "Test %s: Failed (%s matrix). ", test_case->test_name, tile_names[i] );
   206                 fprintf( stderr, "Expected empty buffer at %08X, but was =>\n", 
   207 			 (unsigned int)(tile_ptrs[i]) );
   208 		fwrite_dump( stderr, tile_ptrs[i], tile_sizes[i] );
   209 		//		fwrite_dump( stderr, tile_ptrs[i] - 128, 256 );
   211 	    }
   212 	}
   213     }
   214     if( haveFailure )
   215 	return -1;
   217     fprintf( stdout, "Test %s: OK\n", test_case->test_name );
   218     return 0;
   219 }
   221 int main( int argc, char *argv[] ) 
   222 {
   223     int test_cases = 0;
   224     int test_failures = 0;
   225     test_data_t test_data = load_test_dataset(stdin);
   226     test_data_t test_case = test_data;
   228     asic_mask_all();
   229     pvr_init();
   231     while( test_case != NULL ) {
   232 	test_cases++;
   233 	int result = test_ta(test_case);
   234 	if( result != 0 ) {
   235 	    test_failures++;
   236 	}
   237 	test_case = test_case->next;
   238     }
   239     free_test_dataset(test_data);
   240     if( test_failures != 0 ) {
   241 	fprintf( stderr, "%d/%d test failures!\n", test_failures, test_cases );
   242 	return 1;
   243     } else {
   244 	fprintf( stderr, "%d tests OK\n", test_cases );
   245 	return 0;
   246     }
   247 }
.