granicus.if.org Git - strace/blob - tests/old_mmap.c

   1 /*
   2  * Check decoding of "old mmap" edition of mmap syscall.
   3  *
   4  * Copyright (c) 2016 Dmitry V. Levin <ldv@altlinux.org>
   5  * Copyright (c) 2016-2019 The strace developers.
   6  * All rights reserved.
   7  *
   8  * SPDX-License-Identifier: GPL-2.0-or-later
   9  */
  10
  11 #include "tests.h"
  12 #include "scno.h"
  13
  14 /*
  15  * On s390x and m68k, this is the mmap syscall used by glibc, so,
  16  * from one side, it's already covered by another test, and, from another side,
  17  * it would require additional efforts to filter out mmap calls made by glibc.
  18  */
  19
  20 #if defined __NR_mmap \
  21         && (defined __arm__ || defined __i386__ || defined __m68k__ \
  22                 || defined __s390__ || defined __s390x__) \
  23         && (defined PATH_TRACING || !(defined __s390x__ || defined __m68k__))
  24
  25 # include <errno.h>
  26 # include <stdio.h>
  27 # include <string.h>
  28 # include <sys/mman.h>
  29 # include <unistd.h>
  30
  31 # ifndef TEST_FD
  32 #  define TEST_FD -2LU
  33 # endif
  34
  35 int
  36 main(void)
  37 {
  38         long rc = syscall(__NR_mmap, 0);
  39         const bool implemented = rc != -1 || errno != ENOSYS;
  40 # ifndef PATH_TRACING
  41         printf("mmap(NULL) = %s\n", sprintrc(rc));
  42 # endif
  43
  44         const unsigned long args1_c[6] = {
  45                 (unsigned long) 0xbadc0deddeadbeefULL,  /* addr */
  46                 (unsigned long) 0xdeefacedfacefeedULL,  /* len */
  47                 PROT_READ|PROT_EXEC,    /* prot */
  48                 MAP_FILE|MAP_FIXED,     /* flags */
  49                 TEST_FD,                /* fd */
  50                 (unsigned long) 0xdecaffedbadc0dedULL   /* offset */
  51         };
  52         const unsigned long page_size = get_page_size();
  53         const unsigned long args2_c[6] = {
  54                 0,
  55                 page_size,
  56                 PROT_READ|PROT_WRITE,
  57                 MAP_PRIVATE|MAP_ANONYMOUS,
  58                 -1LU,
  59                 (unsigned long) 0xda7a1057faced000ULL & -page_size
  60         };
  61         void *args = tail_memdup(args1_c, sizeof(args1_c));
  62
  63         rc = syscall(__NR_mmap, args);
  64 # if XLAT_RAW
  65         printf("mmap(%#lx, %lu, %#x, %#x, %d, %#lx) = %s\n",
  66                args1_c[0], args1_c[1], PROT_READ|PROT_EXEC, MAP_FILE | MAP_FIXED,
  67                (int) args1_c[4], args1_c[5], sprintrc(rc));
  68 # elif XLAT_VERBOSE
  69         printf("mmap(%#lx, %lu, %#x /* PROT_READ|PROT_EXEC */"
  70                ", %#x /* MAP_FILE|MAP_FIXED */, %d, %#lx) = %s\n",
  71                args1_c[0], args1_c[1], PROT_READ|PROT_EXEC, MAP_FILE | MAP_FIXED,
  72                (int) args1_c[4], args1_c[5], sprintrc(rc));
  73 # else
  74         printf("mmap(%#lx, %lu, PROT_READ|PROT_EXEC, MAP_FILE|MAP_FIXED"
  75                ", %d, %#lx) = %s\n",
  76                args1_c[0], args1_c[1], (int) args1_c[4], args1_c[5],
  77                sprintrc(rc));
  78 # endif
  79
  80         memcpy(args, args2_c, sizeof(args2_c));
  81         rc = syscall(__NR_mmap, args);
  82 # ifndef PATH_TRACING
  83         const char *errstr;
  84         if (implemented) {
  85                 char *str;
  86                 if (asprintf(&str, "%#lx", rc) < 0)
  87                         perror_msg_and_fail("asprintf");
  88                 errstr = str;
  89         } else {
  90                 errstr = sprintrc(rc);
  91         }
  92 #  if XLAT_RAW
  93         printf("mmap(NULL, %lu, %#x, %#x, %d, %#lx) = %s\n",
  94                args2_c[1], PROT_READ|PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS,
  95                (int) args2_c[4], args2_c[5], errstr);
  96 #  elif XLAT_VERBOSE
  97         printf("mmap(NULL, %lu, %#x /* PROT_READ|PROT_WRITE */"
  98                ", %#x /* MAP_PRIVATE|MAP_ANONYMOUS */, %d, %#lx) = %s\n",
  99                args2_c[1], PROT_READ|PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS,
 100                (int) args2_c[4], args2_c[5], errstr);
 101 #  else
 102         printf("mmap(NULL, %lu, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS"
 103                ", %d, %#lx) = %s\n",
 104                args2_c[1], (int) args2_c[4], args2_c[5], errstr);
 105 #  endif
 106 # endif
 107
 108         void *addr = (void *) rc;
 109         if (implemented && mprotect(addr, page_size, PROT_NONE))
 110                 perror_msg_and_fail("mprotect(%p, %lu, PROT_NONE)",
 111                                     addr, page_size);
 112
 113         puts("+++ exited with 0 +++");
 114         return 0;
 115 }
 116
 117 #else
 118
 119 SKIP_MAIN_UNDEFINED("defined __NR_mmap "
 120         "&& (defined __arm__ || defined __i386__ || defined __m68k__ "
 121                 "|| defined __s390__ || defined __s390x__) "
 122         "&& (defined PATH_TRACING || !(defined __s390x__ || defined __m68k__))")
 123
 124 #endif