aboutsummaryrefslogtreecommitdiffstats
path: root/lib/xmerl/test/xmerl_xsd_SUITE.erl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/xmerl/test/xmerl_xsd_SUITE.erl')
-rw-r--r--lib/xmerl/test/xmerl_xsd_SUITE.erl83
1 files changed, 0 insertions, 83 deletions
diff --git a/lib/xmerl/test/xmerl_xsd_SUITE.erl b/lib/xmerl/test/xmerl_xsd_SUITE.erl
index 638bf89fd2..3060f27e6c 100644
--- a/lib/xmerl/test/xmerl_xsd_SUITE.erl
+++ b/lib/xmerl/test/xmerl_xsd_SUITE.erl
@@ -86,13 +86,11 @@ end_per_testcase(_Func,_Config) ->
ok.
-string(suite) -> [];
string(_Config) ->
%% #x9 | #xA | #xD | [#x20-#xD7FF] | [#xE000-#xFFFD] | [#x10000-#x10FFFF]
Str = [16#9,16#A,16#D,16#20,16#D7FF,16#E000,16#FFFD,16#10000, 16#10FFFF],
{ok,_} = check_simpleType(string,Str,dummy).
-boolean(suite) -> [];
boolean(_Config) ->
{ok,_} = check_simpleType(boolean,"1",dummy),
{ok,_} = check_simpleType(boolean,"0",dummy),
@@ -100,14 +98,12 @@ boolean(_Config) ->
{ok,_} = check_simpleType(boolean,"false",dummy),
{error,_Reason} = check_simpleType(boolean,"gurka",dummy).
-decimal(suite) -> [];
decimal(_Config) ->
{ok,_} = check_simpleType(decimal,"-1.23",dummy),
{ok,_} = check_simpleType(decimal,"12678967.543233",dummy),
{ok,_} = check_simpleType(decimal,"+100000.00",dummy),
{ok,_} = check_simpleType(decimal,"210",dummy).
-float(suite) -> [];
float(_Config) ->
%% -1E4, 1267.43233E12, 12.78e-2, 12 , -0, 0 , INF, -INF, NaN
{ok,_} = check_simpleType(float,"-1E4",dummy),
@@ -121,7 +117,6 @@ float(_Config) ->
{ok,_} = check_simpleType(float,"NaN",dummy).
-double(suite) -> [];
double(_Config) ->
%% -1E4, 1267.43233E12, 12.78e-2, 12 , -0, 0 , INF, -INF, NaN
{ok,_} = check_simpleType(double,"-1E4",dummy),
@@ -135,7 +130,6 @@ double(_Config) ->
{ok,_} = check_simpleType(double,"NaN",dummy).
-duration(suite) -> [];
duration(_Config) ->
%% allowed: P1Y2M3DT10H30M -P120D P1347Y P1347M P1Y2MT2H
%% P0Y1347M P0Y1347M0D -P1347M
@@ -153,7 +147,6 @@ duration(_Config) ->
{error,_} = check_simpleType(duration,"P1Y2MT",dummy).
%% '-'? yyyy '-' mm '-' dd 'T' hh ':' mm ':' ss ('.' s+)? (zzzzzz)?
-dateTime(suite) -> [];
dateTime(_Config) ->
%% 2002-10-10T12:00:00-05:00
DT1 = "2002-10-10T12:00:00-05:00",
@@ -169,7 +162,6 @@ dateTime(_Config) ->
DT5 = "1953-12-31T12:10:10.10+12:00",
{ok,_} = check_simpleType(dateTime,DT5,dummy).
-time(suite) -> [];
time(_Config) ->
%% hh:mm:ss.sss with optional following time zone indicator.
T1 = "13:20:00-05:00",
@@ -184,7 +176,6 @@ time(_Config) ->
T5 = "12:34:56.552Z",
{ok,_} = check_simpleType(time,T5,dummy).
-date(suite) -> [];
date(_Config) ->
%% '-'? yyyy '-' mm '-' dd zzzzzz?
%% is
@@ -200,7 +191,6 @@ date(_Config) ->
D14 = "2002-12-39-11:00",
{error,_Reason14} = check_simpleType(date,D14,dummy).
-gYearMonth(suite) -> [];
gYearMonth(_Config) ->
%% '-'? yyyy '-' mm zzzzzz?
GYM1 = "1955-10",
@@ -220,7 +210,6 @@ gYearMonth(_Config) ->
{error,_} = check_simpleType(gYearMonth,"2000-00",dummy),
{error,_} = check_simpleType(gYearMonth,"2000-10+10:70",dummy).
-gYear(suite) -> [];
gYear(_Config) ->
%% '-'? yyyy zzzzzz?
{ok,_} = check_simpleType(gYear,"2000",dummy),
@@ -228,7 +217,6 @@ gYear(_Config) ->
{ok,_} = check_simpleType(gYear,"-2000",dummy),
{error,_} = check_simpleType(gYear,"0000",dummy).
-gMonthDay(suite) -> [];
gMonthDay(_Config) ->
%% mm '-' dd zzzzzz?
{ok,_} = check_simpleType(gMonthDay,"--05-03",dummy),
@@ -237,7 +225,6 @@ gMonthDay(_Config) ->
{error,_} = check_simpleType(gMonthDay,"00-03",dummy),
{error,_} = check_simpleType(gMonthDay,"-05-03",dummy).
-gDay(suite) -> [];
gDay(_Config) ->
%% dd zzzzzz?
{ok,_} = check_simpleType(gDay,"---05",dummy),
@@ -247,7 +234,6 @@ gDay(_Config) ->
{error,_} = check_simpleType(gDay,"---40+03:00",dummy),
{error,_} = check_simpleType(gDay,"05",dummy).
-gMonth(suite) -> [];
gMonth(_Config) ->
%% mm zzzzzz?
{ok,_} = check_simpleType(gMonth,"--05",dummy),
@@ -258,7 +244,6 @@ gMonth(_Config) ->
{error,_} = check_simpleType(gMonth,"05",dummy).
-hexBinary(suite) -> [];
hexBinary(_Config) ->
%% an even number of hexadecimal digits ([0-9a-fA-F]).
{ok,_} = check_simpleType(hexBinary,"05",dummy),
@@ -270,7 +255,6 @@ hexBinary(_Config) ->
{error,_} = check_simpleType(hexBinary,"aF5",dummy),
{error,_} = check_simpleType(hexBinary,"aFG",dummy).
-base64Binary(suite) -> [];
base64Binary(_Config) ->
%% a-z, A-Z, 0-9, the plus sign (+), the forward slash (/) and the
%% equal sign (=), together with the characters defined in [XML
@@ -288,7 +272,6 @@ base64Binary(_Config) ->
ErrB641 = "AbCd GZ9 0z8 =",
{error,_} = check_simpleType(base64Binary,ErrB641,dummy).
-anyURI(suite) -> [];
anyURI(_Config) ->
URI1 = "ftp://ftp.is.co.za/rfc/rfc1808.txt",
URI2 = "gopher://spinaltap.micro.umn.edu/00/Weather/California/Los%20Angeles",
@@ -299,7 +282,6 @@ anyURI(_Config) ->
ok=ok_loop(anyURI,[URI1,URI2,URI3,URI4,URI5,URI6]).
-'QName'(suite) -> [];
'QName'(_Config) ->
%% QName ::= (Prefix ':')? LocalPart
%% Prefix ::= NCName
@@ -308,13 +290,11 @@ anyURI(_Config) ->
{ok,_} = check_simpleType('QName',"abc",dummy),
{ok,_} = check_simpleType('QName',"abc:def:ijk",dummy).
-'NOTATION'(suite) -> [];
'NOTATION'(_Config) ->
{ok,_} = check_simpleType('NOTATION',"abc:def",dummy),
{ok,_} = check_simpleType('NOTATION',"abc",dummy),
{ok,_} = check_simpleType('NOTATION',"abc:def:ijk",dummy).
-normalizedString(suite) -> [];
normalizedString(_Config) ->
%% not contain the carriage return (#xD), line feed (#xA) nor tab
%% (#x9) characters.
@@ -325,7 +305,6 @@ normalizedString(_Config) ->
{ok,_} = check_simpleType(normalizedString,NStr1,dummy),
ok=error_loop(normalizedString,[NotNStr1,NotNStr2,NotNStr3]).
-token(suite) -> [];
token(_Config) ->
%% not contain the carriage return (#xD), line feed (#xA) nor tab
%% (#x9) characters, that have no leading or trailing spaces
@@ -341,7 +320,6 @@ token(_Config) ->
{ok,_} = check_simpleType(token,T1,dummy),
ok=error_loop(token,[NotT1,NotT2,NotT3,NotT4,NotT5,NotT6]).
-language(suite) -> [];
language(_Config) ->
%% strings that conform to the pattern
%% [a-zA-Z]{1,8}(-[a-zA-Z0-9]{1,8})*
@@ -353,7 +331,6 @@ language(_Config) ->
{ok,_} = check_simpleType(language,L,dummy),
ok=error_loop(language,[NotL1,NotL2,NotL3,NotL4]).
-'NMTOKEN'(suite) -> [];
'NMTOKEN'(_Config) ->
N = "name:withoutspace",
NotN1 = "name with space",
@@ -362,61 +339,49 @@ language(_Config) ->
{error,_} = check_simpleType('NMTOKEN',NotN1,dummy),
{error,_} = check_simpleType('NMTOKEN',NotN2,dummy).
-'NMTOKENS'(suite) -> [];
'NMTOKENS'(_Config) ->
N1 = "name1 name:2 name:three",
NotN1 = "name na%me",
{ok,_} = check_simpleType('NMTOKENS',N1,dummy),
{error,_} = check_simpleType('NMTOKENS',NotN1,dummy).
-'Name'(suite) -> [];
'Name'(_Config) ->
{ok,_} = check_simpleType('Name',"_valid_Name",dummy).
-'NCName'(suite) -> [];
'NCName'(_Config) ->
{ok,_} = check_simpleType('NCName',"_valid_Name",dummy).
-'ID'(suite) -> [];
'ID'(_Config) ->
{ok,_} = check_simpleType('ID',"_valid_Name",dummy).
-'IDREF'(suite) -> [];
'IDREF'(_Config) ->
{ok,_} = check_simpleType('IDREF',"_valid_Name",dummy).
-'IDREFS'(suite) -> [];
'IDREFS'(_Config) ->
{ok,_} = check_simpleType('IDREFS',"_valid_Name Name2",dummy).
-'ENTITY'(suite) -> [];
'ENTITY'(_Config) ->
{ok,_} = check_simpleType('ENTITY',"_valid_Name",dummy).
-'ENTITIES'(suite) -> [];
'ENTITIES'(_Config) ->
{ok,_} = check_simpleType('ENTITIES',"name name3",dummy).
-integer(suite) -> [];
integer(_Config) ->
IntList = ["-1", "0", "12678967543233", "+100000"],
ok = ok_loop(integer,IntList),
{error,_} = check_simpleType(integer,"1.3",dummy).
-nonPositiveInteger(suite) -> [];
nonPositiveInteger(_Config) ->
NPIList = ["0", "-12678967543233", "-100000"],
ok = ok_loop(nonPositiveInteger,NPIList),
{error,_} = check_simpleType(nonPositiveInteger,"1",dummy).
-negativeInteger(suite) -> [];
negativeInteger(_Config) ->
NIList = ["-1", "-12678967543233", "-100000"],
ok = ok_loop(negativeInteger,NIList),
{error,_} = check_simpleType(negativeInteger,"1",dummy),
{error,_} = check_simpleType(negativeInteger,"0",dummy).
-long(suite) -> [];
long(_Config) ->
L = ["9223372036854775807","-9223372036854775808","-1", "0",
"12678967543233", "+100000"],
@@ -424,62 +389,53 @@ long(_Config) ->
Err = ["9223372036854775808","-9223372036854775809"],
ok = error_loop(long,Err).
-int(suite) -> [];
int(_Config) ->
L = ["2147483647", "-2147483648", "-1", "0", "126789675", "+100000"],
ok = ok_loop(int,L),
Err = ["2147483648", "-2147483649"],
ok = error_loop(int,Err).
-short(suite) -> [];
short(_Config) ->
L = ["32767", "-32768", "-1", "0", "12678", "+10000"],
ok = ok_loop(short,L),
Err = ["32768", "-32769"],
ok = error_loop(short,Err).
-byte(suite) -> [];
byte(_Config) ->
L = ["-1", "0", "126", "+100", "127", "-128"],
ok = ok_loop(byte,L),
Err = ["128", "-129"],
ok = error_loop(byte,Err).
-nonNegativeInteger(suite) -> [];
nonNegativeInteger(_Config) ->
L = ["1", "0", "12678967543233", "+100000"],
ok = ok_loop(nonNegativeInteger,L),
{error,_} = check_simpleType(nonNegativeInteger,"-1",dummy).
-unsignedLong(suite) -> [];
unsignedLong(_Config) ->
L = ["0", "12678967543233", "100000", "18446744073709551615"],
ok = ok_loop(unsignedLong,L),
Err = ["-1","18446744073709551616"],
ok = error_loop(unsignedLong,Err).
-unsignedInt(suite) -> [];
unsignedInt(_Config) ->
L = ["4294967295", "0", "1267896754", "100000"],
ok = ok_loop(unsignedInt,L),
Err = ["-1","4294967296"],
ok = error_loop(unsignedInt,Err).
-unsignedShort(suite) -> [];
unsignedShort(_Config) ->
L = ["65535", "0", "12678", "10000"],
ok = ok_loop(unsignedShort,L),
Err = ["-1","65536"],
ok = error_loop(unsignedShort,Err).
-unsignedByte(suite) -> [];
unsignedByte(_Config) ->
L = ["255", "0", "126", "100"],
ok = ok_loop(unsignedByte,L),
Err = ["-1","256"],
ok = error_loop(unsignedByte,Err).
-positiveInteger(suite) -> [];
positiveInteger(_Config) ->
L = ["1", "12678967543233", "+100000"],
ok = ok_loop(positiveInteger,L),
@@ -504,28 +460,24 @@ error_loop(Type,[H|T]) ->
-length(suite) -> [];
length(_Config) ->
{ok,"string"} = (xmerl_xsd_type:facet_fun(string,{length,"6"}))("string"),
{error,{length,12,should_be,6}} =
(xmerl_xsd_type:facet_fun(string,{length,"6"}))("stringstring"),
ok.
-minLength(suite) -> [];
minLength(_Config) ->
{ok,"string"} = (xmerl_xsd_type:facet_fun(string,{minLength,"6"}))("string"),
{error,{minLength,3,should_at_least_be,6}} =
(xmerl_xsd_type:facet_fun(string,{minLength,"6"}))("str"),
ok.
-maxLength(suite) -> [];
maxLength(_Config) ->
{ok,"string"} = (xmerl_xsd_type:facet_fun(string,{maxLength,"6"}))("string"),
{error,{maxLength,12,should_not_be_more_than,6}} =
(xmerl_xsd_type:facet_fun(string,{maxLength,"6"}))("stringstring"),
ok.
-pattern(suite) -> [];
pattern(_Config) ->
RE1 = "[a-z]{5}",
{ok,"calle"} =
@@ -542,7 +494,6 @@ pattern(_Config) ->
(xmerl_xsd_type:facet_fun(string,{pattern,RE2}))
("AY23BC").
-enumeration(suite) -> [];
enumeration(_Config) ->
{ok,"tomat"} =
(xmerl_xsd_type:facet_fun(string,{enumeration,["gurka","tomat","sallad"]}))("tomat"),
@@ -550,14 +501,12 @@ enumeration(_Config) ->
(xmerl_xsd_type:facet_fun(string,{enumeration,["gurka","tomat","sallad"]}))("morot"),
ok.
-whiteSpace(suite) -> [];
whiteSpace(_Config) ->
{ok,"gur ka"} = (xmerl_xsd_type:facet_fun(string,{whiteSpace,"collapse"}))(" gur\tka "),
{ok," gur ka "} = (xmerl_xsd_type:facet_fun(string,{whiteSpace,"replace"}))(" gur\nka\t"),
{ok," gurk\na\t"} = (xmerl_xsd_type:facet_fun(string,{whiteSpace,"preserve"}))(" gurk\na\t"),
ok.
-maxInclusive(suite) -> [];
maxInclusive(_Config) ->
{error,{maxInclusive,"3",should_be_less_than_or_equal_with,"2"}} =
(xmerl_xsd_type:facet_fun(integer,{maxInclusive,"2"}))("3"),
@@ -609,7 +558,6 @@ maxInclusive(_Config) ->
(xmerl_xsd_type:facet_fun(duration,{maxInclusive,"P1Y2M3DT10H"}))("P1Y2M3DT10H30M"),
ok.
-maxExclusive(suite) -> [];
maxExclusive(_Config) ->
{error,{maxExclusive,"2",not_less_than,"2"}} =
(xmerl_xsd_type:facet_fun(integer,{maxExclusive,"2"}))("2"),
@@ -658,7 +606,6 @@ maxExclusive(_Config) ->
{ok,"2006-09-06T19:17:45Z"} = (xmerl_xsd_type:facet_fun(dateTime,{maxExclusive,"2006-09-06T19:17:46Z"}))("2006-09-06T19:17:45Z"),
ok.
-minExclusive(suite) -> [];
minExclusive(_Config) ->
{error,{minExclusive,"2",not_greater_than,"2"}} =
(xmerl_xsd_type:facet_fun(integer,{minExclusive,"2"}))("2"),
@@ -707,7 +654,6 @@ minExclusive(_Config) ->
{ok,"2006-09-06T19:17:45Z"} = (xmerl_xsd_type:facet_fun(dateTime,{minExclusive,"2006-09-06T19:17:44Z"}))("2006-09-06T19:17:45Z"),
ok.
-minInclusive(suite) -> [];
minInclusive(_Config) ->
{error,{minInclusive,"1",not_greater_than_or_equal_with,"2"}} =
(xmerl_xsd_type:facet_fun(integer,{minInclusive,"2"}))("1"),
@@ -756,7 +702,6 @@ minInclusive(_Config) ->
{ok,"2006-09-06T19:17:45Z"} = (xmerl_xsd_type:facet_fun(dateTime,{minInclusive,"2006-09-06T19:17:45Z"}))("2006-09-06T19:17:45Z"),
ok.
-totalDigits(suite) -> [];
totalDigits(_Config) ->
{error,{totalDigits,4,to_many_digits}} =
(xmerl_xsd_type:facet_fun(integer,{totalDigits,"3"}))("3456"),
@@ -769,7 +714,6 @@ totalDigits(_Config) ->
{ok,"555.555000000"} = (xmerl_xsd_type:facet_fun(decimal,{totalDigits,"7"}))("555.555000000"),
ok.
-fractionDigits(suite) -> [];
fractionDigits(_Config) ->
{error,{fractionDigits,3,to_many_digits_in,"555.555000000"}} =
(xmerl_xsd_type:facet_fun(decimal,{fractionDigits,"2"}))("555.555000000"),
@@ -784,7 +728,6 @@ fractionDigits(_Config) ->
ok.
%% some block testing of dateTime and duration comparisons
-compare_dateTime(suite) -> [];
compare_dateTime(_Config) ->
%% comparison results according to table in section 3.2.7.4 of XML
%% Schema part 2
@@ -822,7 +765,6 @@ compare_dateTime(_Config) ->
xmerl_xsd_type:add_duration2dateTime("2000-01-12T12:13:14Z",
"P1Y3M5DT7H10M3.3S").
-compare_duration(suite) -> [];
compare_duration(_Config) ->
%% order relations according to section 3.2.6.2 in XML Schema
%% part2.
@@ -845,13 +787,11 @@ compare_duration(_Config) ->
indefinite = xmerl_xsd_type:compare_durations("P5M","P153D"),
lt = xmerl_xsd_type:compare_durations("P5M","P154D").
-xml_xsd(suite) -> [];
xml_xsd(Config) ->
DataDir = datadir( Config),
Options = [{fetch_path, [DataDir]}],
{ok, _} = xmerl_xsd:process_schema("xml.xsd", Options).
-xml_lang_attr(suite) -> [];
xml_lang_attr(Config) ->
DataDir = datadir( Config),
{Element, _} = xmerl_scan:file(filename:join([DataDir,"book.xml"])),
@@ -859,36 +799,30 @@ xml_lang_attr(Config) ->
{ok, Schema} = xmerl_xsd:process_schema("book.xsd", Options),
{Element, _} = xmerl_xsd:validate(Element, Schema).
-po(suite) -> [];
po(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["po.xml"]),[]),
{E,_} = xmerl_xsd:process_validate(datadir_join(Config,["po.xsd"]),E,[]).
-po1(suite) -> [];
po1(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["po1.xml"]),[]),
{E2,_} = xmerl_xsd:process_validate(datadir_join(Config,["po1.xsd"]),E,[]),
ok = xmerl_test_lib:cmp_element(E,E2).
-po2(suite) -> [];
po2(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["po2.xml"]),[]),
{E2,_} = xmerl_xsd:process_validate(datadir_join(Config,["po1.xsd"]),E,[]),
ok = xmerl_test_lib:cmp_element(E,E2).
-ipo(suite) -> [];
ipo(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["ipo.xml"]),[]),
{VE,_} = xmerl_xsd:process_validate(datadir_join(Config,["ipo.xsd"]),E,[]),
ok = xmerl_test_lib:cmp_element(E,VE).
-ipo_redefine(suite) -> [];
ipo_redefine(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["ipo_redefine.xml"]),[]),
{VE,_} = xmerl_xsd:process_validate(datadir_join(Config,["ipo_redefine.xsd"]),E,[]),
ok = xmerl_test_lib:cmp_element(E,VE).
-'4Q99'(suite) -> [];
'4Q99'(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["4Q99.xml"]),[]),
%% the import in report.xsd lacks schemaLocation, so the imported
@@ -900,7 +834,6 @@ ipo_redefine(Config) ->
%% report2.xsd has an import element with a schemaLocation attribute
{VE,_} = xmerl_xsd:process_validate(datadir_join(Config,["report2.xsd"]),E,[]).
-small(suite) -> [];
small(Config) ->
{E=#xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["small.xml"]),[]),
{VE=#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["small.xsd"]),E,[]),
@@ -916,7 +849,6 @@ small(Config) ->
[{validation,schema}]),
true = lists:keymember(orderStatus,#xmlAttribute.name,Atts).
-complexType1(suite) -> [];
complexType1(Config) ->
{E1=#xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["complexTypes1.xml"]),[]),
{VE1=#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,[ "complexTypes.xsd"]),E1,[]),
@@ -926,7 +858,6 @@ complexType1(Config) ->
{VE2=#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["complexTypes.xsd"]),E2,[]),
ok = xmerl_test_lib:cmp_element(E2,VE2).
-model_group_all(suite) -> [];
model_group_all(Config) ->
{E=#xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["po1.xml"]),[]),
{E,_} = xmerl_xsd:process_validate(datadir_join(Config,["po1_all.xsd"]),E,[]),
@@ -944,17 +875,14 @@ model_group_all(Config) ->
{E4=#xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["po1_all_err2.xml"]),[]),
{error,_Reason2} = xmerl_xsd:process_validate(datadir_join(Config,["po1_all.xsd"]),E4,[]).
-substitutionGroup(suite) -> [];
substitutionGroup(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["ipo_substGroup.xml"]),[]),
{E,_} = xmerl_xsd:process_validate(datadir_join(Config,["ipo_substGroup.xsd"]),E,[]).
-attributeGroup(suite) -> [];
attributeGroup(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["po_attrGroup.xml"]),[]),
{E,_} = xmerl_xsd:process_validate(datadir_join(Config,["po_attrGroup.xsd"]),E,[]).
-test_key1(suite) -> [];
test_key1(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["vehicle2.xml"]),[]),
{E,_} = xmerl_xsd:process_validate(datadir_join(Config,["vehicle.xsd"]),E,[]),
@@ -966,12 +894,10 @@ test_key1(Config) ->
{E3 = #xmlElement{},_} = xmerl_scan:file(datadir_join(Config,["vehicle3.xml"]),[]),
{E3 = #xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["vehicle.xsd"]),E3,[]).
-sis1(suite) -> [];
sis1(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,[sis,"instance.xml"]),[]),
{#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,[sis,"IntegratedSite.xsd"]),E,[]).
-sis2(suite) -> [];
sis2(Config) ->
{BS_E,_} = xmerl_scan:file(datadir_join(Config,[sis,"bs_mim.xml"]),[]),
{SW_E,_} = xmerl_scan:file(datadir_join(Config,[sis,"swm_mim.xml"]),[]),
@@ -981,7 +907,6 @@ sis2(Config) ->
{#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,[sis,"mim.xsd"]),SW_E,[]),
{#xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,[sis,"mim.xsd"]),HW_E,[]).
-state2file_file2state(suite) -> [];
state2file_file2state(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,[ "po.xml"]),[]),
{ok,S} = xmerl_xsd:process_schema(datadir_join(Config,["po.xsd"])),
@@ -996,18 +921,15 @@ state2file_file2state(Config) ->
{E,_} = xmerl_xsd:validate(E,S).
-union(suite) -> [];
union(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["instance.xml"])),
{_E2 = #xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["measCollec.xsd"]),E).
-ticket_6910(suite) -> [];
ticket_6910(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,[sis,"dummy_action_mim.xml"])),
{_E2 = #xmlElement{},_} =
xmerl_xsd:process_validate(datadir_join(Config,[sis,"mim2.xsd"]),E).
-ticket_7165(suite) -> [];
ticket_7165(Config) ->
%% The validation option seems not to work
{_E,_} = xmerl_scan:file(datadir_join(Config,["ticket_7288.xml"]),
@@ -1017,12 +939,10 @@ ticket_7165(Config) ->
-ticket_7190(suite) -> [];
ticket_7190(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["int.xml"])),
{_E2 = #xmlElement{},_} = xmerl_xsd:process_validate(datadir_join(Config,["simple_int.xsd"]),E).
-ticket_7288(suite) -> [];
ticket_7288(Config) ->
%% The schema table in the state where deleted by xmerl_xsd:validate if there was an error.
{E,_} = xmerl_scan:file(datadir_join(Config,["ticket_7288.xml"])),
@@ -1030,7 +950,6 @@ ticket_7288(Config) ->
{error, EL} = xmerl_xsd:validate(E, S),
{error, EL} = xmerl_xsd:validate(E, S).
-ticket_7736(suite) -> [];
ticket_7736(Config) ->
DataDir = datadir(Config),
{ok, State } = xmerl_xsd:process_schema(filename:join([DataDir,"enum_bug.xsd"])),
@@ -1039,7 +958,6 @@ ticket_7736(Config) ->
{#xmlElement{},_} = xmerl_xsd:validate(Entity, State).
-ticket_8599(suite) -> [];
ticket_8599(Config) ->
{E,_} = xmerl_scan:file(datadir_join(Config,["ticket_8599.xml"])),
@@ -1048,7 +966,6 @@ ticket_8599(Config) ->
{{xmlElement,persons,persons,_,_,_,_,_,_,_,_,_},_GlobalState} = xmerl_xsd:validate(E, S).
-ticket_9410(suite) -> [];
ticket_9410(Config) ->
file:set_cwd(datadir_join(Config,[".."])),
{ok, _S} = xmerl_xsd:process_schema("xmerl_xsd_SUITE_data/small.xsd").