eZDSP C5502 Boot-Image programmer

//////////////////////////////////////////////////////////////////////////////
// * File name: spiflash_test.c
// *                                                                          
// * Description:  SPI Flash header file.
// *                                                                          
// * Copyright (C) 2011 Texas Instruments Incorporated - http://www.ti.com/ 
// * Copyright (C) 2011 Spectrum Digital, Incorporated
// *                                                                          
// *                                                                          
// *  Redistribution and use in source and binary forms, with or without      
// *  modification, are permitted provided that the following conditions      
// *  are met:                                                                
// *                                                                          
// *    Redistributions of source code must retain the above copyright        
// *    notice, this list of conditions and the following disclaimer.         
// *                                                                          
// *    Redistributions in binary form must reproduce the above copyright     
// *    notice, this list of conditions and the following disclaimer in the   
// *    documentation and/or other materials provided with the                
// *    distribution.                                                         
// *                                                                          
// *    Neither the name of Texas Instruments Incorporated nor the names of   
// *    its contributors may be used to endorse or promote products derived   
// *    from this software without specific prior written permission.         
// *                                                                          
// *  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS     
// *  "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT       
// *  LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR   
// *  A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT    
// *  OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,   
// *  SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT        
// *  LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,   
// *  DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY   
// *  THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT     
// *  (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE   
// *  OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.    
// *                                                                          
//////////////////////////////////////////////////////////////////////////////

#include "ezdsp5502.h"
#include "spiflash.h"
#include "stdio.h"

#pragma DATA_SECTION ( bootImage, ".bootimg" );
#define SLICE_SIZE_MAX 32768

Uint8 bootImage[SLICE_SIZE_MAX];


Uint16 rx[256];
Int8 fileName[256];

/*
 *  spiflash_writer( )
 *      SPI Flash writer, writes the demo .bin file to SPI ROM. 
 *      Change the size of the array bootImage1[] for files 
 *      larger than 30000 bytes
 */
Int16 spiflash_writer( )
{
    Uint32 i, j, pages;
    Uint16* pdata;
    Uint32  fileSize = 0;
    FILE    *fPtr;
    Uint8   *ramPtr;
    Uint8	slices,k;
	Uint32	sliceSize = SLICE_SIZE_MAX;
	
    /* Read the filename from host */
    printf("Enter the file Name:\r\n");
    scanf("%s", fileName);
    fflush(stdin);

    /* Open a File from the hard drive */
    printf("Opening file...\r\n");
    fPtr = fopen(fileName, "rb");
    if(fPtr == NULL)
    {
        printf("ERROR: File %s Open failed\r\n", fileName);
        return 1;
    }
    fileSize = 0;  // Initialize size to 0

    /* Get file size */
    fseek(fPtr,0,SEEK_END);
    fileSize = ftell(fPtr);
    
    /* Setup pointer in RAM for temporary storage of data */
    ramPtr = (Uint8 *)bootImage;

	printf("File size is %ld bytes \r\n", fileSize);

	slices = (fileSize / SLICE_SIZE_MAX) + 1;
	printf("Slices count is %i  \r\n", slices);
	
	/* Initialize the SPI interface */
    spiflash_init( );
    
    if(fileSize == 0)            // Check if file was found
    {
        printf("ERROR: File read failed.. Closing program.\r\n");
        fclose (fPtr);
        return 1;
    }    
	
	for (k = 0; k < slices ; k++){

    fseek(fPtr,0 + (k * sliceSize),SEEK_SET);
  
    
    if ((fileSize / (sliceSize * (k + 1))) == 0 )
    	sliceSize = fileSize - (k * sliceSize); 
	
	printf("Buffering slice number %i of %ld bytes \r\n", k,sliceSize);

    /* Read file to ram and check if read properly */
    if (sliceSize != fread(ramPtr, 1, sliceSize, fPtr)) 
    {
        printf("WARNING: Slice Size mismatch.\r\n");
        return 1;
    }
    fseek(fPtr,0,SEEK_SET);

    /* Calculate number of pages */
    pages = (sliceSize / spiflash_PAGESIZE) + 1;

    /* Erase target area in spiflash */
    printf("Erasing slice target area...\r\n");
    spiflash_erase(k * SLICE_SIZE_MAX, sliceSize);

    /* Write to spirom */
    printf("Burning slice number %i of %ld bytes \r\n", k,sliceSize);
    for ( i = 0 ; i < pages ; i++ )
    {
        /* Write a page */
        spiflash_write(  ((Uint32)bootImage + (i * spiflash_PAGESIZE)), (i * spiflash_PAGESIZE) + (k * SLICE_SIZE_MAX), spiflash_PAGESIZE );
    }

    /* Read and verify spirom */
    printf("Checking slice...\r\n");
    for ( i = 0 ; i < pages ; i++ )
    {
        /* Read a page */
        spiflash_read( (i * spiflash_PAGESIZE) + (k * SLICE_SIZE_MAX), ( Uint32 )rx, spiflash_PAGESIZE );

        /* Check the pattern */
        pdata = ( Uint16* )((Uint32)bootImage + (i * spiflash_PAGESIZE));
        for ( j = 0 ; j < spiflash_PAGESIZE; j++ )
        {
            if (  ((*pdata++) & 0xFF)!= (rx[j]))
                return 1;  // Fail
        }
    }
	}
	fclose (fPtr);
    return 0;
}