nf.c

开发工具:keil7 主要IC：at89c51sdnd1(atmel) 说明：mp3播放器详细设计方案

{
char pdata *ptr = gl_buffer;

  if (nf_busy)
  {
    nf_busy = FALSE;
    if (!gl_cpt_page) /* if we are at the beginning of a new page */
    {
      /* if there is a block change */
      if (!(gl_ptr_mem & 0x1F))                            
      { 
        /* If previous block have to de deleted */
        if (nf_block_used)       
        {
          nf_block_erase((Uint32)(nf_block_to_be_deleted) << 5);
        }
        /* increase the main buffer index */
        nf_gl_buf_idx++;
        /* if zone change */
        if (nf_gl_buf_idx >= nf_block_max)
        {
          nf_write_open(gl_ptr_mem);
        }
        else
        {
          /* if the block in the buffer is already assign, then invert it with a spare block */
          if (!(nf_buf[nf_gl_buf_idx].w & 0x8000))                 
          {                                                 
            if ((nf_buf_free[gl_buf_free_idx] & 0x7FFF) == nf_lut_block[nf_zone])
            {
              gl_buf_free_idx++;
              if (gl_buf_free_idx >= nf_spare_block)
              {
                gl_buf_free_idx = 0;
              }      
            }        
            /* invert the block and assign the next block to be deleted */
            nf_block_to_be_deleted = nf_buf[nf_gl_buf_idx].w;
            nf_buf[nf_gl_buf_idx].w = nf_buf_free[gl_buf_free_idx] & 0x7FFF;
            nf_buf_free[gl_buf_free_idx] = nf_block_to_be_deleted | 0x8000;
            /* block have to be deleted */
            nf_block_used = TRUE;
            /* increase the spare buffer index */
            if ((gl_buf_free_idx++) >= nf_spare_block)
            {
              gl_buf_free_idx = 0;
            }
    
          }
          else /* The block is not assigned. Nothing to do */
          {
            nf_buf[nf_gl_buf_idx].w &= 0x7FFF;
            nf_block_used = FALSE;
          }
          /* update the max index buffer */
          if (nf_gl_buf_idx > nf_gl_buf_idx_max)
            nf_gl_buf_idx_max = nf_gl_buf_idx;
    
          /* Update current physical sector */
          nf_current_physical_sector_addr = (Uint32)(nf_buf[nf_gl_buf_idx].w) << 5;
          /* increase the logical block */
          nf_logical_block++;
          /* calculate the redundant block address */
          nf_calc_logical_block();
        }
      }
      else  /* if there is no block change, we just need to continue write operation */
      {     /* on the next physical sector                                           */
        nf_current_physical_sector_addr++;
      }
    }
  
  }

  Nf_CS_ON();

  /* Save data in gl_buffer */  
  gl_buffer[(gl_cpt_page & 0xFF)] = b;
  /* Increase internal page counter */
  gl_cpt_page++;                          
  if (gl_cpt_page == 256)                   /* First 256 bytes */
  {
    Nf_wait_busy();
    /* Open in write mode in A Area */
    Nf_write_open_A_area(nf_current_physical_sector_addr, 0x00);
    /* Copy the buffer */
    nf_download_buffer();
    Nf_send_command(NF_PAGE_PROGRAM_CMD);
    nf_busy = TRUE;    
  }
  else
    if (gl_cpt_page == NF_DATA_SIZE)        /* check if end of data page */
    {
      Nf_wait_busy();
      /* Open in write mode in B Area */
      Nf_write_open_B_area(nf_current_physical_sector_addr, 0x00);
      /* Copy the buffer */
      nf_download_buffer();
      /* Update spare data */
      nf_update_spare_data();
      Nf_send_command(NF_PAGE_PROGRAM_CMD);
      nf_busy = TRUE;
      gl_ptr_mem++;
      gl_cpt_page = 0;      
    }

  return OK;
}


/*F**************************************************************************
* NAME: nf_write_sector
*----------------------------------------------------------------------------
* PARAMS:
*   global: gl_ptr_mem
*
* return:
*   write status: OK: write done
*                 KO: write not done
*----------------------------------------------------------------------------
* PURPOSE: 
*   This function is an optimized function that writes nb-sector * 512 bytes
*   from USB controller to NF card
*----------------------------------------------------------------------------
* EXAMPLE:
*----------------------------------------------------------------------------
* NOTE:
*   nb_sector always >= 1, can not be zero
*----------------------------------------------------------------------------
* REQUIREMENTS:
*****************************************************************************/
bit nf_write_sector (Uint16 nb_sector)
{
Byte j;

  do
  {   
    if (nf_busy)
    {
      nf_busy = FALSE;
      /* if there is a block change */
      if (!(gl_ptr_mem & 0x1F))                            
      { 
        /* If previous block have to de deleted */
        if (nf_block_used)       
        {
          nf_block_erase((Uint32)(nf_block_to_be_deleted) << 5);
        }
        /* increase the main buffer index */
        nf_gl_buf_idx++;
        /* if zone change */
        if (nf_gl_buf_idx >= nf_block_max)
        {
          nf_write_open(gl_ptr_mem);
        }
        else
        {
          /* if the block in the buffer is already assign, then invert it with a spare block */
          if (!(nf_buf[nf_gl_buf_idx].w & 0x8000))                 
          {                                                 
            if ((nf_buf_free[gl_buf_free_idx] & 0x7FFF) == nf_lut_block[nf_zone])
            {
              gl_buf_free_idx++;
              if (gl_buf_free_idx >= nf_spare_block)
              {
                gl_buf_free_idx = 0;
              }      
            }        
            /* invert the block and assign the next block to be deleted */
            nf_block_to_be_deleted = nf_buf[nf_gl_buf_idx].w;
            nf_buf[nf_gl_buf_idx].w = nf_buf_free[gl_buf_free_idx] & 0x7FFF;
            nf_buf_free[gl_buf_free_idx] = nf_block_to_be_deleted | 0x8000;
            /* block have to be deleted */
            nf_block_used = TRUE;
            /* increase the spare buffer index */
            if ((gl_buf_free_idx++) >= nf_spare_block)
            {
              gl_buf_free_idx = 0;
            }
          }
          else /* The block is not assigned. Nothing to do */
          {
            nf_buf[nf_gl_buf_idx].w &= 0x7FFF;
            nf_block_used = FALSE;
          }
          /* update the max index buffer */
          if (nf_gl_buf_idx > nf_gl_buf_idx_max)
            nf_gl_buf_idx_max = nf_gl_buf_idx;
    
          /* Update current physical sector */
          nf_current_physical_sector_addr = (Uint32)(nf_buf[nf_gl_buf_idx].w) << 5;
          /* increase the logical block */
          nf_logical_block++;
          /* calculate the redundant block address */
          nf_calc_logical_block();
        }
      }
      else  /* if there is no block change, we just need to continue write operation */
      {     /* on the next physical sector                                           */
        nf_current_physical_sector_addr++;
      }
    }
  
    Nf_CS_ON();
  
    Nf_wait_busy();
    Nf_write_open_A_area(nf_current_physical_sector_addr, 0x00);

    for (j = 8; j != 0; j--)
    {
      while (!Usb_rx_complete());             /* wait end of reception */
      Nf_wr_byte(Usb_read_byte());            /* write 64 bytes to card */
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Nf_wr_byte(Usb_read_byte());
      Usb_clear_RXOUT_PP();                      /* usb read acknowledgement */
    }
  
    /* Update spare data */
    nf_update_spare_data();
  
    Nf_send_command (NF_PAGE_PROGRAM_CMD);
    /* increase gl_ptr_mem : next page */
    gl_ptr_mem++;              
    /* set flag busy */
    nf_busy = TRUE;

    Nf_wait_busy();
    nb_sector--;
  }
  while ( nb_sector != 0);
  return OK;
}


/*F**************************************************************************
* NAME: nf_format
*----------------------------------------------------------------------------
* PARAMS:
*
* return:
*   Address of the format parameter structure in code
*----------------------------------------------------------------------------
* PURPOSE: 
*   This function is called by the fat_format function and returns a pointer
*   to a table containing the format parameters after erasing the NF.
*----------------------------------------------------------------------------
* EXAMPLE:
*----------------------------------------------------------------------------
* NOTE:
*----------------------------------------------------------------------------
* REQUIREMENTS:
*****************************************************************************/
s_format code * nf_format (void)
{
code  s_format  nf_tab_format[]=
  {
   /* nb_cylinder, nb_head,  nb_sector, nb_hidden, nb_sector_per_cluster */
    { (Uint16)500, (Byte)4,  (Byte)16,  (Byte)57,  (Byte)32 }, /* 16MB */
    { (Uint16)500, (Byte)8,  (Byte)16,  (Byte)51,  (Byte)32 }, /* 32MB */
    { (Uint16)500, (Byte)8,  (Byte)32,  (Byte)39,  (Byte)32 }, /* 64MB */
    { (Uint16)500, (Byte)16, (Byte)32,  (Byte)63,  (Byte)32 }, /* 128MB */
  };

  /* Erase all block */
  nf_erase_all_block();

  /* -- NF Type Selection -- */
  return &nf_tab_format[NF_TYPE];
}