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

r11539: Fix indentation in templates. Always generate lower-case

Browse Source 
UUID strings as GUID_from_string seems to have trouble with
uppercased ones.
(This used to be commit 16ea96c81e)
This commit is contained in:
Jelmer Vernooij 2005-11-06 14:31:01 +00:00 committed by Gerald (Jerry) Carter
parent 4c57d08c52
commit cca42c611a
5 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
source4/pidl/TODO
View File

@ -1,3 +1,5 @@
- allow more then one identifier for types (unsigned char, struct foo)
- true multiple dimension array / strings in arrays support
- compatibility mode for generating MIDL-readable data:

2
source4/pidl/lib/Parse/Pidl/NDR.pm
View File

@ -610,7 +610,7 @@ sub ParseInterface($)
return {
NAME => $idl->{NAME},
UUID => has_property($idl, "uuid"),
UUID => lc(has_property($idl, "uuid")),
VERSION => $version,
TYPE => "INTERFACE",
PROPERTIES => $idl->{PROPERTIES},

2
source4/pidl/lib/Parse/Pidl/Samba/NDR/Header.pm
View File

@ -99,7 +99,7 @@ sub HeaderInterface($)
if (defined $interface->{PROPERTIES}->{uuid}) {
my $name = uc $interface->{NAME};
pidl "#define DCERPC_$name\_UUID " .
Parse::Pidl::Util::make_str($interface->{PROPERTIES}->{uuid}) . "\n";
Parse::Pidl::Util::make_str(lc($interface->{PROPERTIES}->{uuid})) . "\n";
if(!defined $interface->{PROPERTIES}->{version}) { $interface->{PROPERTIES}->{version} = "0.0"; }
pidl "#define DCERPC_$name\_VERSION $interface->{PROPERTIES}->{version}\n";

2
source4/pidl/lib/Parse/Pidl/Samba/NDR/Server.pm
View File

@ -76,7 +76,7 @@ sub Boilerplate_Iface($)
my($interface) = shift;
my $name = $interface->{NAME};
my $uname = uc $name;
my $uuid = Parse::Pidl::Util::make_str($interface->{PROPERTIES}->{uuid});
my $uuid = Parse::Pidl::Util::make_str(lc($interface->{PROPERTIES}->{uuid}));
my $if_version = $interface->{PROPERTIES}->{version};
pidl "

10
source4/pidl/lib/Parse/Pidl/Samba/Template.pm
View File

@ -60,16 +60,16 @@ sub Template($)
*/
static $d->{RETURN_TYPE} $fname(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx,
struct $fname *r)
{";
{
";
if ($d->{RETURN_TYPE} eq "void") {
$res .= "DCESRV_FAULT_VOID(DCERPC_FAULT_OP_RNG_ERROR);\n";
$res .= "\tDCESRV_FAULT_VOID(DCERPC_FAULT_OP_RNG_ERROR);\n";
} else {
$res .= "DCESRV_FAULT(DCERPC_FAULT_OP_RNG_ERROR);\n";
$res .= "\tDCESRV_FAULT(DCERPC_FAULT_OP_RNG_ERROR);\n";
}
$res .= "
}
$res .= "}
";
}