r10678: Add debug helper
[bbaumbach/samba-autobuild/.git] / source4 / lib / tdr / tdr.c
index e55060da2515c1380dc313cd75e3741c3d6dae12..4a8d05a8abc94ac6b919dd3d2ddfd6a560c1ea0c 100644 (file)
 
 #include "includes.h"
 #include "system/network.h"
+#include "system/filesys.h"
 
 #define TDR_BASE_MARSHALL_SIZE 1024
 
-#define TDR_PUSH_NEED_BYTES(tdr, n) TDR_CHECK(tdr_push_expand(tdr, tdr->offset+(n)))
+#define TDR_PUSH_NEED_BYTES(tdr, n) TDR_CHECK(tdr_push_expand(tdr, tdr->data.length+(n)))
 
 #define TDR_PULL_NEED_BYTES(tdr, n) do { \
        if ((n) > tdr->data.length || tdr->offset + (n) > tdr->data.length) { \
@@ -55,11 +56,15 @@ NTSTATUS tdr_push_expand(struct tdr_push *tdr, uint32_t size)
        }
 
        tdr->data.data = talloc_realloc(tdr, tdr->data.data, uint8_t, tdr->data.length + TDR_BASE_MARSHALL_SIZE);
-       return NT_STATUS_NO_MEMORY;
+
+       if (tdr->data.data == NULL)
+               return NT_STATUS_NO_MEMORY;
+
+       return NT_STATUS_OK;
 }
 
 
-NTSTATUS tdr_pull_uint8(struct tdr_pull *tdr, uint8_t *v)
+NTSTATUS tdr_pull_uint8(struct tdr_pull *tdr, TALLOC_CTX *ctx, uint8_t *v)
 {
        TDR_PULL_NEED_BYTES(tdr, 1);
        *v = TDR_CVAL(tdr, tdr->offset);
@@ -70,8 +75,8 @@ NTSTATUS tdr_pull_uint8(struct tdr_pull *tdr, uint8_t *v)
 NTSTATUS tdr_push_uint8(struct tdr_push *tdr, const uint8_t *v)
 {
        TDR_PUSH_NEED_BYTES(tdr, 1);
-       TDR_SCVAL(tdr, tdr->offset, *v);
-       tdr->offset += 1;
+       TDR_SCVAL(tdr, tdr->data.length, *v);
+       tdr->data.length += 1;
        return NT_STATUS_OK;
 }
 
@@ -81,7 +86,7 @@ NTSTATUS tdr_print_uint8(struct tdr_print *tdr, const char *name, uint8_t *v)
        return NT_STATUS_OK;
 }
 
-NTSTATUS tdr_pull_uint16(struct tdr_pull *tdr, uint16_t *v)
+NTSTATUS tdr_pull_uint16(struct tdr_pull *tdr, TALLOC_CTX *ctx, uint16_t *v)
 {
        TDR_PULL_NEED_BYTES(tdr, 2);
        *v = TDR_SVAL(tdr, tdr->offset);
@@ -92,8 +97,8 @@ NTSTATUS tdr_pull_uint16(struct tdr_pull *tdr, uint16_t *v)
 NTSTATUS tdr_push_uint16(struct tdr_push *tdr, const uint16_t *v)
 {
        TDR_PUSH_NEED_BYTES(tdr, 2);
-       TDR_SSVAL(tdr, tdr->offset, *v);
-       tdr->offset += 2;
+       TDR_SSVAL(tdr, tdr->data.length, *v);
+       tdr->data.length += 2;
        return NT_STATUS_OK;
 }
 
@@ -103,7 +108,7 @@ NTSTATUS tdr_print_uint16(struct tdr_print *tdr, const char *name, uint16_t *v)
        return NT_STATUS_OK;
 }
 
-NTSTATUS tdr_pull_uint32(struct tdr_pull *tdr, uint32_t *v)
+NTSTATUS tdr_pull_uint32(struct tdr_pull *tdr, TALLOC_CTX *ctx, uint32_t *v)
 {
        TDR_PULL_NEED_BYTES(tdr, 4);
        *v = TDR_IVAL(tdr, tdr->offset);
@@ -114,8 +119,8 @@ NTSTATUS tdr_pull_uint32(struct tdr_pull *tdr, uint32_t *v)
 NTSTATUS tdr_push_uint32(struct tdr_push *tdr, const uint32_t *v)
 {
        TDR_PUSH_NEED_BYTES(tdr, 4);
-       TDR_SIVAL(tdr, tdr->offset, *v);
-       tdr->offset += 4;
+       TDR_SIVAL(tdr, tdr->data.length, *v);
+       tdr->data.length += 4;
        return NT_STATUS_OK;
 }
 
@@ -125,7 +130,7 @@ NTSTATUS tdr_print_uint32(struct tdr_print *tdr, const char *name, uint32_t *v)
        return NT_STATUS_OK;
 }
 
-NTSTATUS tdr_pull_charset(struct tdr_pull *tdr, const char **v, uint32_t length, uint32_t el_size, int chset)
+NTSTATUS tdr_pull_charset(struct tdr_pull *tdr, TALLOC_CTX *ctx, const char **v, uint32_t length, uint32_t el_size, int chset)
 {
        int ret;
 
@@ -143,9 +148,14 @@ NTSTATUS tdr_pull_charset(struct tdr_pull *tdr, const char **v, uint32_t length,
                }
        }
 
+       if (length == 0) {
+               *v = talloc_strdup(ctx, "");
+               return NT_STATUS_OK;
+       }
+
        TDR_PULL_NEED_BYTES(tdr, el_size*length);
        
-       ret = convert_string_talloc(tdr, chset, CH_UNIX, tdr->data.data+tdr->offset, el_size*length, discard_const_p(void *, v));
+       ret = convert_string_talloc(ctx, chset, CH_UNIX, tdr->data.data+tdr->offset, el_size*length, discard_const_p(void *, v));
 
        if (ret == -1) {
                return NT_STATUS_INVALID_PARAMETER;
@@ -160,10 +170,14 @@ NTSTATUS tdr_push_charset(struct tdr_push *tdr, const char **v, uint32_t length,
 {
        ssize_t ret, required;
 
+       if (length == -1) {
+               length = strlen(*v) + 1; /* Extra element for null character */
+       }
+
        required = el_size * length;
        TDR_PUSH_NEED_BYTES(tdr, required);
 
-       ret = convert_string(CH_UNIX, chset, *v, strlen(*v), tdr->data.data+tdr->offset, required);
+       ret = convert_string(CH_UNIX, chset, *v, strlen(*v), tdr->data.data+tdr->data.length, required);
 
        if (ret == -1) {
                return NT_STATUS_INVALID_PARAMETER;
@@ -171,10 +185,10 @@ NTSTATUS tdr_push_charset(struct tdr_push *tdr, const char **v, uint32_t length,
 
        /* Make sure the remaining part of the string is filled with zeroes */
        if (ret < required) {
-               memset(tdr->data.data+tdr->offset+ret, 0, required-ret);
+               memset(tdr->data.data+tdr->data.length+ret, 0, required-ret);
        }
        
-       tdr->offset += required;
+       tdr->data.length += required;
                                                 
        return NT_STATUS_OK;
 }
@@ -188,10 +202,10 @@ NTSTATUS tdr_print_charset(struct tdr_print *tdr, const char *name, const char *
 /*
   pull a ipv4address
 */
-NTSTATUS tdr_pull_ipv4address(struct tdr_pull *tdr, const char **address)
+NTSTATUS tdr_pull_ipv4address(struct tdr_pull *tdr, TALLOC_CTX *ctx, const char **address)
 {
        struct ipv4_addr in;
-       TDR_CHECK(tdr_pull_uint32(tdr, &in.addr));
+       TDR_CHECK(tdr_pull_uint32(tdr, ctx, &in.addr));
        in.addr = htonl(in.addr);
        *address = talloc_strdup(tdr, sys_inet_ntoa(in));
        NT_STATUS_HAVE_NO_MEMORY(*address);
@@ -221,7 +235,7 @@ NTSTATUS tdr_print_ipv4address(struct tdr_print *tdr, const char *name,
 /*
   parse a hyper
 */
-NTSTATUS tdr_pull_hyper(struct tdr_pull *tdr, uint64_t *v)
+NTSTATUS tdr_pull_hyper(struct tdr_pull *tdr, TALLOC_CTX *ctx, uint64_t *v)
 {
        TDR_PULL_NEED_BYTES(tdr, 8);
        *v = TDR_IVAL(tdr, tdr->offset);
@@ -236,9 +250,9 @@ NTSTATUS tdr_pull_hyper(struct tdr_pull *tdr, uint64_t *v)
 NTSTATUS tdr_push_hyper(struct tdr_push *tdr, uint64_t *v)
 {
        TDR_PUSH_NEED_BYTES(tdr, 8);
-       TDR_SIVAL(tdr, tdr->offset, ((*v) & 0xFFFFFFFF));
-       TDR_SIVAL(tdr, tdr->offset+4, ((*v)>>32));
-       tdr->offset += 8;
+       TDR_SIVAL(tdr, tdr->data.length, ((*v) & 0xFFFFFFFF));
+       TDR_SIVAL(tdr, tdr->data.length+4, ((*v)>>32));
+       tdr->data.length += 8;
        return NT_STATUS_OK;
 }
 
@@ -256,9 +270,9 @@ NTSTATUS tdr_push_NTTIME(struct tdr_push *tdr, NTTIME *t)
 /*
   pull a NTTIME
 */
-NTSTATUS tdr_pull_NTTIME(struct tdr_pull *tdr, NTTIME *t)
+NTSTATUS tdr_pull_NTTIME(struct tdr_pull *tdr, TALLOC_CTX *ctx, NTTIME *t)
 {
-       TDR_CHECK(tdr_pull_hyper(tdr, t));
+       TDR_CHECK(tdr_pull_hyper(tdr, ctx, t));
        return NT_STATUS_OK;
 }
 
@@ -273,10 +287,10 @@ NTSTATUS tdr_push_time_t(struct tdr_push *tdr, time_t *t)
 /*
   pull a time_t
 */
-NTSTATUS tdr_pull_time_t(struct tdr_pull *tdr, time_t *t)
+NTSTATUS tdr_pull_time_t(struct tdr_pull *tdr, TALLOC_CTX *ctx, time_t *t)
 {
        uint32_t tt;
-       TDR_CHECK(tdr_pull_uint32(tdr, &tt));
+       TDR_CHECK(tdr_pull_uint32(tdr, ctx, &tt));
        *t = tt;
        return NT_STATUS_OK;
 }
@@ -309,7 +323,7 @@ NTSTATUS tdr_print_DATA_BLOB(struct tdr_print *tdr, const char *name, DATA_BLOB
        return NT_STATUS_OK;
 }
 
-#define TDR_ALIGN(tdr,n) (((tdr)->offset & ((n)-1)) == 0?0:((n)-((tdr)->offset&((n)-1))))
+#define TDR_ALIGN(l,n) (((l) & ((n)-1)) == 0?0:((n)-((l)&((n)-1))))
 
 /*
   push a DATA_BLOB onto the wire. 
@@ -317,32 +331,32 @@ NTSTATUS tdr_print_DATA_BLOB(struct tdr_print *tdr, const char *name, DATA_BLOB
 NTSTATUS tdr_push_DATA_BLOB(struct tdr_push *tdr, DATA_BLOB *blob)
 {
        if (tdr->flags & TDR_ALIGN2) {
-               blob->length = TDR_ALIGN(tdr, 2);
+               blob->length = TDR_ALIGN(tdr->data.length, 2);
        } else if (tdr->flags & TDR_ALIGN4) {
-               blob->length = TDR_ALIGN(tdr, 4);
+               blob->length = TDR_ALIGN(tdr->data.length, 4);
        } else if (tdr->flags & TDR_ALIGN8) {
-               blob->length = TDR_ALIGN(tdr, 8);
+               blob->length = TDR_ALIGN(tdr->data.length, 8);
        }
 
        TDR_PUSH_NEED_BYTES(tdr, blob->length);
        
-       memcpy(tdr->data.data+tdr->offset, blob->data, blob->length);
+       memcpy(tdr->data.data+tdr->data.length, blob->data, blob->length);
        return NT_STATUS_OK;
 }
 
 /*
   pull a DATA_BLOB from the wire. 
 */
-NTSTATUS tdr_pull_DATA_BLOB(struct tdr_pull *tdr, DATA_BLOB *blob)
+NTSTATUS tdr_pull_DATA_BLOB(struct tdr_pull *tdr, TALLOC_CTX *ctx, DATA_BLOB *blob)
 {
        uint32_t length;
 
        if (tdr->flags & TDR_ALIGN2) {
-               length = TDR_ALIGN(tdr, 2);
+               length = TDR_ALIGN(tdr->offset, 2);
        } else if (tdr->flags & TDR_ALIGN4) {
-               length = TDR_ALIGN(tdr, 4);
+               length = TDR_ALIGN(tdr->offset, 4);
        } else if (tdr->flags & TDR_ALIGN8) {
-               length = TDR_ALIGN(tdr, 8);
+               length = TDR_ALIGN(tdr->offset, 8);
        } else if (tdr->flags & TDR_REMAINING) {
                length = tdr->data.length - tdr->offset;
        } else {
@@ -359,3 +373,44 @@ NTSTATUS tdr_pull_DATA_BLOB(struct tdr_pull *tdr, DATA_BLOB *blob)
        tdr->offset += length;
        return NT_STATUS_OK;
 }
+
+NTSTATUS tdr_push_to_fd(int fd, tdr_push_fn_t push_fn, const void *p)
+{
+       struct tdr_push *push = talloc_zero(NULL, struct tdr_push);
+
+       if (push == NULL)
+               return NT_STATUS_NO_MEMORY;
+
+       if (NT_STATUS_IS_ERR(push_fn(push, p))) {
+               DEBUG(1, ("Error pushing data\n"));
+               talloc_free(push);
+               return NT_STATUS_UNSUCCESSFUL;
+       }
+
+       if (write(fd, push->data.data, push->data.length) < push->data.length) {
+               DEBUG(1, ("Error writing all data\n"));
+               return NT_STATUS_UNSUCCESSFUL;
+       }
+
+       talloc_free(push);
+
+       return NT_STATUS_OK;
+}
+
+void tdr_print_debug_helper(struct tdr_print *tdr, const char *format, ...) _PRINTF_ATTRIBUTE(2,3)
+{
+       va_list ap;
+       char *s = NULL;
+       int i;
+
+       va_start(ap, format);
+       vasprintf(&s, format, ap);
+       va_end(ap);
+
+       for (i=0;i<tdr->level;i++) {
+               DEBUG(0,("    "));
+       }
+
+       DEBUG(0,("%s\n", s));
+       free(s);
+}