-
-
Notifications
You must be signed in to change notification settings - Fork 302
/
xdrfloat.c
112 lines (78 loc) · 1.79 KB
/
xdrfloat.c
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
/*!
\file lib/db/dbmi_base/xdrfloat.c
\brief DBMI Library (base) - external data representation (float)
(C) 1999-2009, 2011 by the GRASS Development Team
This program is free software under the GNU General Public License
(>=v2). Read the file COPYING that comes with GRASS for details.
\author Joel Jones (CERL/UIUC), Radim Blazek, Brad Douglas, Markus Neteler
\author Doxygenized by Martin Landa <landa.martin gmail.com> (2011)
*/
#include "xdr.h"
/*!
\brief Send float
\param d
\return
*/
int db__send_float(float d)
{
int stat = DB_OK;
if (!db__send(&d, sizeof(d)))
stat = DB_PROTOCOL_ERR;
if (stat == DB_PROTOCOL_ERR)
db_protocol_error();
return stat;
}
/*!
\brief Receive float
\param d
\return
*/
int db__recv_float(float *d)
{
int stat = DB_OK;
if (!db__recv(d, sizeof(*d)))
stat = DB_PROTOCOL_ERR;
if (stat == DB_PROTOCOL_ERR)
db_protocol_error();
return stat;
}
/*!
\brief Send float array
\param x
\param n
\return
*/
int db__send_float_array(const float *x, int n)
{
int stat = DB_OK;
if (!db__send(&n, sizeof(n)))
stat = DB_PROTOCOL_ERR;
if (!db__send(x, n * sizeof(*x)))
stat = DB_PROTOCOL_ERR;
if (stat == DB_PROTOCOL_ERR)
db_protocol_error();
return stat;
}
/*!
\brief Receive float array
Returns an allocated array of floats
Caller is responsible for free()
\param x
\param n
\return
*/
int db__recv_float_array(float **x, int *n)
{
int stat = DB_OK;
int count = 0;
float *a = NULL;
if (!db__recv(&count, sizeof(count)))
stat = DB_PROTOCOL_ERR;
*n = count;
*x = a = (float *)db_calloc(count, sizeof(*a));
if (!db__recv(a, count * sizeof(*a)))
stat = DB_PROTOCOL_ERR;
if (stat == DB_PROTOCOL_ERR)
db_protocol_error();
return stat;
}