--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/rendload.c	Tue Feb 13 08:34:27 2007 +0000
@@ -0,0 +1,138 @@
+/**
+ * $Id: rendload.c,v 1.1 2007-01-16 11:09:39 nkeynes Exp $
+ *
+ * Scene-save loader support. This is the other side of rendsave.c
+ *
+ * Copyright (c) 2005 Nathan Keynes.
+ *
+ * This program is free software; 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 2 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
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ */
+
+#include <stdio.h>
+#include <errno.h>
+#include "lib.h"
+#include "asic.h"
+#include "pvr.h"
+
+char *scene_magic = "%!-lxDream!Scene";
+
+#define PVR2_BASE 0xA05F8000
+
+#define COPYREG(x) long_write( (PVR2_BASE+x), scene_header.pvr2_regs[(x>>2)] )
+
+int pvr2_render_load_scene( FILE *f )
+{
+    struct {
+	char magic[16];
+	uint32_t version;
+	uint32_t timestamp;
+	uint32_t frame_count;
+	uint32_t pvr2_regs[0x400];
+	uint32_t palette[0x400];
+    } scene_header;
+    uint32_t start = 0xFFFFFFFF, length;
+    
+    if( fread( &scene_header, sizeof(scene_header), 1, f ) != 1 ) {
+	fprintf( stderr, "Failed to read scene header (%s)\n", strerror(errno) );
+	return -1;
+    }
+    if( memcmp( scene_magic, scene_header.magic, 16 ) != 0 ) {
+	fprintf( stderr, "Failed to load scene data: Header not found\n" );
+	fclose(f);
+	return -1;
+    }
+
+    fprintf( stdout, "Loaded header\n" );
+    /* Load the VRAM sections */
+    while(1) {
+	fread( &start, sizeof(uint32_t), 1, f );
+	if( start == 0xFFFFFFFF ) { /* EOF */
+	    break;
+	}
+	fread( &length, sizeof(uint32_t), 1, f );
+	int read = fread( (char *)(0xA5000000 + start), 1, length, f );
+	if( read != length ) {
+	    fprintf( stderr, "Failed to load %d bytes at %08X (Got %d - %s)\n",
+		     length, start, read, strerror(errno) );
+	    fclose(f);
+	    return -2;
+	} else {
+	    fprintf( stdout, "Loaded %d bytes at %08X\n", length, start );
+	}
+    }
+
+    /* Copy the fog table */
+    memcpy( (char *)0xA05F8200, ((char *)scene_header.pvr2_regs) + 0x200, 0x200 );
+    /* Copy the palette data */
+    memcpy( (char *)0xA05F9000, scene_header.palette, 4096 );
+    /* And now the other registers */
+    COPYREG(0x018);
+    COPYREG(0x020);
+    COPYREG(0x02C);
+    COPYREG(0x030);
+    COPYREG(0x044);
+    COPYREG(0x048);
+    COPYREG(0x04C);
+    COPYREG(0x05C);
+    COPYREG(0x060);
+    COPYREG(0x064);
+    COPYREG(0x068);
+    COPYREG(0x06C);
+    COPYREG(0x074);
+    COPYREG(0x078);
+    COPYREG(0x07C);
+    COPYREG(0x080);
+    COPYREG(0x084);
+    COPYREG(0x088);
+    COPYREG(0x08C);
+    COPYREG(0x098);
+    COPYREG(0x0B0);
+    COPYREG(0x0B4);
+    COPYREG(0x0B8);
+    COPYREG(0x0BC);
+    COPYREG(0x0C0);
+    COPYREG(0x0E4);
+    COPYREG(0x0F4);
+    COPYREG(0x108);
+    COPYREG(0x110);
+    COPYREG(0x114);
+    COPYREG(0x118);    
+    fprintf( stdout, "Load complete\n" );
+    fclose(f);
+}
+
+
+void pvr2_render_loaded_scene()
+{
+    asic_clear();
+    long_write( (PVR2_BASE+0x14), 0xFFFFFFFF );
+    asic_wait( EVENT_PVR_RENDER_DONE );
+    asic_clear();
+    asic_wait( EVENT_RETRACE );
+    uint32_t addr = long_read( (PVR2_BASE+0x060) );
+    uint32_t mod = long_read( (PVR2_BASE+0x04C) );
+    long_write( (PVR2_BASE+0x050), addr);
+    long_write( (PVR2_BASE+0x054), addr + (mod<<3) );
+}
+
+
+int main()
+{
+    pvr_init();
+    pvr2_render_load_scene(stdin);
+    pvr2_render_loaded_scene();
+    asic_clear();
+    asic_wait(EVENT_RETRACE);
+    asic_clear();
+    asic_wait(EVENT_RETRACE);
+    asic_clear();
+    asic_wait(EVENT_RETRACE);
+}