mirror of
https://github.com/samba-team/samba.git
synced 2025-01-11 05:18:09 +03:00
r20746: Don't report each individual test in test_smbclient as a single testsuite.
Create separate directory for blackbox tests.
(This used to be commit 7e6357f213)
This commit is contained in:
Jelmer Vernooij
Gerald (Jerry) Carter
parent
1d1315adcd
commit
d9665a737b
@ -1085,7 +1085,7 @@ sub new {
|
|||||||
[#Rule 2
|
[#Rule 2
|
||||||
'exp', 1,
|
'exp', 1,
|
||||||
sub
|
sub
|
||||||
#line 22 "expr.yp"
|
#line 22 "pidl/expr.yp"
|
||||||
{ "\"$_[1]\"" }
|
{ "\"$_[1]\"" }
|
||||||
],
|
],
|
||||||
[#Rule 3
|
[#Rule 3
|
||||||
@ -1094,187 +1094,187 @@ sub
|
|||||||
[#Rule 4
|
[#Rule 4
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 24 "expr.yp"
|
#line 24 "pidl/expr.yp"
|
||||||
{ "$_[1].$_[3]" }
|
{ "$_[1].$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 5
|
[#Rule 5
|
||||||
'exp', 1,
|
'exp', 1,
|
||||||
sub
|
sub
|
||||||
#line 25 "expr.yp"
|
#line 25 "pidl/expr.yp"
|
||||||
{ $_[0]->_Lookup($_[1]) }
|
{ $_[0]->_Lookup($_[1]) }
|
||||||
],
|
],
|
||||||
[#Rule 6
|
[#Rule 6
|
||||||
'exp', 2,
|
'exp', 2,
|
||||||
sub
|
sub
|
||||||
#line 26 "expr.yp"
|
#line 26 "pidl/expr.yp"
|
||||||
{ $_[0]->_Dereference($_[2]); "*$_[2]" }
|
{ $_[0]->_Dereference($_[2]); "*$_[2]" }
|
||||||
],
|
],
|
||||||
[#Rule 7
|
[#Rule 7
|
||||||
'exp', 2,
|
'exp', 2,
|
||||||
sub
|
sub
|
||||||
#line 27 "expr.yp"
|
#line 27 "pidl/expr.yp"
|
||||||
{ "~$_[2]" }
|
{ "~$_[2]" }
|
||||||
],
|
],
|
||||||
[#Rule 8
|
[#Rule 8
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 28 "expr.yp"
|
#line 28 "pidl/expr.yp"
|
||||||
{ "$_[1] + $_[3]" }
|
{ "$_[1] + $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 9
|
[#Rule 9
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 29 "expr.yp"
|
#line 29 "pidl/expr.yp"
|
||||||
{ "$_[1] - $_[3]" }
|
{ "$_[1] - $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 10
|
[#Rule 10
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 30 "expr.yp"
|
#line 30 "pidl/expr.yp"
|
||||||
{ "$_[1] * $_[3]" }
|
{ "$_[1] * $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 11
|
[#Rule 11
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 31 "expr.yp"
|
#line 31 "pidl/expr.yp"
|
||||||
{ "$_[1] % $_[3]" }
|
{ "$_[1] % $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 12
|
[#Rule 12
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 32 "expr.yp"
|
#line 32 "pidl/expr.yp"
|
||||||
{ "$_[1] < $_[3]" }
|
{ "$_[1] < $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 13
|
[#Rule 13
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 33 "expr.yp"
|
#line 33 "pidl/expr.yp"
|
||||||
{ "$_[1] > $_[3]" }
|
{ "$_[1] > $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 14
|
[#Rule 14
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 34 "expr.yp"
|
#line 34 "pidl/expr.yp"
|
||||||
{ "$_[1] | $_[3]" }
|
{ "$_[1] | $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 15
|
[#Rule 15
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 35 "expr.yp"
|
#line 35 "pidl/expr.yp"
|
||||||
{ "$_[1] == $_[3]" }
|
{ "$_[1] == $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 16
|
[#Rule 16
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 36 "expr.yp"
|
#line 36 "pidl/expr.yp"
|
||||||
{ "$_[1] <= $_[3]" }
|
{ "$_[1] <= $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 17
|
[#Rule 17
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 37 "expr.yp"
|
#line 37 "pidl/expr.yp"
|
||||||
{ "$_[1] => $_[3]" }
|
{ "$_[1] => $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 18
|
[#Rule 18
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 38 "expr.yp"
|
#line 38 "pidl/expr.yp"
|
||||||
{ "$_[1] << $_[3]" }
|
{ "$_[1] << $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 19
|
[#Rule 19
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 39 "expr.yp"
|
#line 39 "pidl/expr.yp"
|
||||||
{ "$_[1] >> $_[3]" }
|
{ "$_[1] >> $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 20
|
[#Rule 20
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 40 "expr.yp"
|
#line 40 "pidl/expr.yp"
|
||||||
{ "$_[1] != $_[3]" }
|
{ "$_[1] != $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 21
|
[#Rule 21
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 41 "expr.yp"
|
#line 41 "pidl/expr.yp"
|
||||||
{ "$_[1] || $_[3]" }
|
{ "$_[1] || $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 22
|
[#Rule 22
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 42 "expr.yp"
|
#line 42 "pidl/expr.yp"
|
||||||
{ "$_[1] && $_[3]" }
|
{ "$_[1] && $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 23
|
[#Rule 23
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 43 "expr.yp"
|
#line 43 "pidl/expr.yp"
|
||||||
{ "$_[1] & $_[3]" }
|
{ "$_[1] & $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 24
|
[#Rule 24
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 44 "expr.yp"
|
#line 44 "pidl/expr.yp"
|
||||||
{ $_[1]."->".$_[3] }
|
{ $_[1]."->".$_[3] }
|
||||||
],
|
],
|
||||||
[#Rule 25
|
[#Rule 25
|
||||||
'exp', 5,
|
'exp', 5,
|
||||||
sub
|
sub
|
||||||
#line 45 "expr.yp"
|
#line 45 "pidl/expr.yp"
|
||||||
{ "$_[1]?$_[3]:$_[5]" }
|
{ "$_[1]?$_[3]:$_[5]" }
|
||||||
],
|
],
|
||||||
[#Rule 26
|
[#Rule 26
|
||||||
'exp', 2,
|
'exp', 2,
|
||||||
sub
|
sub
|
||||||
#line 46 "expr.yp"
|
#line 46 "pidl/expr.yp"
|
||||||
{ "~$_[1]" }
|
{ "~$_[1]" }
|
||||||
],
|
],
|
||||||
[#Rule 27
|
[#Rule 27
|
||||||
'exp', 2,
|
'exp', 2,
|
||||||
sub
|
sub
|
||||||
#line 47 "expr.yp"
|
#line 47 "pidl/expr.yp"
|
||||||
{ "not $_[1]" }
|
{ "not $_[1]" }
|
||||||
],
|
],
|
||||||
[#Rule 28
|
[#Rule 28
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 48 "expr.yp"
|
#line 48 "pidl/expr.yp"
|
||||||
{ "$_[1] / $_[3]" }
|
{ "$_[1] / $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 29
|
[#Rule 29
|
||||||
'exp', 2,
|
'exp', 2,
|
||||||
sub
|
sub
|
||||||
#line 49 "expr.yp"
|
#line 49 "pidl/expr.yp"
|
||||||
{ "-$_[2]" }
|
{ "-$_[2]" }
|
||||||
],
|
],
|
||||||
[#Rule 30
|
[#Rule 30
|
||||||
'exp', 2,
|
'exp', 2,
|
||||||
sub
|
sub
|
||||||
#line 50 "expr.yp"
|
#line 50 "pidl/expr.yp"
|
||||||
{ "&$_[2]" }
|
{ "&$_[2]" }
|
||||||
],
|
],
|
||||||
[#Rule 31
|
[#Rule 31
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 51 "expr.yp"
|
#line 51 "pidl/expr.yp"
|
||||||
{ "$_[1]^$_[3]" }
|
{ "$_[1]^$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 32
|
[#Rule 32
|
||||||
'exp', 3,
|
'exp', 3,
|
||||||
sub
|
sub
|
||||||
#line 52 "expr.yp"
|
#line 52 "pidl/expr.yp"
|
||||||
{ "($_[2])" }
|
{ "($_[2])" }
|
||||||
],
|
],
|
||||||
[#Rule 33
|
[#Rule 33
|
||||||
'func', 4,
|
'func', 4,
|
||||||
sub
|
sub
|
||||||
#line 55 "expr.yp"
|
#line 55 "pidl/expr.yp"
|
||||||
{ "$_[1]($_[3])" }
|
{ "$_[1]($_[3])" }
|
||||||
],
|
],
|
||||||
[#Rule 34
|
[#Rule 34
|
||||||
'opt_args', 0,
|
'opt_args', 0,
|
||||||
sub
|
sub
|
||||||
#line 56 "expr.yp"
|
#line 56 "pidl/expr.yp"
|
||||||
{ "" }
|
{ "" }
|
||||||
],
|
],
|
||||||
[#Rule 35
|
[#Rule 35
|
||||||
@ -1286,7 +1286,7 @@ sub
|
|||||||
[#Rule 37
|
[#Rule 37
|
||||||
'args', 3,
|
'args', 3,
|
||||||
sub
|
sub
|
||||||
#line 57 "expr.yp"
|
#line 57 "pidl/expr.yp"
|
||||||
{ "$_[1], $_[3]" }
|
{ "$_[1], $_[3]" }
|
||||||
]
|
]
|
||||||
],
|
],
|
||||||
@ -1294,7 +1294,7 @@ sub
|
|||||||
bless($self,$class);
|
bless($self,$class);
|
||||||
}
|
}
|
||||||
|
|
||||||
#line 59 "expr.yp"
|
#line 59 "pidl/expr.yp"
|
||||||
|
|
||||||
|
|
||||||
package Parse::Pidl::Expr;
|
package Parse::Pidl::Expr;
|
||||||
|
|||||||
@ -1811,37 +1811,37 @@ sub new {
|
|||||||
[#Rule 2
|
[#Rule 2
|
||||||
'idl', 2,
|
'idl', 2,
|
||||||
sub
|
sub
|
||||||
#line 19 "idl.yp"
|
#line 19 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[2]); $_[1] }
|
{ push(@{$_[1]}, $_[2]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 3
|
[#Rule 3
|
||||||
'idl', 2,
|
'idl', 2,
|
||||||
sub
|
sub
|
||||||
#line 20 "idl.yp"
|
#line 20 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[2]); $_[1] }
|
{ push(@{$_[1]}, $_[2]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 4
|
[#Rule 4
|
||||||
'idl', 2,
|
'idl', 2,
|
||||||
sub
|
sub
|
||||||
#line 21 "idl.yp"
|
#line 21 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[2]); $_[1] }
|
{ push(@{$_[1]}, $_[2]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 5
|
[#Rule 5
|
||||||
'idl', 2,
|
'idl', 2,
|
||||||
sub
|
sub
|
||||||
#line 22 "idl.yp"
|
#line 22 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[2]); $_[1] }
|
{ push(@{$_[1]}, $_[2]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 6
|
[#Rule 6
|
||||||
'idl', 2,
|
'idl', 2,
|
||||||
sub
|
sub
|
||||||
#line 23 "idl.yp"
|
#line 23 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[2]); $_[1] }
|
{ push(@{$_[1]}, $_[2]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 7
|
[#Rule 7
|
||||||
'import', 3,
|
'import', 3,
|
||||||
sub
|
sub
|
||||||
#line 26 "idl.yp"
|
#line 26 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "IMPORT",
|
"TYPE" => "IMPORT",
|
||||||
"PATHS" => $_[2],
|
"PATHS" => $_[2],
|
||||||
@ -1852,7 +1852,7 @@ sub
|
|||||||
[#Rule 8
|
[#Rule 8
|
||||||
'include', 3,
|
'include', 3,
|
||||||
sub
|
sub
|
||||||
#line 33 "idl.yp"
|
#line 33 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "INCLUDE",
|
"TYPE" => "INCLUDE",
|
||||||
"PATHS" => $_[2],
|
"PATHS" => $_[2],
|
||||||
@ -1863,7 +1863,7 @@ sub
|
|||||||
[#Rule 9
|
[#Rule 9
|
||||||
'importlib', 3,
|
'importlib', 3,
|
||||||
sub
|
sub
|
||||||
#line 40 "idl.yp"
|
#line 40 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "IMPORTLIB",
|
"TYPE" => "IMPORTLIB",
|
||||||
"PATHS" => $_[2],
|
"PATHS" => $_[2],
|
||||||
@ -1874,19 +1874,19 @@ sub
|
|||||||
[#Rule 10
|
[#Rule 10
|
||||||
'commalist', 1,
|
'commalist', 1,
|
||||||
sub
|
sub
|
||||||
#line 49 "idl.yp"
|
#line 49 "pidl/idl.yp"
|
||||||
{ [ $_[1] ] }
|
{ [ $_[1] ] }
|
||||||
],
|
],
|
||||||
[#Rule 11
|
[#Rule 11
|
||||||
'commalist', 3,
|
'commalist', 3,
|
||||||
sub
|
sub
|
||||||
#line 50 "idl.yp"
|
#line 50 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[3]); $_[1] }
|
{ push(@{$_[1]}, $_[3]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 12
|
[#Rule 12
|
||||||
'coclass', 7,
|
'coclass', 7,
|
||||||
sub
|
sub
|
||||||
#line 54 "idl.yp"
|
#line 54 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "COCLASS",
|
"TYPE" => "COCLASS",
|
||||||
"PROPERTIES" => $_[1],
|
"PROPERTIES" => $_[1],
|
||||||
@ -1902,13 +1902,13 @@ sub
|
|||||||
[#Rule 14
|
[#Rule 14
|
||||||
'interface_names', 4,
|
'interface_names', 4,
|
||||||
sub
|
sub
|
||||||
#line 66 "idl.yp"
|
#line 66 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[2]); $_[1] }
|
{ push(@{$_[1]}, $_[2]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 15
|
[#Rule 15
|
||||||
'interface', 8,
|
'interface', 8,
|
||||||
sub
|
sub
|
||||||
#line 70 "idl.yp"
|
#line 70 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "INTERFACE",
|
"TYPE" => "INTERFACE",
|
||||||
"PROPERTIES" => $_[1],
|
"PROPERTIES" => $_[1],
|
||||||
@ -1925,19 +1925,19 @@ sub
|
|||||||
[#Rule 17
|
[#Rule 17
|
||||||
'base_interface', 2,
|
'base_interface', 2,
|
||||||
sub
|
sub
|
||||||
#line 83 "idl.yp"
|
#line 83 "pidl/idl.yp"
|
||||||
{ $_[2] }
|
{ $_[2] }
|
||||||
],
|
],
|
||||||
[#Rule 18
|
[#Rule 18
|
||||||
'definitions', 1,
|
'definitions', 1,
|
||||||
sub
|
sub
|
||||||
#line 87 "idl.yp"
|
#line 87 "pidl/idl.yp"
|
||||||
{ [ $_[1] ] }
|
{ [ $_[1] ] }
|
||||||
],
|
],
|
||||||
[#Rule 19
|
[#Rule 19
|
||||||
'definitions', 2,
|
'definitions', 2,
|
||||||
sub
|
sub
|
||||||
#line 88 "idl.yp"
|
#line 88 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[2]); $_[1] }
|
{ push(@{$_[1]}, $_[2]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 20
|
[#Rule 20
|
||||||
@ -1958,7 +1958,7 @@ sub
|
|||||||
[#Rule 25
|
[#Rule 25
|
||||||
'const', 7,
|
'const', 7,
|
||||||
sub
|
sub
|
||||||
#line 96 "idl.yp"
|
#line 96 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "CONST",
|
"TYPE" => "CONST",
|
||||||
"DTYPE" => $_[2],
|
"DTYPE" => $_[2],
|
||||||
@ -1972,7 +1972,7 @@ sub
|
|||||||
[#Rule 26
|
[#Rule 26
|
||||||
'const', 8,
|
'const', 8,
|
||||||
sub
|
sub
|
||||||
#line 106 "idl.yp"
|
#line 106 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "CONST",
|
"TYPE" => "CONST",
|
||||||
"DTYPE" => $_[2],
|
"DTYPE" => $_[2],
|
||||||
@ -1987,7 +1987,7 @@ sub
|
|||||||
[#Rule 27
|
[#Rule 27
|
||||||
'function', 7,
|
'function', 7,
|
||||||
sub
|
sub
|
||||||
#line 120 "idl.yp"
|
#line 120 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "FUNCTION",
|
"TYPE" => "FUNCTION",
|
||||||
"NAME" => $_[3],
|
"NAME" => $_[3],
|
||||||
@ -2001,7 +2001,7 @@ sub
|
|||||||
[#Rule 28
|
[#Rule 28
|
||||||
'declare', 5,
|
'declare', 5,
|
||||||
sub
|
sub
|
||||||
#line 132 "idl.yp"
|
#line 132 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "DECLARE",
|
"TYPE" => "DECLARE",
|
||||||
"PROPERTIES" => $_[2],
|
"PROPERTIES" => $_[2],
|
||||||
@ -2023,7 +2023,7 @@ sub
|
|||||||
[#Rule 32
|
[#Rule 32
|
||||||
'decl_enum', 1,
|
'decl_enum', 1,
|
||||||
sub
|
sub
|
||||||
#line 146 "idl.yp"
|
#line 146 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "ENUM"
|
"TYPE" => "ENUM"
|
||||||
}}
|
}}
|
||||||
@ -2031,7 +2031,7 @@ sub
|
|||||||
[#Rule 33
|
[#Rule 33
|
||||||
'decl_bitmap', 1,
|
'decl_bitmap', 1,
|
||||||
sub
|
sub
|
||||||
#line 152 "idl.yp"
|
#line 152 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "BITMAP"
|
"TYPE" => "BITMAP"
|
||||||
}}
|
}}
|
||||||
@ -2039,7 +2039,7 @@ sub
|
|||||||
[#Rule 34
|
[#Rule 34
|
||||||
'decl_union', 1,
|
'decl_union', 1,
|
||||||
sub
|
sub
|
||||||
#line 158 "idl.yp"
|
#line 158 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "UNION"
|
"TYPE" => "UNION"
|
||||||
}}
|
}}
|
||||||
@ -2047,7 +2047,7 @@ sub
|
|||||||
[#Rule 35
|
[#Rule 35
|
||||||
'typedef', 6,
|
'typedef', 6,
|
||||||
sub
|
sub
|
||||||
#line 164 "idl.yp"
|
#line 164 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "TYPEDEF",
|
"TYPE" => "TYPEDEF",
|
||||||
"PROPERTIES" => $_[2],
|
"PROPERTIES" => $_[2],
|
||||||
@ -2073,7 +2073,7 @@ sub
|
|||||||
[#Rule 40
|
[#Rule 40
|
||||||
'typedecl', 2,
|
'typedecl', 2,
|
||||||
sub
|
sub
|
||||||
#line 177 "idl.yp"
|
#line 177 "pidl/idl.yp"
|
||||||
{ $_[1] }
|
{ $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 41
|
[#Rule 41
|
||||||
@ -2085,7 +2085,7 @@ sub
|
|||||||
[#Rule 43
|
[#Rule 43
|
||||||
'existingtype', 2,
|
'existingtype', 2,
|
||||||
sub
|
sub
|
||||||
#line 182 "idl.yp"
|
#line 182 "pidl/idl.yp"
|
||||||
{ ($_[1]?$_[1]:"signed") ." $_[2]" }
|
{ ($_[1]?$_[1]:"signed") ." $_[2]" }
|
||||||
],
|
],
|
||||||
[#Rule 44
|
[#Rule 44
|
||||||
@ -2100,13 +2100,13 @@ sub
|
|||||||
[#Rule 47
|
[#Rule 47
|
||||||
'type', 1,
|
'type', 1,
|
||||||
sub
|
sub
|
||||||
#line 186 "idl.yp"
|
#line 186 "pidl/idl.yp"
|
||||||
{ "void" }
|
{ "void" }
|
||||||
],
|
],
|
||||||
[#Rule 48
|
[#Rule 48
|
||||||
'enum_body', 3,
|
'enum_body', 3,
|
||||||
sub
|
sub
|
||||||
#line 188 "idl.yp"
|
#line 188 "pidl/idl.yp"
|
||||||
{ $_[2] }
|
{ $_[2] }
|
||||||
],
|
],
|
||||||
[#Rule 49
|
[#Rule 49
|
||||||
@ -2118,7 +2118,7 @@ sub
|
|||||||
[#Rule 51
|
[#Rule 51
|
||||||
'enum', 3,
|
'enum', 3,
|
||||||
sub
|
sub
|
||||||
#line 191 "idl.yp"
|
#line 191 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "ENUM",
|
"TYPE" => "ENUM",
|
||||||
"NAME" => $_[2],
|
"NAME" => $_[2],
|
||||||
@ -2128,13 +2128,13 @@ sub
|
|||||||
[#Rule 52
|
[#Rule 52
|
||||||
'enum_elements', 1,
|
'enum_elements', 1,
|
||||||
sub
|
sub
|
||||||
#line 199 "idl.yp"
|
#line 199 "pidl/idl.yp"
|
||||||
{ [ $_[1] ] }
|
{ [ $_[1] ] }
|
||||||
],
|
],
|
||||||
[#Rule 53
|
[#Rule 53
|
||||||
'enum_elements', 3,
|
'enum_elements', 3,
|
||||||
sub
|
sub
|
||||||
#line 200 "idl.yp"
|
#line 200 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[3]); $_[1] }
|
{ push(@{$_[1]}, $_[3]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 54
|
[#Rule 54
|
||||||
@ -2143,13 +2143,13 @@ sub
|
|||||||
[#Rule 55
|
[#Rule 55
|
||||||
'enum_element', 3,
|
'enum_element', 3,
|
||||||
sub
|
sub
|
||||||
#line 204 "idl.yp"
|
#line 204 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 56
|
[#Rule 56
|
||||||
'bitmap_body', 3,
|
'bitmap_body', 3,
|
||||||
sub
|
sub
|
||||||
#line 207 "idl.yp"
|
#line 207 "pidl/idl.yp"
|
||||||
{ $_[2] }
|
{ $_[2] }
|
||||||
],
|
],
|
||||||
[#Rule 57
|
[#Rule 57
|
||||||
@ -2161,7 +2161,7 @@ sub
|
|||||||
[#Rule 59
|
[#Rule 59
|
||||||
'bitmap', 3,
|
'bitmap', 3,
|
||||||
sub
|
sub
|
||||||
#line 210 "idl.yp"
|
#line 210 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "BITMAP",
|
"TYPE" => "BITMAP",
|
||||||
"NAME" => $_[2],
|
"NAME" => $_[2],
|
||||||
@ -2171,13 +2171,13 @@ sub
|
|||||||
[#Rule 60
|
[#Rule 60
|
||||||
'bitmap_elements', 1,
|
'bitmap_elements', 1,
|
||||||
sub
|
sub
|
||||||
#line 218 "idl.yp"
|
#line 218 "pidl/idl.yp"
|
||||||
{ [ $_[1] ] }
|
{ [ $_[1] ] }
|
||||||
],
|
],
|
||||||
[#Rule 61
|
[#Rule 61
|
||||||
'bitmap_elements', 3,
|
'bitmap_elements', 3,
|
||||||
sub
|
sub
|
||||||
#line 219 "idl.yp"
|
#line 219 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[3]); $_[1] }
|
{ push(@{$_[1]}, $_[3]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 62
|
[#Rule 62
|
||||||
@ -2189,13 +2189,13 @@ sub
|
|||||||
[#Rule 64
|
[#Rule 64
|
||||||
'bitmap_element', 3,
|
'bitmap_element', 3,
|
||||||
sub
|
sub
|
||||||
#line 224 "idl.yp"
|
#line 224 "pidl/idl.yp"
|
||||||
{ "$_[1] ( $_[3] )" }
|
{ "$_[1] ( $_[3] )" }
|
||||||
],
|
],
|
||||||
[#Rule 65
|
[#Rule 65
|
||||||
'struct_body', 3,
|
'struct_body', 3,
|
||||||
sub
|
sub
|
||||||
#line 227 "idl.yp"
|
#line 227 "pidl/idl.yp"
|
||||||
{ $_[2] }
|
{ $_[2] }
|
||||||
],
|
],
|
||||||
[#Rule 66
|
[#Rule 66
|
||||||
@ -2207,7 +2207,7 @@ sub
|
|||||||
[#Rule 68
|
[#Rule 68
|
||||||
'struct', 3,
|
'struct', 3,
|
||||||
sub
|
sub
|
||||||
#line 231 "idl.yp"
|
#line 231 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "STRUCT",
|
"TYPE" => "STRUCT",
|
||||||
"NAME" => $_[2],
|
"NAME" => $_[2],
|
||||||
@ -2217,7 +2217,7 @@ sub
|
|||||||
[#Rule 69
|
[#Rule 69
|
||||||
'empty_element', 2,
|
'empty_element', 2,
|
||||||
sub
|
sub
|
||||||
#line 239 "idl.yp"
|
#line 239 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"NAME" => "",
|
"NAME" => "",
|
||||||
"TYPE" => "EMPTY",
|
"TYPE" => "EMPTY",
|
||||||
@ -2237,7 +2237,7 @@ sub
|
|||||||
[#Rule 72
|
[#Rule 72
|
||||||
'optional_base_element', 2,
|
'optional_base_element', 2,
|
||||||
sub
|
sub
|
||||||
#line 253 "idl.yp"
|
#line 253 "pidl/idl.yp"
|
||||||
{ $_[2]->{PROPERTIES} = FlattenHash([$_[1],$_[2]->{PROPERTIES}]); $_[2] }
|
{ $_[2]->{PROPERTIES} = FlattenHash([$_[1],$_[2]->{PROPERTIES}]); $_[2] }
|
||||||
],
|
],
|
||||||
[#Rule 73
|
[#Rule 73
|
||||||
@ -2246,13 +2246,13 @@ sub
|
|||||||
[#Rule 74
|
[#Rule 74
|
||||||
'union_elements', 2,
|
'union_elements', 2,
|
||||||
sub
|
sub
|
||||||
#line 258 "idl.yp"
|
#line 258 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[2]); $_[1] }
|
{ push(@{$_[1]}, $_[2]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 75
|
[#Rule 75
|
||||||
'union_body', 3,
|
'union_body', 3,
|
||||||
sub
|
sub
|
||||||
#line 261 "idl.yp"
|
#line 261 "pidl/idl.yp"
|
||||||
{ $_[2] }
|
{ $_[2] }
|
||||||
],
|
],
|
||||||
[#Rule 76
|
[#Rule 76
|
||||||
@ -2264,7 +2264,7 @@ sub
|
|||||||
[#Rule 78
|
[#Rule 78
|
||||||
'union', 3,
|
'union', 3,
|
||||||
sub
|
sub
|
||||||
#line 265 "idl.yp"
|
#line 265 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"TYPE" => "UNION",
|
"TYPE" => "UNION",
|
||||||
"NAME" => $_[2],
|
"NAME" => $_[2],
|
||||||
@ -2274,7 +2274,7 @@ sub
|
|||||||
[#Rule 79
|
[#Rule 79
|
||||||
'base_element', 5,
|
'base_element', 5,
|
||||||
sub
|
sub
|
||||||
#line 273 "idl.yp"
|
#line 273 "pidl/idl.yp"
|
||||||
{{
|
{{
|
||||||
"NAME" => $_[4],
|
"NAME" => $_[4],
|
||||||
"TYPE" => $_[2],
|
"TYPE" => $_[2],
|
||||||
@ -2288,13 +2288,13 @@ sub
|
|||||||
[#Rule 80
|
[#Rule 80
|
||||||
'pointers', 0,
|
'pointers', 0,
|
||||||
sub
|
sub
|
||||||
#line 287 "idl.yp"
|
#line 287 "pidl/idl.yp"
|
||||||
{ 0 }
|
{ 0 }
|
||||||
],
|
],
|
||||||
[#Rule 81
|
[#Rule 81
|
||||||
'pointers', 2,
|
'pointers', 2,
|
||||||
sub
|
sub
|
||||||
#line 288 "idl.yp"
|
#line 288 "pidl/idl.yp"
|
||||||
{ $_[1]+1 }
|
{ $_[1]+1 }
|
||||||
],
|
],
|
||||||
[#Rule 82
|
[#Rule 82
|
||||||
@ -2303,7 +2303,7 @@ sub
|
|||||||
[#Rule 83
|
[#Rule 83
|
||||||
'element_list1', 3,
|
'element_list1', 3,
|
||||||
sub
|
sub
|
||||||
#line 293 "idl.yp"
|
#line 293 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[2]); $_[1] }
|
{ push(@{$_[1]}, $_[2]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 84
|
[#Rule 84
|
||||||
@ -2315,13 +2315,13 @@ sub
|
|||||||
[#Rule 86
|
[#Rule 86
|
||||||
'element_list2', 1,
|
'element_list2', 1,
|
||||||
sub
|
sub
|
||||||
#line 299 "idl.yp"
|
#line 299 "pidl/idl.yp"
|
||||||
{ [ $_[1] ] }
|
{ [ $_[1] ] }
|
||||||
],
|
],
|
||||||
[#Rule 87
|
[#Rule 87
|
||||||
'element_list2', 3,
|
'element_list2', 3,
|
||||||
sub
|
sub
|
||||||
#line 300 "idl.yp"
|
#line 300 "pidl/idl.yp"
|
||||||
{ push(@{$_[1]}, $_[3]); $_[1] }
|
{ push(@{$_[1]}, $_[3]); $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 88
|
[#Rule 88
|
||||||
@ -2330,13 +2330,13 @@ sub
|
|||||||
[#Rule 89
|
[#Rule 89
|
||||||
'array_len', 3,
|
'array_len', 3,
|
||||||
sub
|
sub
|
||||||
#line 305 "idl.yp"
|
#line 305 "pidl/idl.yp"
|
||||||
{ push(@{$_[3]}, "*"); $_[3] }
|
{ push(@{$_[3]}, "*"); $_[3] }
|
||||||
],
|
],
|
||||||
[#Rule 90
|
[#Rule 90
|
||||||
'array_len', 4,
|
'array_len', 4,
|
||||||
sub
|
sub
|
||||||
#line 306 "idl.yp"
|
#line 306 "pidl/idl.yp"
|
||||||
{ push(@{$_[4]}, "$_[2]"); $_[4] }
|
{ push(@{$_[4]}, "$_[2]"); $_[4] }
|
||||||
],
|
],
|
||||||
[#Rule 91
|
[#Rule 91
|
||||||
@ -2345,31 +2345,31 @@ sub
|
|||||||
[#Rule 92
|
[#Rule 92
|
||||||
'property_list', 4,
|
'property_list', 4,
|
||||||
sub
|
sub
|
||||||
#line 312 "idl.yp"
|
#line 312 "pidl/idl.yp"
|
||||||
{ FlattenHash([$_[1],$_[3]]); }
|
{ FlattenHash([$_[1],$_[3]]); }
|
||||||
],
|
],
|
||||||
[#Rule 93
|
[#Rule 93
|
||||||
'properties', 1,
|
'properties', 1,
|
||||||
sub
|
sub
|
||||||
#line 315 "idl.yp"
|
#line 315 "pidl/idl.yp"
|
||||||
{ $_[1] }
|
{ $_[1] }
|
||||||
],
|
],
|
||||||
[#Rule 94
|
[#Rule 94
|
||||||
'properties', 3,
|
'properties', 3,
|
||||||
sub
|
sub
|
||||||
#line 316 "idl.yp"
|
#line 316 "pidl/idl.yp"
|
||||||
{ FlattenHash([$_[1], $_[3]]); }
|
{ FlattenHash([$_[1], $_[3]]); }
|
||||||
],
|
],
|
||||||
[#Rule 95
|
[#Rule 95
|
||||||
'property', 1,
|
'property', 1,
|
||||||
sub
|
sub
|
||||||
#line 319 "idl.yp"
|
#line 319 "pidl/idl.yp"
|
||||||
{{ "$_[1]" => "1" }}
|
{{ "$_[1]" => "1" }}
|
||||||
],
|
],
|
||||||
[#Rule 96
|
[#Rule 96
|
||||||
'property', 4,
|
'property', 4,
|
||||||
sub
|
sub
|
||||||
#line 320 "idl.yp"
|
#line 320 "pidl/idl.yp"
|
||||||
{{ "$_[1]" => "$_[3]" }}
|
{{ "$_[1]" => "$_[3]" }}
|
||||||
],
|
],
|
||||||
[#Rule 97
|
[#Rule 97
|
||||||
@ -2378,7 +2378,7 @@ sub
|
|||||||
[#Rule 98
|
[#Rule 98
|
||||||
'listtext', 3,
|
'listtext', 3,
|
||||||
sub
|
sub
|
||||||
#line 325 "idl.yp"
|
#line 325 "pidl/idl.yp"
|
||||||
{ "$_[1] $_[3]" }
|
{ "$_[1] $_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 99
|
[#Rule 99
|
||||||
@ -2387,13 +2387,13 @@ sub
|
|||||||
[#Rule 100
|
[#Rule 100
|
||||||
'commalisttext', 3,
|
'commalisttext', 3,
|
||||||
sub
|
sub
|
||||||
#line 330 "idl.yp"
|
#line 330 "pidl/idl.yp"
|
||||||
{ "$_[1],$_[3]" }
|
{ "$_[1],$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 101
|
[#Rule 101
|
||||||
'anytext', 0,
|
'anytext', 0,
|
||||||
sub
|
sub
|
||||||
#line 334 "idl.yp"
|
#line 334 "pidl/idl.yp"
|
||||||
{ "" }
|
{ "" }
|
||||||
],
|
],
|
||||||
[#Rule 102
|
[#Rule 102
|
||||||
@ -2408,91 +2408,91 @@ sub
|
|||||||
[#Rule 105
|
[#Rule 105
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 336 "idl.yp"
|
#line 336 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 106
|
[#Rule 106
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 337 "idl.yp"
|
#line 337 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 107
|
[#Rule 107
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 338 "idl.yp"
|
#line 338 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 108
|
[#Rule 108
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 339 "idl.yp"
|
#line 339 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 109
|
[#Rule 109
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 340 "idl.yp"
|
#line 340 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 110
|
[#Rule 110
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 341 "idl.yp"
|
#line 341 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 111
|
[#Rule 111
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 342 "idl.yp"
|
#line 342 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 112
|
[#Rule 112
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 343 "idl.yp"
|
#line 343 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 113
|
[#Rule 113
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 344 "idl.yp"
|
#line 344 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 114
|
[#Rule 114
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 345 "idl.yp"
|
#line 345 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 115
|
[#Rule 115
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 346 "idl.yp"
|
#line 346 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 116
|
[#Rule 116
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 347 "idl.yp"
|
#line 347 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 117
|
[#Rule 117
|
||||||
'anytext', 3,
|
'anytext', 3,
|
||||||
sub
|
sub
|
||||||
#line 348 "idl.yp"
|
#line 348 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]" }
|
{ "$_[1]$_[2]$_[3]" }
|
||||||
],
|
],
|
||||||
[#Rule 118
|
[#Rule 118
|
||||||
'anytext', 5,
|
'anytext', 5,
|
||||||
sub
|
sub
|
||||||
#line 349 "idl.yp"
|
#line 349 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]$_[4]$_[5]" }
|
{ "$_[1]$_[2]$_[3]$_[4]$_[5]" }
|
||||||
],
|
],
|
||||||
[#Rule 119
|
[#Rule 119
|
||||||
'anytext', 5,
|
'anytext', 5,
|
||||||
sub
|
sub
|
||||||
#line 350 "idl.yp"
|
#line 350 "pidl/idl.yp"
|
||||||
{ "$_[1]$_[2]$_[3]$_[4]$_[5]" }
|
{ "$_[1]$_[2]$_[3]$_[4]$_[5]" }
|
||||||
],
|
],
|
||||||
[#Rule 120
|
[#Rule 120
|
||||||
@ -2510,7 +2510,7 @@ sub
|
|||||||
[#Rule 124
|
[#Rule 124
|
||||||
'text', 1,
|
'text', 1,
|
||||||
sub
|
sub
|
||||||
#line 364 "idl.yp"
|
#line 364 "pidl/idl.yp"
|
||||||
{ "\"$_[1]\"" }
|
{ "\"$_[1]\"" }
|
||||||
],
|
],
|
||||||
[#Rule 125
|
[#Rule 125
|
||||||
@ -2524,7 +2524,7 @@ sub
|
|||||||
bless($self,$class);
|
bless($self,$class);
|
||||||
}
|
}
|
||||||
|
|
||||||
#line 375 "idl.yp"
|
#line 375 "pidl/idl.yp"
|
||||||
|
|
||||||
|
|
||||||
use Parse::Pidl qw(error);
|
use Parse::Pidl qw(error);
|
||||||
|
|||||||
@ -11,6 +11,6 @@
|
|||||||
$SRCDIR/script/tests/test_posix.sh //$SERVER/tmp $USERNAME $PASSWORD "" || totalfailed=`expr $totalfailed + $?`
|
$SRCDIR/script/tests/test_posix.sh //$SERVER/tmp $USERNAME $PASSWORD "" || totalfailed=`expr $totalfailed + $?`
|
||||||
$SRCDIR/script/tests/test_local.sh || totalfailed=`expr $totalfailed + $?`
|
$SRCDIR/script/tests/test_local.sh || totalfailed=`expr $totalfailed + $?`
|
||||||
$SRCDIR/script/tests/test_pidl.sh || totalfailed=`expr $totalfailed + $?`
|
$SRCDIR/script/tests/test_pidl.sh || totalfailed=`expr $totalfailed + $?`
|
||||||
$SRCDIR/script/tests/test_smbclient.sh $SERVER $USERNAME $PASSWORD $DOMAIN $PREFIX || totalfailed=`expr $totalfailed + $?`
|
$SRCDIR/script/tests/test_blackbox.sh $SERVER $USERNAME $PASSWORD $DOMAIN $PREFIX || totalfailed=`expr $totalfailed + $?`
|
||||||
$SRCDIR/script/tests/test_cifsdd.sh $SERVER $USERNAME $PASSWORD $DOMAIN || totalfailed=`expr $totalfailed + $?`
|
$SRCDIR/script/tests/test_cifsdd.sh $SERVER $USERNAME $PASSWORD $DOMAIN || totalfailed=`expr $totalfailed + $?`
|
||||||
$SRCDIR/script/tests/test_simple.sh //$SERVER/simple $USERNAME $PASSWORD "" || totalfailed=`expr $totalfailed + $?`
|
$SRCDIR/script/tests/test_simple.sh //$SERVER/simple $USERNAME $PASSWORD "" || totalfailed=`expr $totalfailed + $?`
|
||||||
|
|||||||
@ -15,15 +15,28 @@ PREFIX=$5
|
|||||||
shift 5
|
shift 5
|
||||||
failed=0
|
failed=0
|
||||||
|
|
||||||
|
testit() {
|
||||||
|
name="$1"
|
||||||
|
shift
|
||||||
|
cmdline="$*"
|
||||||
|
echo "test: $name"
|
||||||
|
$cmdline
|
||||||
|
status=$?
|
||||||
|
if [ x$status = x0 ]; then
|
||||||
|
echo "success: $name"
|
||||||
|
else
|
||||||
|
echo "failure: $name"
|
||||||
|
fi
|
||||||
|
return $status
|
||||||
|
}
|
||||||
|
|
||||||
runcmd() {
|
runcmd() {
|
||||||
name="$1"
|
name="$1"
|
||||||
shift
|
shift
|
||||||
testit "$name" $VALGRIND bin/smbclient $CONFIGURATION //$SERVER/tmp -W "$DOMAIN "-U"$USERNAME"%"$PASSWORD" $@
|
testit "$name" $VALGRIND bin/smbclient $CONFIGURATION //$SERVER/tmp -W "$DOMAIN" -U"$USERNAME%$PASSWORD" $@
|
||||||
|
return $?
|
||||||
}
|
}
|
||||||
|
|
||||||
incdir=`dirname $0`
|
|
||||||
. $incdir/test_functions.sh
|
|
||||||
|
|
||||||
# Generate random file
|
# Generate random file
|
||||||
cat >tmpfile<<EOF
|
cat >tmpfile<<EOF
|
||||||
foo
|
foo
|
||||||
@ -32,7 +45,6 @@ bloe
|
|||||||
blah
|
blah
|
||||||
EOF
|
EOF
|
||||||
|
|
||||||
|
|
||||||
# put that file
|
# put that file
|
||||||
echo mput tmpfile | runcmd "MPutting file" || failed=`expr $failed + 1`
|
echo mput tmpfile | runcmd "MPutting file" || failed=`expr $failed + 1`
|
||||||
# check file info
|
# check file info
|
||||||
@ -87,4 +99,4 @@ echo ls | runcmd "List directory with LANMAN2" -m LANMAN2 || failed=`expr $faile
|
|||||||
|
|
||||||
rm -f tmpfile tmpfile-old tmpfilex
|
rm -f tmpfile tmpfile-old tmpfilex
|
||||||
|
|
||||||
testok $0 $failed
|
exit $failed
|
||||||
Loading…
Reference in New Issue
Block a user