kernel_chk.cpp

FDMP the body of the kernel, the Information-Technology Promotion Agency (IPA) adopted by the unexpl

/*
 *  TOPPERS/FDMP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Function Distributed Multiprocessor Kernel
 *
 *  Copyright (C) 2005 by Takagi Nobuhisa
 * 
 *  忋婰挊嶌尃幰偼丆埲壓偺 (1)乣(4) 偺忦審偐丆Free Software Foundation 
 *  偵傛偭偰岞昞偝傟偰偄傞 GNU General Public License 偺 Version 2 偵婰
 *  弎偝傟偰偄傞忦審傪枮偨偡応崌偵尷傝丆杮僜僼僩僂僃傾乮杮僜僼僩僂僃傾
 *  傪夵曄偟偨傕偺傪娷傓丏埲壓摨偠乯傪巊梡丒暋惢丒夵曄丒嵞攝晍乮埲壓丆
 *  棙梡偲屇傇乯偡傞偙偲傪柍彏偱嫋戻偡傞丏
 *  (1) 杮僜僼僩僂僃傾傪僜乕僗僐乕僪偺宍偱棙梡偡傞応崌偵偼丆忋婰偺挊嶌
 *      尃昞帵丆偙偺棙梡忦審偍傛傃壓婰偺柍曐徹婯掕偑丆偦偺傑傑偺宍偱僜乕
 *      僗僐乕僪拞偵娷傑傟偰偄傞偙偲丏
 *  (2) 杮僜僼僩僂僃傾傪丆儔僀僽儔儕宍幃側偳丆懠偺僜僼僩僂僃傾奐敪偵巊
 *      梡偱偒傞宍偱嵞攝晍偡傞応崌偵偼丆嵞攝晍偵敽偆僪僉儏儊儞僩乮棙梡
 *      幰儅僯儏傾儖側偳乯偵丆忋婰偺挊嶌尃昞帵丆偙偺棙梡忦審偍傛傃壓婰
 *      偺柍曐徹婯掕傪宖嵹偡傞偙偲丏
 *  (3) 杮僜僼僩僂僃傾傪丆婡婍偵慻傒崬傓側偳丆懠偺僜僼僩僂僃傾奐敪偵巊
 *      梡偱偒側偄宍偱嵞攝晍偡傞応崌偵偼丆師偺偄偢傟偐偺忦審傪枮偨偡偙
 *      偲丏
 *    (a) 嵞攝晍偵敽偆僪僉儏儊儞僩乮棙梡幰儅僯儏傾儖側偳乯偵丆忋婰偺挊
 *        嶌尃昞帵丆偙偺棙梡忦審偍傛傃壓婰偺柍曐徹婯掕傪宖嵹偡傞偙偲丏
 *    (b) 嵞攝晍偺宍懺傪丆暿偵掕傔傞曽朄偵傛偭偰丆TOPPERS僾儘僕僃僋僩偵
 *        曬崘偡傞偙偲丏
 *  (4) 杮僜僼僩僂僃傾偺棙梡偵傛傝捈愙揑傑偨偼娫愙揑偵惗偠傞偄偐側傞懝
 *      奞偐傜傕丆忋婰挊嶌尃幰偍傛傃TOPPERS僾儘僕僃僋僩傪柶愑偡傞偙偲丏
 * 
 *  杮僜僼僩僂僃傾偼丆柍曐徹偱採嫙偝傟偰偄傞傕偺偱偁傞丏忋婰挊嶌尃幰偍
 *  傛傃TOPPERS僾儘僕僃僋僩偼丆杮僜僼僩僂僃傾偵娭偟偰丆偦偺揔梡壜擻惈傕
 *  娷傔偰丆偄偐側傞曐徹傕峴傢側偄丏傑偨丆杮僜僼僩僂僃傾偺棙梡偵傛傝捈
 *  愙揑傑偨偼娫愙揑偵惗偠偨偄偐側傞懝奞偵娭偟偰傕丆偦偺愑擟傪晧傢側偄丏
 * 
 */

/*
 *  toppers/itron/kernel_chk.cpp
 */
#include "toppers/itron/kernel_chk.hpp"
#include "toppers/itron/cfg_contents.hpp"
#include "toppers/itron/kernel_object.hpp"
#include "toppers/s_record.hpp"
#include "toppers/reporter.hpp"

namespace toppers
{
  namespace itron
  {

    /*!
     *  \brief  "kernel_chk.srec"偐傜偺僠僃僢僋忣曬偺撉傒崬傒
     *  \param  srec    "kernel_chk.srec"偺撪梕
     *  \param  address 撉傒崬傒奐巒斣抧
     *
     *  address 偵~0UL乮僨僼僅儖僩抣乯傪巜掕偡傞偲丄S儗僐乕僪偺嵟弶偐傜撉傒崬傒傑偡丅
     */
    void kernel_chk::load( const s_record& srec, unsigned long address )
    {
      if ( address == ~0UL )
      {
        address = srec.lower_bound();
      }
      byteorder_ = unknown;

      while ( !do_load( srec, address ) )
      {
        if ( srec.upper_bound() <= address + 1 )
        {
          error( _( "illegal check script" ) );
        }
      }
    }

    /*!
     *  \brief  僇乕僱儖僆僽僕僃僋僩悢偺庢摼
     *  \param  object_type 僇乕僱儖僆僽僕僃僋僩偺庬椶
     *  \return 巜掕偟偨庬椶偺僇乕僱儖僆僽僕僃僋僩悢傪曉偡
     *
     *  "task"摍偺僇乕僱儖僆僽僕僃僋僩偺屄悢傪挷傋傑偡丅
     */
    long kernel_chk::countof( const std::string& object_type ) const
    {
      std::map<std::string, long>::const_iterator iter( countof_map_.find( object_type ) );
      if ( iter != countof_map_.end() )
      {
        return iter->second;
      }
      return 0;
    }

    /*!
     *  \brief  "kernel_chk.c"偺攝楍梫慺偺嶲徠
     *  \param  key   攝楍偺僀儞僨僢僋僗
     *  \return key 偱巜掕偟偨攝楍梫慺乮UW宆乯偺抣傪曉偡
     */
    unsigned long kernel_chk::get( int key ) const
    {
      if ( key < 0 || static_cast<int>( table_.size() ) <= key )
      {
        return 0;
      }
      return table_[key];
    }

    /*!
     *  \brief  "kernel_chk.c"偺攝楍梫慺偺愝掕
     *  \param  key   攝楍偺僀儞僨僢僋僗
     *  \param  value 攝楍梫慺偺抣偵愝掕偡傞抣
     *
     *  偙偺娭悢偼 kernel_chk 僆僽僕僃僋僩偑撪晹揑偵娗棟偡傞攝楍傪愝掕偡傞偨傔偵巊梡偟傑偡丅
     *  偙偺娭悢傪屇傃弌偟偰傕丄"kernel_chk.srec"傗"kernel_chk.o", "kernel_chk.c"偵塭嬁偑弌傞
     *  傢偗偱偼偁傝傑偣傫丅
     */
    void kernel_chk::set( int key, unsigned long value )
    {
      if ( key >= 0 )
      {
        if ( key >= static_cast<int>( table_.size() ) )
        {
          table_.resize( key + 1 );
        }
        table_[key] = value;
      }
    }

    /*!
     *  \brief  僾儘僟僋僩ID斣崋偺撉傒崬傒
     *  \param  srec    "kernel_chk.srec"僼傽僀儖偺撪梕
     *  \param  address 奐巒傾僪儗僗
     *
     *  僾儘僟僋僩ID斣崋偼"kernel_chk.c"偵弌椡偟偨俀斣栚偺梫慺偵奿擺偝傟偰偄傞偲憐掕偟傑偡丅
     *  address 偵~0UL乮婛掕抣乯傪巜掕偡傞偲 srec 偺愭摢傾僪儗僗傪嵦梡偟傑偡丅
     */
    long kernel_chk::read_prid( const s_record& srec, unsigned long address )
    {
      const int table_size = 2;
      unsigned long table[table_size];
      long prid = -1;

      if ( address == ~0UL )
      {
        address = srec.lower_bound();
      }

      do
      {
        for ( int i = 0; i < table_size; i++ )
        {
          unsigned long value = 0;
          for ( int j = 0; j < 4; j++ )
          {
            value = value << 8 | srec[address + i*4 + j];
          }
          table[i] = value;
        }

        switch ( table[0] )
        {
        case 0x12345678:
          prid = static_cast<long>( table[1] );
          break;
        case 0x78563412:
          {
            unsigned long value = 0;
            unsigned long t = table[1];
            for ( int j = 0; j < 4; j++ )
            {
              value = value << 8 | ( t & 0xff );
              t >>= 8;
            }
            prid = static_cast<long>( value );
          }
          break;
        default:
          if ( srec.upper_bound() <= address + 1 )
          {
            return -1;
          }
          ++address;
          break;
        }
      } while ( prid < 0 );
      return prid;
    }

    bool kernel_chk::do_save( std::ostream& ostr ) const
    {
      do_file_header( ostr );
      do_body( ostr );
      return true;
    }

    /*!
     *  \brief  load 娭悢偺幚懱
     *  \param  contents  僠僃僢僋忣曬傪庢摼偡傞僐儞僥儞僣忣曬
     */
    void kernel_chk::do_load( const boost::shared_ptr<cfg_contents>& contents )
    {
      typedef cfg_contents::group_container::const_iterator group_iterator;
      const cfg_contents::group_container& container = contents->groups();

      for ( group_iterator giter( contents->groups().begin() ), glast( contents->groups().end() ); giter != glast; ++giter )
      {
        typedef cfg_group::object_container::const_iterator object_iterator;
        const boost::shared_ptr<cfg_group> group( *giter );
        for ( object_iterator oiter( group->objects().begin() ), olast( group->objects().end() ); oiter != olast; ++oiter )
        {
          ++countof_map_[( *oiter )->get_object_type()];
        }
      }
    }

    /*!
     *  \fn     bool kernel_chk::do_load( const s_record& srec, unsigned long address )
     *  \brief  load 娭悢偺幚懱
     *  \param  srec    "kernel_chk.srec"偺撪梕
     *  \param  address 撉傒崬傒奐巒斣抧
     *  \return 撉傒崬傒偵惉岟偟偨応崌偼true傪曉偡
     */

  }
}