OpenCores
URL https://opencores.org/ocsvn/plasma/plasma/trunk

Subversion Repositories plasma

Compare Revisions

  • This comparison shows the changes necessary to convert path 
    /plasma/trunk
    from Rev 386 to Rev 387
    ↔ Reverse comparison
  •

Rev 386 → Rev 387

/tools/ram_image.c
1,100 → 1,133
/* ram_image.c by Steve Rhoads 11/7/05
* This program take the ram_xilinx.vhd file as input
* and the code.txt file as input.
* It then creates ram_image.vhd as output with the
* initialization vectors set to the contents of code.txt.
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
#define BUF_SIZE (1024*1024)
 
int main(int argc, char *argv[])
{
FILE *file;
int i, j, index, size, count;
char *buf, *ptr, *ptr_list[64*4], text[80];
unsigned int *code;
 
if(argc < 4)
{
printf("Usage: ram_image <in.vhd> <in_code.txt> <out.vhd>\n");
printf("Usage: ram_image ram_xilinx.vhd code.txt ram_image.vhd\n");
return 0;
}
 
buf = (char*)malloc(BUF_SIZE);
code = (unsigned int*)malloc(BUF_SIZE);
 
//Read ram_xilinx.vhd
file = fopen(argv[1], "rb");
if(file == NULL)
{
printf("Can't open %s!\n", argv[1]);
return -1;
}
size = fread(buf, 1, BUF_SIZE, file);
fclose(file);
 
//Read code.txt
file = fopen(argv[2], "r");
if(file == NULL)
{
printf("Can't open %s!\n", argv[2]);
return -1;
}
for(count = 0; count < 16*1024; ++count)
{
if(feof(file))
break;
fscanf(file, "%x", &code[count]);
}
fclose(file);
 
//Find 'INIT_00 => X"'
ptr = buf;
for(i = 0; i < 64*4; ++i)
{
sprintf(text, "INIT_%2.2X => X\"", i % 64);
ptr = strstr(ptr, text);
if(ptr == NULL)
{
printf("ERROR: Can't find '%s' in file!\n", text);
return -1;
}
ptr_list[i] = ptr + strlen(text);
}
 
//Modify vhdl source code
j = 62;
for(i = 0; i < count; ++i)
{
sprintf(text, "%8.8x", code[i]);
index = i / 32;
ptr_list[index][j] = text[0];
ptr_list[index][j+1] = text[1];
ptr_list[index+64][j] = text[2];
ptr_list[index+64][j+1] = text[3];
ptr_list[index+128][j] = text[4];
ptr_list[index+128][j+1] = text[5];
ptr_list[index+192][j] = text[6];
ptr_list[index+192][j+1] = text[7];
j -= 2;
if(j < 0)
j = 62;
}
 
//Write ram_image.vhd
file = fopen(argv[3], "wb");
if(file == NULL)
{
printf("Can't write %s!\n", argv[3]);
return -1;
}
fwrite(buf, 1, size, file);
fclose(file);
free(buf);
free(code);
return 0;
}
/* ram_image.c by Steve Rhoads 11/7/05
* This program take the ram_xilinx.vhd file as input
* and the code.txt file as input.
* It then creates ram_image.vhd as output with the
* initialization vectors set to the contents of code.txt.
UPDATED: 09/07/10 Olivier Rinaudo (orinaudo@gmail.com)
new behaviour: 8KB expandable to 64KB of internal RAM
to be used with new ram_image.vhd enabling expandable
internal ram.
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
//1MB buffer
#define BUF_SIZE (1024*1024)
//we have (up to) 8 blocks composed by 4 RAMB16_S9 instance (one per byte)
//each RAMB have 64 hex rows -> max=8*4*64
#define RAM_BLOCKS (8)
#define RAM_SPLIT (4)
#define RAM_ROWS (64)
#define RAM_ROWS_TOTAL (RAM_BLOCKS*RAM_SPLIT*RAM_ROWS)
#define RAM_DWORDPERROW (8)
 
 
int main(int argc, char *argv[])
{
FILE *file;
int i, iposinrow, iblock, irowinsplit, index, size, count;
char *buf, *ptr, *ptr_list[RAM_ROWS_TOTAL], text[80];
unsigned int *code;
 
if(argc < 4)
{
printf("Usage: ram_image <in.vhd> <in_code.txt> <out.vhd>\n");
printf("Usage: ram_image ram_xilinx.vhd code.txt ram_image.vhd\n");
return 0;
}
 
buf = (char*)malloc(BUF_SIZE);
code = (unsigned int*)malloc(BUF_SIZE);
 
//Read ram_xilinx.vhd
file = fopen(argv[1], "rb");
if(file == NULL)
{
printf("Can't open '%s'!\n", argv[1]);
return -1;
}
size = fread(buf, 1, BUF_SIZE, file);
fclose(file);
 
//Read code.txt
file = fopen(argv[2], "r");
if(file == NULL)
{
printf("Can't open '%s'!\n", argv[2]);
return -1;
}
//store DWORDs in code buffer
for(count = 0; count < RAM_ROWS_TOTAL*RAM_DWORDPERROW; ++count)
{
if(feof(file))
{
count--;
break;
}
fscanf(file, "%x", &code[count]);
}
fclose(file);
 
//Find 'INIT_00 => X"'
//start at buf, then seek next occurence
ptr = buf;
for(i = 0; i < RAM_ROWS_TOTAL; ++i)
{
sprintf(text, "INIT_%2.2X => X\"", i % RAM_ROWS);
ptr = strstr(ptr, text);
if(ptr == NULL)
{
printf("ERROR: Can't find '%s', block %d, instance %d in '%s'!\n",
text, (i/(RAM_SPLIT*RAM_ROWS)),
(i%(RAM_SPLIT*RAM_ROWS))/RAM_ROWS, argv[1]);
return -1;
}
ptr_list[i] = ptr + strlen(text);
}
 
//Modify vhdl source code
iposinrow = RAM_DWORDPERROW*8-2; //start filling from end of line
iblock = 0;
irowinsplit = 0;
for(i = 0; i < count; ++i)
{
sprintf(text, "%8.8x", code[i]);
index = iblock*RAM_ROWS*RAM_SPLIT+irowinsplit;
 
ptr_list[index][iposinrow] = text[0];
ptr_list[index][iposinrow+1] = text[1];
ptr_list[index+RAM_ROWS][iposinrow] = text[2];
ptr_list[index+RAM_ROWS][iposinrow+1] = text[3];
ptr_list[index+RAM_ROWS*2][iposinrow] = text[4];
ptr_list[index+RAM_ROWS*2][iposinrow+1] = text[5];
ptr_list[index+RAM_ROWS*3][iposinrow] = text[6];
ptr_list[index+RAM_ROWS*3][iposinrow+1] = text[7];
iposinrow -= 2;
if(iposinrow < 0)
{
iposinrow = RAM_DWORDPERROW*8-2; //reset row
irowinsplit++;
if (irowinsplit>RAM_ROWS-1)
{
irowinsplit = 0;
iblock++;
}
}
}
 
//Write ram_image.vhd
file = fopen(argv[3], "wb");
if(file == NULL)
{
printf("Can't write '%s'!\n", argv[3]);
return -1;
}
fwrite(buf, 1, size, file);
fclose(file);
free(buf);
free(code);
return 0;
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.