svn commit: samba r14727 - in branches/SAMBA_4_0/source/pidl: .
tests
jelmer at samba.org
jelmer at samba.org
Sat Mar 25 20:51:41 GMT 2006
Author: jelmer
Date: 2006-03-25 20:51:41 +0000 (Sat, 25 Mar 2006)
New Revision: 14727
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=14727
Log:
Update pidls' TODO, add test that demonstrates the desired behaviour
Added:
branches/SAMBA_4_0/source/pidl/tests/ndr_tagtype.pl
Modified:
branches/SAMBA_4_0/source/pidl/TODO
Changeset:
Modified: branches/SAMBA_4_0/source/pidl/TODO
===================================================================
--- branches/SAMBA_4_0/source/pidl/TODO 2006-03-25 19:35:55 UTC (rev 14726)
+++ branches/SAMBA_4_0/source/pidl/TODO 2006-03-25 20:51:41 UTC (rev 14727)
@@ -11,11 +11,10 @@
- auto-alloc [ref] pointers for Samba4 during pull if they were NULL
-- replace subcontext() with represent_as()
- - NTSTATUS FROM_to_TO (const FROM *f, TO **t); /* FIXME: t needs to be allocated using talloc */
- - NTSTATUS TO_to_FROM (const TO *t, FROM **f); /* FIXME: f needs to be allocated using talloc */
- - `
+- improve represent_as()
- --explain-ndr option that dumps out parse tree ?
- seperate tables for NDR and DCE/RPC
+
+- allow data structures outside of interfaces
Added: branches/SAMBA_4_0/source/pidl/tests/ndr_tagtype.pl
===================================================================
--- branches/SAMBA_4_0/source/pidl/tests/ndr_tagtype.pl 2006-03-25 19:35:55 UTC (rev 14726)
+++ branches/SAMBA_4_0/source/pidl/tests/ndr_tagtype.pl 2006-03-25 20:51:41 UTC (rev 14727)
@@ -0,0 +1,38 @@
+#!/usr/bin/perl
+# Support for tagged types
+# (C) 2005 Jelmer Vernooij. Published under the GNU GPL
+use strict;
+
+use Test::More tests => 1 * 8;
+use FindBin qw($RealBin);
+use lib "$RealBin/../lib";
+use lib "$RealBin";
+use Util qw(test_samba4_ndr);
+
+SKIP: {
+ skip "Tagged types without typedef are not supported yet", 8;
+
+test_samba4_ndr('struct-notypedef',
+'
+ struct bla {
+ uint8 x;
+ };
+',
+'
+ struct ndr_push *ndr = ndr_push_init();
+ struct bla r;
+ uint8_t expected[] = { 0x0D };
+ DATA_BLOB expected_blob = { expected, 1 };
+ DATA_BLOB result_blob;
+ r.x = 13;
+
+ if (NT_STATUS_IS_ERR(ndr_push_bla(ndr, NDR_SCALARS|NDR_BUFFERS, &r)))
+ return 1;
+
+ result_blob = ndr_push_blob(ndr);
+
+ if (!data_blob_equal(&result_blob, &expected_blob))
+ return 2;
+');
+
+}
Property changes on: branches/SAMBA_4_0/source/pidl/tests/ndr_tagtype.pl
___________________________________________________________________
Name: svn:executable
+ *
More information about the samba-cvs
mailing list