Remove unused copy of tables.pl
authorJelmer Vernooij <jelmer@samba.org>
Thu, 23 Oct 2008 01:07:27 +0000 (03:07 +0200)
committerJelmer Vernooij <jelmer@samba.org>
Thu, 23 Oct 2008 01:07:27 +0000 (03:07 +0200)
source3/librpc/tables.pl [deleted file]

diff --git a/source3/librpc/tables.pl b/source3/librpc/tables.pl
deleted file mode 100755 (executable)
index 946159c..0000000
+++ /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