/* Tests for AIO in librt. Copyright (C) 1998 Free Software Foundation, Inc. Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for more details. You should have received a copy of the GNU Library General Public License along with the GNU C Library; see the file COPYING.LIB. If not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #include <aio.h> #include <errno.h> #include <error.h> #include <stdlib.h> #include <string.h> #include <unistd.h> #include <sys/stat.h> /* Prototype for our test function. */ extern void do_prepare (int argc, char *argv[]); extern int do_test (int argc, char *argv[]); /* We have a preparation function. */ #define PREPARE do_prepare /* We might need a bit longer timeout. */ #define TIMEOUT 20 /* sec */ /* This defines the `main' function and some more. */ #include <test-skeleton.c> /* These are for the temporary file we generate. */ char *name; int fd; void do_prepare (int argc, char *argv[]) { char name_len; name_len = strlen (test_dir); name = malloc (name_len + sizeof ("/aioXXXXXX")); mempcpy (mempcpy (name, test_dir, name_len), "/aioXXXXXX", sizeof ("/aioXXXXXX")); add_temp_file (name); /* Open our test file. */ fd = mkstemp (name); if (fd == -1) error (EXIT_FAILURE, errno, "cannot open test file `%s'", name); } int test_file (const void *buf, size_t size, int fd, const char *msg) { struct stat st; char tmp[size]; errno = 0; if (fstat (fd, &st) < 0) { error (0, errno, "%s: failed stat", msg); return 1; } if (st.st_size != size) { error (0, errno, "%s: wrong size: %lu, should be %lu", msg, (unsigned long int) st.st_size, (unsigned long int) size); return 1; } if (pread (fd, tmp, size, 0) != size) { error (0, errno, "%s: failed stat", msg); return 1; } if (memcmp (buf, tmp, size) != 0) { error (0, errno, "%s: failed comparison", msg); return 1; } printf ("%s test ok\n", msg); return 0; } void do_wait (struct aiocb **cbp, size_t nent) { int go_on; do { size_t cnt; aio_suspend ((const struct aiocb *const *) cbp, nent, NULL); go_on = 0; for (cnt = 0; cnt < nent; ++cnt) if (cbp[cnt] != NULL && aio_error (cbp[cnt]) == EINPROGRESS) go_on = 1; else cbp[cnt] = NULL; } while (go_on); } int do_test (int argc, char *argv[]) { struct aiocb cbs[10]; struct aiocb *cbp[10]; char buf[1000]; size_t cnt; int result = 0; /* Preparation. */ for (cnt = 0; cnt < 10; ++cnt) { cbs[cnt].aio_fildes = fd; cbs[cnt].aio_reqprio = 0; cbs[cnt].aio_buf = memset (&buf[cnt * 100], '0' + cnt, 100); cbs[cnt].aio_nbytes = 100; cbs[cnt].aio_offset = cnt * 100; cbs[cnt].aio_sigevent.sigev_notify = SIGEV_NONE; cbp[cnt] = &cbs[cnt]; } /* First a simple test. */ for (cnt = 10; cnt > 0; ) aio_write (cbp[--cnt]); /* Wait 'til the results are there. */ do_wait (cbp, 10); /* Test this. */ result |= test_file (buf, sizeof (buf), fd, "aio_write"); /* Read now as we've written it. */ memset (buf, '\0', sizeof (buf)); /* Issue the commands. */ for (cnt = 10; cnt > 0; ) { --cnt; cbp[cnt] = &cbs[cnt]; aio_read (cbp[cnt]); } /* Wait 'til the results are there. */ do_wait (cbp, 10); /* Test this. */ for (cnt = 0; cnt < 1000; ++cnt) if (buf[cnt] != '0' + (cnt / 100)) { result = 1; error (0, 0, "comparison failed for aio_read test"); break; } if (cnt == 1000) puts ("aio_read test ok"); /* Remove the test file contents. */ if (ftruncate (fd, 0) < 0) { error (0, errno, "ftruncate failed\n"); result = 1; } /* Test lio_listio. */ for (cnt = 0; cnt < 10; ++cnt) { cbs[cnt].aio_lio_opcode = LIO_WRITE; cbp[cnt] = &cbs[cnt]; } /* Issue the command. */ lio_listio (LIO_WAIT, cbp, 10, NULL); /* ...and immediately test it since we started it in wait mode. */ result |= test_file (buf, sizeof (buf), fd, "lio_listio (write)"); return result; }