summaryrefslogtreecommitdiff
path: root/support/dktools/test-dk4strm.ctr
blob: e26959789143e35539e3acffddbf54806e9a235a (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

#include "dk4strm.h"
#include "dk4strmf.h"
#include "dk4fopc8.h"
#include <stdio.h>



$!trace-include




int main(int argc, char *argv[])
{
  FILE		*fipo;
  dk4_stream_t	*outstrm;
  dk4_stream_t	*instrm;
  dk4_er_t	 er;
  char		 c;
  $!trace-init "test-dk4strm.deb"
  $? "+ main"
  if (1 < argc) {
    dk4error_init(&er);
    fipo = dk4fopen_c8(argv[1], "w", 0, &er);
    if (NULL != fipo) {
      dk4error_init(&er);
      instrm = dk4stream_open_for_file(stdin, DK4_STREAM_READ, 4096, 0, &er);
      if (NULL != instrm) {
        outstrm = dk4stream_open_for_file(fipo, DK4_STREAM_WRITE, 0, 4096, &er);
	if (NULL != outstrm) {
	  while (dk4stream_c8_read_byte(&c, instrm, &er)) {
	    dk4stream_write_byte(outstrm, (char)c, &er);
	  }
	  (void)dk4stream_close(outstrm, &er);
	}
        (void)dk4stream_close(instrm, &er);
      }
      fclose(fipo);
    } else {
      fprintf(stderr, "Failed to open file %d %d\n", er.ec, er.dt.iDetails1);
    }
  } else {
    dk4error_init(&er);
    instrm = dk4stream_open_for_file(stdin, DK4_STREAM_READ, 4096, 0, &er);
    if (NULL != instrm) {		$? ". instream ok"
      outstrm = dk4stream_open_for_file(stdout, DK4_STREAM_WRITE, 0, 4096, &er);
      if (NULL != outstrm) {	$? ". outstream ok"
        while (dk4stream_c8_read_byte(&c, instrm, &er)) {
          dk4stream_write_byte(outstrm, (char)c, &er);
        }
        dk4stream_close(outstrm, &er);
      }
      dk4stream_close(instrm, &er);
    }
  }
  $? "- main"
  $!trace-end
  fprintf(stderr, "Error code: %d\n", er.ec);
  return 0;
}