Add pidl. Add preliminary work on SecIP.

Please note that the Alphatronics implementation does not follow the Vebon specification.
An extra padding byte had to be added to the idl..
This commit is contained in:
Wilco Baan Hofman 2012-08-01 03:30:50 +02:00
parent 1972b32b60
commit ad758df90b
67 changed files with 24048 additions and 1 deletions

18
pidl/tests/samba3-srv.pl Executable file
View file

@ -0,0 +1,18 @@
#!/usr/bin/perl
# (C) 2008 Jelmer Vernooij <jelmer@samba.org>
# Published under the GNU General Public License
use strict;
use warnings;
use Test::More tests => 1;
use FindBin qw($RealBin);
use lib "$RealBin";
use Util;
use Parse::Pidl::Util qw(MyDumper has_property);
use Parse::Pidl::Samba3::ServerNDR qw(DeclLevel);
my $l = { TYPE => "DATA", DATA_TYPE => "uint32" };
my $e = { FILE => "foo", LINE => 0, PROPERTIES => { }, TYPE => "uint32",
LEVELS => [ $l ] };
is("uint32_t", DeclLevel($e, 0));