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

r9124: Handle more types pointers to simple types.

Browse Source
This commit is contained in:
Tim Potter
2005-08-05 15:54:11 +00:00
committed by Gerald (Jerry) Carter
parent 0e022f8d45
commit acd34c1cac
1 changed files with 10 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
source/script/build_smb_interfaces.pl
View File

@@ -77,7 +77,7 @@ sub print_field($$) {
my $f = shift;
my $suffix = shift;
my $type = "UNKNOWN";
my $type = $f->{TYPE};
if ($f->{TYPE} eq "char" and $f->{POINTERS} == 1) {
$type = "string";
@@ -88,8 +88,16 @@ sub print_field($$) {
$type =~ s/_t$//;
}
my $deref = "&";
if ($f->{POINTERS} == 1 && $type ne "string") {
$deref = "";
}
foreach my $x (@{$f->{NAME}}) {
print FILE "\tNDR_CHECK(ejs_pull_$type(ejs, v, \"$x\", &r->$suffix.$x));\n";
if ($f->{POINTERS} > 0) {
print FILE "\t// alloc $x?\n";
}
print FILE "\tNDR_CHECK(ejs_pull_$type(ejs, v, \"$x\", ${deref}r->$suffix.$x));\n";
}
}