3 # (C) 2005 Jelmer Vernooij <jelmer@samba.org>
4 # Published under the GNU General Public License
7 use FindBin qw($RealBin);
8 use lib "$RealBin/../..";
11 my %settings = Test::GetSettings(@ARGV);
12 $settings{'IDL-Arguments'} = ['--quiet', '--parse', '--parser=ndr_test.c', '--header=ndr_test.h'];
13 $settings{'IncludeFiles'} = ['ndr_test.h'];
14 $settings{'ExtraFiles'} = ['ndr_test.c'];
24 '[public] void Test([in] uint8 x[10]);',
28 uint8_t data[] = {1,2,3,4,5,6,7,8,9,10};
36 ndr = ndr_pull_init_blob(&b, mem_ctx);
38 if (NT_STATUS_IS_ERR(ndr_pull_Test(ndr, NDR_IN, &r)))
41 if (ndr->offset != 10)
44 for (i = 0; i < 10; i++) {
45 if (r.in.x[i] != i+1) return 3;