summaryrefslogtreecommitdiff
path: root/source4/script/build_smb_interfaces.pl
diff options
context:
space:
mode:
authorTim Potter <tpot@samba.org>2005-08-02 06:10:31 +0000
committerGerald (Jerry) Carter <jerry@samba.org>2007-10-10 13:30:57 -0500
commite3374bb48daa0235811d384bce55e39b6cf6abda (patch)
tree69aafae101448c8d6747a9c390eb4f320201201c /source4/script/build_smb_interfaces.pl
parent6e64a8b40fe0857cc5565ff855387c2ef97374dc (diff)
downloadsamba-e3374bb48daa0235811d384bce55e39b6cf6abda.tar.gz
samba-e3374bb48daa0235811d384bce55e39b6cf6abda.tar.bz2
samba-e3374bb48daa0235811d384bce55e39b6cf6abda.zip
r8910: An initial parser to parse structures in smb_interfaces.h. This will be
used to generate ejs objects for making raw smb calls. Running 'make smb_interfaces' should run the build_smb_interfaces.pl script which at the moment only displays a dump of the parsed data. Const is also not working right now but it's bedtime. (This used to be commit 1be5f55d7f6926bf7266ea72623990f0bb558c94)
Diffstat (limited to 'source4/script/build_smb_interfaces.pl')
-rwxr-xr-xsource4/script/build_smb_interfaces.pl10
1 files changed, 10 insertions, 0 deletions
diff --git a/source4/script/build_smb_interfaces.pl b/source4/script/build_smb_interfaces.pl
new file mode 100755
index 0000000000..31309220c1
--- /dev/null
+++ b/source4/script/build_smb_interfaces.pl
@@ -0,0 +1,10 @@
+#!/usr/bin/perl
+
+my $idl_file = shift;
+
+require smb_interfaces;
+my $idl_parser = new smb_interfaces;
+$parse = $idl_parser->parse($idl_file);
+
+use Data::Dumper;
+print Dumper($parse);