Downloaded clean version of Coremark from EEMBC github page with which to benchmark RISCV-Wally

This commit is contained in:
Abe 2021-07-13 13:37:40 -04:00
parent 3565580f40
commit 46e1a008c3
24 changed files with 3751 additions and 2561 deletions

View File

@ -3,6 +3,8 @@
CoreMark's primary goals are simplicity and providing a method for testing only a processor's core features. For more information about EEMBC's comprehensive embedded benchmark suites, please see www.eembc.org. CoreMark's primary goals are simplicity and providing a method for testing only a processor's core features. For more information about EEMBC's comprehensive embedded benchmark suites, please see www.eembc.org.
For a more compute-intensive version of CoreMark that uses larger datasets and execution loops taken from common applications, please check out EEMBC's [CoreMark-PRO](https://www.github.com/eembc/coremark-pro) benchmark, also on GitHub.
# Building and Running # Building and Running
To build and run the benchmark, type To build and run the benchmark, type
@ -83,7 +85,9 @@ Use `XCFLAGS=-DMULTITHREAD=N` where N is number of threads to run in parallel. S
% make XCFLAGS="-DMULTITHREAD=4 -DUSE_PTHREAD" % make XCFLAGS="-DMULTITHREAD=4 -DUSE_PTHREAD"
~~~ ~~~
Above will compile the benchmark for execution on 4 cores, using POSIX Threads API. The above will compile the benchmark for execution on 4 cores, using POSIX Threads API.
Note: linking may fail on the previous command if your linker does not automatically add the `pthread` library. If you encounter `undefined reference` errors, please modify the `core_portme.mak` file for your platform, (e.g. `linux/core_portme.mak`) and add `-lpthread` to the `LFLAGS_END` parameter.
# Run Parameters for the Benchmark Executable # Run Parameters for the Benchmark Executable
CoreMark's executable takes several parameters as follows (but only if `main()` accepts arguments): CoreMark's executable takes several parameters as follows (but only if `main()` accepts arguments):
@ -109,7 +113,7 @@ The default for such a target when testing different configurations could be:
# Submitting Results # Submitting Results
CoreMark results can be submitted on the web. Open a web browser and go to https://www.eembc.org/coremark/login.php?url=enter_score.php. After registering an account you may enter a score. CoreMark results can be submitted on the web. Open a web browser and go to the [submission page](https://www.eembc.org/coremark/submit.php). After registering an account you may enter a score.
# Run Rules # Run Rules
What is and is not allowed. What is and is not allowed.

93
riscv-coremark/coremark/barebones/core_portme.c Executable file → Normal file
View File

@ -36,18 +36,24 @@ Original Author: Shay Gal-on
volatile ee_s32 seed4_volatile = ITERATIONS; volatile ee_s32 seed4_volatile = ITERATIONS;
volatile ee_s32 seed5_volatile = 0; volatile ee_s32 seed5_volatile = 0;
/* Porting : Timing functions /* Porting : Timing functions
How to capture time and convert to seconds must be ported to whatever is supported by the platform. How to capture time and convert to seconds must be ported to whatever is
e.g. Read value from on board RTC, read value from cpu clock cycles performance counter etc. supported by the platform. e.g. Read value from on board RTC, read value from
Sample implementation for standard time.h and windows.h definitions included. cpu clock cycles performance counter etc. Sample implementation for standard
time.h and windows.h definitions included.
*/ */
CORETIMETYPE barebones_clock() { CORETIMETYPE
#error "You must implement a method to measure time in barebones_clock()! This function should return current time.\n" barebones_clock()
{
#error \
"You must implement a method to measure time in barebones_clock()! This function should return current time.\n"
} }
/* Define : TIMER_RES_DIVIDER /* Define : TIMER_RES_DIVIDER
Divider to trade off timer resolution and total time that can be measured. Divider to trade off timer resolution and total time that can be
measured.
Use lower values to increase resolution, but make sure that overflow does not occur. Use lower values to increase resolution, but make sure that overflow
If there are issues with the return value overflowing, increase this value. does not occur. If there are issues with the return value overflowing,
increase this value.
*/ */
#define GETMYTIME(_t) (*_t = barebones_clock()) #define GETMYTIME(_t) (*_t = barebones_clock())
#define MYTIMEDIFF(fin, ini) ((fin) - (ini)) #define MYTIMEDIFF(fin, ini) ((fin) - (ini))
@ -59,43 +65,57 @@ CORETIMETYPE barebones_clock() {
static CORETIMETYPE start_time_val, stop_time_val; static CORETIMETYPE start_time_val, stop_time_val;
/* Function : start_time /* Function : start_time
This function will be called right before starting the timed portion of the benchmark. This function will be called right before starting the timed portion of
the benchmark.
Implementation may be capturing a system timer (as implemented in the example code) Implementation may be capturing a system timer (as implemented in the
or zeroing some system parameters - e.g. setting the cpu clocks cycles to 0. example code) or zeroing some system parameters - e.g. setting the cpu clocks
cycles to 0.
*/ */
void start_time(void) { void
start_time(void)
{
GETMYTIME(&start_time_val); GETMYTIME(&start_time_val);
} }
/* Function : stop_time /* Function : stop_time
This function will be called right after ending the timed portion of the benchmark. This function will be called right after ending the timed portion of the
benchmark.
Implementation may be capturing a system timer (as implemented in the example code) Implementation may be capturing a system timer (as implemented in the
or other system parameters - e.g. reading the current value of cpu cycles counter. example code) or other system parameters - e.g. reading the current value of
cpu cycles counter.
*/ */
void stop_time(void) { void
stop_time(void)
{
GETMYTIME(&stop_time_val); GETMYTIME(&stop_time_val);
} }
/* Function : get_time /* Function : get_time
Return an abstract "ticks" number that signifies time on the system. Return an abstract "ticks" number that signifies time on the system.
Actual value returned may be cpu cycles, milliseconds or any other value, Actual value returned may be cpu cycles, milliseconds or any other
as long as it can be converted to seconds by <time_in_secs>. value, as long as it can be converted to seconds by <time_in_secs>. This
This methodology is taken to accomodate any hardware or simulated platform. methodology is taken to accomodate any hardware or simulated platform. The
The sample implementation returns millisecs by default, sample implementation returns millisecs by default, and the resolution is
and the resolution is controlled by <TIMER_RES_DIVIDER> controlled by <TIMER_RES_DIVIDER>
*/ */
CORE_TICKS get_time(void) { CORE_TICKS
CORE_TICKS elapsed=(CORE_TICKS)(MYTIMEDIFF(stop_time_val, start_time_val)); get_time(void)
{
CORE_TICKS elapsed
= (CORE_TICKS)(MYTIMEDIFF(stop_time_val, start_time_val));
return elapsed; return elapsed;
} }
/* Function : time_in_secs /* Function : time_in_secs
Convert the value returned by get_time to seconds. Convert the value returned by get_time to seconds.
The <secs_ret> type is used to accomodate systems with no support for floating point. The <secs_ret> type is used to accomodate systems with no support for
Default implementation implemented by the EE_TICKS_PER_SEC macro above. floating point. Default implementation implemented by the EE_TICKS_PER_SEC
macro above.
*/ */
secs_ret time_in_secs(CORE_TICKS ticks) { secs_ret
time_in_secs(CORE_TICKS ticks)
{
secs_ret retval = ((secs_ret)ticks) / (secs_ret)EE_TICKS_PER_SEC; secs_ret retval = ((secs_ret)ticks) / (secs_ret)EE_TICKS_PER_SEC;
return retval; return retval;
} }
@ -106,13 +126,19 @@ ee_u32 default_num_contexts=1;
Target specific initialization code Target specific initialization code
Test for some common mistakes. Test for some common mistakes.
*/ */
void portable_init(core_portable *p, int *argc, char *argv[]) void
portable_init(core_portable *p, int *argc, char *argv[])
{ {
#error "Call board initialization routines in portable init (if needed), in particular initialize UART!\n" #error \
if (sizeof(ee_ptr_int) != sizeof(ee_u8 *)) { "Call board initialization routines in portable init (if needed), in particular initialize UART!\n"
ee_printf("ERROR! Please define ee_ptr_int to a type that holds a pointer!\n"); if (sizeof(ee_ptr_int) != sizeof(ee_u8 *))
{
ee_printf(
"ERROR! Please define ee_ptr_int to a type that holds a "
"pointer!\n");
} }
if (sizeof(ee_u32) != 4) { if (sizeof(ee_u32) != 4)
{
ee_printf("ERROR! Please define ee_u32 to a 32b unsigned type!\n"); ee_printf("ERROR! Please define ee_u32 to a 32b unsigned type!\n");
} }
p->portable_id = 1; p->portable_id = 1;
@ -120,9 +146,8 @@ void portable_init(core_portable *p, int *argc, char *argv[])
/* Function : portable_fini /* Function : portable_fini
Target specific final code Target specific final code
*/ */
void portable_fini(core_portable *p) void
portable_fini(core_portable *p)
{ {
p->portable_id = 0; p->portable_id = 0;
} }

41
riscv-coremark/coremark/barebones/core_portme.h Executable file → Normal file
View File

@ -16,7 +16,8 @@ limitations under the License.
Original Author: Shay Gal-on Original Author: Shay Gal-on
*/ */
/* Topic : Description /* Topic : Description
This file contains configuration constants required to execute on different platforms This file contains configuration constants required to execute on
different platforms
*/ */
#ifndef CORE_PORTME_H #ifndef CORE_PORTME_H
#define CORE_PORTME_H #define CORE_PORTME_H
@ -50,13 +51,13 @@ Original Author: Shay Gal-on
#define HAS_STDIO 0 #define HAS_STDIO 0
#endif #endif
/* Configuration : HAS_PRINTF /* Configuration : HAS_PRINTF
Define to 1 if the platform has stdio.h and implements the printf function. Define to 1 if the platform has stdio.h and implements the printf
function.
*/ */
#ifndef HAS_PRINTF #ifndef HAS_PRINTF
#define HAS_PRINTF 0 #define HAS_PRINTF 0
#endif #endif
/* Definitions : COMPILER_VERSION, COMPILER_FLAGS, MEM_LOCATION /* Definitions : COMPILER_VERSION, COMPILER_FLAGS, MEM_LOCATION
Initialize these strings per platform Initialize these strings per platform
*/ */
@ -68,17 +69,20 @@ Original Author: Shay Gal-on
#endif #endif
#endif #endif
#ifndef COMPILER_FLAGS #ifndef COMPILER_FLAGS
#define COMPILER_FLAGS FLAGS_STR /* "Please put compiler flags here (e.g. -o3)" */ #define COMPILER_FLAGS \
FLAGS_STR /* "Please put compiler flags here (e.g. -o3)" */
#endif #endif
#ifndef MEM_LOCATION #ifndef MEM_LOCATION
#define MEM_LOCATION "STACK" #define MEM_LOCATION "STACK"
#endif #endif
/* Data Types : /* Data Types :
To avoid compiler issues, define the data types that need ot be used for 8b, 16b and 32b in <core_portme.h>. To avoid compiler issues, define the data types that need ot be used for
8b, 16b and 32b in <core_portme.h>.
*Imprtant* : *Imprtant* :
ee_ptr_int needs to be the data type used to hold pointers, otherwise coremark may fail!!! ee_ptr_int needs to be the data type used to hold pointers, otherwise
coremark may fail!!!
*/ */
typedef signed short ee_s16; typedef signed short ee_s16;
typedef unsigned short ee_u16; typedef unsigned short ee_u16;
@ -90,7 +94,8 @@ typedef ee_u32 ee_ptr_int;
typedef size_t ee_size_t; typedef size_t ee_size_t;
#define NULL ((void *)0) #define NULL ((void *)0)
/* align_mem : /* align_mem :
This macro is used to align an offset to point to a 32b value. It is used in the Matrix algorithm to initialize the input memory blocks. This macro is used to align an offset to point to a 32b value. It is
used in the Matrix algorithm to initialize the input memory blocks.
*/ */
#define align_mem(x) (void *)(4 + (((ee_ptr_int)(x)-1) & ~3)) #define align_mem(x) (void *)(4 + (((ee_ptr_int)(x)-1) & ~3))
@ -101,7 +106,8 @@ typedef size_t ee_size_t;
typedef ee_u32 CORE_TICKS; typedef ee_u32 CORE_TICKS;
/* Configuration : SEED_METHOD /* Configuration : SEED_METHOD
Defines method to get seed values that cannot be computed at compile time. Defines method to get seed values that cannot be computed at compile
time.
Valid values : Valid values :
SEED_ARG - from command line. SEED_ARG - from command line.
@ -132,12 +138,14 @@ typedef ee_u32 CORE_TICKS;
N>1 - will execute N copies in parallel. N>1 - will execute N copies in parallel.
Note : Note :
If this flag is defined to more then 1, an implementation for launching parallel contexts must be defined. If this flag is defined to more then 1, an implementation for launching
parallel contexts must be defined.
Two sample implementations are provided. Use <USE_PTHREAD> or <USE_FORK> to enable them. Two sample implementations are provided. Use <USE_PTHREAD> or <USE_FORK>
to enable them.
It is valid to have a different implementation of <core_start_parallel> and <core_end_parallel> in <core_portme.c>, It is valid to have a different implementation of <core_start_parallel>
to fit a particular architecture. and <core_end_parallel> in <core_portme.c>, to fit a particular architecture.
*/ */
#ifndef MULTITHREAD #ifndef MULTITHREAD
#define MULTITHREAD 1 #define MULTITHREAD 1
@ -154,7 +162,8 @@ typedef ee_u32 CORE_TICKS;
1 - argc/argv to main is not supported 1 - argc/argv to main is not supported
Note : Note :
This flag only matters if MULTITHREAD has been defined to a value greater then 1. This flag only matters if MULTITHREAD has been defined to a value
greater then 1.
*/ */
#ifndef MAIN_HAS_NOARGC #ifndef MAIN_HAS_NOARGC
#define MAIN_HAS_NOARGC 0 #define MAIN_HAS_NOARGC 0
@ -176,7 +185,8 @@ typedef ee_u32 CORE_TICKS;
*/ */
extern ee_u32 default_num_contexts; extern ee_u32 default_num_contexts;
typedef struct CORE_PORTABLE_S { typedef struct CORE_PORTABLE_S
{
ee_u8 portable_id; ee_u8 portable_id;
} core_portable; } core_portable;
@ -184,7 +194,8 @@ typedef struct CORE_PORTABLE_S {
void portable_init(core_portable *p, int *argc, char *argv[]); void portable_init(core_portable *p, int *argc, char *argv[]);
void portable_fini(core_portable *p); void portable_fini(core_portable *p);
#if !defined(PROFILE_RUN) && !defined(PERFORMANCE_RUN) && !defined(VALIDATION_RUN) #if !defined(PROFILE_RUN) && !defined(PERFORMANCE_RUN) \
&& !defined(VALIDATION_RUN)
#if (TOTAL_DATA_SIZE == 1200) #if (TOTAL_DATA_SIZE == 1200)
#define PROFILE_RUN 1 #define PROFILE_RUN 1
#elif (TOTAL_DATA_SIZE == 2000) #elif (TOTAL_DATA_SIZE == 2000)

30
riscv-coremark/coremark/barebones/cvt.c Executable file → Normal file
View File

@ -17,14 +17,17 @@ limitations under the License.
#define CVTBUFSIZE 80 #define CVTBUFSIZE 80
static char CVTBUF[CVTBUFSIZE]; static char CVTBUF[CVTBUFSIZE];
static char *cvt(double arg, int ndigits, int *decpt, int *sign, char *buf, int eflag) static char *
cvt(double arg, int ndigits, int *decpt, int *sign, char *buf, int eflag)
{ {
int r2; int r2;
double fi, fj; double fi, fj;
char * p, *p1; char * p, *p1;
if (ndigits < 0) ndigits = 0; if (ndigits < 0)
if (ndigits >= CVTBUFSIZE - 1) ndigits = CVTBUFSIZE - 2; ndigits = 0;
if (ndigits >= CVTBUFSIZE - 1)
ndigits = CVTBUFSIZE - 2;
r2 = 0; r2 = 0;
*sign = 0; *sign = 0;
p = &buf[0]; p = &buf[0];
@ -45,7 +48,8 @@ static char *cvt(double arg, int ndigits, int *decpt, int *sign, char *buf, int
*--p1 = (int)((fj + .03) * 10) + '0'; *--p1 = (int)((fj + .03) * 10) + '0';
r2++; r2++;
} }
while (p1 < &buf[CVTBUFSIZE]) *p++ = *p1++; while (p1 < &buf[CVTBUFSIZE])
*p++ = *p1++;
} }
else if (arg > 0) else if (arg > 0)
{ {
@ -56,7 +60,8 @@ static char *cvt(double arg, int ndigits, int *decpt, int *sign, char *buf, int
} }
} }
p1 = &buf[ndigits]; p1 = &buf[ndigits];
if (eflag == 0) p1 += r2; if (eflag == 0)
p1 += r2;
*decpt = r2; *decpt = r2;
if (p1 < &buf[0]) if (p1 < &buf[0])
{ {
@ -87,7 +92,8 @@ static char *cvt(double arg, int ndigits, int *decpt, int *sign, char *buf, int
(*decpt)++; (*decpt)++;
if (eflag == 0) if (eflag == 0)
{ {
if (p > buf) *p = '0'; if (p > buf)
*p = '0';
p++; p++;
} }
} }
@ -96,22 +102,26 @@ static char *cvt(double arg, int ndigits, int *decpt, int *sign, char *buf, int
return buf; return buf;
} }
char *ecvt(double arg, int ndigits, int *decpt, int *sign) char *
ecvt(double arg, int ndigits, int *decpt, int *sign)
{ {
return cvt(arg, ndigits, decpt, sign, CVTBUF, 1); return cvt(arg, ndigits, decpt, sign, CVTBUF, 1);
} }
char *ecvtbuf(double arg, int ndigits, int *decpt, int *sign, char *buf) char *
ecvtbuf(double arg, int ndigits, int *decpt, int *sign, char *buf)
{ {
return cvt(arg, ndigits, decpt, sign, buf, 1); return cvt(arg, ndigits, decpt, sign, buf, 1);
} }
char *fcvt(double arg, int ndigits, int *decpt, int *sign) char *
fcvt(double arg, int ndigits, int *decpt, int *sign)
{ {
return cvt(arg, ndigits, decpt, sign, CVTBUF, 0); return cvt(arg, ndigits, decpt, sign, CVTBUF, 0);
} }
char *fcvtbuf(double arg, int ndigits, int *decpt, int *sign, char *buf) char *
fcvtbuf(double arg, int ndigits, int *decpt, int *sign, char *buf)
{ {
return cvt(arg, ndigits, decpt, sign, buf, 0); return cvt(arg, ndigits, decpt, sign, buf, 0);
} }

257
riscv-coremark/coremark/barebones/ee_printf.c Executable file → Normal file
View File

@ -31,29 +31,37 @@ static char *digits = "0123456789abcdefghijklmnopqrstuvwxyz";
static char * upper_digits = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"; static char * upper_digits = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";
static ee_size_t strnlen(const char *s, ee_size_t count); static ee_size_t strnlen(const char *s, ee_size_t count);
static ee_size_t strnlen(const char *s, ee_size_t count) static ee_size_t
strnlen(const char *s, ee_size_t count)
{ {
const char *sc; const char *sc;
for (sc = s; *sc != '\0' && count--; ++sc); for (sc = s; *sc != '\0' && count--; ++sc)
;
return sc - s; return sc - s;
} }
static int skip_atoi(const char **s) static int
skip_atoi(const char **s)
{ {
int i = 0; int i = 0;
while (is_digit(**s)) i = i*10 + *((*s)++) - '0'; while (is_digit(**s))
i = i * 10 + *((*s)++) - '0';
return i; return i;
} }
static char *number(char *str, long num, int base, int size, int precision, int type) static char *
number(char *str, long num, int base, int size, int precision, int type)
{ {
char c, sign, tmp[66]; char c, sign, tmp[66];
char *dig = digits; char *dig = digits;
int i; int i;
if (type & UPPERCASE) dig = upper_digits; if (type & UPPERCASE)
if (type & LEFT) type &= ~ZEROPAD; dig = upper_digits;
if (base < 2 || base > 36) return 0; if (type & LEFT)
type &= ~ZEROPAD;
if (base < 2 || base > 36)
return 0;
c = (type & ZEROPAD) ? '0' : ' '; c = (type & ZEROPAD) ? '0' : ' ';
sign = 0; sign = 0;
@ -98,10 +106,14 @@ static char *number(char *str, long num, int base, int size, int precision, int
} }
} }
if (i > precision) precision = i; if (i > precision)
precision = i;
size -= precision; size -= precision;
if (!(type & (ZEROPAD | LEFT))) while (size-- > 0) *str++ = ' '; if (!(type & (ZEROPAD | LEFT)))
if (sign) *str++ = sign; while (size-- > 0)
*str++ = ' ';
if (sign)
*str++ = sign;
if (type & HEX_PREP) if (type & HEX_PREP)
{ {
@ -114,37 +126,50 @@ static char *number(char *str, long num, int base, int size, int precision, int
} }
} }
if (!(type & LEFT)) while (size-- > 0) *str++ = c; if (!(type & LEFT))
while (i < precision--) *str++ = '0'; while (size-- > 0)
while (i-- > 0) *str++ = tmp[i]; *str++ = c;
while (size-- > 0) *str++ = ' '; while (i < precision--)
*str++ = '0';
while (i-- > 0)
*str++ = tmp[i];
while (size-- > 0)
*str++ = ' ';
return str; return str;
} }
static char *eaddr(char *str, unsigned char *addr, int size, int precision, int type) static char *
eaddr(char *str, unsigned char *addr, int size, int precision, int type)
{ {
char tmp[24]; char tmp[24];
char *dig = digits; char *dig = digits;
int i, len; int i, len;
if (type & UPPERCASE) dig = upper_digits; if (type & UPPERCASE)
dig = upper_digits;
len = 0; len = 0;
for (i = 0; i < 6; i++) for (i = 0; i < 6; i++)
{ {
if (i != 0) tmp[len++] = ':'; if (i != 0)
tmp[len++] = ':';
tmp[len++] = dig[addr[i] >> 4]; tmp[len++] = dig[addr[i] >> 4];
tmp[len++] = dig[addr[i] & 0x0F]; tmp[len++] = dig[addr[i] & 0x0F];
} }
if (!(type & LEFT)) while (len < size--) *str++ = ' '; if (!(type & LEFT))
for (i = 0; i < len; ++i) *str++ = tmp[i]; while (len < size--)
while (len < size--) *str++ = ' '; *str++ = ' ';
for (i = 0; i < len; ++i)
*str++ = tmp[i];
while (len < size--)
*str++ = ' ';
return str; return str;
} }
static char *iaddr(char *str, unsigned char *addr, int size, int precision, int type) static char *
iaddr(char *str, unsigned char *addr, int size, int precision, int type)
{ {
char tmp[24]; char tmp[24];
int i, n, len; int i, n, len;
@ -152,7 +177,8 @@ static char *iaddr(char *str, unsigned char *addr, int size, int precision, int
len = 0; len = 0;
for (i = 0; i < 4; i++) for (i = 0; i < 4; i++)
{ {
if (i != 0) tmp[len++] = '.'; if (i != 0)
tmp[len++] = '.';
n = addr[i]; n = addr[i];
if (n == 0) if (n == 0)
@ -176,9 +202,13 @@ static char *iaddr(char *str, unsigned char *addr, int size, int precision, int
} }
} }
if (!(type & LEFT)) while (len < size--) *str++ = ' '; if (!(type & LEFT))
for (i = 0; i < len; ++i) *str++ = tmp[i]; while (len < size--)
while (len < size--) *str++ = ' '; *str++ = ' ';
for (i = 0; i < len; ++i)
*str++ = tmp[i];
while (len < size--)
*str++ = ' ';
return str; return str;
} }
@ -189,13 +219,16 @@ char *ecvtbuf(double arg, int ndigits, int *decpt, int *sign, char *buf);
char * fcvtbuf(double arg, int ndigits, int *decpt, int *sign, char *buf); char * fcvtbuf(double arg, int ndigits, int *decpt, int *sign, char *buf);
static void ee_bufcpy(char *d, char *s, int count); static void ee_bufcpy(char *d, char *s, int count);
void ee_bufcpy(char *pd, char *ps, int count) { void
ee_bufcpy(char *pd, char *ps, int count)
{
char *pe = ps + count; char *pe = ps + count;
while (ps != pe) while (ps != pe)
*pd++ = *ps++; *pd++ = *ps++;
} }
static void parse_float(double value, char *buffer, char fmt, int precision) static void
parse_float(double value, char *buffer, char fmt, int precision)
{ {
int decpt, sign, exp, pos; int decpt, sign, exp, pos;
char *digits = NULL; char *digits = NULL;
@ -229,9 +262,11 @@ static void parse_float(double value, char *buffer, char fmt, int precision)
{ {
digits = ecvtbuf(value, precision + 1, &decpt, &sign, cvtbuf); digits = ecvtbuf(value, precision + 1, &decpt, &sign, cvtbuf);
if (sign) *buffer++ = '-'; if (sign)
*buffer++ = '-';
*buffer++ = *digits; *buffer++ = *digits;
if (precision > 0) *buffer++ = '.'; if (precision > 0)
*buffer++ = '.';
ee_bufcpy(buffer, digits + 1, precision); ee_bufcpy(buffer, digits + 1, precision);
buffer += precision; buffer += precision;
*buffer++ = capexp ? 'E' : 'e'; *buffer++ = capexp ? 'E' : 'e';
@ -264,22 +299,26 @@ static void parse_float(double value, char *buffer, char fmt, int precision)
else if (fmt == 'f') else if (fmt == 'f')
{ {
digits = fcvtbuf(value, precision, &decpt, &sign, cvtbuf); digits = fcvtbuf(value, precision, &decpt, &sign, cvtbuf);
if (sign) *buffer++ = '-'; if (sign)
*buffer++ = '-';
if (*digits) if (*digits)
{ {
if (decpt <= 0) if (decpt <= 0)
{ {
*buffer++ = '0'; *buffer++ = '0';
*buffer++ = '.'; *buffer++ = '.';
for (pos = 0; pos < -decpt; pos++) *buffer++ = '0'; for (pos = 0; pos < -decpt; pos++)
while (*digits) *buffer++ = *digits++; *buffer++ = '0';
while (*digits)
*buffer++ = *digits++;
} }
else else
{ {
pos = 0; pos = 0;
while (*digits) while (*digits)
{ {
if (pos++ == decpt) *buffer++ = '.'; if (pos++ == decpt)
*buffer++ = '.';
*buffer++ = *digits++; *buffer++ = *digits++;
} }
} }
@ -290,7 +329,8 @@ static void parse_float(double value, char *buffer, char fmt, int precision)
if (precision > 0) if (precision > 0)
{ {
*buffer++ = '.'; *buffer++ = '.';
for (pos = 0; pos < precision; pos++) *buffer++ = '0'; for (pos = 0; pos < precision; pos++)
*buffer++ = '0';
} }
} }
} }
@ -298,12 +338,15 @@ static void parse_float(double value, char *buffer, char fmt, int precision)
*buffer = '\0'; *buffer = '\0';
} }
static void decimal_point(char *buffer) static void
decimal_point(char *buffer)
{ {
while (*buffer) while (*buffer)
{ {
if (*buffer == '.') return; if (*buffer == '.')
if (*buffer == 'e' || *buffer == 'E') break; return;
if (*buffer == 'e' || *buffer == 'E')
break;
buffer++; buffer++;
} }
@ -325,30 +368,37 @@ static void decimal_point(char *buffer)
} }
} }
static void cropzeros(char *buffer) static void
cropzeros(char *buffer)
{ {
char *stop; char *stop;
while (*buffer && *buffer != '.') buffer++; while (*buffer && *buffer != '.')
buffer++;
if (*buffer++) if (*buffer++)
{ {
while (*buffer && *buffer != 'e' && *buffer != 'E') buffer++; while (*buffer && *buffer != 'e' && *buffer != 'E')
buffer++;
stop = buffer--; stop = buffer--;
while (*buffer == '0') buffer--; while (*buffer == '0')
if (*buffer == '.') buffer--; buffer--;
if (*buffer == '.')
buffer--;
while (buffer != stop) while (buffer != stop)
*++buffer = 0; *++buffer = 0;
} }
} }
static char *flt(char *str, double num, int size, int precision, char fmt, int flags) static char *
flt(char *str, double num, int size, int precision, char fmt, int flags)
{ {
char tmp[80]; char tmp[80];
char c, sign; char c, sign;
int n, i; int n, i;
// Left align means no zero padding // Left align means no zero padding
if (flags & LEFT) flags &= ~ZEROPAD; if (flags & LEFT)
flags &= ~ZEROPAD;
// Determine padding and sign char // Determine padding and sign char
c = (flags & ZEROPAD) ? '0' : ' '; c = (flags & ZEROPAD) ? '0' : ' ';
@ -380,25 +430,35 @@ static char *flt(char *str, double num, int size, int precision, char fmt, int f
// Convert floating point number to text // Convert floating point number to text
parse_float(num, tmp, fmt, precision); parse_float(num, tmp, fmt, precision);
if ((flags & HEX_PREP) && precision == 0) decimal_point(tmp); if ((flags & HEX_PREP) && precision == 0)
if (fmt == 'g' && !(flags & HEX_PREP)) cropzeros(tmp); decimal_point(tmp);
if (fmt == 'g' && !(flags & HEX_PREP))
cropzeros(tmp);
n = strnlen(tmp, 256); n = strnlen(tmp, 256);
// Output number with alignment and padding // Output number with alignment and padding
size -= n; size -= n;
if (!(flags & (ZEROPAD | LEFT))) while (size-- > 0) *str++ = ' '; if (!(flags & (ZEROPAD | LEFT)))
if (sign) *str++ = sign; while (size-- > 0)
if (!(flags & LEFT)) while (size-- > 0) *str++ = c; *str++ = ' ';
for (i = 0; i < n; i++) *str++ = tmp[i]; if (sign)
while (size-- > 0) *str++ = ' '; *str++ = sign;
if (!(flags & LEFT))
while (size-- > 0)
*str++ = c;
for (i = 0; i < n; i++)
*str++ = tmp[i];
while (size-- > 0)
*str++ = ' ';
return str; return str;
} }
#endif #endif
static int ee_vsprintf(char *buf, const char *fmt, va_list args) static int
ee_vsprintf(char *buf, const char *fmt, va_list args)
{ {
int len; int len;
unsigned long num; unsigned long num;
@ -409,7 +469,8 @@ static int ee_vsprintf(char *buf, const char *fmt, va_list args)
int flags; // Flags to number() int flags; // Flags to number()
int field_width; // Width of output field int field_width; // Width of output field
int precision; // Min. # of digits for integers; max number of chars for from string int precision; // Min. # of digits for integers; max number of chars for
// from string
int qualifier; // 'h', 'l', or 'L' for integer fields int qualifier; // 'h', 'l', or 'L' for integer fields
for (str = buf; *fmt; fmt++) for (str = buf; *fmt; fmt++)
@ -426,11 +487,21 @@ repeat:
fmt++; // This also skips first '%' fmt++; // This also skips first '%'
switch (*fmt) switch (*fmt)
{ {
case '-': flags |= LEFT; goto repeat; case '-':
case '+': flags |= PLUS; goto repeat; flags |= LEFT;
case ' ': flags |= SPACE; goto repeat; goto repeat;
case '#': flags |= HEX_PREP; goto repeat; case '+':
case '0': flags |= ZEROPAD; goto repeat; flags |= PLUS;
goto repeat;
case ' ':
flags |= SPACE;
goto repeat;
case '#':
flags |= HEX_PREP;
goto repeat;
case '0':
flags |= ZEROPAD;
goto repeat;
} }
// Get field width // Get field width
@ -460,7 +531,8 @@ repeat:
++fmt; ++fmt;
precision = va_arg(args, int); precision = va_arg(args, int);
} }
if (precision < 0) precision = 0; if (precision < 0)
precision = 0;
} }
// Get the conversion qualifier // Get the conversion qualifier
@ -477,18 +549,26 @@ repeat:
switch (*fmt) switch (*fmt)
{ {
case 'c': case 'c':
if (!(flags & LEFT)) while (--field_width > 0) *str++ = ' '; if (!(flags & LEFT))
while (--field_width > 0)
*str++ = ' ';
*str++ = (unsigned char)va_arg(args, int); *str++ = (unsigned char)va_arg(args, int);
while (--field_width > 0) *str++ = ' '; while (--field_width > 0)
*str++ = ' ';
continue; continue;
case 's': case 's':
s = va_arg(args, char *); s = va_arg(args, char *);
if (!s) s = "<NULL>"; if (!s)
s = "<NULL>";
len = strnlen(s, precision); len = strnlen(s, precision);
if (!(flags & LEFT)) while (len < field_width--) *str++ = ' '; if (!(flags & LEFT))
for (i = 0; i < len; ++i) *str++ = *s++; while (len < field_width--)
while (len < field_width--) *str++ = ' '; *str++ = ' ';
for (i = 0; i < len; ++i)
*str++ = *s++;
while (len < field_width--)
*str++ = ' ';
continue; continue;
case 'p': case 'p':
@ -497,7 +577,12 @@ repeat:
field_width = 2 * sizeof(void *); field_width = 2 * sizeof(void *);
flags |= ZEROPAD; flags |= ZEROPAD;
} }
str = number(str, (unsigned long) va_arg(args, void *), 16, field_width, precision, flags); str = number(str,
(unsigned long)va_arg(args, void *),
16,
field_width,
precision,
flags);
continue; continue;
case 'A': case 'A':
@ -505,9 +590,17 @@ repeat:
case 'a': case 'a':
if (qualifier == 'l') if (qualifier == 'l')
str = eaddr(str, va_arg(args, unsigned char *), field_width, precision, flags); str = eaddr(str,
va_arg(args, unsigned char *),
field_width,
precision,
flags);
else else
str = iaddr(str, va_arg(args, unsigned char *), field_width, precision, flags); str = iaddr(str,
va_arg(args, unsigned char *),
field_width,
precision,
flags);
continue; continue;
// Integer number formats - set up the flags and "break" // Integer number formats - set up the flags and "break"
@ -532,13 +625,19 @@ repeat:
#if HAS_FLOAT #if HAS_FLOAT
case 'f': case 'f':
str = flt(str, va_arg(args, double), field_width, precision, *fmt, flags | SIGN); str = flt(str,
va_arg(args, double),
field_width,
precision,
*fmt,
flags | SIGN);
continue; continue;
#endif #endif
default: default:
if (*fmt != '%') *str++ = '%'; if (*fmt != '%')
*str++ = '%';
if (*fmt) if (*fmt)
*str++ = *fmt; *str++ = *fmt;
else else
@ -560,7 +659,9 @@ repeat:
return str - buf; return str - buf;
} }
void uart_send_char(char c) { void
uart_send_char(char c)
{
#error "You must implement the method uart_send_char to use this file!\n"; #error "You must implement the method uart_send_char to use this file!\n";
/* Output of a char to a UART usually follows the following model: /* Output of a char to a UART usually follows the following model:
Wait until UART is ready Wait until UART is ready
@ -572,13 +673,15 @@ void uart_send_char(char c) {
*UART_DATA_ADDRESS = c; *UART_DATA_ADDRESS = c;
while (*UART_CONTROL_ADDRESS != UART_READY); while (*UART_CONTROL_ADDRESS != UART_READY);
Check the UART sample code on your platform or the board documentation. Check the UART sample code on your platform or the board
documentation.
*/ */
} }
int ee_printf(const char *fmt, ...) int
ee_printf(const char *fmt, ...)
{ {
char buf[256],*p; char buf[1024], *p;
va_list args; va_list args;
int n = 0; int n = 0;
@ -586,7 +689,8 @@ int ee_printf(const char *fmt, ...)
ee_vsprintf(buf, fmt, args); ee_vsprintf(buf, fmt, args);
va_end(args); va_end(args);
p = buf; p = buf;
while (*p) { while (*p)
{
uart_send_char(*p); uart_send_char(*p);
n++; n++;
p++; p++;
@ -594,4 +698,3 @@ int ee_printf(const char *fmt, ...)
return n; return n;
} }

View File

@ -17,8 +17,6 @@ Original Author: Shay Gal-on
*/ */
#include "coremark.h" #include "coremark.h"
#include <stdlib.h>
#include <string.h>
/* /*
Topic: Description Topic: Description
Benchmark using a linked list. Benchmark using a linked list.
@ -28,7 +26,8 @@ Topic: Description
For our purposes, this will excercise the memory units of the processor. For our purposes, this will excercise the memory units of the processor.
In particular, usage of the list pointers to find and alter data. In particular, usage of the list pointers to find and alter data.
We are not using Malloc since some platforms do not support this library. We are not using Malloc since some platforms do not support this
library.
Instead, the memory block being passed in is used to create a list, Instead, the memory block being passed in is used to create a list,
and the benchmark takes care not to add more items then can be and the benchmark takes care not to add more items then can be
@ -41,11 +40,11 @@ Topic: Description
Data items contain the following: Data items contain the following:
idx - An index that captures the initial order of the list. idx - An index that captures the initial order of the list.
data - Variable data initialized based on the input parameters. The 16b are divided as follows: data - Variable data initialized based on the input parameters. The 16b
o Upper 8b are backup of original data. are divided as follows: o Upper 8b are backup of original data. o Bit 7
o Bit 7 indicates if the lower 7 bits are to be used as is or calculated. indicates if the lower 7 bits are to be used as is or calculated. o Bits 0-2
o Bits 0-2 indicate type of operation to perform to get a 7b value. indicate type of operation to perform to get a 7b value. o Bits 3-6 provide
o Bits 3-6 provide input for the operation. input for the operation.
*/ */
@ -54,28 +53,47 @@ Topic: Description
list_head *core_list_find(list_head *list, list_data *info); list_head *core_list_find(list_head *list, list_data *info);
list_head *core_list_reverse(list_head *list); list_head *core_list_reverse(list_head *list);
list_head *core_list_remove(list_head *item); list_head *core_list_remove(list_head *item);
list_head *core_list_undo_remove(list_head *item_removed, list_head *item_modified); list_head *core_list_undo_remove(list_head *item_removed,
list_head *core_list_insert_new(list_head *insert_point list_head *item_modified);
, list_data *info, list_head **memblock, list_data **datablock list_head *core_list_insert_new(list_head * insert_point,
, list_head *memblock_end, list_data *datablock_end); list_data * info,
list_head **memblock,
list_data **datablock,
list_head * memblock_end,
list_data * datablock_end);
typedef ee_s32 (*list_cmp)(list_data *a, list_data *b, core_results *res); typedef ee_s32 (*list_cmp)(list_data *a, list_data *b, core_results *res);
list_head *core_list_mergesort(list_head *list, list_cmp cmp, core_results *res); list_head *core_list_mergesort(list_head * list,
list_cmp cmp,
core_results *res);
ee_s16 calc_func(ee_s16 *pdata, core_results *res) { ee_s16
calc_func(ee_s16 *pdata, core_results *res)
{
ee_s16 data = *pdata; ee_s16 data = *pdata;
ee_s16 retval; ee_s16 retval;
ee_u8 optype=(data>>7) & 1; /* bit 7 indicates if the function result has been cached */ ee_u8 optype
= (data >> 7)
& 1; /* bit 7 indicates if the function result has been cached */
if (optype) /* if cached, use cache */ if (optype) /* if cached, use cache */
return (data & 0x007f); return (data & 0x007f);
else { /* otherwise calculate and cache the result */ else
{ /* otherwise calculate and cache the result */
ee_s16 flag = data & 0x7; /* bits 0-2 is type of function to perform */ ee_s16 flag = data & 0x7; /* bits 0-2 is type of function to perform */
ee_s16 dtype=((data>>3) & 0xf); /* bits 3-6 is specific data for the operation */ ee_s16 dtype
= ((data >> 3)
& 0xf); /* bits 3-6 is specific data for the operation */
dtype |= dtype << 4; /* replicate the lower 4 bits to get an 8b value */ dtype |= dtype << 4; /* replicate the lower 4 bits to get an 8b value */
switch (flag) { switch (flag)
{
case 0: case 0:
if (dtype < 0x22) /* set min period for bit corruption */ if (dtype < 0x22) /* set min period for bit corruption */
dtype = 0x22; dtype = 0x22;
retval=core_bench_state(res->size,res->memblock[3],res->seed1,res->seed2,dtype,res->crc); retval = core_bench_state(res->size,
res->memblock[3],
res->seed1,
res->seed2,
dtype,
res->crc);
if (res->crcstate == 0) if (res->crcstate == 0)
res->crcstate = retval; res->crcstate = retval;
break; break;
@ -99,7 +117,9 @@ ee_s16 calc_func(ee_s16 *pdata, core_results *res) {
Can be used by mergesort. Can be used by mergesort.
*/ */
ee_s32 cmp_complex(list_data *a, list_data *b, core_results *res) { ee_s32
cmp_complex(list_data *a, list_data *b, core_results *res)
{
ee_s16 val1 = calc_func(&(a->data16), res); ee_s16 val1 = calc_func(&(a->data16), res);
ee_s16 val2 = calc_func(&(b->data16), res); ee_s16 val2 = calc_func(&(b->data16), res);
return val1 - val2; return val1 - val2;
@ -110,34 +130,20 @@ ee_s32 cmp_complex(list_data *a, list_data *b, core_results *res) {
Can be used by mergesort. Can be used by mergesort.
*/ */
ee_s32 cmp_idx(list_data *a, list_data *b, core_results *res) { ee_s32
if (res==NULL) { cmp_idx(list_data *a, list_data *b, core_results *res)
{
if (res == NULL)
{
a->data16 = (a->data16 & 0xff00) | (0x00ff & (a->data16 >> 8)); a->data16 = (a->data16 & 0xff00) | (0x00ff & (a->data16 >> 8));
b->data16 = (b->data16 & 0xff00) | (0x00ff & (b->data16 >> 8)); b->data16 = (b->data16 & 0xff00) | (0x00ff & (b->data16 >> 8));
} }
return a->idx - b->idx; return a->idx - b->idx;
} }
void ehitoa(int value, char *str, int base){ void
if (value>100000) strcpy(str,"too big"); copy_info(list_data *to, list_data *from)
else{ {
int places[6] = {100000, 10000, 1000, 100, 10, 1};
int col;
int pv;
for(col = 0; col<6; col++){
pv = 0;
while (value >= places[col]){
value=value -places[col];
pv++;
}
str[col]=pv+'0';
}
str[6]=0;
}
}
void copy_info(list_data *to,list_data *from) {
to->data16 = from->data16; to->data16 = from->data16;
to->idx = from->idx; to->idx = from->idx;
} }
@ -149,7 +155,9 @@ void copy_info(list_data *to,list_data *from) {
- Single remove/reinsert - Single remove/reinsert
* At the end of this function, the list is back to original state * At the end of this function, the list is back to original state
*/ */
ee_u16 core_bench_list(core_results *res, ee_s16 finder_idx) { ee_u16
core_bench_list(core_results *res, ee_s16 finder_idx)
{
ee_u16 retval = 0; ee_u16 retval = 0;
ee_u16 found = 0, missed = 0; ee_u16 found = 0, missed = 0;
list_head *list = res->list; list_head *list = res->list;
@ -158,26 +166,28 @@ ee_u16 core_bench_list(core_results *res, ee_s16 finder_idx) {
list_head *finder, *remover; list_head *finder, *remover;
list_data info; list_data info;
ee_s16 i; ee_s16 i;
ee_printf("entered corebenchlist \n");
info.idx = finder_idx; info.idx = finder_idx;
/* find <find_num> values in the list, and change the list each time (reverse and cache if value found) */ /* find <find_num> values in the list, and change the list each time
for (i=0; i<find_num; i++) { * (reverse and cache if value found) */
ee_printf("for loop \n"); for (i = 0; i < find_num; i++)
{
info.data16 = (i & 0xff); info.data16 = (i & 0xff);
this_find = core_list_find(list, &info); this_find = core_list_find(list, &info);
list = core_list_reverse(list); list = core_list_reverse(list);
if (this_find==NULL) { if (this_find == NULL)
{
missed++; missed++;
retval += (list->next->info->data16 >> 8) & 1; retval += (list->next->info->data16 >> 8) & 1;
ee_printf("if statement \n");
} }
else { else
{
found++; found++;
ee_printf("else statement \n");
if (this_find->info->data16 & 0x1) /* use found value */ if (this_find->info->data16 & 0x1) /* use found value */
retval += (this_find->info->data16 >> 9) & 1; retval += (this_find->info->data16 >> 9) & 1;
/* and cache next item at the head of the list (if any) */ /* and cache next item at the head of the list (if any) */
if (this_find->next != NULL) { if (this_find->next != NULL)
{
finder = this_find->next; finder = this_find->next;
this_find->next = finder->next; this_find->next = finder->next;
finder->next = list->next; finder->next = list->next;
@ -195,11 +205,13 @@ ee_u16 core_bench_list(core_results *res, ee_s16 finder_idx) {
if (finder_idx > 0) if (finder_idx > 0)
list = core_list_mergesort(list, cmp_complex, res); list = core_list_mergesort(list, cmp_complex, res);
remover = core_list_remove(list->next); remover = core_list_remove(list->next);
/* CRC data content of list from location of index N forward, and then undo remove */ /* CRC data content of list from location of index N forward, and then undo
* remove */
finder = core_list_find(list, &info); finder = core_list_find(list, &info);
if (!finder) if (!finder)
finder = list->next; finder = list->next;
while (finder) { while (finder)
{
retval = crc16(list->info->data16, retval); retval = crc16(list->info->data16, retval);
finder = finder->next; finder = finder->next;
} }
@ -211,7 +223,8 @@ ee_u16 core_bench_list(core_results *res, ee_s16 finder_idx) {
list = core_list_mergesort(list, cmp_idx, NULL); list = core_list_mergesort(list, cmp_idx, NULL);
/* CRC data content of list */ /* CRC data content of list */
finder = list->next; finder = list->next;
while (finder) { while (finder)
{
retval = crc16(list->info->data16, retval); retval = crc16(list->info->data16, retval);
finder = finder->next; finder = finder->next;
} }
@ -227,34 +240,28 @@ ee_u16 core_bench_list(core_results *res, ee_s16 finder_idx) {
blksize - Size of memory to be initialized. blksize - Size of memory to be initialized.
memblock - Pointer to memory block. memblock - Pointer to memory block.
seed - Actual values chosen depend on the seed parameter. seed - Actual values chosen depend on the seed parameter.
The seed parameter MUST be supplied from a source that cannot be determined at compile time The seed parameter MUST be supplied from a source that cannot be
determined at compile time
Returns: Returns:
Pointer to the head of the list. Pointer to the head of the list.
*/ */
list_head *core_list_init(ee_u32 blksize, list_head *memblock, ee_s16 seed) { list_head *
core_list_init(ee_u32 blksize, list_head *memblock, ee_s16 seed)
{
/* calculated pointers for the list */ /* calculated pointers for the list */
ee_printf("%d \n blksize", blksize);
ee_u32 per_item = 16 + sizeof(struct list_data_s); ee_u32 per_item = 16 + sizeof(struct list_data_s);
ee_printf("%d \n sizeof", sizeof(struct list_data_s)); ee_u32 size = (blksize / per_item)
ee_printf("%d \n per_item", per_item); - 2; /* to accomodate systems with 64b pointers, and make sure
ee_u32 size=(blksize/per_item)-2; same code is executed, set max list elements */
char bufftwo[200];
ehitoa(size, bufftwo, 10);
ee_printf(" size = %s done \n", bufftwo);
ee_printf("%d", size);/* to accomodate systems with 64b pointers, and make sure same code is executed, set max list elements */
list_head *memblock_end = memblock + size; list_head *memblock_end = memblock + size;
list_data *datablock = (list_data *)(memblock_end); list_data *datablock = (list_data *)(memblock_end);
list_data *datablock_end = datablock + size; list_data *datablock_end = datablock + size;
ee_printf("datablock_end");
/* some useful variables */ /* some useful variables */
ee_u32 i; ee_u32 i;
list_head *finder, *list = memblock; list_head *finder, *list = memblock;
list_data info; list_data info;
ehitoa(size, bufftwo, 10);
ee_printf(" size2 = %s done \n", bufftwo);
/* create a fake items for the list head and tail */ /* create a fake items for the list head and tail */
list->next = NULL; list->next = NULL;
@ -265,55 +272,45 @@ list_head *core_list_init(ee_u32 blksize, list_head *memblock, ee_s16 seed) {
datablock++; datablock++;
info.idx = 0x7fff; info.idx = 0x7fff;
info.data16 = (ee_s16)0xffff; info.data16 = (ee_s16)0xffff;
ehitoa(size, bufftwo, 10); core_list_insert_new(
ee_printf(" size3 = %s done \n", bufftwo); list, &info, &memblock, &datablock, memblock_end, datablock_end);
core_list_insert_new(list,&info,&memblock,&datablock,memblock_end,datablock_end);
ehitoa(size, bufftwo, 10);
ee_printf(" size4 = %s done \n", bufftwo);;
/* then insert size items */ /* then insert size items */
for (i=0; i<size; i++) { for (i = 0; i < size; i++)
{
ee_u16 datpat = ((ee_u16)(seed ^ i) & 0xf); ee_u16 datpat = ((ee_u16)(seed ^ i) & 0xf);
ee_u16 dat=(datpat<<3) | (i&0x7); /* alternate between algorithms */ ee_u16 dat
info.data16=(dat<<8) | dat; /* fill the data with actual data and upper bits with rebuild value */ = (datpat << 3) | (i & 0x7); /* alternate between algorithms */
core_list_insert_new(list,&info,&memblock,&datablock,memblock_end,datablock_end); info.data16 = (dat << 8) | dat; /* fill the data with actual data and
ehitoa(i, bufftwo, 10); upper bits with rebuild value */
ee_printf(" i = %s done \n", bufftwo); core_list_insert_new(
//ee_printf("%d \n", i); list, &info, &memblock, &datablock, memblock_end, datablock_end);
/*char grow[200];
char growtwo[200];
itoa(i, growtwo, 10);
sprintf(grow, "test %u buff2 %s goodbyeadd \n", i, growtwo);*/
} }
ee_printf("exited for \n");
/* and now index the list so we know initial seed order of the list */ /* and now index the list so we know initial seed order of the list */
finder = list->next; finder = list->next;
i = 1; i = 1;
ehitoa(i, bufftwo, 10); while (finder->next != NULL)
ee_printf(" i = %s done \n", bufftwo); {
while (finder->next!=NULL) { if (i < size / 5) /* first 20% of the list in order */
ee_printf("enter while statement \n");
if (i<size/5){ /* first 20% of the list in order */
finder->info->idx = i++; finder->info->idx = i++;
ehitoa(i, bufftwo, 10); else
ee_printf(" if i = %s done \n", bufftwo); {
}
else {
ee_u16 pat = (ee_u16)(i++ ^ seed); /* get a pseudo random number */ ee_u16 pat = (ee_u16)(i++ ^ seed); /* get a pseudo random number */
finder->info->idx=0x3fff & (((i & 0x07) << 8) | pat); /* make sure the mixed items end up after the ones in sequence */ finder->info->idx = 0x3fff
ehitoa(i, bufftwo, 10); & (((i & 0x07) << 8)
ee_printf(" else i = %s done \n", bufftwo); | pat); /* make sure the mixed items end up
after the ones in sequence */
} }
finder = finder->next; finder = finder->next;
} }
ehitoa(i, bufftwo, 10);
ee_printf(" i2 = %s done \n", bufftwo);
list = core_list_mergesort(list, cmp_idx, NULL); list = core_list_mergesort(list, cmp_idx, NULL);
#if CORE_DEBUG #if CORE_DEBUG
ee_printf("Initialized list:\n"); ee_printf("Initialized list:\n");
finder = list; finder = list;
while (finder) { while (finder)
ee_printf("[%04x,%04x]",finder->info->idx,(ee_u16)finder->info->data16); {
ee_printf(
"[%04x,%04x]", finder->info->idx, (ee_u16)finder->info->data16);
finder = finder->next; finder = finder->next;
} }
ee_printf("\n"); ee_printf("\n");
@ -335,8 +332,14 @@ list_head *core_list_init(ee_u32 blksize, list_head *memblock, ee_s16 seed) {
Returns: Returns:
Pointer to new item. Pointer to new item.
*/ */
list_head *core_list_insert_new(list_head *insert_point, list_data *info, list_head **memblock, list_data **datablock list_head *
, list_head *memblock_end, list_data *datablock_end) { core_list_insert_new(list_head * insert_point,
list_data * info,
list_head **memblock,
list_data **datablock,
list_head * memblock_end,
list_data * datablock_end)
{
list_head *newitem; list_head *newitem;
if ((*memblock + 1) >= memblock_end) if ((*memblock + 1) >= memblock_end)
@ -364,12 +367,15 @@ list_head *core_list_insert_new(list_head *insert_point, list_data *info, list_h
over to the current cell, and unlinking the next item. over to the current cell, and unlinking the next item.
Note: Note:
since there is always a fake item at the end of the list, no need to check for NULL. since there is always a fake item at the end of the list, no need to
check for NULL.
Returns: Returns:
Removed item. Removed item.
*/ */
list_head *core_list_remove(list_head *item) { list_head *
core_list_remove(list_head *item)
{
list_data *tmp; list_data *tmp;
list_head *ret = item->next; list_head *ret = item->next;
/* swap data pointers */ /* swap data pointers */
@ -398,7 +404,9 @@ list_head *core_list_remove(list_head *item) {
The item that was linked back to the list. The item that was linked back to the list.
*/ */
list_head *core_list_undo_remove(list_head *item_removed, list_head *item_modified) { list_head *
core_list_undo_remove(list_head *item_removed, list_head *item_modified)
{
list_data *tmp; list_data *tmp;
/* swap data pointers */ /* swap data pointers */
tmp = item_removed->info; tmp = item_removed->info;
@ -423,21 +431,19 @@ list_head *core_list_undo_remove(list_head *item_removed, list_head *item_modifi
Returns: Returns:
Found item, or NULL if not found. Found item, or NULL if not found.
*/ */
list_head *core_list_find(list_head *list,list_data *info) { list_head *
ee_printf("entered core_list_find \n"); core_list_find(list_head *list, list_data *info)
if (info->idx>=0) { {
ee_printf("find if \n"); if (info->idx >= 0)
while (list && (list->info->idx != info->idx)){ {
while (list && (list->info->idx != info->idx))
list = list->next; list = list->next;
ee_printf("find while if \n");}
ee_printf("core_list_find end \n");
return list; return list;
} else { }
ee_printf("find else"); else
while (list && ((list->info->data16 & 0xff) != info->data16)){ {
while (list && ((list->info->data16 & 0xff) != info->data16))
list = list->next; list = list->next;
ee_printf("find while else \n");}
ee_printf("core list find end \n");
return list; return list;
} }
} }
@ -455,16 +461,17 @@ list_head *core_list_find(list_head *list,list_data *info) {
Found item, or NULL if not found. Found item, or NULL if not found.
*/ */
list_head *core_list_reverse(list_head *list) { list_head *
ee_printf("entered core_list_reverse"); core_list_reverse(list_head *list)
{
list_head *next = NULL, *tmp; list_head *next = NULL, *tmp;
while (list) { while (list)
{
tmp = list->next; tmp = list->next;
list->next = next; list->next = next;
next = list; next = list;
list = tmp; list = tmp;
} }
ee_printf("core_list_reverse done");
return next; return next;
} }
/* Function: core_list_mergesort /* Function: core_list_mergesort
@ -472,9 +479,10 @@ list_head *core_list_reverse(list_head *list) {
Description: Description:
Use mergesort, as for linked list this is a realistic solution. Use mergesort, as for linked list this is a realistic solution.
Also, since this is aimed at embedded, care was taken to use iterative rather then recursive algorithm. Also, since this is aimed at embedded, care was taken to use iterative
The sort can either return the list to original order (by idx) , rather then recursive algorithm. The sort can either return the list to
or use the data item to invoke other other algorithms and change the order of the list. original order (by idx) , or use the data item to invoke other other
algorithms and change the order of the list.
Parameters: Parameters:
list - list to be sorted. list - list to be sorted.
@ -488,70 +496,81 @@ list_head *core_list_reverse(list_head *list) {
but the algorithm could theoretically modify where the list starts. but the algorithm could theoretically modify where the list starts.
*/ */
list_head *core_list_mergesort(list_head *list, list_cmp cmp, core_results *res) { list_head *
core_list_mergesort(list_head *list, list_cmp cmp, core_results *res)
{
list_head *p, *q, *e, *tail; list_head *p, *q, *e, *tail;
ee_s32 insize, nmerges, psize, qsize, i; ee_s32 insize, nmerges, psize, qsize, i;
insize = 1; insize = 1;
char bufftwo[200];
while (1) { while (1)
{
p = list; p = list;
list = NULL; list = NULL;
tail = NULL; tail = NULL;
nmerges = 0; /* count number of merges we do in this pass */ nmerges = 0; /* count number of merges we do in this pass */
ehitoa(nmerges, bufftwo, 10);
ee_printf(" nmerges default value = %s done \n", bufftwo); while (p)
while (p) { {
nmerges++; /* there exists a merge to be done */ nmerges++; /* there exists a merge to be done */
ehitoa(nmerges, bufftwo, 10);
ee_printf(" current nmerges = %s done \n", bufftwo);
/* step `insize' places along from p */ /* step `insize' places along from p */
q = p; q = p;
psize = 0; psize = 0;
ehitoa(insize, bufftwo, 10); for (i = 0; i < insize; i++)
ee_printf(" insize = %s done \n", bufftwo); {
for (i = 0; i < insize; i++) {
ehitoa(i, bufftwo, 10);
ee_printf(" i = %s done \n", bufftwo);
psize++; psize++;
q = q->next; q = q->next;
if (!q) break; if (!q)
break;
} }
/* if q hasn't fallen off end, we have two lists to merge */ /* if q hasn't fallen off end, we have two lists to merge */
qsize = insize; qsize = insize;
ehitoa(qsize, bufftwo, 10);
ee_printf(" qsize = %s done \n", bufftwo);
/* now we have two lists; merge them */ /* now we have two lists; merge them */
while (psize > 0 || (qsize > 0 && q)) { while (psize > 0 || (qsize > 0 && q))
{
/* decide whether next element of merge comes from p or q */ /* decide whether next element of merge comes from p or q */
if (psize == 0) { if (psize == 0)
ee_printf("if \n"); {
/* p is empty; e must come from q. */ /* p is empty; e must come from q. */
e = q; q = q->next; qsize--; e = q;
} else if (qsize == 0 || !q) { q = q->next;
ee_printf("else if \n"); qsize--;
}
else if (qsize == 0 || !q)
{
/* q is empty; e must come from p. */ /* q is empty; e must come from p. */
e = p; p = p->next; psize--; e = p;
} else if (cmp(p->info,q->info,res) <= 0) { p = p->next;
ee_printf("else if 2 \n"); psize--;
/* First element of p is lower (or same); e must come from p. */ }
e = p; p = p->next; psize--; else if (cmp(p->info, q->info, res) <= 0)
} else { {
ee_printf("else \n"); /* First element of p is lower (or same); e must come from
* p. */
e = p;
p = p->next;
psize--;
}
else
{
/* First element of q is lower; e must come from q. */ /* First element of q is lower; e must come from q. */
e = q; q = q->next; qsize--; e = q;
q = q->next;
qsize--;
} }
/* add the next element to the merged list */ /* add the next element to the merged list */
if (tail) { if (tail)
ee_printf("tail if \n"); {
tail->next = e; tail->next = e;
} else { }
ee_printf("tail else \n"); else
{
list = e; list = e;
} }
tail = e; tail = e;
@ -569,8 +588,6 @@ list_head *core_list_mergesort(list_head *list, list_cmp cmp, core_results *res)
/* Otherwise repeat, merging lists twice the size */ /* Otherwise repeat, merging lists twice the size */
insize *= 2; insize *= 2;
ehitoa(insize, bufftwo, 10);
ee_printf(" insize2 = %s done \n", bufftwo);
} }
#if COMPILER_REQUIRES_SORT_RETURN #if COMPILER_REQUIRES_SORT_RETURN
return list; return list;

View File

@ -17,7 +17,8 @@ Original Author: Shay Gal-on
*/ */
/* File: core_main.c /* File: core_main.c
This file contains the framework to acquire a block of memory, seed initial parameters, tun t he benchmark and report the results. This file contains the framework to acquire a block of memory, seed
initial parameters, tun t he benchmark and report the results.
*/ */
#include "coremark.h" #include "coremark.h"
@ -32,13 +33,24 @@ Original Author: Shay Gal-on
Returns: Returns:
NULL. NULL.
*/ */
static ee_u16 list_known_crc[] = {(ee_u16)0xd4b0,(ee_u16)0x3340,(ee_u16)0x6a79,(ee_u16)0xe714,(ee_u16)0xe3c1}; static ee_u16 list_known_crc[] = { (ee_u16)0xd4b0,
static ee_u16 matrix_known_crc[] = {(ee_u16)0xbe52,(ee_u16)0x1199,(ee_u16)0x5608,(ee_u16)0x1fd7,(ee_u16)0x0747}; (ee_u16)0x3340,
static ee_u16 state_known_crc[] = {(ee_u16)0x5e47,(ee_u16)0x39bf,(ee_u16)0xe5a4,(ee_u16)0x8e3a,(ee_u16)0x8d84}; (ee_u16)0x6a79,
int gg_printf(const char *fmt, ...); (ee_u16)0xe714,
int sendstring(const char *p); (ee_u16)0xe3c1 };
void _send_char(char c); static ee_u16 matrix_known_crc[] = { (ee_u16)0xbe52,
void *iterate(void *pres) { (ee_u16)0x1199,
(ee_u16)0x5608,
(ee_u16)0x1fd7,
(ee_u16)0x0747 };
static ee_u16 state_known_crc[] = { (ee_u16)0x5e47,
(ee_u16)0x39bf,
(ee_u16)0xe5a4,
(ee_u16)0x8e3a,
(ee_u16)0x8d84 };
void *
iterate(void *pres)
{
ee_u32 i; ee_u32 i;
ee_u16 crc; ee_u16 crc;
core_results *res = (core_results *)pres; core_results *res = (core_results *)pres;
@ -48,12 +60,14 @@ void *iterate(void *pres) {
res->crcmatrix = 0; res->crcmatrix = 0;
res->crcstate = 0; res->crcstate = 0;
for (i=0; i<iterations; i++) { for (i = 0; i < iterations; i++)
{
crc = core_bench_list(res, 1); crc = core_bench_list(res, 1);
res->crc = crcu16(crc, res->crc); res->crc = crcu16(crc, res->crc);
crc = core_bench_list(res, -1); crc = core_bench_list(res, -1);
res->crc = crcu16(crc, res->crc); res->crc = crcu16(crc, res->crc);
if (i==0) res->crclist=res->crc; if (i == 0)
res->crclist = res->crc;
} }
return NULL; return NULL;
} }
@ -75,34 +89,33 @@ char *mem_name[3] = {"Static","Heap","Stack"};
Main entry routine for the benchmark. Main entry routine for the benchmark.
This function is responsible for the following steps: This function is responsible for the following steps:
1 - Initialize input seeds from a source that cannot be determined at compile time. 1 - Initialize input seeds from a source that cannot be determined at
2 - Initialize memory block for use. compile time. 2 - Initialize memory block for use. 3 - Run and time the
3 - Run and time the benchmark. benchmark. 4 - Report results, testing the validity of the output if the
4 - Report results, testing the validity of the output if the seeds are known. seeds are known.
Arguments: Arguments:
1 - first seed : Any value 1 - first seed : Any value
2 - second seed : Must be identical to first for iterations to be identical 2 - second seed : Must be identical to first for iterations to be
3 - third seed : Any value, should be at least an order of magnitude less then the input size, but bigger then 32. identical 3 - third seed : Any value, should be at least an order of
4 - Iterations : Special, if set to 0, iterations will be automatically determined such that the benchmark will run between 10 to 100 secs magnitude less then the input size, but bigger then 32. 4 - Iterations :
Special, if set to 0, iterations will be automatically determined such that
the benchmark will run between 10 to 100 secs
*/ */
#if MAIN_HAS_NOARGC #if MAIN_HAS_NOARGC
MAIN_RETURN_TYPE main(void) { MAIN_RETURN_TYPE
main(void)
{
int argc = 0; int argc = 0;
char *argv[1]; char *argv[1];
#else #else
MAIN_RETURN_TYPE main(int argc, char *argv[]) { MAIN_RETURN_TYPE
main(int argc, char *argv[])
{
#endif #endif
//const char s[] = "Elizabeth"; ee_printf("SHOWTIME\n");
ee_printf("eeprint");
//ee_printf("Trying to print: %d", 0);
/*gg_printf("Elizabeth");*/
//sendstring("Elizabeth");
//sendstring(s);
//return(0);
ee_u16 i, j = 0, num_algorithms = 0; ee_u16 i, j = 0, num_algorithms = 0;
ee_s16 known_id = -1, total_errors = 0; ee_s16 known_id = -1, total_errors = 0;
ee_u16 seedcrc = 0; ee_u16 seedcrc = 0;
@ -114,7 +127,8 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
/* first call any initializations needed */ /* first call any initializations needed */
portable_init(&(results[0].port), &argc, argv); portable_init(&(results[0].port), &argc, argv);
/* First some checks to make sure benchmark will run ok */ /* First some checks to make sure benchmark will run ok */
if (sizeof(struct list_head_s)>128) { if (sizeof(struct list_head_s) > 128)
{
ee_printf("list_head structure too big for comparable data!\n"); ee_printf("list_head structure too big for comparable data!\n");
return MAIN_RETURN_VAL; return MAIN_RETURN_VAL;
} }
@ -126,16 +140,21 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
results[0].iterations = 1; results[0].iterations = 1;
#endif #endif
results[0].execs = get_seed_32(5); results[0].execs = get_seed_32(5);
if (results[0].execs==0) { /* if not supplied, execute all algorithms */ if (results[0].execs == 0)
{ /* if not supplied, execute all algorithms */
results[0].execs = ALL_ALGORITHMS_MASK; results[0].execs = ALL_ALGORITHMS_MASK;
} }
/* put in some default values based on one seed only for easy testing */ /* put in some default values based on one seed only for easy testing */
if ((results[0].seed1==0) && (results[0].seed2==0) && (results[0].seed3==0)) { /* validation run */ if ((results[0].seed1 == 0) && (results[0].seed2 == 0)
&& (results[0].seed3 == 0))
{ /* perfromance run */
results[0].seed1 = 0; results[0].seed1 = 0;
results[0].seed2 = 0; results[0].seed2 = 0;
results[0].seed3 = 0x66; results[0].seed3 = 0x66;
} }
if ((results[0].seed1==1) && (results[0].seed2==0) && (results[0].seed3==0)) { /* perfromance run */ if ((results[0].seed1 == 1) && (results[0].seed2 == 0)
&& (results[0].seed3 == 0))
{ /* validation run */
results[0].seed1 = 0x3415; results[0].seed1 = 0x3415;
results[0].seed2 = 0x3415; results[0].seed2 = 0x3415;
results[0].seed3 = 0x66; results[0].seed3 = 0x66;
@ -143,17 +162,16 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
#if (MEM_METHOD == MEM_STATIC) #if (MEM_METHOD == MEM_STATIC)
results[0].memblock[0] = (void *)static_memblk; results[0].memblock[0] = (void *)static_memblk;
results[0].size = TOTAL_DATA_SIZE; results[0].size = TOTAL_DATA_SIZE;
ee_printf("%d \n total data size", TOTAL_DATA_SIZE);
results[0].err = 0; results[0].err = 0;
#if (MULTITHREAD > 1) #if (MULTITHREAD > 1)
#error "Cannot use a static data area with multiple contexts!" #error "Cannot use a static data area with multiple contexts!"
#endif #endif
#elif (MEM_METHOD == MEM_MALLOC) #elif (MEM_METHOD == MEM_MALLOC)
for (i=0 ; i<MULTITHREAD; i++) { for (i = 0; i < MULTITHREAD; i++)
{
ee_s32 malloc_override = get_seed(7); ee_s32 malloc_override = get_seed(7);
if (malloc_override != 0) if (malloc_override != 0)
results[i].size = malloc_override; results[i].size = malloc_override;
ee_printf("%d \n malloc datasize", malloc_override);
else else
results[i].size = TOTAL_DATA_SIZE; results[i].size = TOTAL_DATA_SIZE;
results[i].memblock[0] = portable_malloc(results[i].size); results[i].memblock[0] = portable_malloc(results[i].size);
@ -164,7 +182,8 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
results[i].execs = results[0].execs; results[i].execs = results[0].execs;
} }
#elif (MEM_METHOD == MEM_STACK) #elif (MEM_METHOD == MEM_STACK)
for (i=0 ; i<MULTITHREAD; i++) { for (i = 0; i < MULTITHREAD; i++)
{
results[i].memblock[0] = stack_memblock + i * TOTAL_DATA_SIZE; results[i].memblock[0] = stack_memblock + i * TOTAL_DATA_SIZE;
results[i].size = TOTAL_DATA_SIZE; results[i].size = TOTAL_DATA_SIZE;
results[i].seed1 = results[0].seed1; results[i].seed1 = results[0].seed1;
@ -178,84 +197,86 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
#endif #endif
/* Data init */ /* Data init */
/* Find out how space much we have based on number of algorithms */ /* Find out how space much we have based on number of algorithms */
for (i=0; i<NUM_ALGORITHMS; i++) { for (i = 0; i < NUM_ALGORITHMS; i++)
{
if ((1 << (ee_u32)i) & results[0].execs) if ((1 << (ee_u32)i) & results[0].execs)
num_algorithms++; num_algorithms++;
} }
for (i = 0; i < MULTITHREAD; i++) for (i = 0; i < MULTITHREAD; i++)
results[i].size = results[i].size / num_algorithms; results[i].size = results[i].size / num_algorithms;
/* Assign pointers */ /* Assign pointers */
for (i=0; i<NUM_ALGORITHMS; i++) { for (i = 0; i < NUM_ALGORITHMS; i++)
{
ee_u32 ctx; ee_u32 ctx;
if ((1<<(ee_u32)i) & results[0].execs) { if ((1 << (ee_u32)i) & results[0].execs)
{
for (ctx = 0; ctx < MULTITHREAD; ctx++) for (ctx = 0; ctx < MULTITHREAD; ctx++)
results[ctx].memblock[i+1]=(char *)(results[ctx].memblock[0])+results[0].size*j; results[ctx].memblock[i + 1]
= (char *)(results[ctx].memblock[0]) + results[0].size * j;
j++; j++;
} }
} }
/* call inits */ /* call inits */
for (i=0 ; i<MULTITHREAD; i++) { for (i = 0; i < MULTITHREAD; i++)
if (results[i].execs & ID_LIST) { {
ee_printf("loop"); if (results[i].execs & ID_LIST)
ee_printf("%d \n", MULTITHREAD); {
ee_printf("%d \n sizethread \n", results[0].size); results[i].list = core_list_init(
results[0].size, results[i].memblock[1], results[i].seed1);
results[i].list=core_list_init(results[0].size,results[i].memblock[1],results[i].seed1);
} }
if (results[i].execs & ID_MATRIX) { if (results[i].execs & ID_MATRIX)
core_init_matrix(results[0].size, results[i].memblock[2], (ee_s32)results[i].seed1 | (((ee_s32)results[i].seed2) << 16), &(results[i].mat) ); {
core_init_matrix(results[0].size,
results[i].memblock[2],
(ee_s32)results[i].seed1
| (((ee_s32)results[i].seed2) << 16),
&(results[i].mat));
} }
if (results[i].execs & ID_STATE) { if (results[i].execs & ID_STATE)
core_init_state(results[0].size,results[i].seed1,results[i].memblock[3]); {
core_init_state(
results[0].size, results[i].seed1, results[i].memblock[3]);
} }
} }
/* automatically determine number of iterations if not set */ /* automatically determine number of iterations if not set */
if (results[0].iterations==0) { if (results[0].iterations == 0)
{
secs_ret secs_passed = 0; secs_ret secs_passed = 0;
ee_u32 divisor; ee_u32 divisor;
results[0].iterations = 1; results[0].iterations = 1;
int iterationInc = 0; while (secs_passed < (secs_ret)1)
ee_printf("\n\nENTERING ITERATION WHILE LOOP\n");
while (secs_passed < (secs_ret)1) {
if(iterationInc != 0)
{ {
results[0].iterations++; results[0].iterations *= 10;
}
ee_printf("iterations is %d\n", results[0].iterations);
start_time(); start_time();
iterate(&results[0]); iterate(&results[0]);
stop_time(); stop_time();
secs_passed = time_in_secs(get_time()); secs_passed = time_in_secs(get_time());
int secs_passed_int = (int)secs_passed;
ee_printf("secs passed is %d\n", secs_passed_int);
iterationInc++;
} }
ee_printf("LEAVING ITERATION WHILE LOOP!\n\n"); /* now we know it executes for at least 1 sec, set actual run time at
/* now we know it executes for at least 1 sec, set actual run time at about 10 secs */ * about 10 secs */
divisor = (ee_u32)secs_passed; divisor = (ee_u32)secs_passed;
ee_printf("divisor is %lu\n", divisor); if (divisor == 0) /* some machines cast float to int as 0 since this
if (divisor==0) /* some machines cast float to int as 0 since this conversion is not defined by ANSI, but we know at least one second passed */ conversion is not defined by ANSI, but we know at
least one second passed */
divisor = 1; divisor = 1;
results[0].iterations *= 1 + 10 / divisor; results[0].iterations *= 1 + 10 / divisor;
ee_printf("iterations is %d\n", results[0].iterations);
} }
/* perform actual benchmark */ /* perform actual benchmark */
ee_printf("iterations is %d\n", results[0].iterations);
ee_printf("Starting benchmark\n");
start_time(); start_time();
#if (MULTITHREAD > 1) #if (MULTITHREAD > 1)
if (default_num_contexts>MULTITHREAD) { if (default_num_contexts > MULTITHREAD)
{
default_num_contexts = MULTITHREAD; default_num_contexts = MULTITHREAD;
} }
for (i=0 ; i<default_num_contexts; i++) { for (i = 0; i < default_num_contexts; i++)
{
results[i].iterations = results[0].iterations; results[i].iterations = results[0].iterations;
results[i].execs = results[0].execs; results[i].execs = results[0].execs;
core_start_parallel(&results[i]); core_start_parallel(&results[i]);
} }
for (i=0 ; i<default_num_contexts; i++) { for (i = 0; i < default_num_contexts; i++)
{
core_stop_parallel(&results[i]); core_stop_parallel(&results[i]);
} }
#else #else
@ -263,24 +284,25 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
#endif #endif
stop_time(); stop_time();
total_time = get_time(); total_time = get_time();
ee_printf("total time is %u\n", total_time);
ee_printf("ending benchmark\n");
/* get a function of the input to report */ /* get a function of the input to report */
seedcrc = crc16(results[0].seed1, seedcrc); seedcrc = crc16(results[0].seed1, seedcrc);
seedcrc = crc16(results[0].seed2, seedcrc); seedcrc = crc16(results[0].seed2, seedcrc);
seedcrc = crc16(results[0].seed3, seedcrc); seedcrc = crc16(results[0].seed3, seedcrc);
seedcrc = crc16(results[0].size, seedcrc); seedcrc = crc16(results[0].size, seedcrc);
switch (seedcrc) { /* test known output for common seeds */ switch (seedcrc)
{ /* test known output for common seeds */
case 0x8a02: /* seed1=0, seed2=0, seed3=0x66, size 2000 per algorithm */ case 0x8a02: /* seed1=0, seed2=0, seed3=0x66, size 2000 per algorithm */
known_id = 0; known_id = 0;
ee_printf("6k performance run parameters for coremark.\n"); ee_printf("6k performance run parameters for coremark.\n");
break; break;
case 0x7b05: /* seed1=0x3415, seed2=0x3415, seed3=0x66, size 2000 per algorithm */ case 0x7b05: /* seed1=0x3415, seed2=0x3415, seed3=0x66, size 2000 per
algorithm */
known_id = 1; known_id = 1;
ee_printf("6k validation run parameters for coremark.\n"); ee_printf("6k validation run parameters for coremark.\n");
break; break;
case 0x4eaf: /* seed1=0x8, seed2=0x8, seed3=0x8, size 400 per algorithm */ case 0x4eaf: /* seed1=0x8, seed2=0x8, seed3=0x8, size 400 per algorithm
*/
known_id = 2; known_id = 2;
ee_printf("Profile generation run parameters for coremark.\n"); ee_printf("Profile generation run parameters for coremark.\n");
break; break;
@ -288,7 +310,8 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
known_id = 3; known_id = 3;
ee_printf("2K performance run parameters for coremark.\n"); ee_printf("2K performance run parameters for coremark.\n");
break; break;
case 0x18f2: /* seed1=0x3415, seed2=0x3415, seed3=0x66, size 666 per algorithm */ case 0x18f2: /* seed1=0x3415, seed2=0x3415, seed3=0x66, size 666 per
algorithm */
known_id = 4; known_id = 4;
ee_printf("2K validation run parameters for coremark.\n"); ee_printf("2K validation run parameters for coremark.\n");
break; break;
@ -296,22 +319,36 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
total_errors = -1; total_errors = -1;
break; break;
} }
if (known_id>=0) { if (known_id >= 0)
for (i=0 ; i<default_num_contexts; i++) { {
for (i = 0; i < default_num_contexts; i++)
{
results[i].err = 0; results[i].err = 0;
if ((results[i].execs & ID_LIST) && if ((results[i].execs & ID_LIST)
(results[i].crclist!=list_known_crc[known_id])) { && (results[i].crclist != list_known_crc[known_id]))
ee_printf("[%u]ERROR! list crc 0x%04x - should be 0x%04x\n",i,results[i].crclist,list_known_crc[known_id]); {
ee_printf("[%u]ERROR! list crc 0x%04x - should be 0x%04x\n",
i,
results[i].crclist,
list_known_crc[known_id]);
results[i].err++; results[i].err++;
} }
if ((results[i].execs & ID_MATRIX) && if ((results[i].execs & ID_MATRIX)
(results[i].crcmatrix!=matrix_known_crc[known_id])) { && (results[i].crcmatrix != matrix_known_crc[known_id]))
ee_printf("[%u]ERROR! matrix crc 0x%04x - should be 0x%04x\n",i,results[i].crcmatrix,matrix_known_crc[known_id]); {
ee_printf("[%u]ERROR! matrix crc 0x%04x - should be 0x%04x\n",
i,
results[i].crcmatrix,
matrix_known_crc[known_id]);
results[i].err++; results[i].err++;
} }
if ((results[i].execs & ID_STATE) && if ((results[i].execs & ID_STATE)
(results[i].crcstate!=state_known_crc[known_id])) { && (results[i].crcstate != state_known_crc[known_id]))
ee_printf("[%u]ERROR! state crc 0x%04x - should be 0x%04x\n",i,results[i].crcstate,state_known_crc[known_id]); {
ee_printf("[%u]ERROR! state crc 0x%04x - should be 0x%04x\n",
i,
results[i].crcstate,
state_known_crc[known_id]);
results[i].err++; results[i].err++;
} }
total_errors += results[i].err; total_errors += results[i].err;
@ -319,24 +356,30 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
} }
total_errors += check_data_types(); total_errors += check_data_types();
/* and report results */ /* and report results */
//ee_printf("CoreMark Size : %lu\n", (long unsigned) results[0].size);
ee_printf("CoreMark Size : %lu\n", (long unsigned)results[0].size); ee_printf("CoreMark Size : %lu\n", (long unsigned)results[0].size);
ee_printf("Total ticks : %lu\n", (long unsigned)total_time); ee_printf("Total ticks : %lu\n", (long unsigned)total_time);
#if HAS_FLOAT #if HAS_FLOAT
ee_printf("Total time (secs): %f\n", time_in_secs(total_time)); ee_printf("Total time (secs): %f\n", time_in_secs(total_time));
if (time_in_secs(total_time) > 0) if (time_in_secs(total_time) > 0)
ee_printf("Iterations/Sec : %f\n",default_num_contexts*results[0].iterations/time_in_secs(total_time)); ee_printf("Iterations/Sec : %f\n",
default_num_contexts * results[0].iterations
/ time_in_secs(total_time));
#else #else
ee_printf("Total time (secs): %d\n,time_in_secs(total_time)"); ee_printf("Total time (secs): %d\n", time_in_secs(total_time));
if (time_in_secs(total_time) > 0) if (time_in_secs(total_time) > 0)
ee_printf("Iterations/Sec : %d\n",default_num_contexts*results[0].iterations/time_in_secs(total_time)); ee_printf("Iterations/Sec : %d\n",
default_num_contexts * results[0].iterations
/ time_in_secs(total_time));
#endif #endif
if (time_in_secs(total_time) < 10) { if (time_in_secs(total_time) < 10)
ee_printf("ERROR! Must execute for at least 10 secs for a valid result!\n"); {
ee_printf(
"ERROR! Must execute for at least 10 secs for a valid result!\n");
total_errors++; total_errors++;
} }
ee_printf("Iterations : %lu\n", (long unsigned) default_num_contexts*results[0].iterations); ee_printf("Iterations : %lu\n",
(long unsigned)default_num_contexts * results[0].iterations);
ee_printf("Compiler version : %s\n", COMPILER_VERSION); ee_printf("Compiler version : %s\n", COMPILER_VERSION);
ee_printf("Compiler flags : %s\n", COMPILER_FLAGS); ee_printf("Compiler flags : %s\n", COMPILER_FLAGS);
#if (MULTITHREAD > 1) #if (MULTITHREAD > 1)
@ -356,16 +399,23 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
ee_printf("[%d]crcstate : 0x%04x\n", i, results[i].crcstate); ee_printf("[%d]crcstate : 0x%04x\n", i, results[i].crcstate);
for (i = 0; i < default_num_contexts; i++) for (i = 0; i < default_num_contexts; i++)
ee_printf("[%d]crcfinal : 0x%04x\n", i, results[i].crc); ee_printf("[%d]crcfinal : 0x%04x\n", i, results[i].crc);
if (total_errors==0) { if (total_errors == 0)
ee_printf("Correct operation validated. See README.md for run and reporting rules.\n"); {
ee_printf(
"Correct operation validated. See README.md for run and reporting "
"rules.\n");
#if HAS_FLOAT #if HAS_FLOAT
if (known_id==3) { if (known_id == 3)
{
unsigned long long tmp = (unsigned long long) 1000.0*default_num_contexts*results[0].iterations/time_in_secs(total_time); unsigned long long tmp = (unsigned long long) 1000.0*default_num_contexts*results[0].iterations/time_in_secs(total_time);
secs_ret totalmsecs = time_in_secs(total_time); secs_ret totalmsecs = time_in_secs(total_time);
int totalmint = (int) totalmsecs; int totalmint = (int) totalmsecs;
ee_printf("ELAPSED TIME: %d\n", totalmint); ee_printf("ELAPSED TIME: %d\n", totalmint);
ee_printf("CoreMark 1.0 : %d / %s %s\n",tmp,COMPILER_VERSION,COMPILER_FLAGS); ee_printf("CoreMark 1.0 : %d / %s %s",
tmp,
COMPILER_VERSION,
COMPILER_FLAGS);
#if defined(MEM_LOCATION) && !defined(MEM_LOCATION_UNSPEC) #if defined(MEM_LOCATION) && !defined(MEM_LOCATION_UNSPEC)
ee_printf(" / %s", MEM_LOCATION); ee_printf(" / %s", MEM_LOCATION);
#else #else
@ -382,7 +432,9 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
if (total_errors > 0) if (total_errors > 0)
ee_printf("Errors detected\n"); ee_printf("Errors detected\n");
if (total_errors < 0) if (total_errors < 0)
ee_printf("Cannot validate operation for these seed values, please compare with results on a known platform.\n"); ee_printf(
"Cannot validate operation for these seed values, please compare "
"with results on a known platform.\n");
#if (MEM_METHOD == MEM_MALLOC) #if (MEM_METHOD == MEM_MALLOC)
for (i = 0; i < MULTITHREAD; i++) for (i = 0; i < MULTITHREAD; i++)
@ -393,7 +445,3 @@ MAIN_RETURN_TYPE main(int argc, char *argv[]) {
return MAIN_RETURN_VAL; return MAIN_RETURN_VAL;
} }
//pls

View File

@ -21,17 +21,19 @@ Original Author: Shay Gal-on
Topic: Description Topic: Description
Matrix manipulation benchmark Matrix manipulation benchmark
This very simple algorithm forms the basis of many more complex algorithms. This very simple algorithm forms the basis of many more complex
algorithms.
The tight inner loop is the focus of many optimizations (compiler as well as hardware based) The tight inner loop is the focus of many optimizations (compiler as
and is thus relevant for embedded processing. well as hardware based) and is thus relevant for embedded processing.
The total available data space will be divided to 3 parts: The total available data space will be divided to 3 parts:
NxN Matrix A - initialized with small values (upper 3/4 of the bits all zero). NxN Matrix A - initialized with small values (upper 3/4 of the bits all
NxN Matrix B - initialized with medium values (upper half of the bits all zero). zero). NxN Matrix B - initialized with medium values (upper half of the bits all
NxN Matrix C - used for the result. zero). NxN Matrix C - used for the result.
The actual values for A and B must be derived based on input that is not available at compile time. The actual values for A and B must be derived based on input that is not
available at compile time.
*/ */
ee_s16 matrix_test(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B, MATDAT val); ee_s16 matrix_test(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B, MATDAT val);
ee_s16 matrix_sum(ee_u32 N, MATRES *C, MATDAT clipval); ee_s16 matrix_sum(ee_u32 N, MATRES *C, MATDAT clipval);
@ -47,11 +49,15 @@ void matrix_add_const(ee_u32 N, MATDAT *A, MATDAT val);
#define bit_extract(x, from, to) (((x) >> (from)) & (~(0xffffffff << (to)))) #define bit_extract(x, from, to) (((x) >> (from)) & (~(0xffffffff << (to))))
#if CORE_DEBUG #if CORE_DEBUG
void printmat(MATDAT *A, ee_u32 N, char *name) { void
printmat(MATDAT *A, ee_u32 N, char *name)
{
ee_u32 i, j; ee_u32 i, j;
ee_printf("Matrix %s [%dx%d]:\n", name, N, N); ee_printf("Matrix %s [%dx%d]:\n", name, N, N);
for (i=0; i<N; i++) { for (i = 0; i < N; i++)
for (j=0; j<N; j++) { {
for (j = 0; j < N; j++)
{
if (j != 0) if (j != 0)
ee_printf(","); ee_printf(",");
ee_printf("%d", A[i * N + j]); ee_printf("%d", A[i * N + j]);
@ -59,11 +65,15 @@ void printmat(MATDAT *A, ee_u32 N, char *name) {
ee_printf("\n"); ee_printf("\n");
} }
} }
void printmatC(MATRES *C, ee_u32 N, char *name) { void
printmatC(MATRES *C, ee_u32 N, char *name)
{
ee_u32 i, j; ee_u32 i, j;
ee_printf("Matrix %s [%dx%d]:\n", name, N, N); ee_printf("Matrix %s [%dx%d]:\n", name, N, N);
for (i=0; i<N; i++) { for (i = 0; i < N; i++)
for (j=0; j<N; j++) { {
for (j = 0; j < N; j++)
{
if (j != 0) if (j != 0)
ee_printf(","); ee_printf(",");
ee_printf("%d", C[i * N + j]); ee_printf("%d", C[i * N + j]);
@ -78,7 +88,9 @@ void printmatC(MATRES *C, ee_u32 N, char *name) {
Iterate <matrix_test> N times, Iterate <matrix_test> N times,
changing the matrix values slightly by a constant amount each time. changing the matrix values slightly by a constant amount each time.
*/ */
ee_u16 core_bench_matrix(mat_params *p, ee_s16 seed, ee_u16 crc) { ee_u16
core_bench_matrix(mat_params *p, ee_s16 seed, ee_u16 crc)
{
ee_u32 N = p->N; ee_u32 N = p->N;
MATRES *C = p->C; MATRES *C = p->C;
MATDAT *A = p->A; MATDAT *A = p->A;
@ -114,7 +126,9 @@ ee_u16 core_bench_matrix(mat_params *p, ee_s16 seed, ee_u16 crc) {
After the last step, matrix A is back to original contents. After the last step, matrix A is back to original contents.
*/ */
ee_s16 matrix_test(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B, MATDAT val) { ee_s16
matrix_test(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B, MATDAT val)
{
ee_u16 crc = 0; ee_u16 crc = 0;
MATDAT clipval = matrix_big(val); MATDAT clipval = matrix_big(val);
@ -160,9 +174,12 @@ ee_s16 matrix_test(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B, MATDAT val) {
Matrix dimensions. Matrix dimensions.
Note: Note:
The seed parameter MUST be supplied from a source that cannot be determined at compile time The seed parameter MUST be supplied from a source that cannot be
determined at compile time
*/ */
ee_u32 core_init_matrix(ee_u32 blksize, void *memblk, ee_s32 seed, mat_params *p) { ee_u32
core_init_matrix(ee_u32 blksize, void *memblk, ee_s32 seed, mat_params *p)
{
ee_u32 N = 0; ee_u32 N = 0;
MATDAT *A; MATDAT *A;
MATDAT *B; MATDAT *B;
@ -171,7 +188,8 @@ ee_u32 core_init_matrix(ee_u32 blksize, void *memblk, ee_s32 seed, mat_params *p
ee_u32 i = 0, j = 0; ee_u32 i = 0, j = 0;
if (seed == 0) if (seed == 0)
seed = 1; seed = 1;
while (j<blksize) { while (j < blksize)
{
i++; i++;
j = i * i * 2 * 4; j = i * i * 2 * 4;
} }
@ -179,8 +197,10 @@ ee_u32 core_init_matrix(ee_u32 blksize, void *memblk, ee_s32 seed, mat_params *p
A = (MATDAT *)align_mem(memblk); A = (MATDAT *)align_mem(memblk);
B = A + N * N; B = A + N * N;
for (i=0; i<N; i++) { for (i = 0; i < N; i++)
for (j=0; j<N; j++) { {
for (j = 0; j < N; j++)
{
seed = ((order * seed) % 65536); seed = ((order * seed) % 65536);
val = (seed + order); val = (seed + order);
val = matrix_clip(val, 0); val = matrix_clip(val, 0);
@ -204,7 +224,8 @@ ee_u32 core_init_matrix(ee_u32 blksize, void *memblk, ee_s32 seed, mat_params *p
} }
/* Function: matrix_sum /* Function: matrix_sum
Calculate a function that depends on the values of elements in the matrix. Calculate a function that depends on the values of elements in the
matrix.
For each element, accumulate into a temporary variable. For each element, accumulate into a temporary variable.
@ -213,18 +234,25 @@ ee_u32 core_init_matrix(ee_u32 blksize, void *memblk, ee_s32 seed, mat_params *p
Otherwise, reset the accumulator and add 10 to the result. Otherwise, reset the accumulator and add 10 to the result.
*/ */
ee_s16 matrix_sum(ee_u32 N, MATRES *C, MATDAT clipval) { ee_s16
matrix_sum(ee_u32 N, MATRES *C, MATDAT clipval)
{
MATRES tmp = 0, prev = 0, cur = 0; MATRES tmp = 0, prev = 0, cur = 0;
ee_s16 ret = 0; ee_s16 ret = 0;
ee_u32 i, j; ee_u32 i, j;
for (i=0; i<N; i++) { for (i = 0; i < N; i++)
for (j=0; j<N; j++) { {
for (j = 0; j < N; j++)
{
cur = C[i * N + j]; cur = C[i * N + j];
tmp += cur; tmp += cur;
if (tmp>clipval) { if (tmp > clipval)
{
ret += 10; ret += 10;
tmp = 0; tmp = 0;
} else { }
else
{
ret += (cur > prev) ? 1 : 0; ret += (cur > prev) ? 1 : 0;
} }
prev = cur; prev = cur;
@ -237,10 +265,14 @@ ee_s16 matrix_sum(ee_u32 N, MATRES *C, MATDAT clipval) {
Multiply a matrix by a constant. Multiply a matrix by a constant.
This could be used as a scaler for instance. This could be used as a scaler for instance.
*/ */
void matrix_mul_const(ee_u32 N, MATRES *C, MATDAT *A, MATDAT val) { void
matrix_mul_const(ee_u32 N, MATRES *C, MATDAT *A, MATDAT val)
{
ee_u32 i, j; ee_u32 i, j;
for (i=0; i<N; i++) { for (i = 0; i < N; i++)
for (j=0; j<N; j++) { {
for (j = 0; j < N; j++)
{
C[i * N + j] = (MATRES)A[i * N + j] * (MATRES)val; C[i * N + j] = (MATRES)A[i * N + j] * (MATRES)val;
} }
} }
@ -249,10 +281,14 @@ void matrix_mul_const(ee_u32 N, MATRES *C, MATDAT *A, MATDAT val) {
/* Function: matrix_add_const /* Function: matrix_add_const
Add a constant value to all elements of a matrix. Add a constant value to all elements of a matrix.
*/ */
void matrix_add_const(ee_u32 N, MATDAT *A, MATDAT val) { void
matrix_add_const(ee_u32 N, MATDAT *A, MATDAT val)
{
ee_u32 i, j; ee_u32 i, j;
for (i=0; i<N; i++) { for (i = 0; i < N; i++)
for (j=0; j<N; j++) { {
for (j = 0; j < N; j++)
{
A[i * N + j] += val; A[i * N + j] += val;
} }
} }
@ -260,13 +296,18 @@ void matrix_add_const(ee_u32 N, MATDAT *A, MATDAT val) {
/* Function: matrix_mul_vect /* Function: matrix_mul_vect
Multiply a matrix by a vector. Multiply a matrix by a vector.
This is common in many simple filters (e.g. fir where a vector of coefficients is applied to the matrix.) This is common in many simple filters (e.g. fir where a vector of
coefficients is applied to the matrix.)
*/ */
void matrix_mul_vect(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B) { void
matrix_mul_vect(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B)
{
ee_u32 i, j; ee_u32 i, j;
for (i=0; i<N; i++) { for (i = 0; i < N; i++)
{
C[i] = 0; C[i] = 0;
for (j=0; j<N; j++) { for (j = 0; j < N; j++)
{
C[i] += (MATRES)A[i * N + j] * (MATRES)B[j]; C[i] += (MATRES)A[i * N + j] * (MATRES)B[j];
} }
} }
@ -274,12 +315,17 @@ void matrix_mul_vect(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B) {
/* Function: matrix_mul_matrix /* Function: matrix_mul_matrix
Multiply a matrix by a matrix. Multiply a matrix by a matrix.
Basic code is used in many algorithms, mostly with minor changes such as scaling. Basic code is used in many algorithms, mostly with minor changes such as
scaling.
*/ */
void matrix_mul_matrix(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B) { void
matrix_mul_matrix(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B)
{
ee_u32 i, j, k; ee_u32 i, j, k;
for (i=0; i<N; i++) { for (i = 0; i < N; i++)
for (j=0; j<N; j++) { {
for (j = 0; j < N; j++)
{
C[i * N + j] = 0; C[i * N + j] = 0;
for (k = 0; k < N; k++) for (k = 0; k < N; k++)
{ {
@ -291,12 +337,17 @@ void matrix_mul_matrix(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B) {
/* Function: matrix_mul_matrix_bitextract /* Function: matrix_mul_matrix_bitextract
Multiply a matrix by a matrix, and extract some bits from the result. Multiply a matrix by a matrix, and extract some bits from the result.
Basic code is used in many algorithms, mostly with minor changes such as scaling. Basic code is used in many algorithms, mostly with minor changes such as
scaling.
*/ */
void matrix_mul_matrix_bitextract(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B) { void
matrix_mul_matrix_bitextract(ee_u32 N, MATRES *C, MATDAT *A, MATDAT *B)
{
ee_u32 i, j, k; ee_u32 i, j, k;
for (i=0; i<N; i++) { for (i = 0; i < N; i++)
for (j=0; j<N; j++) { {
for (j = 0; j < N; j++)
{
C[i * N + j] = 0; C[i * N + j] = 0;
for (k = 0; k < N; k++) for (k = 0; k < N; k++)
{ {

View File

@ -24,11 +24,12 @@ enum CORE_STATE core_state_transition( ee_u8 **instr , ee_u32 *transition_count)
Topic: Description Topic: Description
Simple state machines like this one are used in many embedded products. Simple state machines like this one are used in many embedded products.
For more complex state machines, sometimes a state transition table implementation is used instead, For more complex state machines, sometimes a state transition table
trading speed of direct coding for ease of maintenance. implementation is used instead, trading speed of direct coding for ease of
maintenance.
Since the main goal of using a state machine in CoreMark is to excercise the switch/if behaviour, Since the main goal of using a state machine in CoreMark is to excercise
we are using a small moore machine. the switch/if behaviour, we are using a small moore machine.
In particular, this machine tests type of string input, In particular, this machine tests type of string input,
trying to determine whether the input is a number or something else. trying to determine whether the input is a number or something else.
@ -38,25 +39,32 @@ Topic: Description
/* Function: core_bench_state /* Function: core_bench_state
Benchmark function Benchmark function
Go over the input twice, once direct, and once after introducing some corruption. Go over the input twice, once direct, and once after introducing some
corruption.
*/ */
ee_u16 core_bench_state(ee_u32 blksize, ee_u8 *memblock, ee_u16
ee_s16 seed1, ee_s16 seed2, ee_s16 step, ee_u16 crc) core_bench_state(ee_u32 blksize,
ee_u8 *memblock,
ee_s16 seed1,
ee_s16 seed2,
ee_s16 step,
ee_u16 crc)
{ {
ee_u32 final_counts[NUM_CORE_STATES]; ee_u32 final_counts[NUM_CORE_STATES];
ee_u32 track_counts[NUM_CORE_STATES]; ee_u32 track_counts[NUM_CORE_STATES];
ee_u8 *p = memblock; ee_u8 *p = memblock;
ee_u32 i; ee_u32 i;
#if CORE_DEBUG #if CORE_DEBUG
ee_printf("State Bench: %d,%d,%d,%04x\n", seed1, seed2, step, crc); ee_printf("State Bench: %d,%d,%d,%04x\n", seed1, seed2, step, crc);
#endif #endif
for (i=0; i<NUM_CORE_STATES; i++) { for (i = 0; i < NUM_CORE_STATES; i++)
{
final_counts[i] = track_counts[i] = 0; final_counts[i] = track_counts[i] = 0;
} }
/* run the state machine over the input */ /* run the state machine over the input */
while (*p!=0) { while (*p != 0)
{
enum CORE_STATE fstate = core_state_transition(&p, track_counts); enum CORE_STATE fstate = core_state_transition(&p, track_counts);
final_counts[fstate]++; final_counts[fstate]++;
#if CORE_DEBUG #if CORE_DEBUG
@ -67,14 +75,16 @@ ee_u16 core_bench_state(ee_u32 blksize, ee_u8 *memblock,
} }
#endif #endif
p = memblock; p = memblock;
while (p < (memblock+blksize)) { /* insert some corruption */ while (p < (memblock + blksize))
{ /* insert some corruption */
if (*p != ',') if (*p != ',')
*p ^= (ee_u8)seed1; *p ^= (ee_u8)seed1;
p += step; p += step;
} }
p = memblock; p = memblock;
/* run the state machine over the input again */ /* run the state machine over the input again */
while (*p!=0) { while (*p != 0)
{
enum CORE_STATE fstate = core_state_transition(&p, track_counts); enum CORE_STATE fstate = core_state_transition(&p, track_counts);
final_counts[fstate]++; final_counts[fstate]++;
#if CORE_DEBUG #if CORE_DEBUG
@ -85,13 +95,15 @@ ee_u16 core_bench_state(ee_u32 blksize, ee_u8 *memblock,
} }
#endif #endif
p = memblock; p = memblock;
while (p < (memblock+blksize)) { /* undo corruption is seed1 and seed2 are equal */ while (p < (memblock + blksize))
{ /* undo corruption is seed1 and seed2 are equal */
if (*p != ',') if (*p != ',')
*p ^= (ee_u8)seed2; *p ^= (ee_u8)seed2;
p += step; p += step;
} }
/* end timing */ /* end timing */
for (i=0; i<NUM_CORE_STATES; i++) { for (i = 0; i < NUM_CORE_STATES; i++)
{
crc = crcu32(final_counts[i], crc); crc = crcu32(final_counts[i], crc);
crc = crcu32(track_counts[i], crc); crc = crcu32(track_counts[i], crc);
} }
@ -99,10 +111,20 @@ ee_u16 core_bench_state(ee_u32 blksize, ee_u8 *memblock,
} }
/* Default initialization patterns */ /* Default initialization patterns */
static ee_u8 *intpat[4] ={(ee_u8 *)"5012",(ee_u8 *)"1234",(ee_u8 *)"-874",(ee_u8 *)"+122"}; static ee_u8 *intpat[4]
static ee_u8 *floatpat[4]={(ee_u8 *)"35.54400",(ee_u8 *)".1234500",(ee_u8 *)"-110.700",(ee_u8 *)"+0.64400"}; = { (ee_u8 *)"5012", (ee_u8 *)"1234", (ee_u8 *)"-874", (ee_u8 *)"+122" };
static ee_u8 *scipat[4] ={(ee_u8 *)"5.500e+3",(ee_u8 *)"-.123e-2",(ee_u8 *)"-87e+832",(ee_u8 *)"+0.6e-12"}; static ee_u8 *floatpat[4] = { (ee_u8 *)"35.54400",
static ee_u8 *errpat[4] ={(ee_u8 *)"T0.3e-1F",(ee_u8 *)"-T.T++Tq",(ee_u8 *)"1T3.4e4z",(ee_u8 *)"34.0e-T^"}; (ee_u8 *)".1234500",
(ee_u8 *)"-110.700",
(ee_u8 *)"+0.64400" };
static ee_u8 *scipat[4] = { (ee_u8 *)"5.500e+3",
(ee_u8 *)"-.123e-2",
(ee_u8 *)"-87e+832",
(ee_u8 *)"+0.6e-12" };
static ee_u8 *errpat[4] = { (ee_u8 *)"T0.3e-1F",
(ee_u8 *)"-T.T++Tq",
(ee_u8 *)"1T3.4e4z",
(ee_u8 *)"34.0e-T^" };
/* Function: core_init_state /* Function: core_init_state
Initialize the input data for the state machine. Initialize the input data for the state machine.
@ -111,9 +133,12 @@ static ee_u8 *errpat[4] ={(ee_u8 *)"T0.3e-1F",(ee_u8 *)"-T.T++Tq",(ee_u8 *)"1T3
Actual patterns chosen depend on the seed parameter. Actual patterns chosen depend on the seed parameter.
Note: Note:
The seed parameter MUST be supplied from a source that cannot be determined at compile time The seed parameter MUST be supplied from a source that cannot be
determined at compile time
*/ */
void core_init_state(ee_u32 size, ee_s16 seed, ee_u8 *p) { void
core_init_state(ee_u32 size, ee_s16 seed, ee_u8 *p)
{
ee_u32 total = 0, next = 0, i; ee_u32 total = 0, next = 0, i;
ee_u8 *buf = 0; ee_u8 *buf = 0;
#if CORE_DEBUG #if CORE_DEBUG
@ -122,15 +147,18 @@ void core_init_state(ee_u32 size, ee_s16 seed, ee_u8 *p) {
#endif #endif
size--; size--;
next = 0; next = 0;
while ((total+next+1)<size) { while ((total + next + 1) < size)
if (next>0) { {
if (next > 0)
{
for (i = 0; i < next; i++) for (i = 0; i < next; i++)
*(p + total + i) = buf[i]; *(p + total + i) = buf[i];
*(p + total + i) = ','; *(p + total + i) = ',';
total += next + 1; total += next + 1;
} }
seed++; seed++;
switch (seed & 0x7) { switch (seed & 0x7)
{
case 0: /* int */ case 0: /* int */
case 1: /* int */ case 1: /* int */
case 2: /* int */ case 2: /* int */
@ -156,7 +184,8 @@ void core_init_state(ee_u32 size, ee_s16 seed, ee_u8 *p) {
} }
} }
size++; size++;
while (total<size) { /* fill the rest with 0 */ while (total < size)
{ /* fill the rest with 0 */
*(p + total) = 0; *(p + total) = 0;
total++; total++;
} }
@ -165,7 +194,9 @@ void core_init_state(ee_u32 size, ee_s16 seed, ee_u8 *p) {
#endif #endif
} }
static ee_u8 ee_isdigit(ee_u8 c) { static ee_u8
ee_isdigit(ee_u8 c)
{
ee_u8 retval; ee_u8 retval;
retval = ((c >= '0') & (c <= '9')) ? 1 : 0; retval = ((c >= '0') & (c <= '9')) ? 1 : 0;
return retval; return retval;
@ -178,92 +209,114 @@ static ee_u8 ee_isdigit(ee_u8 c) {
1 - an invalid input is detcted. 1 - an invalid input is detcted.
2 - a valid number has been detected. 2 - a valid number has been detected.
The input pointer is updated to point to the end of the token, and the end state is returned (either specific format determined or invalid). The input pointer is updated to point to the end of the token, and the
end state is returned (either specific format determined or invalid).
*/ */
enum CORE_STATE core_state_transition( ee_u8 **instr , ee_u32 *transition_count) { enum CORE_STATE
core_state_transition(ee_u8 **instr, ee_u32 *transition_count)
{
ee_u8 * str = *instr; ee_u8 * str = *instr;
ee_u8 NEXT_SYMBOL; ee_u8 NEXT_SYMBOL;
enum CORE_STATE state = CORE_START; enum CORE_STATE state = CORE_START;
for( ; *str && state != CORE_INVALID; str++ ) { for (; *str && state != CORE_INVALID; str++)
{
NEXT_SYMBOL = *str; NEXT_SYMBOL = *str;
if (NEXT_SYMBOL==',') /* end of this input */ { if (NEXT_SYMBOL == ',') /* end of this input */
{
str++; str++;
break; break;
} }
switch(state) { switch (state)
{
case CORE_START: case CORE_START:
if(ee_isdigit(NEXT_SYMBOL)) { if (ee_isdigit(NEXT_SYMBOL))
{
state = CORE_INT; state = CORE_INT;
} }
else if( NEXT_SYMBOL == '+' || NEXT_SYMBOL == '-' ) { else if (NEXT_SYMBOL == '+' || NEXT_SYMBOL == '-')
{
state = CORE_S1; state = CORE_S1;
} }
else if( NEXT_SYMBOL == '.' ) { else if (NEXT_SYMBOL == '.')
{
state = CORE_FLOAT; state = CORE_FLOAT;
} }
else { else
{
state = CORE_INVALID; state = CORE_INVALID;
transition_count[CORE_INVALID]++; transition_count[CORE_INVALID]++;
} }
transition_count[CORE_START]++; transition_count[CORE_START]++;
break; break;
case CORE_S1: case CORE_S1:
if(ee_isdigit(NEXT_SYMBOL)) { if (ee_isdigit(NEXT_SYMBOL))
{
state = CORE_INT; state = CORE_INT;
transition_count[CORE_S1]++; transition_count[CORE_S1]++;
} }
else if( NEXT_SYMBOL == '.' ) { else if (NEXT_SYMBOL == '.')
{
state = CORE_FLOAT; state = CORE_FLOAT;
transition_count[CORE_S1]++; transition_count[CORE_S1]++;
} }
else { else
{
state = CORE_INVALID; state = CORE_INVALID;
transition_count[CORE_S1]++; transition_count[CORE_S1]++;
} }
break; break;
case CORE_INT: case CORE_INT:
if( NEXT_SYMBOL == '.' ) { if (NEXT_SYMBOL == '.')
{
state = CORE_FLOAT; state = CORE_FLOAT;
transition_count[CORE_INT]++; transition_count[CORE_INT]++;
} }
else if(!ee_isdigit(NEXT_SYMBOL)) { else if (!ee_isdigit(NEXT_SYMBOL))
{
state = CORE_INVALID; state = CORE_INVALID;
transition_count[CORE_INT]++; transition_count[CORE_INT]++;
} }
break; break;
case CORE_FLOAT: case CORE_FLOAT:
if( NEXT_SYMBOL == 'E' || NEXT_SYMBOL == 'e' ) { if (NEXT_SYMBOL == 'E' || NEXT_SYMBOL == 'e')
{
state = CORE_S2; state = CORE_S2;
transition_count[CORE_FLOAT]++; transition_count[CORE_FLOAT]++;
} }
else if(!ee_isdigit(NEXT_SYMBOL)) { else if (!ee_isdigit(NEXT_SYMBOL))
{
state = CORE_INVALID; state = CORE_INVALID;
transition_count[CORE_FLOAT]++; transition_count[CORE_FLOAT]++;
} }
break; break;
case CORE_S2: case CORE_S2:
if( NEXT_SYMBOL == '+' || NEXT_SYMBOL == '-' ) { if (NEXT_SYMBOL == '+' || NEXT_SYMBOL == '-')
{
state = CORE_EXPONENT; state = CORE_EXPONENT;
transition_count[CORE_S2]++; transition_count[CORE_S2]++;
} }
else { else
{
state = CORE_INVALID; state = CORE_INVALID;
transition_count[CORE_S2]++; transition_count[CORE_S2]++;
} }
break; break;
case CORE_EXPONENT: case CORE_EXPONENT:
if(ee_isdigit(NEXT_SYMBOL)) { if (ee_isdigit(NEXT_SYMBOL))
{
state = CORE_SCIENTIFIC; state = CORE_SCIENTIFIC;
transition_count[CORE_EXPONENT]++; transition_count[CORE_EXPONENT]++;
} }
else { else
{
state = CORE_INVALID; state = CORE_INVALID;
transition_count[CORE_EXPONENT]++; transition_count[CORE_EXPONENT]++;
} }
break; break;
case CORE_SCIENTIFIC: case CORE_SCIENTIFIC:
if(!ee_isdigit(NEXT_SYMBOL)) { if (!ee_isdigit(NEXT_SYMBOL))
{
state = CORE_INVALID; state = CORE_INVALID;
transition_count[CORE_INVALID]++; transition_count[CORE_INVALID]++;
} }

View File

@ -20,15 +20,18 @@ Original Author: Shay Gal-on
/* Function: get_seed /* Function: get_seed
Get a values that cannot be determined at compile time. Get a values that cannot be determined at compile time.
Since different embedded systems and compilers are used, 3 different methods are provided: Since different embedded systems and compilers are used, 3 different
1 - Using a volatile variable. This method is only valid if the compiler is forced to generate code that methods are provided: 1 - Using a volatile variable. This method is only
reads the value of a volatile variable from memory at run time. valid if the compiler is forced to generate code that reads the value of a
Please note, if using this method, you would need to modify core_portme.c to generate training profile. volatile variable from memory at run time. Please note, if using this method,
2 - Command line arguments. This is the preferred method if command line arguments are supported. you would need to modify core_portme.c to generate training profile. 2 -
3 - System function. If none of the first 2 methods is available on the platform, Command line arguments. This is the preferred method if command line
a system function which is not a stub can be used. arguments are supported. 3 - System function. If none of the first 2 methods
is available on the platform, a system function which is not a stub can be
used.
e.g. read the value on GPIO pins connected to switches, or invoke special simulator functions. e.g. read the value on GPIO pins connected to switches, or invoke
special simulator functions.
*/ */
#if (SEED_METHOD == SEED_VOLATILE) #if (SEED_METHOD == SEED_VOLATILE)
extern volatile ee_s32 seed1_volatile; extern volatile ee_s32 seed1_volatile;
@ -36,9 +39,12 @@ Original Author: Shay Gal-on
extern volatile ee_s32 seed3_volatile; extern volatile ee_s32 seed3_volatile;
extern volatile ee_s32 seed4_volatile; extern volatile ee_s32 seed4_volatile;
extern volatile ee_s32 seed5_volatile; extern volatile ee_s32 seed5_volatile;
ee_s32 get_seed_32(int i) { ee_s32
get_seed_32(int i)
{
ee_s32 retval; ee_s32 retval;
switch (i) { switch (i)
{
case 1: case 1:
retval = seed1_volatile; retval = seed1_volatile;
break; break;
@ -61,21 +67,28 @@ Original Author: Shay Gal-on
return retval; return retval;
} }
#elif (SEED_METHOD == SEED_ARG) #elif (SEED_METHOD == SEED_ARG)
ee_s32 parseval(char *valstring) { ee_s32
parseval(char *valstring)
{
ee_s32 retval = 0; ee_s32 retval = 0;
ee_s32 neg = 1; ee_s32 neg = 1;
int hexmode = 0; int hexmode = 0;
if (*valstring == '-') { if (*valstring == '-')
{
neg = -1; neg = -1;
valstring++; valstring++;
} }
if ((valstring[0] == '0') && (valstring[1] == 'x')) { if ((valstring[0] == '0') && (valstring[1] == 'x'))
{
hexmode = 1; hexmode = 1;
valstring += 2; valstring += 2;
} }
/* first look for digits */ /* first look for digits */
if (hexmode) { if (hexmode)
while (((*valstring >= '0') && (*valstring <= '9')) || ((*valstring >= 'a') && (*valstring <= 'f'))) { {
while (((*valstring >= '0') && (*valstring <= '9'))
|| ((*valstring >= 'a') && (*valstring <= 'f')))
{
ee_s32 digit = *valstring - '0'; ee_s32 digit = *valstring - '0';
if (digit > 9) if (digit > 9)
digit = 10 + *valstring - 'a'; digit = 10 + *valstring - 'a';
@ -83,8 +96,11 @@ ee_s32 parseval(char *valstring) {
retval += digit; retval += digit;
valstring++; valstring++;
} }
} else { }
while ((*valstring >= '0') && (*valstring <= '9')) { else
{
while ((*valstring >= '0') && (*valstring <= '9'))
{
ee_s32 digit = *valstring - '0'; ee_s32 digit = *valstring - '0';
retval *= 10; retval *= 10;
retval += digit; retval += digit;
@ -101,17 +117,23 @@ ee_s32 parseval(char *valstring) {
return retval; return retval;
} }
ee_s32 get_seed_args(int i, int argc, char *argv[]) { ee_s32
get_seed_args(int i, int argc, char *argv[])
{
if (argc > i) if (argc > i)
return parseval(argv[i]); return parseval(argv[i]);
return 0; return 0;
} }
#elif (SEED_METHOD == SEED_FUNC) #elif (SEED_METHOD == SEED_FUNC)
/* If using OS based function, you must define and implement the functions below in core_portme.h and core_portme.c ! */ /* If using OS based function, you must define and implement the functions below
ee_s32 get_seed_32(int i) { * in core_portme.h and core_portme.c ! */
ee_s32
get_seed_32(int i)
{
ee_s32 retval; ee_s32 retval;
switch (i) { switch (i)
{
case 1: case 1:
retval = portme_sys1(); retval = portme_sys1();
break; break;
@ -139,7 +161,8 @@ ee_s32 get_seed_32(int i) {
Service functions to calculate 16b CRC code. Service functions to calculate 16b CRC code.
*/ */
ee_u16 crcu8(ee_u8 data, ee_u16 crc ) ee_u16
crcu8(ee_u8 data, ee_u16 crc)
{ {
ee_u8 i = 0, x16 = 0, carry = 0; ee_u8 i = 0, x16 = 0, carry = 0;
@ -163,47 +186,63 @@ ee_u16 crcu8(ee_u8 data, ee_u16 crc )
} }
return crc; return crc;
} }
ee_u16 crcu16(ee_u16 newval, ee_u16 crc) { ee_u16
crcu16(ee_u16 newval, ee_u16 crc)
{
crc = crcu8((ee_u8)(newval), crc); crc = crcu8((ee_u8)(newval), crc);
crc = crcu8((ee_u8)((newval) >> 8), crc); crc = crcu8((ee_u8)((newval) >> 8), crc);
return crc; return crc;
} }
ee_u16 crcu32(ee_u32 newval, ee_u16 crc) { ee_u16
crcu32(ee_u32 newval, ee_u16 crc)
{
crc = crc16((ee_s16)newval, crc); crc = crc16((ee_s16)newval, crc);
crc = crc16((ee_s16)(newval >> 16), crc); crc = crc16((ee_s16)(newval >> 16), crc);
return crc; return crc;
} }
ee_u16 crc16(ee_s16 newval, ee_u16 crc) { ee_u16
crc16(ee_s16 newval, ee_u16 crc)
{
return crcu16((ee_u16)newval, crc); return crcu16((ee_u16)newval, crc);
} }
ee_u8 check_data_types() { ee_u8
check_data_types()
{
ee_u8 retval = 0; ee_u8 retval = 0;
if (sizeof(ee_u8) != 1) { if (sizeof(ee_u8) != 1)
{
ee_printf("ERROR: ee_u8 is not an 8b datatype!\n"); ee_printf("ERROR: ee_u8 is not an 8b datatype!\n");
retval++; retval++;
} }
if (sizeof(ee_u16) != 2) { if (sizeof(ee_u16) != 2)
{
ee_printf("ERROR: ee_u16 is not a 16b datatype!\n"); ee_printf("ERROR: ee_u16 is not a 16b datatype!\n");
retval++; retval++;
} }
if (sizeof(ee_s16) != 2) { if (sizeof(ee_s16) != 2)
{
ee_printf("ERROR: ee_s16 is not a 16b datatype!\n"); ee_printf("ERROR: ee_s16 is not a 16b datatype!\n");
retval++; retval++;
} }
if (sizeof(ee_s32) != 4) { if (sizeof(ee_s32) != 4)
{
ee_printf("ERROR: ee_s32 is not a 32b datatype!\n"); ee_printf("ERROR: ee_s32 is not a 32b datatype!\n");
retval++; retval++;
} }
if (sizeof(ee_u32) != 4) { if (sizeof(ee_u32) != 4)
{
ee_printf("ERROR: ee_u32 is not a 32b datatype!\n"); ee_printf("ERROR: ee_u32 is not a 32b datatype!\n");
retval++; retval++;
} }
if (sizeof(ee_ptr_int) != sizeof(int *)) { if (sizeof(ee_ptr_int) != sizeof(int *))
ee_printf("ERROR: ee_ptr_int is not a datatype that holds an int pointer!\n"); {
ee_printf(
"ERROR: ee_ptr_int is not a datatype that holds an int pointer!\n");
retval++; retval++;
} }
if (retval>0) { if (retval > 0)
{
ee_printf("ERROR: Please modify the datatypes in core_portme.h!\n"); ee_printf("ERROR: Please modify the datatypes in core_portme.h!\n");
} }
return retval; return retval;

View File

@ -48,8 +48,8 @@ Original Author: Shay Gal-on
void *iterate(void *pres); void *iterate(void *pres);
/* Typedef: secs_ret /* Typedef: secs_ret
For machines that have floating point support, get number of seconds as a double. For machines that have floating point support, get number of seconds as
Otherwise an unsigned int. a double. Otherwise an unsigned int.
*/ */
#if HAS_FLOAT #if HAS_FLOAT
typedef double secs_ret; typedef double secs_ret;
@ -75,7 +75,7 @@ ee_u16 crcu8(ee_u8 data, ee_u16 crc);
ee_u16 crc16(ee_s16 newval, ee_u16 crc); ee_u16 crc16(ee_s16 newval, ee_u16 crc);
ee_u16 crcu16(ee_u16 newval, ee_u16 crc); ee_u16 crcu16(ee_u16 newval, ee_u16 crc);
ee_u16 crcu32(ee_u32 newval, ee_u16 crc); ee_u16 crcu32(ee_u32 newval, ee_u16 crc);
ee_u8 check_data_types(); ee_u8 check_data_types(void);
void * portable_malloc(ee_size_t size); void * portable_malloc(ee_size_t size);
void portable_free(void *p); void portable_free(void *p);
ee_s32 parseval(char *valstring); ee_s32 parseval(char *valstring);
@ -88,17 +88,18 @@ ee_s32 parseval(char *valstring);
#define NUM_ALGORITHMS 3 #define NUM_ALGORITHMS 3
/* list data structures */ /* list data structures */
typedef struct list_data_s { typedef struct list_data_s
{
ee_s16 data16; ee_s16 data16;
ee_s16 idx; ee_s16 idx;
} list_data; } list_data;
typedef struct list_head_s { typedef struct list_head_s
{
struct list_head_s *next; struct list_head_s *next;
struct list_data_s *info; struct list_data_s *info;
} list_head; } list_head;
/*matrix benchmark related stuff */ /*matrix benchmark related stuff */
#define MATDAT_INT 1 #define MATDAT_INT 1
#if MATDAT_INT #if MATDAT_INT
@ -109,7 +110,8 @@ typedef ee_f16 MATDAT;
typedef ee_f32 MATRES; typedef ee_f32 MATRES;
#endif #endif
typedef struct MAT_PARAMS_S { typedef struct MAT_PARAMS_S
{
int N; int N;
MATDAT *A; MATDAT *A;
MATDAT *B; MATDAT *B;
@ -118,7 +120,8 @@ typedef struct MAT_PARAMS_S {
/* state machine related stuff */ /* state machine related stuff */
/* List of all the possible states for the FSM */ /* List of all the possible states for the FSM */
typedef enum CORE_STATE { typedef enum CORE_STATE
{
CORE_START = 0, CORE_START = 0,
CORE_INVALID, CORE_INVALID,
CORE_S1, CORE_S1,
@ -130,9 +133,9 @@ typedef enum CORE_STATE {
NUM_CORE_STATES NUM_CORE_STATES
} core_state_e; } core_state_e;
/* Helper structure to hold results */ /* Helper structure to hold results */
typedef struct RESULTS_S { typedef struct RESULTS_S
{
/* inputs */ /* inputs */
ee_s16 seed1; /* Initializing seed */ ee_s16 seed1; /* Initializing seed */
ee_s16 seed2; /* Initializing seed */ ee_s16 seed2; /* Initializing seed */
@ -165,10 +168,16 @@ ee_u16 core_bench_list(core_results *res, ee_s16 finder_idx);
/* state benchmark functions */ /* state benchmark functions */
void core_init_state(ee_u32 size, ee_s16 seed, ee_u8 *p); void core_init_state(ee_u32 size, ee_s16 seed, ee_u8 *p);
ee_u16 core_bench_state(ee_u32 blksize, ee_u8 *memblock, ee_u16 core_bench_state(ee_u32 blksize,
ee_s16 seed1, ee_s16 seed2, ee_s16 step, ee_u16 crc); ee_u8 *memblock,
ee_s16 seed1,
ee_s16 seed2,
ee_s16 step,
ee_u16 crc);
/* matrix benchmark functions */ /* matrix benchmark functions */
ee_u32 core_init_matrix(ee_u32 blksize, void *memblk, ee_s32 seed, mat_params *p); ee_u32 core_init_matrix(ee_u32 blksize,
void * memblk,
ee_s32 seed,
mat_params *p);
ee_u16 core_bench_matrix(mat_params *p, ee_s16 seed, ee_u16 crc); ee_u16 core_bench_matrix(mat_params *p, ee_s16 seed, ee_u16 crc);

View File

@ -0,0 +1,6 @@
8d082dc4a9676c02731a8cf209339072 core_list_join.c
c984863b84b59185d8b5fb81c1ca7535 core_main.c
5fa21a0f7c3964167c9691db531ca652 core_matrix.c
edcfc7a0b146a50028014f06e6826aa3 core_state.c
45540ba2145adea1ec7ea2c72a1fbbcb core_util.c
8ca974c013b380dc7f0d6d1afb76eb2d coremark.h

126
riscv-coremark/coremark/cygwin/core_portme.mak Executable file → Normal file
View File

@ -14,128 +14,4 @@
# #
# Original Author: Shay Gal-on # Original Author: Shay Gal-on
#File: core_portme.mak include posix/core_portme.mak
# Flag: OUTFLAG
# Use this flag to define how to to get an executable (e.g -o)
OUTFLAG= -o
# Flag: CC
# Use this flag to define compiler to use
CC = gcc
# Flag: CFLAGS
# Use this flag to define compiler options. Note, you can add compiler options from the command line using XCFLAGS="other flags"
PORT_CFLAGS = -O2
FLAGS_STR = "$(PORT_CFLAGS) $(XCFLAGS) $(XLFLAGS) $(LFLAGS_END)"
CFLAGS = $(PORT_CFLAGS) -I$(PORT_DIR) -I. -DFLAGS_STR=\"$(FLAGS_STR)\"
#Flag: LFLAGS_END
# Define any libraries needed for linking or other flags that should come at the end of the link line (e.g. linker scripts).
# Note: On certain platforms, the default clock_gettime implementation is supported but requires linking of librt.
LFLAGS_END =
# Flag: PORT_SRCS
# Port specific source files can be added here
PORT_SRCS = $(PORT_DIR)/core_portme.c
# Flag: LOAD
# Define this flag if you need to load to a target, as in a cross compile environment.
# Flag: RUN
# Define this flag if running does not consist of simple invocation of the binary.
# In a cross compile environment, you need to define this.
#For flashing and using a tera term macro, you could use
#LOAD = flash ADDR
#RUN = ttpmacro coremark.ttl
#For copying to target and executing via SSH connection, you could use
#LOAD = scp $(OUTFILE) user@target:~
#RUN = ssh user@target -c
#For native compilation and execution
LOAD = echo Loading done
RUN =
OEXT = .o
EXE = .exe
# Flag: SEPARATE_COMPILE
# Define if you need to separate compilation from link stage.
# In this case, you also need to define below how to create an object file, and how to link.
ifdef SEPARATE_COMPILE
LD = gcc
OBJOUT = -o
LFLAGS =
OFLAG = -o
COUT = -c
# Flag: PORT_OBJS
# Port specific object files can be added here
PORT_OBJS = $(PORT_DIR)/core_portme$(OEXT)
PORT_CLEAN = *$(OEXT)
$(OPATH)%$(OEXT) : %.c
$(CC) $(CFLAGS) $(XCFLAGS) $(COUT) $< $(OBJOUT) $@
endif
# Target: port_prebuild
# Generate any files that are needed before actual build starts.
# E.g. generate profile guidance files. Sample PGO generation for gcc enabled with PGO=1
# - First, check if PGO was defined on the command line, if so, need to add -fprofile-use to compile line.
# - Second, if PGO reference has not yet been generated, add a step to the prebuild that will build a profile-generate version and run it.
# Note - Using REBUILD=1
#
# Use make PGO=1 to invoke this sample processing.
ifdef PGO
ifeq (,$(findstring $(PGO),gen))
PGO_STAGE=build_pgo_gcc
CFLAGS+=-fprofile-use
endif
PORT_CLEAN+=*.gcda *.gcno gmon.out
endif
.PHONY: port_prebuild
port_prebuild: $(PGO_STAGE)
.PHONY: build_pgo_gcc
build_pgo_gcc:
$(MAKE) PGO=gen XCFLAGS="$(XCFLAGS) -fprofile-generate -DTOTAL_DATA_SIZE=1200" ITERATIONS=10 gen_pgo_data REBUILD=1
# Target: port_postbuild
# Generate any files that are needed after actual build end.
# E.g. change format to srec, bin, zip in order to be able to load into flash
.PHONY: port_postbuild
port_postbuild:
# Target: port_postrun
# Do platform specific after run stuff.
# E.g. reset the board, backup the logfiles etc.
.PHONY: port_postrun
port_postrun:
# Target: port_prerun
# Do platform specific after run stuff.
# E.g. reset the board, backup the logfiles etc.
.PHONY: port_prerun
port_prerun:
# Target: port_postload
# Do platform specific after load stuff.
# E.g. reset the reset power to the flash eraser
.PHONY: port_postload
port_postload:
# Target: port_preload
# Do platform specific before load stuff.
# E.g. reset the reset power to the flash eraser
.PHONY: port_preload
port_preload:
# FLAG: OPATH
# Path to the output folder. Default - current folder.
OPATH = ./
MKDIR = mkdir -p
# FLAG: PERL
# Define perl executable to calculate the geomean if running separate.
PERL=perl

View File

@ -0,0 +1,17 @@
# Copyright 2018 Embedded Microprocessor Benchmark Consortium (EEMBC)
#
# 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.
#
# Original Author: Shay Gal-on
include posix/core_portme.mak

125
riscv-coremark/coremark/linux/core_portme.mak Executable file → Normal file
View File

@ -14,127 +14,4 @@
# #
# Original Author: Shay Gal-on # Original Author: Shay Gal-on
#File: core_portme.mak include posix/core_portme.mak
# Flag: OUTFLAG
# Use this flag to define how to to get an executable (e.g -o)
OUTFLAG= -o
# Flag: CC
# Use this flag to define compiler to use
CC = gcc
# Flag: CFLAGS
# Use this flag to define compiler options. Note, you can add compiler options from the command line using XCFLAGS="other flags"
PORT_CFLAGS = -O2
FLAGS_STR = "$(PORT_CFLAGS) $(XCFLAGS) $(XLFLAGS) $(LFLAGS_END)"
CFLAGS = $(PORT_CFLAGS) -I$(PORT_DIR) -I. -DFLAGS_STR=\"$(FLAGS_STR)\"
#Flag: LFLAGS_END
# Define any libraries needed for linking or other flags that should come at the end of the link line (e.g. linker scripts).
# Note: On certain platforms, the default clock_gettime implementation is supported but requires linking of librt.
LFLAGS_END += -lrt
# Flag: PORT_SRCS
# Port specific source files can be added here
PORT_SRCS = $(PORT_DIR)/core_portme.c
# Flag: LOAD
# Define this flag if you need to load to a target, as in a cross compile environment.
# Flag: RUN
# Define this flag if running does not consist of simple invocation of the binary.
# In a cross compile environment, you need to define this.
#For flashing and using a tera term macro, you could use
#LOAD = flash ADDR
#RUN = ttpmacro coremark.ttl
#For copying to target and executing via SSH connection, you could use
#LOAD = scp $(OUTFILE) user@target:~
#RUN = ssh user@target -c
#For native compilation and execution
LOAD = echo Loading done
RUN =
OEXT = .o
EXE = .exe
# Flag: SEPARATE_COMPILE
# Define if you need to separate compilation from link stage.
# In this case, you also need to define below how to create an object file, and how to link.
ifdef SEPARATE_COMPILE
LD = gcc
OBJOUT = -o
LFLAGS =
OFLAG = -o
COUT = -c
# Flag: PORT_OBJS
# Port specific object files can be added here
PORT_OBJS = $(PORT_DIR)/core_portme$(OEXT)
PORT_CLEAN = *$(OEXT)
$(OPATH)%$(OEXT) : %.c
$(CC) $(CFLAGS) $(XCFLAGS) $(COUT) $< $(OBJOUT) $@
endif
# Target: port_prebuild
# Generate any files that are needed before actual build starts.
# E.g. generate profile guidance files. Sample PGO generation for gcc enabled with PGO=1
# - First, check if PGO was defined on the command line, if so, need to add -fprofile-use to compile line.
# - Second, if PGO reference has not yet been generated, add a step to the prebuild that will build a profile-generate version and run it.
# Note - Using REBUILD=1
#
# Use make PGO=1 to invoke this sample processing.
ifdef PGO
ifeq (,$(findstring $(PGO),gen))
PGO_STAGE=build_pgo_gcc
CFLAGS+=-fprofile-use
endif
PORT_CLEAN+=*.gcda *.gcno gmon.out
endif
.PHONY: port_prebuild
port_prebuild: $(PGO_STAGE)
.PHONY: build_pgo_gcc
build_pgo_gcc:
$(MAKE) PGO=gen XCFLAGS="$(XCFLAGS) -fprofile-generate -DTOTAL_DATA_SIZE=1200" ITERATIONS=10 gen_pgo_data REBUILD=1
# Target: port_postbuild
# Generate any files that are needed after actual build end.
# E.g. change format to srec, bin, zip in order to be able to load into flash
.PHONY: port_postbuild
port_postbuild:
# Target: port_postrun
# Do platform specific after run stuff.
# E.g. reset the board, backup the logfiles etc.
.PHONY: port_postrun
port_postrun:
# Target: port_prerun
# Do platform specific after run stuff.
# E.g. reset the board, backup the logfiles etc.
.PHONY: port_prerun
port_prerun:
# Target: port_postload
# Do platform specific after load stuff.
# E.g. reset the reset power to the flash eraser
.PHONY: port_postload
port_postload:
# Target: port_preload
# Do platform specific before load stuff.
# E.g. reset the reset power to the flash eraser
.PHONY: port_preload
port_preload:
# FLAG: OPATH
# Path to the output folder. Default - current folder.
OPATH = ./
MKDIR = mkdir -p
# FLAG: PERL
# Define perl executable to calculate the geomean if running separate.
PERL=/usr/bin/perl

View File

@ -0,0 +1,18 @@
# Copyright 2018 Embedded Microprocessor Benchmark Consortium (EEMBC)
#
# 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.
#
# Original Author: Shay Gal-on
NO_LIBRT = 1
include posix/core_portme.mak

View File

@ -0,0 +1,419 @@
/*
Copyright 2018 Embedded Microprocessor Benchmark Consortium (EEMBC)
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.
Original Author: Shay Gal-on
*/
#include <stdio.h>
#include <stdlib.h>
#include "coremark.h"
#if CALLGRIND_RUN
#include <valgrind/callgrind.h>
#endif
#if (MEM_METHOD == MEM_MALLOC)
/* Function: portable_malloc
Provide malloc() functionality in a platform specific way.
*/
void *
portable_malloc(size_t size)
{
return malloc(size);
}
/* Function: portable_free
Provide free() functionality in a platform specific way.
*/
void
portable_free(void *p)
{
free(p);
}
#else
void *
portable_malloc(size_t size)
{
return NULL;
}
void
portable_free(void *p)
{
p = NULL;
}
#endif
#if (SEED_METHOD == SEED_VOLATILE)
#if VALIDATION_RUN
volatile ee_s32 seed1_volatile = 0x3415;
volatile ee_s32 seed2_volatile = 0x3415;
volatile ee_s32 seed3_volatile = 0x66;
#endif
#if PERFORMANCE_RUN
volatile ee_s32 seed1_volatile = 0x0;
volatile ee_s32 seed2_volatile = 0x0;
volatile ee_s32 seed3_volatile = 0x66;
#endif
#if PROFILE_RUN
volatile ee_s32 seed1_volatile = 0x8;
volatile ee_s32 seed2_volatile = 0x8;
volatile ee_s32 seed3_volatile = 0x8;
#endif
volatile ee_s32 seed4_volatile = ITERATIONS;
volatile ee_s32 seed5_volatile = 0;
#endif
/* Porting: Timing functions
How to capture time and convert to seconds must be ported to whatever is
supported by the platform. e.g. Read value from on board RTC, read value from
cpu clock cycles performance counter etc. Sample implementation for standard
time.h and windows.h definitions included.
*/
/* Define: TIMER_RES_DIVIDER
Divider to trade off timer resolution and total time that can be
measured.
Use lower values to increase resolution, but make sure that overflow
does not occur. If there are issues with the return value overflowing,
increase this value.
*/
#if USE_CLOCK
#define NSECS_PER_SEC CLOCKS_PER_SEC
#define EE_TIMER_TICKER_RATE 1000
#define CORETIMETYPE clock_t
#define GETMYTIME(_t) (*_t = clock())
#define MYTIMEDIFF(fin, ini) ((fin) - (ini))
#define TIMER_RES_DIVIDER 1
#define SAMPLE_TIME_IMPLEMENTATION 1
#elif defined(_MSC_VER)
#define NSECS_PER_SEC 10000000
#define EE_TIMER_TICKER_RATE 1000
#define CORETIMETYPE FILETIME
#define GETMYTIME(_t) GetSystemTimeAsFileTime(_t)
#define MYTIMEDIFF(fin, ini) \
(((*(__int64 *)&fin) - (*(__int64 *)&ini)) / TIMER_RES_DIVIDER)
/* setting to millisces resolution by default with MSDEV */
#ifndef TIMER_RES_DIVIDER
#define TIMER_RES_DIVIDER 1000
#endif
#define SAMPLE_TIME_IMPLEMENTATION 1
#elif HAS_TIME_H
#define NSECS_PER_SEC 1000000000
#define EE_TIMER_TICKER_RATE 1000
#define CORETIMETYPE struct timespec
#define GETMYTIME(_t) clock_gettime(CLOCK_REALTIME, _t)
#define MYTIMEDIFF(fin, ini) \
((fin.tv_sec - ini.tv_sec) * (NSECS_PER_SEC / TIMER_RES_DIVIDER) \
+ (fin.tv_nsec - ini.tv_nsec) / TIMER_RES_DIVIDER)
/* setting to 1/1000 of a second resolution by default with linux */
#ifndef TIMER_RES_DIVIDER
#define TIMER_RES_DIVIDER 1000000
#endif
#define SAMPLE_TIME_IMPLEMENTATION 1
#else
#define SAMPLE_TIME_IMPLEMENTATION 0
#endif
#define EE_TICKS_PER_SEC (NSECS_PER_SEC / TIMER_RES_DIVIDER)
#if SAMPLE_TIME_IMPLEMENTATION
/** Define Host specific (POSIX), or target specific global time variables. */
static CORETIMETYPE start_time_val, stop_time_val;
/* Function: start_time
This function will be called right before starting the timed portion of
the benchmark.
Implementation may be capturing a system timer (as implemented in the
example code) or zeroing some system parameters - e.g. setting the cpu clocks
cycles to 0.
*/
void
start_time(void)
{
GETMYTIME(&start_time_val);
#if CALLGRIND_RUN
CALLGRIND_START_INSTRUMENTATION
#endif
#if MICA
asm volatile("int3"); /*1 */
#endif
}
/* Function: stop_time
This function will be called right after ending the timed portion of the
benchmark.
Implementation may be capturing a system timer (as implemented in the
example code) or other system parameters - e.g. reading the current value of
cpu cycles counter.
*/
void
stop_time(void)
{
#if CALLGRIND_RUN
CALLGRIND_STOP_INSTRUMENTATION
#endif
#if MICA
asm volatile("int3"); /*1 */
#endif
GETMYTIME(&stop_time_val);
}
/* Function: get_time
Return an abstract "ticks" number that signifies time on the system.
Actual value returned may be cpu cycles, milliseconds or any other
value, as long as it can be converted to seconds by <time_in_secs>. This
methodology is taken to accomodate any hardware or simulated platform. The
sample implementation returns millisecs by default, and the resolution is
controlled by <TIMER_RES_DIVIDER>
*/
CORE_TICKS
get_time(void)
{
CORE_TICKS elapsed
= (CORE_TICKS)(MYTIMEDIFF(stop_time_val, start_time_val));
return elapsed;
}
/* Function: time_in_secs
Convert the value returned by get_time to seconds.
The <secs_ret> type is used to accomodate systems with no support for
floating point. Default implementation implemented by the EE_TICKS_PER_SEC
macro above.
*/
secs_ret
time_in_secs(CORE_TICKS ticks)
{
secs_ret retval = ((secs_ret)ticks) / (secs_ret)EE_TICKS_PER_SEC;
return retval;
}
#else
#error "Please implement timing functionality in core_portme.c"
#endif /* SAMPLE_TIME_IMPLEMENTATION */
ee_u32 default_num_contexts = MULTITHREAD;
/* Function: portable_init
Target specific initialization code
Test for some common mistakes.
*/
void
portable_init(core_portable *p, int *argc, char *argv[])
{
#if PRINT_ARGS
int i;
for (i = 0; i < *argc; i++)
{
ee_printf("Arg[%d]=%s\n", i, argv[i]);
}
#endif
if (sizeof(ee_ptr_int) != sizeof(ee_u8 *))
{
ee_printf(
"ERROR! Please define ee_ptr_int to a type that holds a "
"pointer!\n");
}
if (sizeof(ee_u32) != 4)
{
ee_printf("ERROR! Please define ee_u32 to a 32b unsigned type!\n");
}
#if (MAIN_HAS_NOARGC && (SEED_METHOD == SEED_ARG))
ee_printf(
"ERROR! Main has no argc, but SEED_METHOD defined to SEED_ARG!\n");
#endif
#if (MULTITHREAD > 1) && (SEED_METHOD == SEED_ARG)
int nargs = *argc, i;
if ((nargs > 1) && (*argv[1] == 'M'))
{
default_num_contexts = parseval(argv[1] + 1);
if (default_num_contexts > MULTITHREAD)
default_num_contexts = MULTITHREAD;
/* Shift args since first arg is directed to the portable part and not
* to coremark main */
--nargs;
for (i = 1; i < nargs; i++)
argv[i] = argv[i + 1];
*argc = nargs;
}
#endif /* sample of potential platform specific init via command line, reset \
the number of contexts being used if first argument is M<n>*/
p->portable_id = 1;
}
/* Function: portable_fini
Target specific final code
*/
void
portable_fini(core_portable *p)
{
p->portable_id = 0;
}
#if (MULTITHREAD > 1)
/* Function: core_start_parallel
Start benchmarking in a parallel context.
Three implementations are provided, one using pthreads, one using fork
and shared mem, and one using fork and sockets. Other implementations using
MCAPI or other standards can easily be devised.
*/
/* Function: core_stop_parallel
Stop a parallel context execution of coremark, and gather the results.
Three implementations are provided, one using pthreads, one using fork
and shared mem, and one using fork and sockets. Other implementations using
MCAPI or other standards can easily be devised.
*/
#if USE_PTHREAD
ee_u8
core_start_parallel(core_results *res)
{
return (ee_u8)pthread_create(
&(res->port.thread), NULL, iterate, (void *)res);
}
ee_u8
core_stop_parallel(core_results *res)
{
void *retval;
return (ee_u8)pthread_join(res->port.thread, &retval);
}
#elif USE_FORK
static int key_id = 0;
ee_u8
core_start_parallel(core_results *res)
{
key_t key = 4321 + key_id;
key_id++;
res->port.pid = fork();
res->port.shmid = shmget(key, 8, IPC_CREAT | 0666);
if (res->port.shmid < 0)
{
ee_printf("ERROR in shmget!\n");
}
if (res->port.pid == 0)
{
iterate(res);
res->port.shm = shmat(res->port.shmid, NULL, 0);
/* copy the validation values to the shared memory area and quit*/
if (res->port.shm == (char *)-1)
{
ee_printf("ERROR in child shmat!\n");
}
else
{
memcpy(res->port.shm, &(res->crc), 8);
shmdt(res->port.shm);
}
exit(0);
}
return 1;
}
ee_u8
core_stop_parallel(core_results *res)
{
int status;
pid_t wpid = waitpid(res->port.pid, &status, WUNTRACED);
if (wpid != res->port.pid)
{
ee_printf("ERROR waiting for child.\n");
if (errno == ECHILD)
ee_printf("errno=No such child %d\n", res->port.pid);
if (errno == EINTR)
ee_printf("errno=Interrupted\n");
return 0;
}
/* after process is done, get the values from the shared memory area */
res->port.shm = shmat(res->port.shmid, NULL, 0);
if (res->port.shm == (char *)-1)
{
ee_printf("ERROR in parent shmat!\n");
return 0;
}
memcpy(&(res->crc), res->port.shm, 8);
shmdt(res->port.shm);
return 1;
}
#elif USE_SOCKET
static int key_id = 0;
ee_u8
core_start_parallel(core_results *res)
{
int bound, buffer_length = 8;
res->port.sa.sin_family = AF_INET;
res->port.sa.sin_addr.s_addr = htonl(0x7F000001);
res->port.sa.sin_port = htons(7654 + key_id);
key_id++;
res->port.pid = fork();
if (res->port.pid == 0)
{ /* benchmark child */
iterate(res);
res->port.sock = socket(PF_INET, SOCK_DGRAM, IPPROTO_UDP);
if (-1 == res->port.sock) /* if socket failed to initialize, exit */
{
ee_printf("Error Creating Socket");
}
else
{
int bytes_sent = sendto(res->port.sock,
&(res->crc),
buffer_length,
0,
(struct sockaddr *)&(res->port.sa),
sizeof(struct sockaddr_in));
if (bytes_sent < 0)
ee_printf("Error sending packet: %s\n", strerror(errno));
close(res->port.sock); /* close the socket */
}
exit(0);
}
/* parent process, open the socket */
res->port.sock = socket(PF_INET, SOCK_DGRAM, IPPROTO_UDP);
bound = bind(res->port.sock,
(struct sockaddr *)&(res->port.sa),
sizeof(struct sockaddr));
if (bound < 0)
ee_printf("bind(): %s\n", strerror(errno));
return 1;
}
ee_u8
core_stop_parallel(core_results *res)
{
int status;
int fromlen = sizeof(struct sockaddr);
int recsize = recvfrom(res->port.sock,
&(res->crc),
8,
0,
(struct sockaddr *)&(res->port.sa),
&fromlen);
if (recsize < 0)
{
ee_printf("Error in receive: %s\n", strerror(errno));
return 0;
}
pid_t wpid = waitpid(res->port.pid, &status, WUNTRACED);
if (wpid != res->port.pid)
{
ee_printf("ERROR waiting for child.\n");
if (errno == ECHILD)
ee_printf("errno=No such child %d\n", res->port.pid);
if (errno == EINTR)
ee_printf("errno=Interrupted\n");
return 0;
}
return 1;
}
#else /* no standard multicore implementation */
#error \
"Please implement multicore functionality in core_portme.c to use multiple contexts."
#endif /* multithread implementations */
#endif

View File

@ -0,0 +1,314 @@
/*
Copyright 2018 Embedded Microprocessor Benchmark Consortium (EEMBC)
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.
Original Author: Shay Gal-on
*/
/* Topic: Description
This file contains configuration constants required to execute on
different platforms
*/
#ifndef CORE_PORTME_H
#define CORE_PORTME_H
#include "core_portme_posix_overrides.h"
/************************/
/* Data types and settings */
/************************/
/* Configuration: HAS_FLOAT
Define to 1 if the platform supports floating point.
*/
#ifndef HAS_FLOAT
#define HAS_FLOAT 1
#endif
/* Configuration: HAS_TIME_H
Define to 1 if platform has the time.h header file,
and implementation of functions thereof.
*/
#ifndef HAS_TIME_H
#define HAS_TIME_H 1
#endif
/* Configuration: USE_CLOCK
Define to 1 if platform has the time.h header file,
and implementation of functions thereof.
*/
#ifndef USE_CLOCK
#define USE_CLOCK 0
#endif
/* Configuration: HAS_STDIO
Define to 1 if the platform has stdio.h.
*/
#ifndef HAS_STDIO
#define HAS_STDIO 1
#endif
/* Configuration: HAS_PRINTF
Define to 1 if the platform has stdio.h and implements the printf
function.
*/
#ifndef HAS_PRINTF
#define HAS_PRINTF 1
#endif
/* Configuration: CORE_TICKS
Define type of return from the timing functions.
*/
#if defined(_MSC_VER)
#include <windows.h>
typedef size_t CORE_TICKS;
#elif HAS_TIME_H
#include <time.h>
typedef clock_t CORE_TICKS;
#else
#error \
"Please define type of CORE_TICKS and implement start_time, end_time get_time and time_in_secs functions!"
#endif
/* Definitions: COMPILER_VERSION, COMPILER_FLAGS, MEM_LOCATION
Initialize these strings per platform
*/
#ifndef COMPILER_VERSION
#ifdef __GNUC__
#define COMPILER_VERSION "GCC"__VERSION__
#else
#define COMPILER_VERSION "Please put compiler version here (e.g. gcc 4.1)"
#endif
#endif
#ifndef COMPILER_FLAGS
#define COMPILER_FLAGS \
FLAGS_STR /* "Please put compiler flags here (e.g. -o3)" */
#endif
#ifndef MEM_LOCATION
#define MEM_LOCATION \
"Please put data memory location here\n\t\t\t(e.g. code in flash, data " \
"on heap etc)"
#define MEM_LOCATION_UNSPEC 1
#endif
#include <stdint.h>
/* Data Types:
To avoid compiler issues, define the data types that need ot be used for
8b, 16b and 32b in <core_portme.h>.
*Imprtant*:
ee_ptr_int needs to be the data type used to hold pointers, otherwise
coremark may fail!!!
*/
typedef signed short ee_s16;
typedef unsigned short ee_u16;
typedef signed int ee_s32;
typedef double ee_f32;
typedef unsigned char ee_u8;
typedef unsigned int ee_u32;
typedef uintptr_t ee_ptr_int;
typedef size_t ee_size_t;
/* align an offset to point to a 32b value */
#define align_mem(x) (void *)(4 + (((ee_ptr_int)(x)-1) & ~3))
/* Configuration: SEED_METHOD
Defines method to get seed values that cannot be computed at compile
time.
Valid values:
SEED_ARG - from command line.
SEED_FUNC - from a system function.
SEED_VOLATILE - from volatile variables.
*/
#ifndef SEED_METHOD
#define SEED_METHOD SEED_ARG
#endif
/* Configuration: MEM_METHOD
Defines method to get a block of memry.
Valid values:
MEM_MALLOC - for platforms that implement malloc and have malloc.h.
MEM_STATIC - to use a static memory array.
MEM_STACK - to allocate the data block on the stack (NYI).
*/
#ifndef MEM_METHOD
#define MEM_METHOD MEM_MALLOC
#endif
/* Configuration: MULTITHREAD
Define for parallel execution
Valid values:
1 - only one context (default).
N>1 - will execute N copies in parallel.
Note:
If this flag is defined to more then 1, an implementation for launching
parallel contexts must be defined.
Two sample implementations are provided. Use <USE_PTHREAD> or <USE_FORK>
to enable them.
It is valid to have a different implementation of <core_start_parallel>
and <core_end_parallel> in <core_portme.c>, to fit a particular architecture.
*/
#ifndef MULTITHREAD
#define MULTITHREAD 1
#endif
/* Configuration: USE_PTHREAD
Sample implementation for launching parallel contexts
This implementation uses pthread_thread_create and pthread_join.
Valid values:
0 - Do not use pthreads API.
1 - Use pthreads API
Note:
This flag only matters if MULTITHREAD has been defined to a value
greater then 1.
*/
#ifndef USE_PTHREAD
#define USE_PTHREAD 0
#endif
/* Configuration: USE_FORK
Sample implementation for launching parallel contexts
This implementation uses fork, waitpid, shmget,shmat and shmdt.
Valid values:
0 - Do not use fork API.
1 - Use fork API
Note:
This flag only matters if MULTITHREAD has been defined to a value
greater then 1.
*/
#ifndef USE_FORK
#define USE_FORK 0
#endif
/* Configuration: USE_SOCKET
Sample implementation for launching parallel contexts
This implementation uses fork, socket, sendto and recvfrom
Valid values:
0 - Do not use fork and sockets API.
1 - Use fork and sockets API
Note:
This flag only matters if MULTITHREAD has been defined to a value
greater then 1.
*/
#ifndef USE_SOCKET
#define USE_SOCKET 0
#endif
/* Configuration: MAIN_HAS_NOARGC
Needed if platform does not support getting arguments to main.
Valid values:
0 - argc/argv to main is supported
1 - argc/argv to main is not supported
*/
#ifndef MAIN_HAS_NOARGC
#define MAIN_HAS_NOARGC 0
#endif
/* Configuration: MAIN_HAS_NORETURN
Needed if platform does not support returning a value from main.
Valid values:
0 - main returns an int, and return value will be 0.
1 - platform does not support returning a value from main
*/
#ifndef MAIN_HAS_NORETURN
#define MAIN_HAS_NORETURN 0
#endif
/* Variable: default_num_contexts
Number of contexts to spawn in multicore context.
Override this global value to change number of contexts used.
Note:
This value may not be set higher then the <MULTITHREAD> define.
To experiment, you can set the <MULTITHREAD> define to the highest value
expected, and use argc/argv in the <portable_init> to set this value from the
command line.
*/
extern ee_u32 default_num_contexts;
#if (MULTITHREAD > 1)
#if USE_PTHREAD
#include <pthread.h>
#define PARALLEL_METHOD "PThreads"
#elif USE_FORK
#include <unistd.h>
#include <errno.h>
#include <sys/wait.h>
#include <sys/shm.h>
#include <string.h> /* for memcpy */
#define PARALLEL_METHOD "Fork"
#elif USE_SOCKET
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <sys/wait.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <errno.h>
#define PARALLEL_METHOD "Sockets"
#else
#define PARALLEL_METHOD "Proprietary"
#error \
"Please implement multicore functionality in core_portme.c to use multiple contexts."
#endif /* Method for multithreading */
#endif /* MULTITHREAD > 1 */
typedef struct CORE_PORTABLE_S
{
#if (MULTITHREAD > 1)
#if USE_PTHREAD
pthread_t thread;
#elif USE_FORK
pid_t pid;
int shmid;
void *shm;
#elif USE_SOCKET
pid_t pid;
int sock;
struct sockaddr_in sa;
#endif /* Method for multithreading */
#endif /* MULTITHREAD>1 */
ee_u8 portable_id;
} core_portable;
/* target specific init/fini */
void portable_init(core_portable *p, int *argc, char *argv[]);
void portable_fini(core_portable *p);
#if (SEED_METHOD == SEED_VOLATILE)
#if (VALIDATION_RUN || PERFORMANCE_RUN || PROFILE_RUN)
#define RUN_TYPE_FLAG 1
#else
#if (TOTAL_DATA_SIZE == 1200)
#define PROFILE_RUN 1
#else
#define PERFORMANCE_RUN 1
#endif
#endif
#endif /* SEED_METHOD==SEED_VOLATILE */
#endif /* CORE_PORTME_H */

View File

@ -0,0 +1,151 @@
# Copyright 2018 Embedded Microprocessor Benchmark Consortium (EEMBC)
#
# 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.
#
# Original Author: Shay Gal-on
#File: core_portme.mak
# Flag: OUTFLAG
# Use this flag to define how to to get an executable (e.g -o)
OUTFLAG= -o
# Flag: CC
# Use this flag to define compiler to use
CC?= cc
# Flag: CFLAGS
# Use this flag to define compiler options. Note, you can add compiler options from the command line using XCFLAGS="other flags"
PORT_CFLAGS = -O2
FLAGS_STR = "$(PORT_CFLAGS) $(XCFLAGS) $(XLFLAGS) $(LFLAGS_END)"
CFLAGS = $(PORT_CFLAGS) -I$(PORT_DIR) -Iposix -I. -DFLAGS_STR=\"$(FLAGS_STR)\"
# Flag: NO_LIBRT
# Define if the platform does not provide a librt
ifndef NO_LIBRT
#Flag: LFLAGS_END
# Define any libraries needed for linking or other flags that should come at the end of the link line (e.g. linker scripts).
# Note: On certain platforms, the default clock_gettime implementation is supported but requires linking of librt.
LFLAGS_END += -lrt
endif
# Flag: PORT_SRCS
# Port specific source files can be added here
PORT_SRCS = posix/core_portme.c
vpath %.c posix
vpath %.h posix
vpath %.mak posix
# Flag: EXTRA_DEPENDS
# Port specific extra build dependencies.
# Some ports inherit from us, so ensure this Makefile is always a dependency.
EXTRA_DEPENDS += posix/core_portme.mak
# Flag: LOAD
# Define this flag if you need to load to a target, as in a cross compile environment.
# Flag: RUN
# Define this flag if running does not consist of simple invocation of the binary.
# In a cross compile environment, you need to define this.
#For flashing and using a tera term macro, you could use
#LOAD = flash ADDR
#RUN = ttpmacro coremark.ttl
#For copying to target and executing via SSH connection, you could use
#LOAD = scp $(OUTFILE) user@target:~
#RUN = ssh user@target -c
#For native compilation and execution
LOAD = echo Loading done
RUN =
OEXT = .o
EXE = .exe
# Flag: SEPARATE_COMPILE
# Define if you need to separate compilation from link stage.
# In this case, you also need to define below how to create an object file, and how to link.
ifdef SEPARATE_COMPILE
LD = gcc
OBJOUT = -o
LFLAGS =
OFLAG = -o
COUT = -c
# Flag: PORT_OBJS
# Port specific object files can be added here
PORT_OBJS = $(PORT_DIR)/core_portme$(OEXT)
PORT_CLEAN = *$(OEXT)
$(OPATH)%$(OEXT) : %.c
$(CC) $(CFLAGS) $(XCFLAGS) $(COUT) $< $(OBJOUT) $@
endif
# Target: port_prebuild
# Generate any files that are needed before actual build starts.
# E.g. generate profile guidance files. Sample PGO generation for gcc enabled with PGO=1
# - First, check if PGO was defined on the command line, if so, need to add -fprofile-use to compile line.
# - Second, if PGO reference has not yet been generated, add a step to the prebuild that will build a profile-generate version and run it.
# Note - Using REBUILD=1
#
# Use make PGO=1 to invoke this sample processing.
ifdef PGO
ifeq (,$(findstring $(PGO),gen))
PGO_STAGE=build_pgo_gcc
CFLAGS+=-fprofile-use
endif
PORT_CLEAN+=*.gcda *.gcno gmon.out
endif
.PHONY: port_prebuild
port_prebuild: $(PGO_STAGE)
.PHONY: build_pgo_gcc
build_pgo_gcc:
$(MAKE) PGO=gen XCFLAGS="$(XCFLAGS) -fprofile-generate -DTOTAL_DATA_SIZE=1200" ITERATIONS=10 gen_pgo_data REBUILD=1
# Target: port_postbuild
# Generate any files that are needed after actual build end.
# E.g. change format to srec, bin, zip in order to be able to load into flash
.PHONY: port_postbuild
port_postbuild:
# Target: port_postrun
# Do platform specific after run stuff.
# E.g. reset the board, backup the logfiles etc.
.PHONY: port_postrun
port_postrun:
# Target: port_prerun
# Do platform specific after run stuff.
# E.g. reset the board, backup the logfiles etc.
.PHONY: port_prerun
port_prerun:
# Target: port_postload
# Do platform specific after load stuff.
# E.g. reset the reset power to the flash eraser
.PHONY: port_postload
port_postload:
# Target: port_preload
# Do platform specific before load stuff.
# E.g. reset the reset power to the flash eraser
.PHONY: port_preload
port_preload:
# FLAG: OPATH
# Path to the output folder. Default - current folder.
OPATH = ./
MKDIR = mkdir -p
# FLAG: PERL
# Define perl executable to calculate the geomean if running separate.
PERL=/usr/bin/perl

View File

@ -0,0 +1,28 @@
/*
Copyright 2018 Embedded Microprocessor Benchmark Consortium (EEMBC)
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.
Original Author: Shay Gal-on
*/
/* Topic: Description
This file contains additional configuration constants required to execute on
different platforms over and above the POSIX defaults
*/
#ifndef CORE_PORTME_POSIX_OVERRIDES_H
#define CORE_PORTME_POSIX_OVERRIDES_H
/* None by default */
#endif

View File

@ -0,0 +1,18 @@
# Copyright 2018 Embedded Microprocessor Benchmark Consortium (EEMBC)
#
# 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.
#
# Original Author: Shay Gal-on
NO_LIBRT = 1
include posix/core_portme.mak

View File

@ -0,0 +1,63 @@
/*-
* SPDX-License-Identifier: BSD-2-Clause
*
* Copyright (c) 2021 Hesham Almatary
*
* This software was developed by SRI International and the University of
* Cambridge Computer Laboratory (Department of Computer Science and
* Technology) under DARPA contract HR0011-18-C-0016 ("ECATS"), as part of the
* DARPA SSITH research programme.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
#include <stdlib.h>
#include <bsp.h>
int main(
int argc,
void **args
);
rtems_task Init(
rtems_task_argument ignored
);
rtems_task Init(
rtems_task_argument ignored
)
{
int ret = main(0, NULL);
exit(ret);
}
/* configuration information */
#define CONFIGURE_APPLICATION_NEEDS_SIMPLE_CONSOLE_DRIVER
#define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER
#define CONFIGURE_MAXIMUM_TASKS 20
#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
#define CONFIGURE_INIT
#include <rtems/confdefs.h>

83
riscv-coremark/coremark/simple/core_portme.c Executable file → Normal file
View File

@ -38,15 +38,18 @@ Original Author: Shay Gal-on
volatile ee_s32 seed4_volatile = ITERATIONS; volatile ee_s32 seed4_volatile = ITERATIONS;
volatile ee_s32 seed5_volatile = 0; volatile ee_s32 seed5_volatile = 0;
/* Porting : Timing functions /* Porting : Timing functions
How to capture time and convert to seconds must be ported to whatever is supported by the platform. How to capture time and convert to seconds must be ported to whatever is
e.g. Read value from on board RTC, read value from cpu clock cycles performance counter etc. supported by the platform. e.g. Read value from on board RTC, read value from
Sample implementation for standard time.h and windows.h definitions included. cpu clock cycles performance counter etc. Sample implementation for standard
time.h and windows.h definitions included.
*/ */
/* Define : TIMER_RES_DIVIDER /* Define : TIMER_RES_DIVIDER
Divider to trade off timer resolution and total time that can be measured. Divider to trade off timer resolution and total time that can be
measured.
Use lower values to increase resolution, but make sure that overflow does not occur. Use lower values to increase resolution, but make sure that overflow
If there are issues with the return value overflowing, increase this value. does not occur. If there are issues with the return value overflowing,
increase this value.
*/ */
#define NSECS_PER_SEC CLOCKS_PER_SEC #define NSECS_PER_SEC CLOCKS_PER_SEC
#define CORETIMETYPE clock_t #define CORETIMETYPE clock_t
@ -60,43 +63,57 @@ Original Author: Shay Gal-on
static CORETIMETYPE start_time_val, stop_time_val; static CORETIMETYPE start_time_val, stop_time_val;
/* Function : start_time /* Function : start_time
This function will be called right before starting the timed portion of the benchmark. This function will be called right before starting the timed portion of
the benchmark.
Implementation may be capturing a system timer (as implemented in the example code) Implementation may be capturing a system timer (as implemented in the
or zeroing some system parameters - e.g. setting the cpu clocks cycles to 0. example code) or zeroing some system parameters - e.g. setting the cpu clocks
cycles to 0.
*/ */
void start_time(void) { void
start_time(void)
{
GETMYTIME(&start_time_val); GETMYTIME(&start_time_val);
} }
/* Function : stop_time /* Function : stop_time
This function will be called right after ending the timed portion of the benchmark. This function will be called right after ending the timed portion of the
benchmark.
Implementation may be capturing a system timer (as implemented in the example code) Implementation may be capturing a system timer (as implemented in the
or other system parameters - e.g. reading the current value of cpu cycles counter. example code) or other system parameters - e.g. reading the current value of
cpu cycles counter.
*/ */
void stop_time(void) { void
stop_time(void)
{
GETMYTIME(&stop_time_val); GETMYTIME(&stop_time_val);
} }
/* Function : get_time /* Function : get_time
Return an abstract "ticks" number that signifies time on the system. Return an abstract "ticks" number that signifies time on the system.
Actual value returned may be cpu cycles, milliseconds or any other value, Actual value returned may be cpu cycles, milliseconds or any other
as long as it can be converted to seconds by <time_in_secs>. value, as long as it can be converted to seconds by <time_in_secs>. This
This methodology is taken to accomodate any hardware or simulated platform. methodology is taken to accomodate any hardware or simulated platform. The
The sample implementation returns millisecs by default, sample implementation returns millisecs by default, and the resolution is
and the resolution is controlled by <TIMER_RES_DIVIDER> controlled by <TIMER_RES_DIVIDER>
*/ */
CORE_TICKS get_time(void) { CORE_TICKS
CORE_TICKS elapsed=(CORE_TICKS)(MYTIMEDIFF(stop_time_val, start_time_val)); get_time(void)
{
CORE_TICKS elapsed
= (CORE_TICKS)(MYTIMEDIFF(stop_time_val, start_time_val));
return elapsed; return elapsed;
} }
/* Function : time_in_secs /* Function : time_in_secs
Convert the value returned by get_time to seconds. Convert the value returned by get_time to seconds.
The <secs_ret> type is used to accomodate systems with no support for floating point. The <secs_ret> type is used to accomodate systems with no support for
Default implementation implemented by the EE_TICKS_PER_SEC macro above. floating point. Default implementation implemented by the EE_TICKS_PER_SEC
macro above.
*/ */
secs_ret time_in_secs(CORE_TICKS ticks) { secs_ret
time_in_secs(CORE_TICKS ticks)
{
secs_ret retval = ((secs_ret)ticks) / (secs_ret)EE_TICKS_PER_SEC; secs_ret retval = ((secs_ret)ticks) / (secs_ret)EE_TICKS_PER_SEC;
return retval; return retval;
} }
@ -107,12 +124,17 @@ ee_u32 default_num_contexts=1;
Target specific initialization code Target specific initialization code
Test for some common mistakes. Test for some common mistakes.
*/ */
void portable_init(core_portable *p, int *argc, char *argv[]) void
portable_init(core_portable *p, int *argc, char *argv[])
{ {
if (sizeof(ee_ptr_int) != sizeof(ee_u8 *)) { if (sizeof(ee_ptr_int) != sizeof(ee_u8 *))
ee_printf("ERROR! Please define ee_ptr_int to a type that holds a pointer!\n"); {
ee_printf(
"ERROR! Please define ee_ptr_int to a type that holds a "
"pointer!\n");
} }
if (sizeof(ee_u32) != 4) { if (sizeof(ee_u32) != 4)
{
ee_printf("ERROR! Please define ee_u32 to a 32b unsigned type!\n"); ee_printf("ERROR! Please define ee_u32 to a 32b unsigned type!\n");
} }
p->portable_id = 1; p->portable_id = 1;
@ -120,9 +142,8 @@ void portable_init(core_portable *p, int *argc, char *argv[])
/* Function : portable_fini /* Function : portable_fini
Target specific final code Target specific final code
*/ */
void portable_fini(core_portable *p) void
portable_fini(core_portable *p)
{ {
p->portable_id = 0; p->portable_id = 0;
} }

40
riscv-coremark/coremark/simple/core_portme.h Executable file → Normal file
View File

@ -17,7 +17,8 @@ Original Author: Shay Gal-on
*/ */
/* Topic : Description /* Topic : Description
This file contains configuration constants required to execute on different platforms This file contains configuration constants required to execute on
different platforms
*/ */
#ifndef CORE_PORTME_H #ifndef CORE_PORTME_H
#define CORE_PORTME_H #define CORE_PORTME_H
@ -51,7 +52,8 @@ Original Author: Shay Gal-on
#define HAS_STDIO 1 #define HAS_STDIO 1
#endif #endif
/* Configuration : HAS_PRINTF /* Configuration : HAS_PRINTF
Define to 1 if the platform has stdio.h and implements the printf function. Define to 1 if the platform has stdio.h and implements the printf
function.
*/ */
#ifndef HAS_PRINTF #ifndef HAS_PRINTF
#define HAS_PRINTF 1 #define HAS_PRINTF 1
@ -74,17 +76,20 @@ typedef clock_t CORE_TICKS;
#endif #endif
#endif #endif
#ifndef COMPILER_FLAGS #ifndef COMPILER_FLAGS
#define COMPILER_FLAGS FLAGS_STR /* "Please put compiler flags here (e.g. -o3)" */ #define COMPILER_FLAGS \
FLAGS_STR /* "Please put compiler flags here (e.g. -o3)" */
#endif #endif
#ifndef MEM_LOCATION #ifndef MEM_LOCATION
#define MEM_LOCATION "STACK" #define MEM_LOCATION "STACK"
#endif #endif
/* Data Types : /* Data Types :
To avoid compiler issues, define the data types that need ot be used for 8b, 16b and 32b in <core_portme.h>. To avoid compiler issues, define the data types that need ot be used for
8b, 16b and 32b in <core_portme.h>.
*Imprtant* : *Imprtant* :
ee_ptr_int needs to be the data type used to hold pointers, otherwise coremark may fail!!! ee_ptr_int needs to be the data type used to hold pointers, otherwise
coremark may fail!!!
*/ */
typedef signed short ee_s16; typedef signed short ee_s16;
typedef unsigned short ee_u16; typedef unsigned short ee_u16;
@ -95,12 +100,14 @@ typedef unsigned int ee_u32;
typedef ee_u32 ee_ptr_int; typedef ee_u32 ee_ptr_int;
typedef size_t ee_size_t; typedef size_t ee_size_t;
/* align_mem : /* align_mem :
This macro is used to align an offset to point to a 32b value. It is used in the Matrix algorithm to initialize the input memory blocks. This macro is used to align an offset to point to a 32b value. It is
used in the Matrix algorithm to initialize the input memory blocks.
*/ */
#define align_mem(x) (void *)(4 + (((ee_ptr_int)(x)-1) & ~3)) #define align_mem(x) (void *)(4 + (((ee_ptr_int)(x)-1) & ~3))
/* Configuration : SEED_METHOD /* Configuration : SEED_METHOD
Defines method to get seed values that cannot be computed at compile time. Defines method to get seed values that cannot be computed at compile
time.
Valid values : Valid values :
SEED_ARG - from command line. SEED_ARG - from command line.
@ -131,12 +138,14 @@ typedef size_t ee_size_t;
N>1 - will execute N copies in parallel. N>1 - will execute N copies in parallel.
Note : Note :
If this flag is defined to more then 1, an implementation for launching parallel contexts must be defined. If this flag is defined to more then 1, an implementation for launching
parallel contexts must be defined.
Two sample implementations are provided. Use <USE_PTHREAD> or <USE_FORK> to enable them. Two sample implementations are provided. Use <USE_PTHREAD> or <USE_FORK>
to enable them.
It is valid to have a different implementation of <core_start_parallel> and <core_end_parallel> in <core_portme.c>, It is valid to have a different implementation of <core_start_parallel>
to fit a particular architecture. and <core_end_parallel> in <core_portme.c>, to fit a particular architecture.
*/ */
#ifndef MULTITHREAD #ifndef MULTITHREAD
#define MULTITHREAD 1 #define MULTITHREAD 1
@ -153,7 +162,8 @@ typedef size_t ee_size_t;
1 - argc/argv to main is not supported 1 - argc/argv to main is not supported
Note : Note :
This flag only matters if MULTITHREAD has been defined to a value greater then 1. This flag only matters if MULTITHREAD has been defined to a value
greater then 1.
*/ */
#ifndef MAIN_HAS_NOARGC #ifndef MAIN_HAS_NOARGC
#define MAIN_HAS_NOARGC 0 #define MAIN_HAS_NOARGC 0
@ -175,7 +185,8 @@ typedef size_t ee_size_t;
*/ */
extern ee_u32 default_num_contexts; extern ee_u32 default_num_contexts;
typedef struct CORE_PORTABLE_S { typedef struct CORE_PORTABLE_S
{
ee_u8 portable_id; ee_u8 portable_id;
} core_portable; } core_portable;
@ -183,7 +194,8 @@ typedef struct CORE_PORTABLE_S {
void portable_init(core_portable *p, int *argc, char *argv[]); void portable_init(core_portable *p, int *argc, char *argv[]);
void portable_fini(core_portable *p); void portable_fini(core_portable *p);
#if !defined(PROFILE_RUN) && !defined(PERFORMANCE_RUN) && !defined(VALIDATION_RUN) #if !defined(PROFILE_RUN) && !defined(PERFORMANCE_RUN) \
&& !defined(VALIDATION_RUN)
#if (TOTAL_DATA_SIZE == 1200) #if (TOTAL_DATA_SIZE == 1200)
#define PROFILE_RUN 1 #define PROFILE_RUN 1
#elif (TOTAL_DATA_SIZE == 2000) #elif (TOTAL_DATA_SIZE == 2000)