Blame gnulib/tests/test-binary-io.c

Packit Service a2ae7a
/* Test of binary mode I/O.
Packit Service a2ae7a
   Copyright (C) 2005, 2007-2019 Free Software Foundation, Inc.
Packit Service a2ae7a
Packit Service a2ae7a
   This program is free software: you can redistribute it and/or modify
Packit Service a2ae7a
   it under the terms of the GNU General Public License as published by
Packit Service a2ae7a
   the Free Software Foundation; either version 3 of the License, or
Packit Service a2ae7a
   (at your option) any later version.
Packit Service a2ae7a
Packit Service a2ae7a
   This program is distributed in the hope that it will be useful,
Packit Service a2ae7a
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service a2ae7a
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit Service a2ae7a
   GNU General Public License for more details.
Packit Service a2ae7a
Packit Service a2ae7a
   You should have received a copy of the GNU General Public License
Packit Service a2ae7a
   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
Packit Service a2ae7a
Packit Service a2ae7a
/* Written by Bruno Haible <bruno@clisp.org>, 2005.  */
Packit Service a2ae7a
Packit Service a2ae7a
#include <config.h>
Packit Service a2ae7a
Packit Service a2ae7a
#include "binary-io.h"
Packit Service a2ae7a
Packit Service a2ae7a
#include <sys/types.h>
Packit Service a2ae7a
#include <sys/stat.h>
Packit Service a2ae7a
#include <fcntl.h>
Packit Service a2ae7a
#include <stdio.h>
Packit Service a2ae7a
#include <stdlib.h>
Packit Service a2ae7a
#include <unistd.h>
Packit Service a2ae7a
Packit Service a2ae7a
#include "macros.h"
Packit Service a2ae7a
Packit Service a2ae7a
int
Packit Service a2ae7a
main (int argc, char *argv[])
Packit Service a2ae7a
{
Packit Service a2ae7a
  /* Test the O_BINARY macro.  */
Packit Service a2ae7a
  {
Packit Service a2ae7a
    int fd =
Packit Service a2ae7a
      open ("t-bin-out0.tmp", O_CREAT | O_TRUNC | O_RDWR | O_BINARY, 0600);
Packit Service a2ae7a
    if (write (fd, "Hello\n", 6) < 0)
Packit Service a2ae7a
      exit (1);
Packit Service a2ae7a
    close (fd);
Packit Service a2ae7a
  }
Packit Service a2ae7a
  {
Packit Service a2ae7a
    struct stat statbuf;
Packit Service a2ae7a
    if (stat ("t-bin-out0.tmp", &statbuf) < 0)
Packit Service a2ae7a
      exit (1);
Packit Service a2ae7a
    ASSERT (statbuf.st_size == 6);
Packit Service a2ae7a
  }
Packit Service a2ae7a
Packit Service a2ae7a
  switch (argv[1][0])
Packit Service a2ae7a
    {
Packit Service a2ae7a
    case '1':
Packit Service a2ae7a
      /* Test the set_binary_mode() function.  */
Packit Service a2ae7a
      set_binary_mode (1, O_BINARY);
Packit Service a2ae7a
      fputs ("Hello\n", stdout);
Packit Service a2ae7a
      break;
Packit Service a2ae7a
Packit Service a2ae7a
    default:
Packit Service a2ae7a
      break;
Packit Service a2ae7a
    }
Packit Service a2ae7a
Packit Service a2ae7a
  return 0;
Packit Service a2ae7a
}