1  /* Copyright (C) 2006-2023 Free Software Foundation, Inc.
       2     This file is part of the GNU C Library.
       3  
       4     The GNU C Library is free software; you can redistribute it and/or
       5     modify it under the terms of the GNU Lesser General Public
       6     License as published by the Free Software Foundation; either
       7     version 2.1 of the License, or (at your option) any later version.
       8  
       9     The GNU C Library is distributed in the hope that it will be useful,
      10     but WITHOUT ANY WARRANTY; without even the implied warranty of
      11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      12     Lesser General Public License for more details.
      13  
      14     You should have received a copy of the GNU Lesser General Public
      15     License along with the GNU C Library; if not, see
      16     <https://www.gnu.org/licenses/>.  */
      17  
      18  #include <limits.h>
      19  #include <stdio.h>
      20  #include <string.h>
      21  #include <rpc/rpc.h>
      22  #include <sys/mman.h>
      23  #include <unistd.h>
      24  #include <stdint.h>
      25  
      26  static int
      27  do_test (void)
      28  {
      29    XDR xdrs;
      30    void *buf;
      31    size_t ps = sysconf (_SC_PAGESIZE);
      32    uintptr_t half = -1;
      33    int v_int;
      34    u_short v_u_short;
      35  
      36    half = (half >> 1) & ~(uintptr_t) (ps - 1);
      37    buf = mmap ((void *) half, 2 * ps, PROT_READ | PROT_WRITE,
      38  	      MAP_PRIVATE | MAP_ANON, -1, 0);
      39    if (buf == MAP_FAILED || buf != (void *) half)
      40      {
      41        puts ("Couldn't mmap 2 pages in the middle of address space");
      42        return 0;
      43      }
      44  
      45    xdrmem_create (&xdrs, (char *) buf, 2 * ps, XDR_ENCODE);
      46  
      47  #define T(type, val) \
      48    v_##type = val;			\
      49    if (! xdr_##type (&xdrs, &v_##type))	\
      50      {					\
      51        puts ("encoding of " #type	\
      52  	    " " #val " failed");	\
      53        return 1;				\
      54      }
      55  
      56    T(int, 127)
      57  
      58    u_int pos = xdr_getpos (&xdrs);
      59  
      60    T(u_short, 31)
      61  
      62    if (! xdr_setpos (&xdrs, pos))
      63      {
      64        puts ("xdr_setpos during encoding failed");
      65        return 1;
      66      }
      67  
      68    T(u_short, 36)
      69  
      70  #undef T
      71  
      72    xdr_destroy (&xdrs);
      73  
      74    xdrmem_create (&xdrs, (char *) buf, 2 * ps, XDR_DECODE);
      75  
      76  #define T(type, val) \
      77    v_##type = 0x15;			\
      78    if (! xdr_##type (&xdrs, &v_##type))	\
      79      {					\
      80        puts ("decoding of " #type	\
      81  	    " " #val " failed");	\
      82        return 1;				\
      83      }					\
      84    if (v_##type != val)			\
      85      {					\
      86        puts ("decoded value differs, "	\
      87  	    "type " #type " " #val);	\
      88        return 1;				\
      89      }
      90  
      91    T(int, 127)
      92  
      93    pos = xdr_getpos (&xdrs);
      94  
      95    T(u_short, 36)
      96  
      97    if (! xdr_setpos (&xdrs, pos))
      98      {
      99        puts ("xdr_setpos during encoding failed");
     100        return 1;
     101      }
     102  
     103    T(u_short, 36)
     104  
     105  #undef T
     106  
     107    xdr_destroy (&xdrs);
     108  
     109    return 0;
     110  }
     111  
     112  #define TEST_FUNCTION do_test ()
     113  #include "../test-skeleton.c"