sergiotarxz/nuttx-apps
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
ad48457183
nuttx-apps/system/ramtest/ramtest.c
Alin Jerpelea 84e0ca1310 system: update licenses to Apache 
Gregory Nutt is has submitted the SGA

Ken Pettit has submitted the ICLA

David S. Alessio has submitted the ICLA

as a result we can migrate the licenses to Apache.

Signed-off-by: Alin Jerpelea <alin.jerpelea@sony.com>
2021-06-11 02:42:05 -05:00

580 lines
16 KiB
C
Raw Blame History

/****************************************************************************
* apps/system/ramtest/ramtest.c
*
* Licensed to the Apache Software Foundation (ASF) under one or more
* contributor license agreements. See the NOTICE file distributed with
* this work for additional information regarding copyright ownership. The
* ASF licenses this file to you 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.
*
****************************************************************************/
/****************************************************************************
* Included Files
****************************************************************************/
#include <nuttx/config.h>
#include <sys/types.h>
#include <stdint.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <inttypes.h>
#include <unistd.h>
#include <sched.h>
#include <syslog.h>
#include <errno.h>
#include <nuttx/usb/usbdev_trace.h>
#ifdef CONFIG_SYSTEM_RAMTEST
/****************************************************************************
* Pre-processor Definitions
****************************************************************************/
#define RAMTEST_PREFIX "RAMTest: "
/****************************************************************************
* Private Types
****************************************************************************/
struct ramtest_s
{
uint8_t width;
uintptr_t start;
size_t size;
size_t nxfrs;
uint32_t mask;
};
/****************************************************************************
* Private Data
****************************************************************************/
/****************************************************************************
* Private Functions
****************************************************************************/
/****************************************************************************
* Name: show_usage
****************************************************************************/
static void show_usage(FAR const char *progname, int exitcode)
{
printf("\nUsage: %s [-w|h|b] <hex-address> <decimal-size>\n", progname);
printf("\nWhere:\n");
printf(" <hex-address> starting address of the test.\n");
printf(" <decimal-size> number of memory locations (in bytes).\n");
printf(" -w Sets the width of a memory location to 32-bits.\n");
printf(" -h Sets the width of a memory location to 16-bits (default).\n");
printf(" -b Sets the width of a memory location to 8-bits.\n");
exit(exitcode);
}
/****************************************************************************
* Name: parse_commandline
****************************************************************************/
static void parse_commandline(int argc, char **argv,
FAR struct ramtest_s *info)
{
FAR char *ptr;
int option;
while ((option = getopt(argc, argv, "whb")) != ERROR)
{
if (option == 'w')
{
info->width = 32;
info->mask = 0xffffffff;
}
else if (option == 'h')
{
info->width = 16;
info->mask = 0x0000ffff;
}
else if (option == 'b')
{
info->width = 8;
info->mask = 0x000000ff;
}
else
{
printf(RAMTEST_PREFIX "Unrecognized option: '%c'\n", option);
show_usage(argv[0], EXIT_FAILURE);
}
}
/* There should be two parameters remaining on the command line */
if (optind >= argc)
{
printf(RAMTEST_PREFIX "Missing required arguments\n");
show_usage(argv[0], EXIT_FAILURE);
}
info->start = (uintptr_t)strtoul(argv[optind], &ptr, 16);
if (*ptr != '\0')
{
printf(RAMTEST_PREFIX "Invalid <hex-address>: %s->%" PRIxPTR
" [%02x]\n",
argv[optind], info->start, *ptr);
show_usage(argv[0], EXIT_FAILURE);
}
optind++;
if (optind >= argc)
{
printf(RAMTEST_PREFIX "Missing <decimal-size>\n");
show_usage(argv[0], EXIT_FAILURE);
}
info->size = (size_t)strtoul(argv[optind], &ptr, 10);
if (*ptr != '\0')
{
printf(RAMTEST_PREFIX "Invalid <decimal-size>: %s->%zx [%02x]\n",
argv[optind], info->size, *ptr);
show_usage(argv[0], EXIT_FAILURE);
}
/* Convert the size (in bytes) to the corresponding number of transfers
* of the selected width.
*/
if (info->width == 8)
{
info->nxfrs = info->size;
}
else if (info->width == 32)
{
info->nxfrs = info->size >> 2;
}
else
{
info->width = 16;
info->nxfrs = info->size >> 1;
}
optind++;
if (optind != argc)
{
printf(RAMTEST_PREFIX "Too many arguments\n");
show_usage(argv[0], EXIT_FAILURE);
}
}
/****************************************************************************
* Name: write_memory
****************************************************************************/
static void write_memory(FAR struct ramtest_s *info, uint32_t value)
{
size_t i;
if (info->width == 32)
{
uint32_t *ptr = (uint32_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
*ptr++ = value;
}
}
else if (info->width == 16)
{
uint16_t *ptr = (uint16_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
*ptr++ = (uint16_t)value;
}
}
else /* if (info->width == 8) */
{
uint8_t *ptr = (uint8_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
*ptr++ = (uint8_t)value;
}
}
}
/****************************************************************************
* Name: verify_memory
****************************************************************************/
static void verify_memory(FAR struct ramtest_s *info, uint32_t value)
{
size_t i;
if (info->width == 32)
{
uint32_t *ptr = (uint32_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
if (*ptr != value)
{
printf(RAMTEST_PREFIX
"ERROR: Address %p Found: %08" PRIx32
" Expected %08" PRIx32 "\n",
ptr, *ptr, value);
}
ptr++;
}
}
else if (info->width == 16)
{
uint16_t value16 = (uint16_t)(value & 0x0000ffff);
uint16_t *ptr = (uint16_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
if (*ptr != value16)
{
printf(RAMTEST_PREFIX
"ERROR: Address %p Found: %04" PRIx16
" Expected %04" PRIx16 "\n",
ptr, *ptr, value16);
}
ptr++;
}
}
else /* if (info->width == 8) */
{
uint8_t value8 = (uint8_t)(value & 0x000000ff);
uint8_t *ptr = (uint8_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
if (*ptr != value8)
{
printf(RAMTEST_PREFIX
"ERROR: Address %p Found: %02" PRIx8
" Expected %02" PRIx8 "\n",
ptr, *ptr, value8);
}
ptr++;
}
}
}
/****************************************************************************
* Name: marching_ones
****************************************************************************/
static void marching_ones(FAR struct ramtest_s *info)
{
uint32_t pattern = 0x00000001;
printf(RAMTEST_PREFIX "Marching ones: %08x %d\n",
info->start, info->size);
while (pattern != 0)
{
write_memory(info, pattern);
verify_memory(info, pattern);
pattern <<= 1;
pattern &= info->mask;
}
}
/****************************************************************************
* Name: marching_zeros
****************************************************************************/
static void marching_zeros(FAR struct ramtest_s *info)
{
uint32_t pattern = 0xfffffffe;
printf(RAMTEST_PREFIX "Marching zeroes: %08x %d\n",
info->start, info->size);
while (pattern != 0xffffffff)
{
write_memory(info, pattern);
verify_memory(info, pattern);
pattern <<= 1;
pattern |= 1;
pattern |= ~info->mask;
}
}
/****************************************************************************
* Name: write_memory2
****************************************************************************/
static void write_memory2(FAR struct ramtest_s *info, uint32_t value_1,
uint32_t value_2)
{
size_t even_nxfrs = info->nxfrs & ~1;
size_t i;
if (info->width == 32)
{
uint32_t *ptr = (uint32_t *)info->start;
for (i = 0; i < even_nxfrs; i += 2)
{
*ptr++ = value_1;
*ptr++ = value_2;
}
}
else if (info->width == 16)
{
uint16_t *ptr = (uint16_t *)info->start;
for (i = 0; i < even_nxfrs; i += 2)
{
*ptr++ = (uint16_t)value_1;
*ptr++ = (uint16_t)value_2;
}
}
else /* if (info->width == 8) */
{
uint8_t *ptr = (uint8_t *)info->start;
for (i = 0; i < even_nxfrs; i += 2)
{
*ptr++ = (uint8_t)value_1;
*ptr++ = (uint8_t)value_2;
}
}
}
/****************************************************************************
* Name: verify_memory2
****************************************************************************/
static void verify_memory2(FAR struct ramtest_s *info, uint32_t value_1,
uint32_t value_2)
{
size_t even_nxfrs = info->nxfrs & ~1;
size_t i;
if (info->width == 32)
{
uint32_t *ptr = (uint32_t *)info->start;
for (i = 0; i < even_nxfrs; i += 2)
{
if (ptr[0] != value_1 || ptr[1] != value_2)
{
printf(RAMTEST_PREFIX
"ERROR: Address %p Found: %08" PRIx32
" and %08" PRIx32 "\n",
ptr, ptr[0], ptr[1]);
printf(RAMTEST_PREFIX
" Expected: %08" PRIx32
" and %08" PRIx32 "\n",
value_1, value_2);
}
ptr += 2;
}
}
else if (info->width == 16)
{
uint16_t value16_1 = (uint16_t)(value_1 & 0x0000ffff);
uint16_t value16_2 = (uint16_t)(value_2 & 0x0000ffff);
uint16_t *ptr = (uint16_t *)info->start;
for (i = 0; i < even_nxfrs; i += 2)
{
if (ptr[0] != value16_1 || ptr[1] != value16_2)
{
printf(RAMTEST_PREFIX
"ERROR: Address %p Found: %04" PRIx16
" and %04" PRIx16 "\n",
ptr, ptr[0], ptr[1]);
printf(RAMTEST_PREFIX
" Expected: %04" PRIx16
" and %04" PRIx16 "\n",
value16_1, value16_2);
}
ptr += 2;
}
}
else /* if (info->width == 8) */
{
uint8_t value8_1 = (uint8_t)(value_1 & 0x000000ff);
uint8_t value8_2 = (uint8_t)(value_2 & 0x000000ff);
uint8_t *ptr = (uint8_t *)info->start;
for (i = 0; i < even_nxfrs; i += 2)
{
if (ptr[0] != value8_1 || ptr[1] != value8_2)
{
printf(RAMTEST_PREFIX
"ERROR: Address %p Found: %02" PRIx8
" and %02" PRIx8 "\n",
ptr, ptr[0], ptr[1]);
printf(RAMTEST_PREFIX
" Expected: %02" PRIx8
" and %02" PRIx8 "\n",
value8_1, value8_2);
}
ptr += 2;
}
}
}
/****************************************************************************
* Name: pattern_test
****************************************************************************/
static void pattern_test(FAR struct ramtest_s *info, uint32_t pattern1,
uint32_t pattern2)
{
printf(RAMTEST_PREFIX "Pattern test: %08x %d %08" PRIx32
" %08" PRIx32 "\n",
info->start, info->size, pattern1, pattern2);
write_memory2(info, pattern1, pattern2);
verify_memory2(info, pattern1, pattern2);
}
/****************************************************************************
* Name: write_addrinaddr
****************************************************************************/
static void write_addrinaddr(FAR struct ramtest_s *info)
{
size_t i;
if (info->width == 32)
{
uint32_t *ptr = (uint32_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
uint32_t value32 = (uint32_t)((uintptr_t)ptr);
*ptr++ = value32;
}
}
else if (info->width == 16)
{
uint16_t *ptr = (uint16_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
uint16_t value16 = (uint16_t)((uintptr_t)ptr & 0x0000ffff);
*ptr++ = value16;
}
}
else /* if (info->width == 8) */
{
uint8_t *ptr = (uint8_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
uint8_t value8 = (uint8_t)((uintptr_t)ptr & 0x000000ff);
*ptr++ = value8;
}
}
}
/****************************************************************************
* Name: verify_addrinaddr
****************************************************************************/
static void verify_addrinaddr(FAR struct ramtest_s *info)
{
size_t i;
if (info->width == 32)
{
uint32_t *ptr = (uint32_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
uint32_t value32 = (uint32_t)((uintptr_t)ptr);
if (*ptr != value32)
{
printf(RAMTEST_PREFIX
"ERROR: Address %p Found: %08" PRIx32
" Expected %08" PRIx32 "\n",
ptr, *ptr, value32);
}
ptr++;
}
}
else if (info->width == 16)
{
uint16_t *ptr = (uint16_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
uint16_t value16 = (uint16_t)((uintptr_t)ptr & 0x0000ffff);
if (*ptr != value16)
{
printf(RAMTEST_PREFIX
"ERROR: Address %p Found: %04" PRIx16
" Expected %04" PRIx16 "\n",
ptr, *ptr, value16);
}
ptr++;
}
}
else /* if (info->width == 8) */
{
uint8_t *ptr = (uint8_t *)info->start;
for (i = 0; i < info->nxfrs; i++)
{
uint16_t value8 = (uint8_t)((uintptr_t)ptr & 0x000000ff);
if (*ptr != value8)
{
printf(RAMTEST_PREFIX
"ERROR: Address %p Found: %02" PRIx8
" Expected %02" PRIx8 "\n",
ptr, *ptr, value8);
}
ptr++;
}
}
}
/****************************************************************************
* Name: addr_in_addr
****************************************************************************/
static void addr_in_addr(FAR struct ramtest_s *info)
{
printf(RAMTEST_PREFIX "Address-in-address test: %08x %d\n",
info->start, info->size);
write_addrinaddr(info);
verify_addrinaddr(info);
}
/****************************************************************************
* Public Functions
****************************************************************************/
int main(int argc, FAR char *argv[])
{
struct ramtest_s info;
/* Setup defaults and parse the command line */
info.width = 16;
info.mask = 0x0000ffff;
parse_commandline(argc, argv, &info);
/* Perform the memory tests */
marching_ones(&info);
marching_zeros(&info);
pattern_test(&info, 0x55555555, 0xaaaaaaaa);
pattern_test(&info, 0x66666666, 0x99999999);
pattern_test(&info, 0x33333333, 0xcccccccc);
addr_in_addr(&info);
return 0;
}
#endif /* CONFIG_SYSTEM_RAMTEST */
Reference in New Issue View Git Blame Copy Permalink