source: atk2-sc3-1.4.0-ntisr/library/histogram.c

/*
 *  TOPPERS ATK2
 *      Toyohashi Open Platform for Embedded Real-Time Systems
 *      Automotive Kernel Version 2
 *
 *  Copyright (C) 2006-2015 by Center for Embedded Computing Systems
 *              Graduate School of Information Science, Nagoya Univ., JAPAN
 *  Copyright (C) 2011-2015 by FUJI SOFT INCORPORATED, JAPAN
 *  Copyright (C) 2011-2013 by Spansion LLC, USA
 *  Copyright (C) 2011-2015 by NEC Communication Systems, Ltd., JAPAN
 *  Copyright (C) 2011-2015 by Panasonic Advanced Technology Development Co., Ltd., JAPAN
 *  Copyright (C) 2011-2014 by Renesas Electronics Corporation, JAPAN
 *  Copyright (C) 2011-2015 by Sunny Giken Inc., JAPAN
 *  Copyright (C) 2011-2015 by TOSHIBA CORPORATION, JAPAN
 *  Copyright (C) 2011-2015 by Witz Corporation
 *  Copyright (C) 2014-2015 by AISIN COMCRUISE Co., Ltd., JAPAN
 *  Copyright (C) 2014-2015 by eSOL Co.,Ltd., JAPAN
 *  Copyright (C) 2014-2015 by SCSK Corporation, JAPAN
 *  Copyright (C) 2015 by SUZUKI MOTOR CORPORATION
 *
 *  上記著作権者
は，以下の(1)〜(4)ã®æ¡ä»¶ã‚’æº€ãŸã™å ´åˆã«é™ã‚Šï¼Œæœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§
 *  ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
 *  変・再é…
å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する．
 *  (1) æœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§ã‚¢ã‚’ã‚½ãƒ¼ã‚¹ã‚³ãƒ¼ãƒ‰ã®å½¢ã§åˆ©ç”¨ã™ã‚‹å ´åˆã«ã¯ï¼Œä¸Šè¨˜ã®è‘—ä½œ
 *      権表示，この利用条件および下記の無保証規定が，そのままの形でソー
 *      スコード中に含まれていること．
 *  (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
 *      用できる形で再é…
å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
 *      者
マニュアルなど）に，上記の著作権表示，この利用条件および下記
 *      の無保証規定を掲載すること．
 *  (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
 *      用できない形で再é…
å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
 *      と．
 *    (a) 再é…
å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
マニュアルなど）に，上記の著
 *        作権表示，この利用条件および下記の無保証規定を掲載すること．
 *    (b) 再é…
å¸ƒã®å½¢æ…
‹ã‚’，別に定める方法によって，TOPPERSプロジェクトに
 *        å ±å‘Šã™ã‚‹ã“ã¨ï¼Ž
 *  (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
 *      害からも，上記著作権者
およびTOPPERSプロジェクトをå…
è²¬ã™ã‚‹ã“と．
 *      また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
 *      由に基づく請求からも，上記著作権者
およびTOPPERSプロジェクトを
 *      å…
è²¬ã™ã‚‹ã“と．
 *
 *  本ソフトウェアは，AUTOSAR（AUTomotive Open System ARchitecture）仕
 *  様に基づいている．上記の許諾は，AUTOSARの知的財産権を許諾するもので
 *  はない．AUTOSARは，AUTOSAR仕様に基づいたソフトウェアを商用目的で利
 *  用する者
に対して，AUTOSARパートナーになることを求めている．
 *
 *  本ソフトウェアは，無保証で提供されているものである．上記著作権者
お
 *  よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
 *  に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
 *  アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
 *  ã®è²¬ä»»ã‚’è² ã‚ãªã„ï¼Ž
 *
 *  $Id: histogram.c 425 2015-12-07 08:06:19Z witz-itoyo $
 */

/*
 *              実行時間分布集計モジュール
 */

#include "histogram.h"
#include "target_timer.h"
#include "target_test.h"

/*
 *  実行時間分布計測の数
 */
#ifndef TNUM_HIST
#define TNUM_HIST               10
#endif /* TNUM_HIST */

/*
 *  ターゲット依存部で設定変更するためのマクロ
 */
#ifndef HISTTIM                     /* 実行時間計測用の時刻のデータ型 */
#define HISTTIM                 SystemTimeUsType
#endif /* HISTTIM */

#ifndef HIST_GET_TIM                /* 実行時間計測用の現在時刻の取得 */
#ifndef TOPPERS_SUPPORT_GET_UTM
#error get_utm is not supported
#endif /* TOPPERS_SUPPORT_GET_UTM */
#define HIST_GET_TIM(p_time)    ((void) get_utm(p_time))
#endif /* HIST_GET_TIM */

#ifndef HIST_CONV_TIM               /* 時刻の差から実行時間への変換 */
#define HIST_CONV_TIM(time)             ((uint32) (time))
#endif /* HIST_CONV_TIM */

#ifndef HIST_BM_HOOK                /* 実行時間計測直前に行うべき処理 */
#define HIST_BM_HOOK()
#endif /* HIST_BM_HOOK */

LOCAL_INLINE void
get_utm(HISTTIM *p_time)
{
#ifndef GET_UTIM
        *p_time = (HISTTIM) get_tim_utime();
#else /* GET_UTIM */
        *p_time = (HISTTIM) GET_UTIM();
#endif /* GET_UTIM */

}

/*
 *  実行時間分布計測管理ブロック
 */
typedef struct histogram_control_block {
        HISTTIM begin_time;             /* 計測開始時刻 */
        uint32  maxval;                 /* 分布を記録する最大時間 */
        uint32  *histarea;              /* åˆ†å¸ƒã‚’è¨˜éŒ²ã™ã‚‹ãƒ¡ãƒ¢ãƒªé ˜åŸŸ */
        uint32  over;                   /* 最大時間を超
えた度数 */
        uint32  under;                  /* 時間の逆転が疑われる度数 */
        boolean initialized;            /* 初期化済みかどうかのフラグ */
} HISTCB;

/*
 *  実行時間分布計測管理ブロックのエリア
 */
HISTCB histcb_table[TNUM_HIST];

/*
 *  実行時間分布計測IDの最小値と最大値
 */
#define TMIN_HISTID             1
#define TMAX_HISTID             ((TMIN_HISTID + TNUM_HIST) - 1)

/*
 *  実行時間分布計測の初期化
 */
boolean
init_hist(ObjectIDType histid, uint32 maxval, uint32 *histarea)
{
        HISTCB  *p_histcb;
        uint32  i;
        boolean ret = TRUE;

        /* 不正な分布計測IDã®å ´åˆFALSEを返す */
        if ((histid < TMIN_HISTID) || (histid > TMAX_HISTID)) {
                ret = FALSE;
        }
        else {
                p_histcb = &(histcb_table[histid - TMIN_HISTID]);

                for (i = 0U; i <= maxval; i++) {
                        histarea[i] = 0U;
                }
                p_histcb->maxval = maxval;
                p_histcb->histarea = histarea;
                p_histcb->over = 0U;
                p_histcb->under = 0U;
                p_histcb->initialized = TRUE;
        }
        return(ret);
}

/*
 *  実行時間計測の開始
 */
boolean
begin_measure(ObjectIDType histid)
{
        HISTCB  *p_histcb;
        boolean ret = TRUE;

        /* 不正な分布計測IDã®å ´åˆFALSEを返す */
        if ((histid < TMIN_HISTID) || (histid > TMAX_HISTID)) {
                ret = FALSE;
        }
        else {
                p_histcb = &(histcb_table[histid - TMIN_HISTID]);

                /* åˆæœŸåŒ–ã—ã¦ã„ãªã„å ´åˆFALSEを返す */
                if (p_histcb->initialized == FALSE)     {
                        ret = FALSE;
                }
                else {
                        HIST_BM_HOOK();
                        HIST_GET_TIM(&(p_histcb->begin_time));
                }
        }
        return(ret);
}

/*
 *  実行時間計測の終了
 */
boolean
end_measure(ObjectIDType histid)
{
        HISTCB  *p_histcb;
        HISTTIM end_time;
        uint32  val;
        boolean ret = TRUE;

        HIST_GET_TIM(&end_time);

        /* 不正な分布計測IDã®å ´åˆFALSEを返す */
        if ((histid < TMIN_HISTID) || (histid > TMAX_HISTID)) {
                ret = FALSE;
        }
        else {
                p_histcb = &(histcb_table[histid - TMIN_HISTID]);

                /* åˆæœŸåŒ–ã—ã¦ã„ãªã„å ´åˆFALSEを返す */
                if (p_histcb->initialized == FALSE)     {
                        ret = FALSE;
                }
                else {
                        val = HIST_CONV_TIM(end_time - p_histcb->begin_time);
                        if (val <= p_histcb->maxval) {
                                p_histcb->histarea[val]++;
                        }
                        else if (val <= ((uint32) 0x7fffffff)) {
                                p_histcb->over++;
                        }
                        else {
                                p_histcb->under++;
                        }
                }
        }
        return(ret);
}

/*
 *  実行時間分布計測の表示
 */
boolean
print_hist(ObjectIDType histid)
{
        HISTCB  *p_histcb;
        uint32  i;
        boolean ret = TRUE;

        /* 不正な分布計測IDã®å ´åˆFALSEを返す */
        if ((histid < TMIN_HISTID) || (histid > TMAX_HISTID)) {
                ret = FALSE;
        }
        else {
                p_histcb = &(histcb_table[histid - TMIN_HISTID]);

                /* åˆæœŸåŒ–ã—ã¦ã„ãªã„å ´åˆFALSEを返す */
                if (p_histcb->initialized == FALSE)     {
                        ret = FALSE;
                }
                else {
                        for (i = 0U; i <= p_histcb->maxval; i++) {
                                if (p_histcb->histarea[i] > 0U) {
#ifndef MEASURE_100_NANO
                                        syslog_2(LOG_NOTICE, "%d : %d", i, p_histcb->histarea[i]);
#else
                                        syslog_3(LOG_NOTICE, "%d.%d : %d", i / 10, i % 10, p_histcb->histarea[i]);
#endif /* MEASURE_100_NANO */
                                }
                        }
                        if (p_histcb->over > 0U) {
                                syslog_2(LOG_NOTICE, "> %d : %d", p_histcb->maxval, p_histcb->over);
                        }
                        if (p_histcb->under > 0U) {
                                syslog_1(LOG_NOTICE, "> 0x7fffffff : %d", p_histcb->under);
                        }
                }
        }

        return(ret);
}