*** /dev/null Sat Nov 23 01:17:29 2024
--- - Sat Nov 23 01:17:39 2024
***************
*** 0 ****
--- 1,183 ----
+ /*
+ XDS - OSSP Extensible Data Serialization Library
+ Copyright (c) 2001 The OSSP Project (http://www.ossp.org/)
+ Copyright (c) 2001 Cable & Wireless Deutschland (http://www.cw.com/de/)
+
+ This file is part of OSSP XDS, an extensible data serialization
+ library which can be found at http://www.ossp.com/pkg/xds/.
+
+ Permission to use, copy, modify, and distribute this software for
+ any purpose with or without fee is hereby granted, provided that
+ the above copyright notice and this permission notice appear in all
+ copies.
+
+ THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
+ WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+ MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+ IN NO EVENT SHALL THE AUTHORS AND COPYRIGHT HOLDERS AND THEIR
+ CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+ SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+ LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
+ USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
+ ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+ OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
+ OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ SUCH DAMAGE.
+ */
+
+ #include <assert.h>
+ #include "internal.h"
+
+ int xdr_decode_int32(xds_t* xds, void* engine_context, void* buffer, size_t buffer_size, va_list* args)
+ {
+ int32_t* value;
+ u_int32_t tmp;
+
+ /* Consistency checks. */
+
+ assert(xds != NULL);
+ assert(buffer != NULL);
+ assert(args != NULL);
+ if (xds == NULL || buffer == NULL || buffer_size == 0 || args == NULL)
+ return XDS_ERR_INVALID_ARG;
+ if (buffer_size < 4)
+ return XDS_ERR_UNDERFLOW;
+
+ /* Get value and format it into the buffer. */
+
+ value = va_arg(*args, int32_t*);
+ assert(value != NULL);
+
+ if (((u_int8_t*)buffer)[0] & 0x80)
+ { /* negative number */
+ tmp = ((u_int8_t*)buffer)[0]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[1]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[2]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[3];
+ tmp = 0 - tmp;
+ *value = 0 - (int32_t)tmp;
+ }
+ else
+ { /* positive number */
+ *value = ((u_int8_t*)buffer)[0]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[1]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[2]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[3];
+ }
+
+ /* Done. */
+
+ return 4;
+ }
+
+ int xdr_decode_uint32(xds_t* xds, void* engine_context, void* buffer, size_t buffer_size, va_list* args)
+ {
+ u_int32_t* value;
+
+ /* Consistency checks. */
+
+ assert(xds != NULL);
+ assert(buffer != NULL);
+ assert(args != NULL);
+ if (xds == NULL || buffer == NULL || buffer_size == 0 || args == NULL)
+ return XDS_ERR_INVALID_ARG;
+ if (buffer_size < 4)
+ return XDS_ERR_UNDERFLOW;
+
+ /* Get value and format it into the buffer. */
+
+ value = va_arg(*args, u_int32_t*);
+ assert(value != NULL);
+
+ *value = ((u_int8_t*)buffer)[0]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[1]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[2]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[3];
+
+ /* Done. */
+
+ return 4;
+ }
+
+ int xdr_decode_int64(xds_t* xds, void* engine_context, void* buffer, size_t buffer_size, va_list* args)
+ {
+ int64_t* value;
+ u_int64_t tmp;
+
+ /* Consistency checks. */
+
+ assert(xds != NULL);
+ assert(buffer != NULL);
+ assert(args != NULL);
+ if (xds == NULL || buffer == NULL || buffer_size == 0 || args == NULL)
+ return XDS_ERR_INVALID_ARG;
+ if (buffer_size < 8)
+ return XDS_ERR_UNDERFLOW;
+
+ /* Get value and format it into the buffer. */
+
+ value = va_arg(*args, int64_t*);
+ assert(value != NULL);
+
+ if (((u_int8_t*)buffer)[0] & 0x80)
+ { /* negative number */
+ tmp = ((u_int8_t*)buffer)[0]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[1]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[2]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[3]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[4]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[5]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[6]; tmp = tmp << 8;
+ tmp += ((u_int8_t*)buffer)[7];
+ tmp = 0 - tmp;
+ *value = 0 - (int64_t)tmp;
+ }
+ else
+ { /* positive number */
+ *value = ((u_int8_t*)buffer)[0]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[1]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[2]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[3]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[4]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[5]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[6]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[7];
+ }
+
+ /* Done. */
+
+ return 8;
+ }
+
+ int xdr_decode_uint64(xds_t* xds, void* engine_context, void* buffer, size_t buffer_size, va_list* args)
+ {
+ u_int64_t* value;
+
+ /* Consistency checks. */
+
+ assert(xds != NULL);
+ assert(buffer != NULL);
+ assert(args != NULL);
+ if (xds == NULL || buffer == NULL || buffer_size == 0 || args == NULL)
+ return XDS_ERR_INVALID_ARG;
+ if (buffer_size < 8)
+ return XDS_ERR_UNDERFLOW;
+
+ /* Get value and format it into the buffer. */
+
+ value = va_arg(*args, u_int64_t*);
+ assert(value != NULL);
+
+ *value = ((u_int8_t*)buffer)[0]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[1]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[2]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[3]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[4]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[5]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[6]; *value = *value << 8;
+ *value += ((u_int8_t*)buffer)[7];
+
+ /* Done. */
+
+ return 8;
+ }
|