diff options
Diffstat (limited to 'source4/build/pidl/tests/ndr_array.pl')
-rwxr-xr-x | source4/build/pidl/tests/ndr_array.pl | 45 |
1 files changed, 0 insertions, 45 deletions
diff --git a/source4/build/pidl/tests/ndr_array.pl b/source4/build/pidl/tests/ndr_array.pl deleted file mode 100755 index d486308339..0000000000 --- a/source4/build/pidl/tests/ndr_array.pl +++ /dev/null @@ -1,45 +0,0 @@ -#!/usr/bin/perl -# Array testing -# (C) 2005 Jelmer Vernooij <jelmer@samba.org> -# Published under the GNU General Public License -use strict; - -use Parse::Pidl::Test; - -my %settings = Parse::Pidl::Test::GetSettings(@ARGV); -$settings{'IDL-Arguments'} = ['--quiet', '--parse', '--parser=ndr_test.c', '--header=ndr_test.h']; -$settings{'IncludeFiles'} = ['ndr_test.h']; -$settings{'ExtraFiles'} = ['ndr_test.c']; - -Parse::Pidl::Test::test_idl( - # Name - 'Fixed-Array', - - # Settings - \%settings, - - # IDL - '[public] void Test([in] uint8 x[10]);', - - # C Test - ' - uint8_t data[] = {1,2,3,4,5,6,7,8,9,10}; - int i; - DATA_BLOB b; - struct ndr_pull *ndr; - struct Test r; - - b.data = data; - b.length = 10; - ndr = ndr_pull_init_blob(&b, mem_ctx); - - if (NT_STATUS_IS_ERR(ndr_pull_Test(ndr, NDR_IN, &r))) - return 1; - - if (ndr->offset != 10) - return 2; - - for (i = 0; i < 10; i++) { - if (r.in.x[i] != i+1) return 3; - } -'); |