Resguardo inicial

This commit is contained in:
lastdragon
2026-09-06 12:53:21 -06:00
parent 662efe3c2a
commit ad2088d178
94853 changed files with 43200404 additions and 0 deletions
@@ -0,0 +1,5 @@
# SPDX-License-Identifier: GPL-2.0-only
memcmp_64
memcmp_32
strlen
strlen_32
@@ -0,0 +1,36 @@
# SPDX-License-Identifier: GPL-2.0
EXTRA_SOURCES := ../harness.c
build_32bit = $(shell if ($(CC) $(CFLAGS) -m32 -o /dev/null memcmp.c >/dev/null 2>&1) then echo "1"; fi)
TEST_GEN_PROGS := memcmp_64 strlen
$(OUTPUT)/memcmp_64: memcmp.c ../utils.c
$(OUTPUT)/memcmp_64: CFLAGS += -m64 -maltivec
ifeq ($(build_32bit),1)
$(OUTPUT)/memcmp_32: memcmp.c
$(OUTPUT)/memcmp_32: CFLAGS += -m32
TEST_GEN_PROGS += memcmp_32
endif
$(OUTPUT)/strlen: strlen.c string.c
ifeq ($(build_32bit),1)
$(OUTPUT)/strlen_32: strlen.c
$(OUTPUT)/strlen_32: CFLAGS += -m32
TEST_GEN_PROGS += strlen_32
endif
top_srcdir = ../../../../..
include ../../lib.mk
include ../flags.mk
# The loops are all 64-bit code
CFLAGS += -I$(CURDIR)
ASFLAGS = $(CFLAGS)
$(TEST_GEN_PROGS): $(EXTRA_SOURCES)
@@ -0,0 +1 @@
#define IFETCH_ALIGN_BYTES 4
@@ -0,0 +1,35 @@
/* SPDX-License-Identifier: GPL-2.0-or-later */
/*
* Copyright 2009 Freescale Semiconductor, Inc.
*
* provides masks and opcode images for use by code generation, emulation
* and for instructions that older assemblers might not know about
*/
#ifndef _ASM_POWERPC_PPC_OPCODE_H
#define _ASM_POWERPC_PPC_OPCODE_H
# define stringify_in_c(...) __VA_ARGS__
# define ASM_CONST(x) x
#define PPC_INST_VCMPEQUD_RC 0x100000c7
#define PPC_INST_VCMPEQUB_RC 0x10000006
#define __PPC_RC21 (0x1 << 10)
/* macros to insert fields into opcodes */
#define ___PPC_RA(a) (((a) & 0x1f) << 16)
#define ___PPC_RB(b) (((b) & 0x1f) << 11)
#define ___PPC_RS(s) (((s) & 0x1f) << 21)
#define ___PPC_RT(t) ___PPC_RS(t)
#define VCMPEQUD_RC(vrt, vra, vrb) stringify_in_c(.long PPC_INST_VCMPEQUD_RC | \
___PPC_RT(vrt) | ___PPC_RA(vra) | \
___PPC_RB(vrb) | __PPC_RC21)
#define VCMPEQUB_RC(vrt, vra, vrb) stringify_in_c(.long PPC_INST_VCMPEQUB_RC | \
___PPC_RT(vrt) | ___PPC_RA(vra) | \
___PPC_RB(vrb) | __PPC_RC21)
#endif /* _ASM_POWERPC_PPC_OPCODE_H */
@@ -0,0 +1,34 @@
/* SPDX-License-Identifier: GPL-2.0 */
#ifndef _PPC_ASM_H
#define _PPC_ASM_H
#include <ppc-asm.h>
#ifndef r1
#define r1 sp
#endif
#define _GLOBAL(A) FUNC_START(test_ ## A)
#define _GLOBAL_TOC(A) FUNC_START(test_ ## A)
#define CFUNC(name) name
#define CONFIG_ALTIVEC
#define R14 r14
#define R15 r15
#define R16 r16
#define R17 r17
#define R18 r18
#define R19 r19
#define R20 r20
#define R21 r21
#define R22 r22
#define R29 r29
#define R30 r30
#define R31 r31
#define STACKFRAMESIZE 256
#define STK_REG(i) (112 + ((i)-14)*8)
#define BEGIN_FTR_SECTION
#define END_FTR_SECTION_IFSET(val)
#endif
@@ -0,0 +1 @@
#define EXPORT_SYMBOL(x)
@@ -0,0 +1,169 @@
// SPDX-License-Identifier: GPL-2.0
#include <malloc.h>
#include <stdlib.h>
#include <string.h>
#include <sys/mman.h>
#include <time.h>
#include "utils.h"
#define SIZE 256
#define ITERATIONS 10000
#define LARGE_SIZE (5 * 1024)
#define LARGE_ITERATIONS 1000
#define LARGE_MAX_OFFSET 32
#define LARGE_SIZE_START 4096
/* This is big enough to fit LARGE_SIZE and works on 4K & 64K kernels */
#define MAP_SIZE (64 * 1024)
#define MAX_OFFSET_DIFF_S1_S2 48
int vmx_count;
int enter_vmx_ops(void)
{
vmx_count++;
return 1;
}
void exit_vmx_ops(void)
{
vmx_count--;
}
int test_memcmp(const void *s1, const void *s2, size_t n);
/* test all offsets and lengths */
static void test_one(char *s1, char *s2, unsigned long max_offset,
unsigned long size_start, unsigned long max_size)
{
unsigned long offset, size;
for (offset = 0; offset < max_offset; offset++) {
for (size = size_start; size < (max_size - offset); size++) {
int x, y;
unsigned long i;
y = memcmp(s1+offset, s2+offset, size);
x = test_memcmp(s1+offset, s2+offset, size);
if (((x ^ y) < 0) && /* Trick to compare sign */
((x | y) != 0)) { /* check for zero */
printf("memcmp returned %d, should have returned %d (offset %ld size %ld)\n", x, y, offset, size);
for (i = offset; i < offset+size; i++)
printf("%02x ", s1[i]);
printf("\n");
for (i = offset; i < offset+size; i++)
printf("%02x ", s2[i]);
printf("\n");
abort();
}
if (vmx_count != 0) {
printf("vmx enter/exit not paired.(offset:%ld size:%ld s1:%p s2:%p vc:%d\n",
offset, size, s1, s2, vmx_count);
printf("\n");
abort();
}
}
}
}
static int testcase(bool islarge)
{
unsigned long i, comp_size, alloc_size;
char *p, *s1, *s2;
int iterations;
comp_size = (islarge ? LARGE_SIZE : SIZE);
alloc_size = comp_size + MAX_OFFSET_DIFF_S1_S2;
iterations = islarge ? LARGE_ITERATIONS : ITERATIONS;
p = mmap(NULL, 4 * MAP_SIZE, PROT_READ | PROT_WRITE,
MAP_ANONYMOUS | MAP_PRIVATE, -1, 0);
FAIL_IF(p == MAP_FAILED);
/* Put s1/s2 at the end of a page */
s1 = p + MAP_SIZE - alloc_size;
s2 = p + 3 * MAP_SIZE - alloc_size;
/* And unmap the subsequent page to force a fault if we overread */
munmap(p + MAP_SIZE, MAP_SIZE);
munmap(p + 3 * MAP_SIZE, MAP_SIZE);
srandom(time(0));
for (i = 0; i < iterations; i++) {
unsigned long j;
unsigned long change;
char *rand_s1 = s1;
char *rand_s2 = s2;
for (j = 0; j < alloc_size; j++)
s1[j] = random();
rand_s1 += random() % MAX_OFFSET_DIFF_S1_S2;
rand_s2 += random() % MAX_OFFSET_DIFF_S1_S2;
memcpy(rand_s2, rand_s1, comp_size);
/* change one byte */
change = random() % comp_size;
rand_s2[change] = random() & 0xff;
if (islarge)
test_one(rand_s1, rand_s2, LARGE_MAX_OFFSET,
LARGE_SIZE_START, comp_size);
else
test_one(rand_s1, rand_s2, SIZE, 0, comp_size);
}
srandom(time(0));
for (i = 0; i < iterations; i++) {
unsigned long j;
unsigned long change;
char *rand_s1 = s1;
char *rand_s2 = s2;
for (j = 0; j < alloc_size; j++)
s1[j] = random();
rand_s1 += random() % MAX_OFFSET_DIFF_S1_S2;
rand_s2 += random() % MAX_OFFSET_DIFF_S1_S2;
memcpy(rand_s2, rand_s1, comp_size);
/* change multiple bytes, 1/8 of total */
for (j = 0; j < comp_size / 8; j++) {
change = random() % comp_size;
s2[change] = random() & 0xff;
}
if (islarge)
test_one(rand_s1, rand_s2, LARGE_MAX_OFFSET,
LARGE_SIZE_START, comp_size);
else
test_one(rand_s1, rand_s2, SIZE, 0, comp_size);
}
return 0;
}
static int testcases(void)
{
#ifdef __powerpc64__
// vcmpequd used in memcmp_64.S is v2.07
SKIP_IF(!have_hwcap2(PPC_FEATURE2_ARCH_2_07));
#endif
testcase(0);
testcase(1);
return 0;
}
int main(void)
{
test_harness_set_timeout(300);
return test_harness(testcases, "memcmp");
}
@@ -0,0 +1 @@
../../../../../arch/powerpc/lib/memcmp_32.S
@@ -0,0 +1 @@
../../../../../arch/powerpc/lib/memcmp_64.S
@@ -0,0 +1 @@
timeout=130
@@ -0,0 +1,21 @@
// SPDX-License-Identifier: GPL-2.0
/*
* Copied from linux/lib/string.c
*
* Copyright (C) 1991, 1992 Linus Torvalds
*/
#include <stddef.h>
/**
* strlen - Find the length of a string
* @s: The string to be sized
*/
size_t test_strlen(const char *s)
{
const char *sc;
for (sc = s; *sc != '\0'; ++sc)
/* nothing */;
return sc - s;
}
@@ -0,0 +1,127 @@
// SPDX-License-Identifier: GPL-2.0
#include <malloc.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include "utils.h"
#define SIZE 256
#define ITERATIONS 1000
#define ITERATIONS_BENCH 100000
int test_strlen(const void *s);
/* test all offsets and lengths */
static void test_one(char *s)
{
unsigned long offset;
for (offset = 0; offset < SIZE; offset++) {
int x, y;
unsigned long i;
y = strlen(s + offset);
x = test_strlen(s + offset);
if (x != y) {
printf("strlen() returned %d, should have returned %d (%p offset %ld)\n", x, y, s, offset);
for (i = offset; i < SIZE; i++)
printf("%02x ", s[i]);
printf("\n");
}
}
}
static void bench_test(char *s)
{
struct timespec ts_start, ts_end;
int i;
clock_gettime(CLOCK_MONOTONIC, &ts_start);
for (i = 0; i < ITERATIONS_BENCH; i++)
test_strlen(s);
clock_gettime(CLOCK_MONOTONIC, &ts_end);
printf("len %3.3d : time = %.6f\n", test_strlen(s), ts_end.tv_sec - ts_start.tv_sec + (ts_end.tv_nsec - ts_start.tv_nsec) / 1e9);
}
static int testcase(void)
{
char *s;
unsigned long i;
s = memalign(128, SIZE);
if (!s) {
perror("memalign");
exit(1);
}
srandom(1);
memset(s, 0, SIZE);
for (i = 0; i < SIZE; i++) {
char c;
do {
c = random() & 0x7f;
} while (!c);
s[i] = c;
test_one(s);
}
for (i = 0; i < ITERATIONS; i++) {
unsigned long j;
for (j = 0; j < SIZE; j++) {
char c;
do {
c = random() & 0x7f;
} while (!c);
s[j] = c;
}
for (j = 0; j < sizeof(long); j++) {
s[SIZE - 1 - j] = 0;
test_one(s);
}
}
for (i = 0; i < SIZE; i++) {
char c;
do {
c = random() & 0x7f;
} while (!c);
s[i] = c;
}
bench_test(s);
s[16] = 0;
bench_test(s);
s[8] = 0;
bench_test(s);
s[4] = 0;
bench_test(s);
s[3] = 0;
bench_test(s);
s[2] = 0;
bench_test(s);
s[1] = 0;
bench_test(s);
return 0;
}
int main(void)
{
return test_harness(testcase, "strlen");
}
@@ -0,0 +1 @@
../../../../../arch/powerpc/lib/strlen_32.S