diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2008-10-23 03:07:27 +0200 |
---|---|---|
committer | Jelmer Vernooij <jelmer@samba.org> | 2008-10-23 03:07:27 +0200 |
commit | 52923c4ff4406110b82117243552beb0b5d9e1c0 (patch) | |
tree | db418e0be5eca461f1658149d4359e64ecc61f11 /source3/librpc/tables.pl | |
parent | ad50d78496537c3a902231c58e51f5c0a12ca536 (diff) | |
download | samba-52923c4ff4406110b82117243552beb0b5d9e1c0.tar.gz samba-52923c4ff4406110b82117243552beb0b5d9e1c0.tar.bz2 samba-52923c4ff4406110b82117243552beb0b5d9e1c0.zip |
Remove unused copy of tables.pl
Diffstat (limited to 'source3/librpc/tables.pl')
-rwxr-xr-x | source3/librpc/tables.pl | 89 |
1 files changed, 0 insertions, 89 deletions
diff --git a/source3/librpc/tables.pl b/source3/librpc/tables.pl deleted file mode 100755 index 946159c6f0..0000000000 --- a/source3/librpc/tables.pl +++ /dev/null @@ -1,89 +0,0 @@ -#!/usr/bin/perl -w - -################################################### -# package to produce a table of all idl parsers -# Copyright tridge@samba.org 2003 -# Copyright jelmer@samba.org 2005 -# released under the GNU GPL - -use strict; - -use Getopt::Long; -use File::Basename; - -my $opt_output = 'librpc/gen_ndr/tables.c'; -my $opt_help = 0; - - -######################################### -# display help text -sub ShowHelp() -{ - print " - perl DCE/RPC interface table generator - Copyright (C) tridge\@samba.org - - Usage: tables.pl [options] <idlfile> - - \n"; - exit(0); -} - -# main program -GetOptions ( - 'help|h|?' => \$opt_help, - 'output=s' => \$opt_output, - ); - -if ($opt_help) { - ShowHelp(); - exit(0); -} - -my $init_fns = ""; - -################################### -# extract table entries from 1 file -sub process_file($) -{ - my $filename = shift; - open(FILE, $filename) || die "unable to open $filename\n"; - my $found = 0; - - while (my $line = <FILE>) { - if ($line =~ /extern const struct ndr_interface_table (\w+);/) { - $found = 1; - $init_fns.="\tstatus = librpc_register_interface(&$1);\n"; - $init_fns.="\tif (NT_STATUS_IS_ERR(status)) return status;\n\n"; - } - } - - if ($found) { - print "#include \"$filename\"\n"; - } - - close(FILE); -} - -print <<EOF; - -/* Automatically generated by tables.pl. DO NOT EDIT */ - -#include "includes.h" -#include "librpc/rpc/dcerpc.h" -#include "librpc/rpc/dcerpc_table.h" -EOF - -process_file($_) foreach (@ARGV); - -print <<EOF; - -NTSTATUS dcerpc_register_builtin_interfaces(void) -{ - NTSTATUS status; - -$init_fns - - return NT_STATUS_OK; -} -EOF |