sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2025-02-03 13:47:25 +03:00
Code

r26262: Add test for WERROR return code handling for Samba 3 client code.

Browse Source 
(This used to be commit 6017b16f504dc7b092c22200951cb206b0a7e602)
This commit is contained in:
Jelmer Vernooij 2007-12-03 17:51:50 +01:00 committed by Stefan Metzmacher
parent a84863372c
commit 6f1efbba06
1 changed files with 40 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
source4/pidl/tests/samba3-cli.pl
View File

@ -4,7 +4,7 @@
use strict;
use warnings;
use Test::More tests => 7;
use Test::More tests => 8;
use FindBin qw($RealBin);
use lib "$RealBin";
use Util;
@ -59,3 +59,42 @@ is($x->{res}, "NTSTATUS rpccli_bar(struct rpc_pipe_client *cli, TALLOC_CTX *mem_
}
");
$x = new Parse::Pidl::Samba3::ClientNDR();
$fn = { NAME => "bar", ELEMENTS => [ ], RETURN_TYPE => "WERROR" };
$x->ParseFunction("foo", $fn);
is($x->{res}, "NTSTATUS rpccli_bar(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, WERROR *werror)
{
\tstruct bar r;
\tNTSTATUS status;
\t
\t/* In parameters */
\t
\tif (DEBUGLEVEL >= 10)
\t\tNDR_PRINT_IN_DEBUG(bar, &r);
\t
\tstatus = cli_do_rpc_ndr(cli, mem_ctx, PI_FOO, &ndr_table_foo, NDR_BAR, &r);
\t
\tif (!NT_STATUS_IS_OK(status)) {
\t\treturn status;
\t}
\t
\tif (DEBUGLEVEL >= 10)
\t\tNDR_PRINT_OUT_DEBUG(bar, &r);
\t
\tif (NT_STATUS_IS_ERR(status)) {
\t\treturn status;
\t}
\t
\t/* Return variables */
\t
\t/* Return result */
\tif (werror) {
\t\t*werror = r.out.result;
\t}
\t
\treturn werror_to_ntstatus(r.out.result);
}
");