summaryrefslogtreecommitdiff
path: root/support/dktools/dk4membs.ctr
blob: 3d48d629d33a0d2b3b2d13a32c569b1f97c70738 (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
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
%%	options

copyright owner	=	Dirk Krause
copyright year	=	2015-xxxx
SPDX-License-Identifier:	BSD-3-Clause



%%	header

/**	@file	dk4membs.h	Save buffer data to stream.
*/

#ifndef	DK4CONF_H_INCLUDED
#if DK4_BUILDING_DKTOOLS4
#include "dk4conf.h"
#else
#include <dktools-4/dk4conf.h>
#endif
#endif

#ifndef	DK4MEMBUF_H_INCLUDED
#if DK4_BUILDING_DKTOOLS4
#include "dk4membuf.h"
#else
#include <dktools-4/dk4membuf.h>
#endif
#endif

#ifndef	DK4STRM_H_INCLUDED
#if DK4_BUILDING_DKTOOLS4
#include "dk4strm.h"
#else
#include <dktools-4/dk4strm.h>
#endif
#endif


#ifdef __cplusplus
extern "C" {
#endif

/**	Save buffer contents to file.
	@param	strm	Output stream.
	@param	mbptr	Buffer containing data to write.
	@param	erp	Error report, may be NULL.
	@return	1 on success, 0 on error.

	Error codes:
	- DK4_E_INVALID_ARGUMENTS<br>
	  if strm or mbptr is NULL,
	- DK4_E_WRITE_FAILED<br>
	  if writing one ore multiple bytes to the stream failed,
	- DK4_E_FLUSH_FAILED<br>
	  if flusing data downwards failed.
*/
int
dk4membuf_to_stream(
	dk4_stream_t		*strm,
	dk4_membuf_t	const	*mbptr,
	dk4_er_t		*erp
);

#ifdef __cplusplus
}
#endif



%%	module

#include "dk4conf.h"
#include "dk4membs.h"

#if DK4_HAVE_ASSERT_H
#ifndef	ASSERT_H_INCLUDED
#include <assert.h>
#define	ASSERT_H_INCLUDED 1
#endif
#endif


int
dk4membuf_to_stream(
	dk4_stream_t		*strm,
	dk4_membuf_t	const	*mbptr,
	dk4_er_t		*erp
)
{
  dk4_membuf_cell_t	*pc	= NULL;
  dk4_membuf_cell_t	*pn	= NULL;
  int			 back	= 0;

#if	DK4_USE_ASSERT
	assert(NULL != strm);
	assert(NULL != mbptr);
#endif
  if ((NULL != strm) && (NULL != mbptr)) {
    back = 1;
    pc = mbptr->first;
    while (NULL != pc) {
      pn = pc->next;
      if (0 < pc->used) {
	if (0 == dk4stream_write(strm, pc->buf, pc->used, erp)) {
	  back = 0;
	}
      }
      pc = pn;
    }
  } else {
    dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
  }
  return back;
}