END_TEST
START_TEST(test_XMLNode_clearNamespaces)
{
/*-- setup --*/
XMLTriple_t* triple = XMLTriple_createWith("test","","");
XMLAttributes_t* attr = XMLAttributes_create();
XMLNode_t* node = XMLNode_createStartElement(triple, attr);
const XMLNamespaces_t* nms;
int i = XMLNode_addNamespace(node, "http://test1.org/", "test1");
fail_unless(i == LIBSBML_OPERATION_SUCCESS);
nms = XMLNode_getNamespaces(node);
fail_unless (XMLNamespaces_getLength(nms) == 1);
i = XMLNode_addNamespace(node, "http://test2.org/", "test2");
fail_unless(i == LIBSBML_OPERATION_SUCCESS);
nms = XMLNode_getNamespaces(node);
fail_unless (XMLNamespaces_getLength(nms) == 2);
i = XMLNode_clearNamespaces(node);
fail_unless ( i == LIBSBML_OPERATION_SUCCESS );
nms = XMLNode_getNamespaces(node);
fail_unless (XMLNamespaces_getLength(nms) == 0);
XMLTriple_free(triple);
XMLAttributes_free(attr);
XMLNode_free(node);
}
END_TEST
START_TEST (test_XMLNamespaces_add)
{
fail_unless( XMLNamespaces_getLength(NS) == 0 );
fail_unless( XMLNamespaces_isEmpty(NS) == 1 );
XMLNamespaces_add(NS, "http://test1.org/", "test1");
fail_unless( XMLNamespaces_getLength(NS) == 1 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
XMLNamespaces_add(NS, "http://test2.org/", "test2");
fail_unless( XMLNamespaces_getLength(NS) == 2 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
XMLNamespaces_add(NS, "http://test1.org/", "test1a");
fail_unless( XMLNamespaces_getLength(NS) == 3 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
XMLNamespaces_add(NS, "http://test1.org/", "test1a");
fail_unless( XMLNamespaces_getLength(NS) == 3 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
fail_if( XMLNamespaces_getIndex(NS, "http://test1.org/") == -1);
}
END_TEST
START_TEST (test_XMLNamespaces_remove1)
{
XMLNamespaces_add(NS, "http://test1.org/", "test1");
XMLNamespaces_add(NS, "http://test2.org/", "test2");
fail_unless( XMLNamespaces_getLength(NS) == 2 );
int i = XMLNamespaces_remove(NS, 4);
fail_unless (i == LIBSBML_INDEX_EXCEEDS_SIZE );
fail_unless( XMLNamespaces_getLength(NS) == 2 );
i = XMLNamespaces_removeByPrefix(NS, "test4");
fail_unless (i == LIBSBML_INDEX_EXCEEDS_SIZE );
fail_unless( XMLNamespaces_getLength(NS) == 2 );
i = XMLNamespaces_remove(NS, 1);
fail_unless (i == LIBSBML_OPERATION_SUCCESS );
fail_unless( XMLNamespaces_getLength(NS) == 1 );
i = XMLNamespaces_removeByPrefix(NS, "test1");
fail_unless (i == LIBSBML_OPERATION_SUCCESS );
fail_unless( XMLNamespaces_getLength(NS) == 0 );
}
END_TEST
START_TEST (test_XMLNamespaces_add1)
{
fail_unless( XMLNamespaces_getLength(NS) == 0 );
fail_unless( XMLNamespaces_isEmpty(NS) == 1 );
int i = XMLNamespaces_add(NS, "http://test1.org/", "test1");
fail_unless( i == LIBSBML_OPERATION_SUCCESS);
fail_unless( XMLNamespaces_getLength(NS) == 1 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
}
END_TEST
START_TEST (test_UnitDefinition_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
UnitDefinition_t *object =
UnitDefinition_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_UNIT_DEFINITION );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( UnitDefinition_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(
UnitDefinition_getNamespaces(object)) == 2 );
UnitDefinition_free(object);
}
END_TEST
START_TEST (test_AlgebraicRule_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,3);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
AlgebraicRule_t *r =
AlgebraicRule_createWithNS(sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) r) == SBML_ALGEBRAIC_RULE );
fail_unless( SBase_getMetaId ((SBase_t *) r) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) r) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) r) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) r) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) r) == 3 );
fail_unless( Rule_getNamespaces ((Rule_t*)(r)) != NULL );
fail_unless( XMLNamespaces_getLength(Rule_getNamespaces((Rule_t*)(r))) == 2 );
Rule_free((Rule_t*)(r));
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_Constraint_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,2);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Constraint_t *object =
Constraint_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_CONSTRAINT );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 2 );
fail_unless( Constraint_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(Constraint_getNamespaces(object)) == 2 );
Constraint_free(object);
}
END_TEST
START_TEST (test_Priority_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(3,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Priority_t *object =
Priority_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_PRIORITY );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( Priority_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(Priority_getNamespaces(object)) == 2 );
Priority_free(object);
}
END_TEST
START_TEST (test_Species_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Species_t *object =
Species_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_SPECIES );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( Species_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(Species_getNamespaces(object)) == 2 );
Species_free(object);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_EventAssignment_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
EventAssignment_t *object =
EventAssignment_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_EVENT_ASSIGNMENT );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( EventAssignment_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(
EventAssignment_getNamespaces(object)) == 2 );
EventAssignment_free(object);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_ModifierSpeciesReference_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
SBase_t *object = (SBase_t *) SpeciesReference_createModifierWithNS(sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_MODIFIER_SPECIES_REFERENCE );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( SpeciesReference_getNamespaces ((SpeciesReference_t *) object) != NULL );
const XMLNamespaces_t *n = SpeciesReference_getNamespaces((SpeciesReference_t *) object);
fail_unless( XMLNamespaces_getLength( n ) == 2 );
SpeciesReference_free((SpeciesReference_t *) object);
}
END_TEST
START_TEST (test_Compartment_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Compartment_t *c =
Compartment_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) c) == SBML_COMPARTMENT );
fail_unless( SBase_getMetaId ((SBase_t *) c) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) c) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) c) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) c) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) c) == 1 );
fail_unless( Compartment_getNamespaces (c) != NULL );
fail_unless( XMLNamespaces_getLength(Compartment_getNamespaces(c)) == 2 );
fail_unless( Compartment_getName(c) == NULL );
fail_unless( Compartment_getSpatialDimensions(c) == 3 );
fail_unless( Compartment_getConstant(c) == 1 );
Compartment_free(c);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_XMLNamespaces_clear)
{
XMLNamespaces_add(NS, "http://test1.org/", "test1");
XMLNamespaces_add(NS, "http://test2.org/", "test2");
XMLNamespaces_add(NS, "http://test3.org/", "test3");
XMLNamespaces_add(NS, "http://test4.org/", "test4");
XMLNamespaces_add(NS, "http://test5.org/", "test5");
fail_unless( XMLNamespaces_getLength(NS) == 5 );
int i = XMLNamespaces_clear(NS);
fail_unless( i == LIBSBML_OPERATION_SUCCESS);
fail_unless( XMLNamespaces_getLength(NS) == 0 );
}
END_TEST
START_TEST (test_L3_Compartment_NS)
{
fail_unless( Compartment_getNamespaces (C) != NULL );
fail_unless( XMLNamespaces_getLength(Compartment_getNamespaces(C)) == 1 );
fail_unless( !strcmp( XMLNamespaces_getURI(Compartment_getNamespaces(C), 0),
"http://www.sbml.org/sbml/level3/version1/core"));
}
END_TEST
START_TEST (test_L3_SpeciesReference_NS)
{
fail_unless( SpeciesReference_getNamespaces (SR) != NULL );
fail_unless( XMLNamespaces_getLength(SpeciesReference_getNamespaces(SR)) == 1 );
fail_unless( !strcmp( XMLNamespaces_getURI(SpeciesReference_getNamespaces(SR), 0),
"http://www.sbml.org/sbml/level3/version1/core"));
}
END_TEST
START_TEST (test_L3_Parameter_NS)
{
fail_unless( Parameter_getNamespaces (P) != NULL );
fail_unless( XMLNamespaces_getLength(Parameter_getNamespaces(P)) == 1 );
fail_unless( !strcmp( XMLNamespaces_getURI(Parameter_getNamespaces(P), 0),
"http://www.sbml.org/sbml/level3/version1/core"));
}
END_TEST
START_TEST (test_L3_Species_NS)
{
fail_unless( Species_getNamespaces (S) != NULL );
fail_unless( XMLNamespaces_getLength(Species_getNamespaces(S)) == 1 );
char* uri = XMLNamespaces_getURI(Species_getNamespaces(S), 0);
fail_unless( !strcmp( uri, "http://www.sbml.org/sbml/level3/version1/core"));
safe_free(uri);
}
END_TEST
START_TEST (test_L3_Species_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(3,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Species_t *s =
Species_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) s) == SBML_SPECIES );
fail_unless( SBase_getMetaId ((SBase_t *) s) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) s) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) s) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) s) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) s) == 1 );
fail_unless( Species_getNamespaces (s) != NULL );
fail_unless( XMLNamespaces_getLength(Species_getNamespaces(s)) == 2 );
fail_unless( Species_getId (s) == NULL );
fail_unless( Species_getName (s) == NULL );
fail_unless( Species_getCompartment (s) == NULL );
fail_unless( util_isNaN(Species_getInitialAmount (s)) );
fail_unless( util_isNaN(Species_getInitialConcentration (s)) );
fail_unless( Species_getSubstanceUnits (s) == NULL );
fail_unless( Species_getHasOnlySubstanceUnits(s) == 0 );
fail_unless( Species_getBoundaryCondition(s) == 0 );
fail_unless( Species_getConstant(s) == 0 );
fail_unless( Species_getConversionFactor (s) == NULL );
fail_unless( !Species_isSetId (s) );
fail_unless( !Species_isSetName (s) );
fail_unless( !Species_isSetCompartment (s) );
fail_unless( !Species_isSetInitialAmount (s) );
fail_unless( !Species_isSetInitialConcentration (s) );
fail_unless( !Species_isSetSubstanceUnits (s) );
fail_unless( !Species_isSetHasOnlySubstanceUnits(s) );
fail_unless( !Species_isSetBoundaryCondition(s) );
fail_unless( !Species_isSetConstant(s) );
fail_unless( !Species_isSetConversionFactor (s) );
Species_free(s);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_XMLNamespaces_get)
{
XMLNamespaces_add(NS, "http://test1.org/", "test1"); /* index 0 */
XMLNamespaces_add(NS, "http://test2.org/", "test2"); /* index 1 */
XMLNamespaces_add(NS, "http://test3.org/", "test3"); /* index 2 */
XMLNamespaces_add(NS, "http://test4.org/", "test4"); /* index 3 */
XMLNamespaces_add(NS, "http://test5.org/", "test5"); /* index 4 */
XMLNamespaces_add(NS, "http://test6.org/", "test6"); /* index 5 */
XMLNamespaces_add(NS, "http://test7.org/", "test7"); /* index 6 */
XMLNamespaces_add(NS, "http://test8.org/", "test8"); /* index 7 */
XMLNamespaces_add(NS, "http://test9.org/", "test9"); /* index 8 */
fail_unless( XMLNamespaces_getLength(NS) == 9 );
fail_unless( XMLNamespaces_getIndex(NS, "http://test1.org/") == 0 );
fail_unless( strcmp(XMLNamespaces_getPrefix(NS, 1), "test2") == 0 );
fail_unless( strcmp(XMLNamespaces_getPrefixByURI(NS, "http://test1.org/"),
"test1") == 0 );
fail_unless( strcmp(XMLNamespaces_getURI(NS, 1), "http://test2.org/") == 0 );
fail_unless( strcmp(XMLNamespaces_getURIByPrefix(NS, "test2"),
"http://test2.org/") == 0 );
fail_unless( XMLNamespaces_getIndex(NS, "http://test1.org/") == 0 );
fail_unless( XMLNamespaces_getIndex(NS, "http://test2.org/") == 1 );
fail_unless( XMLNamespaces_getIndex(NS, "http://test5.org/") == 4 );
fail_unless( XMLNamespaces_getIndex(NS, "http://test9.org/") == 8 );
fail_unless( XMLNamespaces_getIndex(NS, "http://testX.org/") == -1 );
fail_unless( XMLNamespaces_hasURI(NS, "http://test1.org/") != 0 );
fail_unless( XMLNamespaces_hasURI(NS, "http://test2.org/") != 0 );
fail_unless( XMLNamespaces_hasURI(NS, "http://test5.org/") != 0 );
fail_unless( XMLNamespaces_hasURI(NS, "http://test9.org/") != 0 );
fail_unless( XMLNamespaces_hasURI(NS, "http://testX.org/") == 0 );
fail_unless( XMLNamespaces_getIndexByPrefix(NS, "test1") == 0 );
fail_unless( XMLNamespaces_getIndexByPrefix(NS, "test5") == 4 );
fail_unless( XMLNamespaces_getIndexByPrefix(NS, "test9") == 8 );
fail_unless( XMLNamespaces_getIndexByPrefix(NS, "testX") == -1 );
fail_unless( XMLNamespaces_hasPrefix(NS, "test1") != 0 );
fail_unless( XMLNamespaces_hasPrefix(NS, "test5") != 0 );
fail_unless( XMLNamespaces_hasPrefix(NS, "test9") != 0 );
fail_unless( XMLNamespaces_hasPrefix(NS, "testX") == 0 );
fail_unless( XMLNamespaces_hasNS(NS, "http://test1.org/", "test1") != 0 );
fail_unless( XMLNamespaces_hasNS(NS, "http://test5.org/", "test5") != 0 );
fail_unless( XMLNamespaces_hasNS(NS, "http://test9.org/", "test9") != 0 );
fail_unless( XMLNamespaces_hasNS(NS, "http://testX.org/", "testX") == 0 );
}
END_TEST
START_TEST (test_L3_Model_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(3,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Model_t *m =
Model_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) m) == SBML_MODEL );
fail_unless( SBase_getMetaId ((SBase_t *) m) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) m) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) m) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) m) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) m) == 1 );
fail_unless( Model_getNamespaces (m) != NULL );
fail_unless( XMLNamespaces_getLength(Model_getNamespaces(m)) == 2 );
fail_unless( Model_getId (m) == NULL );
fail_unless( Model_getName (m) == NULL );
fail_unless( Model_getSubstanceUnits(m) == NULL );
fail_unless( Model_getTimeUnits(m) == NULL );
fail_unless( Model_getVolumeUnits(m) == NULL );
fail_unless( Model_getAreaUnits(m) == NULL );
fail_unless( Model_getLengthUnits(m) == NULL );
fail_unless( Model_getConversionFactor(m) == NULL );
fail_unless( !Model_isSetId (m) );
fail_unless( !Model_isSetName (m) );
fail_unless( !Model_isSetSubstanceUnits(m) );
fail_unless( !Model_isSetTimeUnits(m) );
fail_unless( !Model_isSetVolumeUnits(m) );
fail_unless( !Model_isSetAreaUnits(m) );
fail_unless( !Model_isSetLengthUnits(m) );
fail_unless( !Model_isSetConversionFactor(m) );
Model_free(m);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_L3_SpeciesReference_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(3,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
SpeciesReference_t *sr =
SpeciesReference_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) sr) == SBML_SPECIES_REFERENCE );
fail_unless( SBase_getMetaId ((SBase_t *) sr) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) sr) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) sr) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) sr) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) sr) == 1 );
fail_unless( SpeciesReference_getNamespaces (sr) != NULL );
fail_unless( XMLNamespaces_getLength(SpeciesReference_getNamespaces(sr)) == 2 );
fail_unless( SpeciesReference_getId (sr) == NULL );
fail_unless( SpeciesReference_getName (sr) == NULL );
fail_unless( SpeciesReference_getSpecies (sr) == NULL );
fail_unless( util_isNaN(SpeciesReference_getStoichiometry (sr)) );
fail_unless( SpeciesReference_getConstant(sr) == 0 );
fail_unless( !SpeciesReference_isSetId (sr) );
fail_unless( !SpeciesReference_isSetName (sr) );
fail_unless( !SpeciesReference_isSetSpecies (sr) );
fail_unless( !SpeciesReference_isSetStoichiometry (sr) );
fail_unless( !SpeciesReference_isSetConstant(sr) );
SpeciesReference_free(sr);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_L3_Parameter_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(3,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Parameter_t *p =
Parameter_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) p) == SBML_PARAMETER );
fail_unless( SBase_getMetaId ((SBase_t *) p) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) p) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) p) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) p) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) p) == 1 );
fail_unless( Parameter_getNamespaces (p) != NULL );
fail_unless( XMLNamespaces_getLength(Parameter_getNamespaces(p)) == 2 );
fail_unless( Parameter_getId (p) == NULL );
fail_unless( Parameter_getName (p) == NULL );
fail_unless( Parameter_getUnits (p) == NULL );
fail_unless( isnan(Parameter_getValue(p)));
fail_unless( Parameter_getConstant(p) == 1 );
fail_unless( !Parameter_isSetId (p) );
fail_unless( !Parameter_isSetName (p) );
fail_unless( !Parameter_isSetValue (p) );
fail_unless( !Parameter_isSetUnits (p) );
fail_unless( !Parameter_isSetConstant(p) );
Parameter_free(p);
}
END_TEST
START_TEST (test_L3_Event_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(3,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Event_t *e =
Event_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) e) == SBML_EVENT );
fail_unless( SBase_getMetaId ((SBase_t *) e) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) e) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) e) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) e) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) e) == 1 );
fail_unless( Event_getNamespaces (e) != NULL );
fail_unless( XMLNamespaces_getLength(Event_getNamespaces(e)) == 2 );
fail_unless( Event_getId (e) == NULL );
fail_unless( Event_getName (e) == NULL );
fail_unless( Event_getUseValuesFromTriggerTime(e) == 1 );
fail_unless( !Event_isSetId (e) );
fail_unless( !Event_isSetName (e) );
fail_unless( !Event_isSetUseValuesFromTriggerTime(e) );
Event_free(e);
XMLNamespaces_free(xmlns);
SBMLNamespaces_free(sbmlns);
}
END_TEST
START_TEST (test_L3_Unit_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(3,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Unit_t *u =
Unit_createWithNS (sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) u) == SBML_UNIT );
fail_unless( SBase_getMetaId ((SBase_t *) u) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) u) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) u) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) u) == 3 );
fail_unless( SBase_getVersion ((SBase_t *) u) == 1 );
fail_unless( Unit_getNamespaces (u) != NULL );
fail_unless( XMLNamespaces_getLength(Unit_getNamespaces(u)) == 2 );
fail_unless( Unit_getKind (u) == UNIT_KIND_INVALID );
fail_unless( isnan(Unit_getExponentAsDouble (u)) );
fail_unless( isnan(Unit_getMultiplier (u)) );
// fail_unless( isnan((double)(Unit_getScale (u))) );
fail_unless( !Unit_isSetKind (u) );
fail_unless( !Unit_isSetExponent (u) );
fail_unless( !Unit_isSetMultiplier (u) );
fail_unless( !Unit_isSetScale (u) );
Unit_free(u);
}
END_TEST
START_TEST (test_XMLNamespaces_accessWithNULL)
{
fail_unless( XMLNamespaces_add(NULL, NULL, NULL) == LIBSBML_INVALID_OBJECT);
fail_unless( XMLNamespaces_clear(NULL) == LIBSBML_OPERATION_FAILED);
fail_unless( XMLNamespaces_clone(NULL) == NULL);
XMLNamespaces_free(NULL);
fail_unless( XMLNamespaces_getIndex(NULL, NULL) == -1);
fail_unless( XMLNamespaces_getIndexByPrefix(NULL, NULL) == -1);
fail_unless( XMLNamespaces_getLength(NULL) == 0);
fail_unless( XMLNamespaces_getPrefix(NULL, 0) == NULL);
fail_unless( XMLNamespaces_getPrefixByURI(NULL, NULL) == NULL);
fail_unless( XMLNamespaces_getURI(NULL, 0) == NULL);
fail_unless( XMLNamespaces_getURIByPrefix(NULL, NULL) == NULL);
fail_unless( XMLNamespaces_hasNS(NULL, NULL, NULL) == 0);
fail_unless( XMLNamespaces_hasPrefix(NULL, NULL) == 0);
fail_unless( XMLNamespaces_hasURI(NULL, NULL) == 0);
fail_unless( XMLNamespaces_isEmpty(NULL) == 1);
fail_unless( XMLNamespaces_remove(NULL, 0) == LIBSBML_INVALID_OBJECT);
fail_unless( XMLNamespaces_removeByPrefix(NULL, NULL) == LIBSBML_INVALID_OBJECT);
}
END_TEST
START_TEST (test_XMLNamespaces_remove)
{
XMLNamespaces_add(NS, "http://test1.org/", "test1");
XMLNamespaces_add(NS, "http://test2.org/", "test2");
XMLNamespaces_add(NS, "http://test3.org/", "test3");
XMLNamespaces_add(NS, "http://test4.org/", "test4");
XMLNamespaces_add(NS, "http://test5.org/", "test5");
fail_unless( XMLNamespaces_getLength(NS) == 5 );
fail_unless( XMLNamespaces_getNumNamespaces(NS) == 5 );
XMLNamespaces_remove(NS, 4);
fail_unless( XMLNamespaces_getLength(NS) == 4 );
XMLNamespaces_remove(NS, 3);
fail_unless( XMLNamespaces_getLength(NS) == 3 );
XMLNamespaces_remove(NS, 2);
fail_unless( XMLNamespaces_getLength(NS) == 2 );
XMLNamespaces_remove(NS, 1);
fail_unless( XMLNamespaces_getLength(NS) == 1 );
XMLNamespaces_remove(NS, 0);
fail_unless( XMLNamespaces_getLength(NS) == 0 );
fail_unless( XMLNamespaces_getNumNamespaces(NS) == 0 );
XMLNamespaces_add(NS, "http://test1.org/", "test1");
XMLNamespaces_add(NS, "http://test2.org/", "test2");
XMLNamespaces_add(NS, "http://test3.org/", "test3");
XMLNamespaces_add(NS, "http://test4.org/", "test4");
XMLNamespaces_add(NS, "http://test5.org/", "test5");
fail_unless( XMLNamespaces_getLength(NS) == 5 );
fail_unless( XMLNamespaces_getNumNamespaces(NS) == 5 );
XMLNamespaces_remove(NS, 0);
fail_unless( XMLNamespaces_getLength(NS) == 4 );
XMLNamespaces_remove(NS, 0);
fail_unless( XMLNamespaces_getLength(NS) == 3 );
XMLNamespaces_remove(NS, 0);
fail_unless( XMLNamespaces_getLength(NS) == 2 );
fail_unless( XMLNamespaces_getNumNamespaces(NS) == 2 );
XMLNamespaces_remove(NS, 0);
fail_unless( XMLNamespaces_getLength(NS) == 1 );
XMLNamespaces_remove(NS, 0);
fail_unless( XMLNamespaces_getLength(NS) == 0 );
fail_unless( XMLNamespaces_getNumNamespaces(NS) == 0 );
}
END_TEST
START_TEST (test_XMLNamespaces_add1)
{
char * test;
fail_unless( XMLNamespaces_getLength(NS) == 0 );
fail_unless( XMLNamespaces_isEmpty(NS) == 1 );
int i = XMLNamespaces_add(NS, "http://test1.org/", "test1");
fail_unless( i == LIBSBML_OPERATION_SUCCESS);
fail_unless( XMLNamespaces_getLength(NS) == 1 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
test = XMLNamespaces_getPrefix(NS, 0);
fail_unless( strcmp(test, "test1") == 0 );
free(test);
test = XMLNamespaces_getPrefixByURI(NS, "http://test1.org/");
fail_unless( strcmp(test, "test1") == 0 );
free(test);
test = XMLNamespaces_getURI(NS, 0);
fail_unless( strcmp(test, "http://test1.org/") == 0 );
free(test);
test = XMLNamespaces_getURIByPrefix(NS, "test1");
fail_unless( strcmp(test, "http://test1.org/") == 0 );
free(test);
// add with existing prefix
i = XMLNamespaces_add(NS, "http://test2.org/", "test1");
fail_unless( i == LIBSBML_OPERATION_SUCCESS);
fail_unless( XMLNamespaces_getLength(NS) == 1 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
test = XMLNamespaces_getPrefix(NS, 0);
fail_unless( strcmp(test, "test1") == 0 );
free(test);
test = XMLNamespaces_getPrefixByURI(NS, "http://test2.org/");
fail_unless( strcmp(test, "test1") == 0 );
free(test);
test = XMLNamespaces_getURI(NS, 0);
fail_unless( strcmp(test, "http://test2.org/") == 0 );
free(test);
test = XMLNamespaces_getURIByPrefix(NS, "test1");
fail_unless( strcmp(test, "http://test2.org/") == 0 );
free(test);
// add
i = XMLNamespaces_add(NS, "http://test.org/", "");
fail_unless( i == LIBSBML_OPERATION_SUCCESS);
fail_unless( XMLNamespaces_getLength(NS) == 2 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
fail_unless( XMLNamespaces_getPrefix(NS, 1) == NULL );
fail_unless( XMLNamespaces_getPrefixByURI(NS, "http://test.org/") == NULL);
test = XMLNamespaces_getURI(NS, 1);
fail_unless( strcmp(test, "http://test.org/") == 0 );
free(test);
// add repeat with empty prefix
i = XMLNamespaces_add(NS, "http://test3.org/", "");
fail_unless( i == LIBSBML_OPERATION_SUCCESS);
fail_unless( XMLNamespaces_getLength(NS) == 2 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
fail_unless( XMLNamespaces_getPrefix(NS, 1) == NULL );
fail_unless( XMLNamespaces_getPrefixByURI(NS, "http://test3.org/") == NULL);
test = XMLNamespaces_getURI(NS, 1);
fail_unless( strcmp(test, "http://test3.org/") == 0 );
free(test);
// add sbml ns
i = XMLNamespaces_add(NS, "http://www.sbml.org/sbml/level1", "");
fail_unless( i == LIBSBML_OPERATION_SUCCESS);
fail_unless( XMLNamespaces_getLength(NS) == 2 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
fail_unless( XMLNamespaces_getPrefix(NS, 1) == NULL );
fail_unless( XMLNamespaces_getPrefixByURI(NS,
"http://www.sbml.org/sbml/level1") == NULL);
test = XMLNamespaces_getURI(NS, 1);
fail_unless( strcmp(test, "http://www.sbml.org/sbml/level1") == 0 );
free(test);
// add a repeat of the sbml prefix ns
i = XMLNamespaces_add(NS, "http://test_sbml_prefix/", "");
fail_unless( i == LIBSBML_OPERATION_FAILED);
fail_unless( XMLNamespaces_getLength(NS) == 2 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
fail_unless( XMLNamespaces_getPrefix(NS, 1) == NULL );
fail_unless( XMLNamespaces_getPrefixByURI(NS,
"http://www.sbml.org/sbml/level1") == NULL);
test = XMLNamespaces_getURI(NS, 1);
fail_unless( strcmp(test, "http://www.sbml.org/sbml/level1") == 0 );
free(test);
// add repeat sbml ns uri
i = XMLNamespaces_add(NS, "http://www.sbml.org/sbml/level1", "newprefix");
fail_unless( i == LIBSBML_OPERATION_SUCCESS);
fail_unless( XMLNamespaces_getLength(NS) == 3 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
test = XMLNamespaces_getPrefix(NS, 2);
fail_unless( strcmp(test, "newprefix") == 0 );
free(test);
// this fails because the search finds the uri with the empty prefix first
fail_unless( XMLNamespaces_getPrefixByURI(NS,
"http://www.sbml.org/sbml/level1") == NULL);
test = XMLNamespaces_getURI(NS, 2);
fail_unless( strcmp(test, "http://www.sbml.org/sbml/level1") == 0 );
free(test);
// add repeat prefix
i = XMLNamespaces_add(NS, "http://www.foo", "newprefix");
fail_unless( i == LIBSBML_OPERATION_FAILED);
fail_unless( XMLNamespaces_getLength(NS) == 3 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
test = XMLNamespaces_getPrefix(NS, 2);
fail_unless( strcmp(test, "newprefix") == 0 );
free(test);
test = XMLNamespaces_getURI(NS, 2);
fail_unless( strcmp(test, "http://www.sbml.org/sbml/level1") == 0 );
free(test);
// change sbml ns uri - it will not do this
i = XMLNamespaces_add(NS, "http://www.sbml.org/sbml/level2", "newprefix");
fail_unless( i == LIBSBML_OPERATION_FAILED);
fail_unless( XMLNamespaces_getLength(NS) == 3 );
fail_unless( XMLNamespaces_isEmpty(NS) == 0 );
test = XMLNamespaces_getPrefix(NS, 2);
fail_unless( strcmp(test, "newprefix") == 0 );
free(test);
test = XMLNamespaces_getURI(NS, 2);
fail_unless( strcmp(test, "http://www.sbml.org/sbml/level1") == 0 );
free(test);
}
END_TEST
//START_TEST (test_RateRule_createWithFormula)
//{
// const ASTNode_t *math;
// char *formula;
//
// Rule_t *ar = Rule_createRateWithVariableAndFormula("s", "1 + 1");
//
//
// fail_unless( SBase_getTypeCode ((SBase_t *) ar) == SBML_RATE_RULE );
// fail_unless( SBase_getMetaId ((SBase_t *) ar) == NULL );
// fail_unless( !strcmp(Rule_getVariable(ar), "s") );
//
// math = Rule_getMath((Rule_t *) ar);
// fail_unless(math != NULL);
//
// formula = SBML_formulaToString(math);
// fail_unless( formula != NULL );
// fail_unless( !strcmp(formula, "1 + 1") );
//
// fail_unless( !strcmp(Rule_getFormula((Rule_t *) ar), formula) );
//
// Rule_free(ar);
// safe_free(formula);
//}
//END_TEST
//START_TEST (test_RateRule_createWithMath)
//{
// ASTNode_t *math = SBML_parseFormula("1 + 1");
//
// Rule_t *ar = Rule_createRateWithVariableAndMath("s", math);
//
//
// fail_unless( SBase_getTypeCode ((SBase_t *) ar) == SBML_RATE_RULE );
// fail_unless( SBase_getMetaId ((SBase_t *) ar) == NULL );
// fail_unless( !strcmp(Rule_getVariable(ar), "s") );
// fail_unless( !strcmp(Rule_getFormula((Rule_t *) ar), "1 + 1") );
// fail_unless( Rule_getMath((Rule_t *) ar) != math );
//
// Rule_free(ar);
//}
//END_TEST
START_TEST (test_RateRule_createWithNS )
{
XMLNamespaces_t *xmlns = XMLNamespaces_create();
XMLNamespaces_add(xmlns, "http://www.sbml.org", "testsbml");
SBMLNamespaces_t *sbmlns = SBMLNamespaces_create(2,1);
SBMLNamespaces_addNamespaces(sbmlns,xmlns);
Rule_t *object =
Rule_createRateWithNS(sbmlns);
fail_unless( SBase_getTypeCode ((SBase_t *) object) == SBML_RATE_RULE );
fail_unless( SBase_getMetaId ((SBase_t *) object) == NULL );
fail_unless( SBase_getNotes ((SBase_t *) object) == NULL );
fail_unless( SBase_getAnnotation((SBase_t *) object) == NULL );
fail_unless( SBase_getLevel ((SBase_t *) object) == 2 );
fail_unless( SBase_getVersion ((SBase_t *) object) == 1 );
fail_unless( Rule_getNamespaces (object) != NULL );
fail_unless( XMLNamespaces_getLength(Rule_getNamespaces(object)) == 2 );
Rule_free(object);
}
END_TEST
START_TEST (test_XMLNamespaces_remove_by_prefix)
{
XMLNamespaces_add(NS, "http://test1.org/", "test1");
XMLNamespaces_add(NS, "http://test2.org/", "test2");
XMLNamespaces_add(NS, "http://test3.org/", "test3");
XMLNamespaces_add(NS, "http://test4.org/", "test4");
XMLNamespaces_add(NS, "http://test5.org/", "test5");
fail_unless( XMLNamespaces_getLength(NS) == 5 );
XMLNamespaces_removeByPrefix(NS, "test1");
fail_unless( XMLNamespaces_getLength(NS) == 4 );
XMLNamespaces_removeByPrefix(NS, "test2");
fail_unless( XMLNamespaces_getLength(NS) == 3 );
XMLNamespaces_removeByPrefix(NS, "test3");
fail_unless( XMLNamespaces_getLength(NS) == 2 );
XMLNamespaces_removeByPrefix(NS, "test4");
fail_unless( XMLNamespaces_getLength(NS) == 1 );
XMLNamespaces_removeByPrefix(NS, "test5");
fail_unless( XMLNamespaces_getLength(NS) == 0 );
XMLNamespaces_add(NS, "http://test1.org/", "test1");
XMLNamespaces_add(NS, "http://test2.org/", "test2");
XMLNamespaces_add(NS, "http://test3.org/", "test3");
XMLNamespaces_add(NS, "http://test4.org/", "test4");
XMLNamespaces_add(NS, "http://test5.org/", "test5");
fail_unless( XMLNamespaces_getLength(NS) == 5 );
XMLNamespaces_removeByPrefix(NS, "test5");
fail_unless( XMLNamespaces_getLength(NS) == 4 );
XMLNamespaces_removeByPrefix(NS, "test4");
fail_unless( XMLNamespaces_getLength(NS) == 3 );
XMLNamespaces_removeByPrefix(NS, "test3");
fail_unless( XMLNamespaces_getLength(NS) == 2 );
XMLNamespaces_removeByPrefix(NS, "test2");
fail_unless( XMLNamespaces_getLength(NS) == 1 );
XMLNamespaces_removeByPrefix(NS, "test1");
fail_unless( XMLNamespaces_getLength(NS) == 0 );
XMLNamespaces_add(NS, "http://test1.org/", "test1");
XMLNamespaces_add(NS, "http://test2.org/", "test2");
XMLNamespaces_add(NS, "http://test3.org/", "test3");
XMLNamespaces_add(NS, "http://test4.org/", "test4");
XMLNamespaces_add(NS, "http://test5.org/", "test5");
fail_unless( XMLNamespaces_getLength(NS) == 5 );
XMLNamespaces_removeByPrefix(NS, "test3");
fail_unless( XMLNamespaces_getLength(NS) == 4 );
XMLNamespaces_removeByPrefix(NS, "test1");
fail_unless( XMLNamespaces_getLength(NS) == 3 );
XMLNamespaces_removeByPrefix(NS, "test4");
fail_unless( XMLNamespaces_getLength(NS) == 2 );
XMLNamespaces_removeByPrefix(NS, "test5");
fail_unless( XMLNamespaces_getLength(NS) == 1 );
XMLNamespaces_removeByPrefix(NS, "test2");
fail_unless( XMLNamespaces_getLength(NS) == 0 );
}
