各种软核处理器二进制文件FPGA初始化文件生成程序

/*
 *  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 3 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.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *  
 *    copyright @ Lyu Yang ----------------------------2015-10-02
 */

#include <stdio.h>
#include <stdlib.h>

int main(int argc, char** argv)
{
    int i, j, FileLen = 0, address = 0, maxaddr;
    FILE * FileIn, * FileOut;

    if (argc != 3) {
        printf("Arguments Error!\n");
        printf("\nUsage: bin2fpga.exe Depth InputFile\n");
        return 0;
    }
    else {

        FileIn = fopen(*(argv + 2), "rb");
        if (FileIn == NULL){
            printf("File does not exist!\n");
            return 0;
        }

        fseek(FileIn, 0L, SEEK_END);
        FileLen = ftell(FileIn);
        printf("\nInput File length is %d Bytes.\n", FileLen);
        maxaddr = atoi(*(argv + 1));
        
        unsigned char * buf = (unsigned char*)malloc(sizeof(char)* FileLen);
        if(buf == NULL) {
            printf("Memory Allocate Error!\n");
            return 0;
        }
        
        // For altera fpga mif file
        FileOut = fopen("./altera.mif", "w");
        
        if (FileOut == NULL) {
            printf("Output File Create Error!\n");
            return 0;
        }
        
        fprintf(FileOut, "DEPTH = %d;\nWIDTH = 32;\nADDRESS_RADIX = DEC;\nDATA_RADIX = HEX;\nCONTENT\nBEGIN\n", maxaddr);

        fseek(FileIn, 0L, SEEK_SET);
        fread(buf, FileLen, 1, FileIn);
            
        for (i = 0; i < FileLen; i += 4) {
            fprintf(FileOut, "%d: ", address);
            
            fprintf(FileOut, "%02x", buf[i + 3]);
            fprintf(FileOut, "%02x", buf[i + 2]);
            fprintf(FileOut, "%02x", buf[i + 1]);
            fprintf(FileOut, "%02x", buf[i + 0]);
            
            fprintf(FileOut, ";\n");
            address++;
        }
        
        fprintf(FileOut, "[%d..%d]: 0;\n", address, maxaddr - 1);
        
        fprintf(FileOut, "\n\nEND;\n");
        
        fclose(FileOut);
        
        // For xilinx fpga coe file
        FileOut = fopen("./xilinx.coe", "w");
        
        if (FileOut == NULL) {
            printf("Output File Create Error!\n");
            return 0;
        }
        
        fprintf(FileOut, "MEMORY_INITIALIZATION_RADIX=16;\nMEMORY_INITIALIZATION_VECTOR=\n", maxaddr);

        fseek(FileIn, 0L, SEEK_SET);
        fread(buf, FileLen, 1, FileIn);
            
        for (i = 0; i < FileLen; i += 4) {        
            fprintf(FileOut, "%02x", buf[i + 3]);
            fprintf(FileOut, "%02x", buf[i + 2]);
            fprintf(FileOut, "%02x", buf[i + 1]);
            fprintf(FileOut, "%02x", buf[i + 0]);
            
            fprintf(FileOut, ",\n");
        }
        
        fseek(FileOut, -2L, SEEK_END);
        fprintf(FileOut, ";\n");
        
        fclose(FileOut);

        // generic data file
        FileOut = fopen("./data.txt", "w");
        
        if (FileOut == NULL) {
            printf("Output File Create Error!\n");
            return 0;
        }
        
        address = 0x0;
        fseek(FileIn, 0L, SEEK_SET);
        fread(buf, FileLen, 1, FileIn);
            
        for (i = 0; i < FileLen; i += 4) {
            fprintf(FileOut, "@%08x\n", address);
            
            fprintf(FileOut, "%02x", buf[i + 3]);
            fprintf(FileOut, "%02x", buf[i + 2]);
            fprintf(FileOut, "%02x", buf[i + 1]);
            fprintf(FileOut, "%02x", buf[i + 0]);
            
            fprintf(FileOut, "\n");
            address++;
        }
        
        free(buf);
        fclose(FileIn);
        fclose(FileOut);
    }
    
    return 0;
}