sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2025-01-11 05:18:09 +03:00
Code

r9576: Couple of small fixes. Generate notice indicating

Browse Source 
that the parsers were autogenerated.
This commit is contained in:
Jelmer Vernooij 2005-08-24 11:17:28 +00:00 committed by Gerald (Jerry) Carter
parent 0e30c80a53
commit a37e2134e6
3 changed files with 32 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
source/librpc/idl/atsvc.idl
View File

@ -8,7 +8,7 @@
version(1.0), version(1.0),
pointer_default(unique), pointer_default(unique),
pointer_default_top(unique), pointer_default_top(unique),
helpstring("Queue/List/Remove jobs for later execution"), helpstring("Microsoft AT-Scheduler Service"),
endpoint("ncacn_np:[\\pipe\\atsvc]", "ncalrpc:") endpoint("ncacn_np:[\\pipe\\atsvc]", "ncalrpc:")
] interface atsvc ] interface atsvc
{ {

23
source/pidl/lib/Parse/Pidl/Ethereal/NDR.pm
View File

@ -542,7 +542,7 @@ sub RegisterInterface($)
# in epan/dissctors are deleted. # in epan/dissctors are deleted.
my $name = "\"" . uc($x->{NAME}) . " (pidl)\""; my $name = "\"" . uc($x->{NAME}) . " (pidl)\"";
my $short_name = $x->{NAME}; my $short_name = uc($x->{NAME});
my $filter_name = $x->{NAME}; my $filter_name = $x->{NAME};
if (has_property($x, "helpstring")) { if (has_property($x, "helpstring")) {
@ -697,16 +697,29 @@ sub Initialize($)
##################################################################### #####################################################################
# Generate ethereal parser and header code # Generate ethereal parser and header code
sub Parse($$) sub Parse($$$$)
{ {
my($ndr,$h_filename,$cnf_file) = @_; my($ndr,$idl_file,$h_filename,$cnf_file) = @_;
Initialize($cnf_file); Initialize($cnf_file);
$tabs = ""; $tabs = "";
%res = (code=>"",def=>"",hdr=>""); %res = (code=>"",def=>"",hdr=>"");
pidl_hdr "/* header auto-generated by pidl */"; my $notice =
"/* DO NOT EDIT
This filter was automatically generated
from $idl_file and $cnf_file.
Pidl is a perl based IDL compiler for DCE/RPC idl files.
It is maintained by the Samba team, not the Ethereal team.
Instructions on how to download and install Pidl can be
found at http://wiki.ethereal.com/Pidl
*/
";
pidl_hdr $notice;
$res{headers} = "\n"; $res{headers} = "\n";
$res{headers} .= "#ifdef HAVE_CONFIG_H\n"; $res{headers} .= "#ifdef HAVE_CONFIG_H\n";
@ -733,7 +746,7 @@ sub Parse($$)
$res{ett} = DumpEttDeclaration(); $res{ett} = DumpEttDeclaration();
$res{hf} = DumpHfDeclaration(); $res{hf} = DumpHfDeclaration();
my $parser = "/* parser auto-generated by pidl */"; my $parser = $notice;
$parser.= $res{headers}; $parser.= $res{headers};
$parser.=$res{ett}; $parser.=$res{ett};
$parser.=$res{hf}; $parser.=$res{hf};

26
source/pidl/pidl
View File

@ -101,26 +101,26 @@ Generic Options:
--parse parse a idl file to a .pidl file --parse parse a idl file to a .pidl file
--dump dump a pidl file back to idl --dump dump a pidl file back to idl
--diff run diff on the idl and dumped output --diff run diff on the idl and dumped output
--keep[=OUTFILE] keep the .pidl file --keep[=OUTFILE] keep the .pidl file [BASENAME.pidl]
--odl accept ODL input --odl accept ODL input
--warn-compat warn about incompatibility with other compilers --warn-compat warn about incompatibility with other compilers
--quiet be quiet --quiet be quiet
--verbose be verbose --verbose be verbose
Samba 4 output: Samba 4 output:
--header[=OUTFILE] create generic header file --header[=OUTFILE] create generic header file [BASENAME.h]
--uint-enums don't use C enums, instead use uint* types --uint-enums don't use C enums, instead use uint* types
--ndr-header[=OUTFILE] create a C NDR-specific header file --ndr-header[=OUTFILE] create a C NDR-specific header file [ndr_BASENAME.h]
--ndr-parser[=OUTFILE] create a C NDR parser --ndr-parser[=OUTFILE] create a C NDR parser [ndr_BASENAME.c]
--client[=OUTFILE] create a C NDR client --client[=OUTFILE] create a C NDR client [ndr_BASENAME_c.c]
--tdr-header[=OUTFILE] create a C TDR header file --tdr-header[=OUTFILE] create a C TDR header file [tdr_BASENAME.h]
--tdr-parser[=OUTFILE] create a C TDR parser --tdr-parser[=OUTFILE] create a C TDR parser [tdr_BASENAME.c]
--ejs[=OUTFILE] create ejs wrapper file --ejs[=OUTFILE] create ejs wrapper file [BASENAME_ejs.c]
--swig[=OUTFILE] create swig wrapper file --swig[=OUTFILE] create swig wrapper file [BASENAME.i]
--server[=OUTFILE] create server boilerplate --server[=OUTFILE] create server boilerplate [ndr_BASENAME_s.c]
--template print a template for a pipe --template print a template for a pipe
--dcom-proxy[=OUTFILE] create DCOM proxy (implies --odl) --dcom-proxy[=OUTFILE] create DCOM proxy (implies --odl) [ndr_BASENAME_p.c]
--com-header[=OUTFILE] create header for COM interfaces (implies --odl) --com-header[=OUTFILE] create header for COM (implies --odl) [com_BASENAME.h]
Ethereal parsers: Ethereal parsers:
--eth-parser[=OUTFILE] create ethereal parser and header --eth-parser[=OUTFILE] create ethereal parser and header
@ -325,7 +325,7 @@ $dcom
my $cnffile = $idl_file; my $cnffile = $idl_file;
$cnffile =~ s/\.idl$/\.cnf/; $cnffile =~ s/\.idl$/\.cnf/;
my ($dp, $dh) = Parse::Pidl::Ethereal::NDR::Parse($ndr, $eheader, $cnffile); my ($dp, $dh) = Parse::Pidl::Ethereal::NDR::Parse($ndr, $idl_file, $eheader, $cnffile);
FileSave($eparser, $dp); FileSave($eparser, $dp);
FileSave($eheader, $dh); FileSave($eheader, $dh);
} }