OVMS3-idf/components/perfmon/test/test_perfmon_ansi.c

193 lines
6.5 KiB
C

// Copyright 2018-2019 Espressif Systems (Shanghai) PTE LTD
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
//
// http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.
#include <string.h>
#include "unity.h"
#include "esp_log.h"
#include <stdlib.h>
#include "perfmon.h"
// These includes required only for the tests
#include "xtensa-debug-module.h"
#include "eri.h"
static const char *TAG = "perfmon";
TEST_CASE("Perfomance counter dump", "[perfmon]")
{
xtensa_perfmon_dump();
xtensa_perfmon_stop();
xtensa_perfmon_dump();
xtensa_perfmon_init(0, 0, 0xffff, 0, 6);
xtensa_perfmon_dump();
xtensa_perfmon_reset(0);
xtensa_perfmon_start();
int pm_data[10];
for (int i = 0 ; i < 10 ; i++) {
if (i == 4) {
xtensa_perfmon_reset(0);
xtensa_perfmon_start();
}
if (i == 6) {
xtensa_perfmon_stop();
}
if (i == 8) {
xtensa_perfmon_start();
}
pm_data[i] = eri_read(ERI_PERFMON_PM0);
}
for (int i = 0 ; i < 10 ; i++) {
ESP_LOGI(TAG, "pm_data[%i]= %08x", i, pm_data[i]);
}
if (pm_data[4] > pm_data[3]) {
ESP_LOGE(TAG, "The functions xtensa_perfmon_reset and xtensa_perfmon_start are not working correct.");
ESP_LOGW(TAG, "pm_data[3]= %i, must be > pm_data[4]= %i", pm_data[3], pm_data[4]);
TEST_ESP_OK(ESP_FAIL);
}
if ( pm_data[6] != pm_data[7]) {
ESP_LOGE(TAG, "The xtensa_perfmon_stop functions is not working correct.");
ESP_LOGW(TAG, "pm_data[6]= %i, must be == pm_data[7]= %i", pm_data[6], pm_data[7]);
TEST_ESP_OK(ESP_FAIL);
}
if ( pm_data[7] == pm_data[8]) {
ESP_LOGE(TAG, "The xtensa_perfmon_start functions is not working correct.");
ESP_LOGW(TAG, "pm_data[7]= %i, must be < pm_data[8]= %i", pm_data[7], pm_data[8]);
TEST_ESP_OK(ESP_FAIL);
}
xtensa_perfmon_stop();
}
static void test_call(void* params)
{
for (int i = 0 ; i < 1000 ; i++) {
__asm__ __volatile__(" nop");
}
}
static bool callback_called = false;
static int callback_call_count = 0;
static void test_callback(void *params, uint32_t select, uint32_t mask, uint32_t value)
{
ESP_LOGI("test", "test_callback select = %i, mask = %i, value = %i", select, mask, value);
callback_called = true;
callback_call_count++;
}
TEST_CASE("Performacnce test callback", "[perfmon]")
{
ESP_LOGI(TAG, "Initialize performance structure");
xtensa_perfmon_config_t pm_config = {};
pm_config.counters_size = sizeof(xtensa_perfmon_select_mask_all) / sizeof(uint32_t) / 2;
pm_config.select_mask = xtensa_perfmon_select_mask_all;
pm_config.repeat_count = 200;
pm_config.max_deviation = 1;
pm_config.call_function = test_call;
pm_config.callback = test_callback;
pm_config.callback_params = stdout;
pm_config.tracelevel = -1; // Trace all events
callback_called = false;
callback_call_count = 0;
xtensa_perfmon_exec(&pm_config);
ESP_LOGI(TAG, "Callback count = %i", callback_call_count);
if (callback_call_count != pm_config.counters_size) {
ESP_LOGE(TAG, "The callback count is not correct.");
ESP_LOGW(TAG, "callback_call_count= %i, must be == pm_config.counters_size= %i", callback_call_count, pm_config.counters_size);
TEST_ESP_OK(ESP_FAIL);
}
if (ESP_OK != xtensa_perfmon_overflow(0))
{
ESP_LOGE(TAG, "Perfmon 0 overflow detected!");
TEST_ESP_OK(ESP_FAIL);
}
if (ESP_OK != xtensa_perfmon_overflow(1))
{
ESP_LOGE(TAG, "Perfmon 1 overflow detected!");
TEST_ESP_OK(ESP_FAIL);
}
if (false == callback_called) {
TEST_ESP_OK(ESP_FAIL);
}
}
static void exec_callback(void *params)
{
for (int i = 0 ; i < 100 ; i++) {
__asm__ __volatile__(" nop");
}
}
static const uint32_t test_dsp_table[] = {
XTPERF_CNT_CYCLES, XTPERF_MASK_CYCLES, // total cycles
XTPERF_CNT_INSN, XTPERF_MASK_INSN_ALL, // total instructions
XTPERF_CNT_D_LOAD_U1, XTPERF_MASK_D_LOAD_LOCAL_MEM, // Mem read
XTPERF_CNT_D_STORE_U1, XTPERF_MASK_D_STORE_LOCAL_MEM, // Mem write
XTPERF_CNT_BUBBLES, XTPERF_MASK_BUBBLES_ALL &(~XTPERF_MASK_BUBBLES_R_HOLD_REG_DEP), // wait for other reasons
XTPERF_CNT_BUBBLES, XTPERF_MASK_BUBBLES_R_HOLD_REG_DEP, // Wait for register dependency
XTPERF_CNT_OVERFLOW, XTPERF_MASK_OVERFLOW, // Last test cycle
};
TEST_CASE("Performance test for Empty callback", "[perfmon]")
{
for (int i = 5 ; i < 10 ; i++) {
exec_callback(NULL);
ESP_LOGD(TAG, "Empty call passed.");
}
ESP_LOGI(TAG, "Start first test");
xtensa_perfmon_config_t pm_config = {};
pm_config.counters_size = sizeof(xtensa_perfmon_select_mask_all) / sizeof(uint32_t) / 2;
pm_config.select_mask = xtensa_perfmon_select_mask_all;
pm_config.repeat_count = 200;
pm_config.max_deviation = 1;
pm_config.call_function = exec_callback;
pm_config.callback = xtensa_perfmon_view_cb;
pm_config.callback_params = stdout;
pm_config.tracelevel = -1;
xtensa_perfmon_exec(&pm_config);
callback_call_count = 0;
ESP_LOGI(TAG, "Start second test");
pm_config.counters_size = sizeof(test_dsp_table) / sizeof(uint32_t) / 2;
pm_config.select_mask = test_dsp_table;
pm_config.repeat_count = 200;
pm_config.max_deviation = 1;
pm_config.call_function = exec_callback;
pm_config.callback = xtensa_perfmon_view_cb;
pm_config.callback_params = stdout;
pm_config.tracelevel = -1;
xtensa_perfmon_exec(&pm_config);
callback_call_count = 0;
ESP_LOGI(TAG, "Start third test");
pm_config.counters_size = sizeof(test_dsp_table) / sizeof(uint32_t) / 2;
pm_config.select_mask = test_dsp_table;
pm_config.repeat_count = 200;
pm_config.max_deviation = 1;
pm_config.call_function = exec_callback;
pm_config.callback = test_callback;
pm_config.callback_params = stdout;
pm_config.tracelevel = -1;
xtensa_perfmon_exec(&pm_config);
if (callback_call_count != pm_config.counters_size) {
TEST_ESP_OK(ESP_FAIL);
}
ESP_LOGI(TAG, "All tests passed.");
}