Mercurial > hg > octave-kai > gnulib-hg
changeset 7869:d612855198c2
Test for the binary-io module.
author | Bruno Haible <bruno@clisp.org> |
---|---|
date | Sun, 14 Jan 2007 21:31:03 +0000 |
parents | 12fdd0de44d5 |
children | d0a083ba411f |
files | ChangeLog modules/binary-io-tests tests/test-binary-io.c tests/test-binary-io.sh |
diffstat | 4 files changed, 96 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2007-01-14 Bruno Haible <bruno@clisp.org> + + * modules/binary-io-tests: New file. + * tests/test-binary-io.sh: New file. + * tests/test-binary-io.c: New file. + 2007-01-14 Bruno Haible <bruno@clisp.org> * modules/array-oset-tests: New file.
new file mode 100644 --- /dev/null +++ b/modules/binary-io-tests @@ -0,0 +1,13 @@ +Files: +tests/test-binary-io.sh +tests/test-binary-io.c + +Depends-on: + +configure.ac: + +Makefile.am: +TESTS += test-binary-io.sh +TESTS_ENVIRONMENT += EXEEXT='@EXEEXT@' +check_PROGRAMS += test-binary-io +
new file mode 100644 --- /dev/null +++ b/tests/test-binary-io.c @@ -0,0 +1,66 @@ +/* Test of binary mode I/O. + Copyright (C) 2005, 2007 Free Software Foundation, Inc. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2, or (at your option) + any later version. + + This program 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 General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software Foundation, + Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ + +/* Written by Bruno Haible <bruno@clisp.org>, 2005. */ + +#ifdef HAVE_CONFIG_H +# include <config.h> +#endif + +#include "binary-io.h" + +#include <sys/types.h> +#include <sys/stat.h> +#include <fcntl.h> +#include <stdio.h> +#include <stdlib.h> +#include <unistd.h> + +#define ASSERT(expr) if (!(expr)) abort (); + +int +main () +{ + /* Test the O_BINARY macro. */ + { + int fd = open ("output2.tmp", O_CREAT | O_TRUNC | O_RDWR | O_BINARY); + if (write (fd, "Hello\n", 6) < 0) + exit (1); + close (fd); + } + { + struct stat statbuf; + if (stat ("output2.tmp", &statbuf) < 0) + exit (1); + ASSERT (statbuf.st_size == 6); + } + unlink ("output2.tmp"); + + /* Test the SET_BINARY macro. */ + SET_BINARY (1); + fputs ("Hello\n", stdout); + fclose (stdout); + fclose (stderr); + { + struct stat statbuf; + if (stat ("output.tmp", &statbuf) < 0) + exit (1); + ASSERT (statbuf.st_size == 6); + } + + return 0; +}