use a cell that actually exists
[arla.git] / tests / mmap-vs-read2.c
blobced893988e56c03a4469a76b9c00e7839069b2af
1 /*
2 * Copyright (c) 1995 - 2001 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 *
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * 3. Neither the name of the Institute nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
34 #ifdef HAVE_CONFIG_H
35 #include <config.h>
36 #endif
38 #include <stdio.h>
39 #include <stdlib.h>
40 #include <sys/types.h>
41 #include <fcntl.h>
42 #include <time.h>
43 #include <unistd.h>
44 #include <string.h>
45 #include <sys/mman.h>
46 #include <sys/stat.h>
47 #include <err.h>
48 #include <roken.h>
50 #ifdef RCSID
51 RCSID("$Id$");
52 #endif
54 static int debug = 0;
56 static void
57 generate_file (const char *filename, int randomp, size_t sz)
59 int fd;
60 char *buf;
61 int i;
63 buf = malloc (sz);
64 if (buf == NULL)
65 err (1, "malloc %u", (unsigned)sz);
67 fd = open (filename, O_WRONLY | O_CREAT, 0666);
68 if (fd < 0)
69 err (1, "open %s", filename);
71 for (i = 0; i < sz; ++i)
72 if (randomp)
73 buf[i] = rand();
74 else
75 buf[0] = 0;
77 if (write (fd, buf, sz) != sz)
78 err (1, "write");
79 if (close (fd))
80 err (1, "close");
81 free (buf);
84 static unsigned char *
85 read_file (int fd, size_t sz)
87 unsigned char *buf;
88 ssize_t ret;
90 buf = malloc (sz);
91 if (buf == NULL)
92 err (1, "malloc %u", (unsigned)sz);
93 ret = read(fd, buf, sz);
94 if(ret < 0)
95 err(1, "read");
96 if (ret != sz)
97 errx(1, "short read %d < %u", (int)ret, (unsigned)sz);
98 return buf;
101 #ifndef MAP_FAILED
102 #define MAP_FAILED ((void *)-1)
103 #endif
105 static void *
106 mmap_file (int fd, size_t sz)
108 void *ret;
110 ret = mmap (0, sz, PROT_READ, MAP_PRIVATE, fd, 0);
111 if (ret == (void *)MAP_FAILED)
112 err (1, "mmap");
113 return ret;
116 static void __attribute__ ((__unused__))
117 print_area (unsigned char *ptr, size_t len)
119 while (len--) {
120 printf ("%x", *ptr);
121 ptr++;
125 static int
126 do_test (int randomp)
128 unsigned char *malloc_buf;
129 void *mmap_buf;
130 int fd;
131 const char *file = "foo";
132 const size_t sz = 3 * getpagesize() / 2;
134 generate_file (file, randomp, sz);
136 fd = open (file, O_RDONLY, 0);
137 if (fd < 0)
138 err (1, "open %s", file);
140 mmap_buf = mmap_file (fd, sz);
141 malloc_buf = read_file (fd, sz);
142 close (fd);
143 unlink (file);
144 if (memcmp (malloc_buf, mmap_buf, sz) != 0) {
145 if (debug) {
146 printf ("type: %s\n", randomp ? "random" : "allzero");
147 printf ("read: ");
148 print_area (malloc_buf, sz);
149 printf ("\nmmap: ");
150 print_area (mmap_buf, sz);
151 printf ("\n");
153 return 1;
155 return 0;
159 main (int argc, char **argv)
161 setprogname (argv[0]);
163 if (argc != 1)
164 debug = 1;
166 srand (time(NULL));
168 if (do_test (0))
169 return 1;
170 if (do_test (1))
171 return 2;
173 return 0;