eea_2.h

Go to the documentation of this file.

 
/* This file is part of the HWA project.
 * Copyright (c) 2012,2015 Christophe Duparquet.
 * All rights reserved. Read LICENSE.TXT for details.
 */
 
#define hw_read__eea            , _hw_read_eea
 
#define _hw_read_eea(o,a,addr,...)      \
  _hw_rdeeproma( HW_ADDRESS((o,ar)),            \
                 HW_ADDRESS((o,re)),            \
                 HW_POSITION((o,re)),           \
                 HW_ADDRESS((o,dr)),            \
                 addr)                          \
  HW_EOL(__VA_ARGS__)
 
 
HW_INLINE uint8_t _hw_rdeeproma( intptr_t ar,
                                 intptr_t cr, uint8_t cb,
                                 intptr_t dr,
                                 uint16_t a )
{
  *(volatile uint16_t*)ar = a ;
  *(volatile uint8_t*)cr |= (1<<cb) ;
  return *(volatile uint8_t*) dr ;
}
 
 
#define hw_read_bytes__eea              , _hw_eea_read_bytes
 
#define _hw_eea_read_bytes(o,a,dst,src,n,...)   \
  _hw_eea_rdn( (uint8_t*)dst, (intptr_t)src, n, \
                   HW_ADDRESS((o,ar)),                  \
                   HW_ADDRESS((o,re)),                  \
                   HW_POSITION((o,re)),                 \
                   HW_ADDRESS((o,dr)) )                 \
  HW_EOL(__VA_ARGS__)
 
 
HW_INLINE void _hw_eea_rdn( uint8_t *dst, intptr_t src, uint8_t n,
                                intptr_t ar,
                                intptr_t cr, uint8_t cb,
                                intptr_t dr)
{
  while ( n-- ) {
    *(volatile uint16_t*)ar = src++ ;
    *(volatile uint8_t*)cr |= (1<<cb) ;
    *dst++ = *(volatile uint8_t*) dr ;
  }
}
 
 
#define hw_write__eea           , _hw_write_eea
 
#define _hw_write_eea(o,a,addr,v,...)           \
  _hw_wreeproma( addr, v,                               \
                 HW_ADDRESS((o,ar)),                    \
                 HW_ADDRESS((o,dr)),                    \
                 HW_ADDRESS((o,mpe)), HW_POSITION((o,mpe)),     \
                 HW_ADDRESS((o,pe)), HW_POSITION((o,pe)) )      \
  HW_EOL(__VA_ARGS__)
 
 
HW_INLINE void _hw_wreeproma( uint16_t a, uint8_t v,
                              intptr_t ar,
                              intptr_t dr,
                              intptr_t mpe_ra, uint8_t mpe_bp,
                              intptr_t pe_ra, uint8_t pe_bp )
{
  /*  Assume EECR is 0, programming mode is 'Erase & write'
   */
  *(volatile uint16_t*)ar = a ;
  *(volatile uint8_t*)dr = v ;
  *(volatile uint8_t*)mpe_ra |= (1U<<mpe_bp) ;
  *(volatile uint8_t*)pe_ra |= (1U<<pe_bp) ;
}
 
 
#define hw_write_bytes__eea             , _hw_eea_write_bytes
 
#define _hw_eea_write_bytes(o,a,dst,src,n,...)  \
  _hw_eea_wrn( (intptr_t)(dst), (uint8_t*)(src), n,     \
                   HW_ADDRESS((o,ar)),                  \
                   HW_ADDRESS((o,dr)),                  \
                   HW_ADDRESS((o,mpe)), HW_POSITION((o,mpe)),   \
                   HW_ADDRESS((o,pe)), HW_POSITION((o,pe)) )    \
  HW_EOL(__VA_ARGS__)
 
 
HW_INLINE void _hw_eea_wrn ( intptr_t dst,
                                 uint8_t *src, uint8_t n,
                                 intptr_t ar,
                                 intptr_t dr,
                                 intptr_t mpe_ra, uint8_t mpe_bp,
                                 intptr_t pe_ra, uint8_t pe_bp )
{
  /*  Assume EECR is 0, programming mode is 'Erase & write'   */
 
  while ( n-- ) {
    /*
     *  Wait for completion of previous write
     */
    while ( *(volatile uint8_t*)pe_ra & (1U<<pe_bp) ) {}
    /*
     *  Write byte
     */
    *(volatile uint8_t*)dr = *src++ ;
    *(volatile uint16_t*)ar = dst++ ;
    *(volatile uint8_t*)mpe_ra |= (1U<<mpe_bp) ;
    *(volatile uint8_t*)pe_ra |= (1U<<pe_bp) ;
  }
}