aboutsummaryrefslogtreecommitdiffstats
path: root/libio/tst-memstream1.c
blob: adc2aec257da51d1e42992378e903df2942eb0b1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
#include <mcheck.h>
#include <stdio.h>
#include <stdlib.h>


#ifndef CHAR_T
# define CHAR_T char
# define W(o) o
# define OPEN_MEMSTREAM open_memstream
#endif

#define S(s) S1 (s)
#define S1(s) #s


static void
mcheck_abort (enum mcheck_status ev)
{
  printf ("mecheck failed with status %d\n", (int) ev);
  exit (1);
}


static int
do_test (void)
{
  mcheck_pedantic (mcheck_abort);

  CHAR_T *buf = (CHAR_T *) 1l;
  size_t len = 12345;
  FILE *fp = OPEN_MEMSTREAM (&buf, &len);
  if (fp == NULL)
    {
      printf ("%s failed\n", S(OPEN_MEMSTREAM));
      return 1;
    }

  if (fflush (fp) != 0)
    {
      puts ("fflush failed");
      return 1;
    }

  if (len != 0)
    {
      puts ("string after no write not empty");
      return 1;
    }
  if (buf == (CHAR_T *) 1l)
    {
      puts ("buf not updated");
      return 1;
    }
  if (buf[0] != W('\0'))
    {
      puts ("buf[0] != 0");
      return 1;
    }

  buf = (CHAR_T *) 1l;
  len = 12345;
  if (fclose (fp) != 0)
    {
      puts ("fclose failed");
      return 1;
    }

  if (len != 0)
    {
      puts ("string after close with no write not empty");
      return 1;
    }
  if (buf == (CHAR_T *) 1l)
    {
      puts ("buf not updated");
      return 1;
    }
  if (buf[0] != W('\0'))
    {
      puts ("buf[0] != 0");
      return 1;
    }

  free (buf);

  return 0;
}

#define TEST_FUNCTION do_test ()
#include "../test-skeleton.c"