nf_drv.c

ATMEL全套MP3设计资料

/*C**************************************************************************
* $RCSfile: nf_drv.c,v $
*----------------------------------------------------------------------------
* Copyright (c) 2002 Atmel.
*----------------------------------------------------------------------------
* RELEASE:      $Name: DEMO_FAT_1_9_9 $      
* REVISION:     $Revision: 1.8 $     
* FILE_CVSID:   $Id: nf_drv.c,v 1.8 2002/09/06 13:17:20 njourdan Exp $       
*----------------------------------------------------------------------------
* PURPOSE: 
* This file contains the NF driver routines
*
*****************************************************************************/

/*_____ I N C L U D E S ____________________________________________________*/


#include "..\src\system\config.h"           /* system configuration         */
#include "..\..\lib_demob\board.h"          /* board definition             */
#include "nf_drv.h"                         /* nf driver definition         */


/*_____ M A C R O S ________________________________________________________*/




/*_____ D E F I N I T I O N ________________________________________________*/

                                  

/*_____ D E C L A R A T I O N ______________________________________________*/
extern code  Byte nf_cis_table[];                 /* CIS table */

extern pdata Byte gl_buffer[];                    /* global buffer of 256 bytes */
extern xdata Byte volatile nf_data;               /* Data */
extern xdata Byte nf_send_cmd;                    /* Command */
extern xdata Byte nf_send_add;                    /* Address */
extern data  Uint32  gl_ptr_mem;                  /* memory data pointer */

extern data  Uint32 address;                        /* general address variable                   */
extern xdata Uint32 nf_disk_size;                   /* Size of the disk in sector - 1            */ 
extern data  Uint16 look_up_table_block;            /* Look up table block address  */
extern idata Uint16 redundant_logical_block_value;  /* Logical block value in the redundant area */
 
extern data  Uint32 current_physical_sector_addr;   /* give the address of the current sector     */ 
extern bdata bit block_used;
extern bdata bit nf_busy;
     


extern xdata Uint16 buf_free[24];
extern xdata Uint16 block_to_be_deleted;
extern xdata Uint16 block_min;
extern data  Byte nf_zone;
extern xdata Uint16 lut_block[NF_ZONE_MAX];    /* LUT address in block value */
extern xdata Union16 buf[NF_BUFFER_SIZE];                   /* Buffer for write operation : contains physical block address */
extern xdata Byte nf_spare_block_number[NF_ZONE_MAX];      /* Number of free spare block in each zone */
extern Byte gl_buf_free_idx ;
extern Byte gl_buf_idx;
extern xdata Byte   lut_index[NF_ZONE_MAX];
extern xdata Uint16 logical_block;
extern idata Byte gl_buf_idx_max;
extern xdata Uint16 spare_block;

/*F**************************************************************************
* NAME:     nf_check_status
*----------------------------------------------------------------------------
* PARAMS:   
*
* RETURN: SMARTMEDIA status
*
*----------------------------------------------------------------------------
* PURPOSE:  Check the status of the device after a program or an erase
*           operation
*
*****************************************************************************
* NOTE: 
*       
*
*****************************************************************************/
bit nf_check_status(void)
{
  Nf_wait_busy();
  /* Status Type Command */
  Nf_send_command(NF_READ_STATUS_CMD);

  if ( (Nf_rd_byte() & 0x01) == 0x00)
  {  
    return OK;
  }
  else
  {
    return KO;
  }
}  

/*F**************************************************************************
* NAME:     nf_calc_logical_block
*----------------------------------------------------------------------------
* PARAMS:   
*           
*
* RETURN:
*
*----------------------------------------------------------------------------
* PURPOSE:  This function calculate the logical block value (used in spare 
*           data area)
*
*****************************************************************************
* NOTE:     
*           
*
*****************************************************************************/
void nf_calc_logical_block()
{
volatile Byte dummy;
bdata bit parity_bit;

  redundant_logical_block_value = (logical_block << 1) + 0x1000;
  /* Parity bit calculation */
  dummy = redundant_logical_block_value;
  parity_bit = P;
  dummy = ((Byte*)&redundant_logical_block_value)[0];
  if (P) parity_bit = ~parity_bit;

  if (parity_bit)
    redundant_logical_block_value++;

}

/*F**************************************************************************
* NAME:     nf_update_spare_data
*----------------------------------------------------------------------------
* PARAMS:   
*           
*
* RETURN:
*
*----------------------------------------------------------------------------
* PURPOSE:  This function update the value of the logical block on the spare
*           data area
*
*****************************************************************************
* NOTE:     
*           
*
*****************************************************************************/
void nf_update_spare_data(void)
{
  Nf_wr_byte(0xFF);
  Nf_wr_byte(0xFF);
  Nf_wr_byte(0xFF);
  Nf_wr_byte(0xFF);
  Nf_wr_byte(0xFF);
  Nf_wr_byte(0xFF);
  Nf_wr_byte(redundant_logical_block_value >> 8);
  Nf_wr_byte(redundant_logical_block_value );
  Nf_wr_byte(0xFF);
  Nf_wr_byte(0xFF);
  Nf_wr_byte(0xFF);
  Nf_wr_byte(redundant_logical_block_value >> 8 );
  Nf_wr_byte(redundant_logical_block_value );
  Nf_wr_byte(0xFF);
  Nf_wr_byte(0xFF);
  Nf_wr_byte(0xFF);
}



/*F**************************************************************************
* NAME:     nf_init_buffer
*----------------------------------------------------------------------------
* PARAMS:   
*           
*
* RETURN:
*
*----------------------------------------------------------------------------
* PURPOSE:  This function initialize the global buffer at 0xFF
*          
*
*****************************************************************************
* NOTE:     
*           
*
*****************************************************************************/
void nf_init_buffer(void)
{
Byte i;
char pdata *ptr = gl_buffer;

  for (i = 4; i != 0; i--)
  { 
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;
    *(ptr++) = 0xFF;

  }
  
}



/*F**************************************************************************
* NAME:     nf_init_spare
*----------------------------------------------------------------------------
* PARAMS:   
*
* RETURN:
*
*----------------------------------------------------------------------------
* PURPOSE:  Init logical value in redundant data when a block is opened for 
*           the first time and the sector inside the block is not 0.
*
*****************************************************************************
* NOTE:     
*           
*
*****************************************************************************/
void nf_init_spare(void)
{
Byte j;

  /* Calculate the current physical sector */
  for (j = (gl_ptr_mem & 0x1F); j != 0 ; j--)
  {              
    Nf_wait_busy();
    /* Write open on spare data area */
    Nf_send_command (NF_READ_C_AREA_CMD);     
    Nf_send_command (NF_SEQUENTIAL_DATA_INPUT_CMD);
    Nf_send_address (0x00);
    Nf_send_address ( ((Byte*)&current_physical_sector_addr)[3] );  /* 2nd address cycle         */
    Nf_send_address ( ((Byte*)&current_physical_sector_addr)[2] );  /* 3rd address cycle         */
    if (NF_4_CYCLE_ADDRESS)                                         /* Size of card >= 64Mbytes ?*/
      Nf_send_address ( ((Byte*)&current_physical_sector_addr)[1] );/* 4th address cycle         */

    /* Update spare data */
    nf_update_spare_data();

    /* Send program command */ 
    Nf_send_command (NF_PAGE_PROGRAM_CMD);
    current_physical_sector_addr++;
  }
  Nf_wait_busy();
}



/*F**************************************************************************
* NAME:     nf_copy_block_head
*----------------------------------------------------------------------------
* PARAMS:   block : physical block number
*           nb_sector : number of sector to be copied
*
* RETURN:
*
*----------------------------------------------------------------------------
* PURPOSE:  This function copy the first part of a block that is not modified
*           during a write operation
*
*****************************************************************************
* NOTE: Uint32 address is global     
*           
*
*****************************************************************************/
void nf_copy_block_head(void)
{
Byte j;

  /* address of the source physical block */
  address = (Uint32)(block_to_be_deleted) << 5;  

  for (j = (gl_ptr_mem & 0x1F); j != 0; j--)
  { 
    Nf_wait_busy();

    /* 1st half page */
    /* Read Open */
    Nf_send_command (NF_READ_A_AREA_CMD);
    Nf_send_address (0x00);
    Nf_send_address ( ((Byte*)&address)[3] );   /* 2nd address cycle         */
    Nf_send_address ( ((Byte*)&address)[2] );   /* 3rd address cycle         */
    if (NF_4_CYCLE_ADDRESS)                                  /* Size of card >= 64Mbytes ?*/
      Nf_send_address ( ((Byte*)&address)[1] ); /* 4th address cycle         */
    Nf_wait_busy();

    nf_upload_buffer();

    /* Write open */
    Nf_send_command (NF_SEQUENTIAL_DATA_INPUT_CMD);
    Nf_send_address (0x00);
    Nf_send_address ( ((Byte*)&current_physical_sector_addr)[3] );  /* 2nd address cycle         */
    Nf_send_address ( ((Byte*)&current_physical_sector_addr)[2] );  /* 3rd address cycle         */
    if (NF_4_CYCLE_ADDRESS)                                                      /* Size of card >= 64Mbytes ?*/
      Nf_send_address ( ((Byte*)&current_physical_sector_addr)[1] );/* 4th address cycle         */

    nf_download_buffer();
    
    Nf_send_command (NF_PAGE_PROGRAM_CMD);
    Nf_wait_busy();

    /* 2nd half page */
    /* Read Open */
    Nf_send_command (NF_READ_B_AREA_CMD);
    Nf_send_address (0x00);
    Nf_send_address ( ((Byte*)&address)[3] );   /* 2nd address cycle         */
    Nf_send_address ( ((Byte*)&address)[2] );   /* 3rd address cycle         */
    if (NF_4_CYCLE_ADDRESS)                                  /* Size of card >= 64Mbytes ?*/
      Nf_send_address ( ((Byte*)&address)[1] ); /* 4th address cycle         */
    Nf_wait_busy();

    nf_upload_buffer();    

    /* Write open */
    Nf_send_command (NF_READ_B_AREA_CMD);
    Nf_send_command (NF_SEQUENTIAL_DATA_INPUT_CMD);