Projet_L3/memory_test.c at master · Neylix/Projet_L3 · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
/*
Armator - simulateur de jeu d'instruction ARMv5T à but pédagogique
Copyright (C) 2011 Guillaume Huard
Ce programme est libre, vous pouvez le redistribuer et/ou le modifier selon les
termes de la Licence Publique Générale GNU publiée par la Free Software
Foundation (version 2 ou bien toute autre version ultérieure choisie par vous).

Ce programme est distribué car potentiellement utile, mais SANS AUCUNE
GARANTIE, ni explicite ni implicite, y compris les garanties de
commercialisation ou d'adaptation dans un but spécifique. Reportez-vous à la
Licence Publique Générale GNU pour plus de détails.

Vous devez avoir reçu une copie de la Licence Publique Générale GNU en même
temps que ce programme ; si ce n'est pas le cas, écrivez à la Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307,
États-Unis.

Contact: Guillaume.Huard@imag.fr
	 Bâtiment IMAG
	 700 avenue centrale, domaine universitaire
	 38401 Saint Martin d'Hères
*/
#include <stdio.h>
#include <stdlib.h>
#include "memory.h"
#include "util.h"

void print_test(int result) {
    if (result)
        printf("Test succeded\n");
    else
        printf("TEST FAILED !!\n");
}

int compare(void *a, void *b, size_t size, int reverse) {
    int i, j, j_step;

    if (reverse) {
        j = size-1;
        j_step = -1;
    } else {
        j = 0;
        j_step = 1;
    }
    for (i=0; i<size; i++, j+=j_step)
        if (*((uint8_t *) a + i) != *((uint8_t *) b + j))
            return 0;
    return 1;
}

int compare_with_sim(void *a, memory m, size_t size, int reverse) {
    int i, j, j_step;
    uint8_t value;

    if (reverse) {
        j = size-1;
        j_step = -1;
    } else {
        j = 0;
        j_step = 1;
    }
    for (i=0; i<size; i++, j+=j_step) {
        memory_read_byte(m, j, &value);
        if (*((uint8_t *) a + i) != value)
            return 0;
    }
    return 1;
}

int main() {
    char *endianess[] = { "little", "big" };
    memory m[2];
    uint32_t word_value = 0x11223344, word_read;
    uint16_t half_value = 0x5566, half_read;
    uint8_t *position;
    int i;

    m[1] = memory_create(4,1);
    m[0] = memory_create(4,0);
    if ((m[1] == NULL) || (m[0] == NULL)) {
        fprintf(stderr, "Error when creating simulated memory\n");
        exit(1);
    }

    printf("I'm a %s endian host\n", endianess[is_big_endian()]);

    printf("Writing 4 bytes at address 0, then reading the word and half, "
           "the result should depend on simulated memory endianess :\n");
    position = (uint8_t *) & word_value;
    for (i=0; i<4; i++) {
        memory_write_byte(m[0], i, *(position+i));
        memory_write_byte(m[1], i, *(position+i));
    }
    printf("- word read with the same endianess as me, ");
    memory_read_word(m[is_big_endian()], 0, &word_read);
    print_test(compare(&word_value, &word_read, 4, 0));
    printf("- half read with the same endianess as me, ");
    memory_read_half(m[is_big_endian()], 0, &half_read);
    print_test(compare(&word_value, &half_read, 2, 0));
    printf("- word read with a different endianess than me, ");
    memory_read_word(m[1-is_big_endian()], 0, &word_read);
    print_test(compare(&word_value, &word_read, 4, 1));
    printf("- half read with a different endianess than me, ");
    memory_read_half(m[1-is_big_endian()], 0, &half_read);
    print_test(compare(&word_value, &half_read, 2, 1));

    printf("Writing word and half at address 0, then reading the bytes, "
           "the result should depend on simulated memory endianess :\n");
    printf("- word write with the same endianess as me, ");
    memory_write_word(m[is_big_endian()], 0, word_value);
    print_test(compare_with_sim(&word_value, m[is_big_endian()], 4, 0));
    printf("- half write with the same endianess as me, ");
    memory_write_half(m[is_big_endian()], 0, half_value);
    print_test(compare_with_sim(&half_value, m[is_big_endian()], 2, 0));
    printf("- word write with a different endianess than me, ");
    memory_write_word(m[1-is_big_endian()], 0, word_value);
    print_test(compare_with_sim(&word_value, m[1-is_big_endian()], 4, 1));
    printf("- half write with a different endianess than me, ");
    memory_write_half(m[1-is_big_endian()], 0, half_value);
    print_test(compare_with_sim(&half_value, m[1-is_big_endian()], 2, 1));

    return 0;
}