aboutsummaryrefslogtreecommitdiff
path: root/tests/tcg/s390x/mvc.c
blob: b572aa3ced7cfeb93aab8ca3a063263b6d3859e8 (plain)
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
#include <stdint.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <sys/mman.h>
#include <signal.h>
#include <setjmp.h>

jmp_buf jmp_env;

static void handle_sigsegv(int sig)
{
    siglongjmp(jmp_env, 1);
}

#define ALLOC_SIZE (2 * 4096)

static inline void mvc_256(const char *dst, const char *src)
{
    asm volatile (
        "    mvc 0(256,%[dst]),0(%[src])\n"
        :
        : [dst] "a" (dst),
          [src] "a" (src)
        : "memory");
}

int main(void)
{
    char *src, *dst;
    int i;

    /* register the SIGSEGV handler */
    if (signal(SIGSEGV, handle_sigsegv) == SIG_ERR) {
        fprintf(stderr, "SIGSEGV not registered\n");
        return 1;
    }

    /* prepare the buffers - two consecutive pages */
    src = valloc(ALLOC_SIZE);
    dst = valloc(ALLOC_SIZE);
    memset(src, 0xff, ALLOC_SIZE);
    memset(dst, 0x0, ALLOC_SIZE);

    /* protect the second pages */
    if (mprotect(src + 4096, 4096, PROT_NONE) ||
        mprotect(dst + 4096, 4096, PROT_NONE)) {
        fprintf(stderr, "mprotect failed\n");
        return 1;
    }

    /* fault on second destination page */
    if (sigsetjmp(jmp_env, 1) == 0) {
        mvc_256(dst + 4096 - 128, src);
        fprintf(stderr, "fault not triggered\n");
        return 1;
    }

    /* fault on second source page */
    if (sigsetjmp(jmp_env, 1) == 0) {
        mvc_256(dst, src + 4096 - 128);
        fprintf(stderr, "fault not triggered\n");
        return 1;
    }

    /* fault on second source and second destination page */
    if (sigsetjmp(jmp_env, 1) == 0) {
        mvc_256(dst + 4096 - 128, src + 4096 - 128);
        fprintf(stderr, "fault not triggered\n");
        return 1;
    }

    /* restore permissions */
    if (mprotect(src + 4096, 4096, PROT_READ | PROT_WRITE) ||
        mprotect(dst + 4096, 4096, PROT_READ | PROT_WRITE)) {
        fprintf(stderr, "mprotect failed\n");
        return 1;
    }

    /* no data must be touched during the faults */
    for (i = 0; i < ALLOC_SIZE; i++) {
        if (src[i] != 0xff || dst[i]) {
            fprintf(stderr, "data modified during a fault\n");
            return 1;
        }
    }

    /* test if MVC works now correctly across page boundaries */
    mvc_256(dst + 4096 - 128, src + 4096 - 128);
    for (i = 0; i < ALLOC_SIZE; i++) {
        if (src[i] != 0xff) {
            fprintf(stderr, "src modified\n");
            return 1;
        }
        if (i < 4096 - 128 || i >= 4096 + 128) {
            if (dst[i]) {
                fprintf(stderr, "wrong dst modified\n");
                return 1;
            }
        } else {
            if (dst[i] != 0xff) {
                fprintf(stderr, "wrong data moved\n");
                return 1;
            }
        }
    }

    return 0;
}