LIBSBML_CPP_NAMESPACE_USE CK_CPPSTART #endif START_TEST (test_ModelCreator_setFamilyName) { ModelCreator_t * mc = ModelCreator_create(); fail_unless(mc != NULL); int i = ModelCreator_setFamilyName(mc, "Keating"); fail_unless( i == LIBSBML_OPERATION_SUCCESS ); fail_unless(ModelCreator_isSetFamilyName(mc) == 1); fail_unless(!strcmp(ModelCreator_getFamilyName(mc), "Keating")); i = ModelCreator_setFamilyName(mc, ""); fail_unless( i == LIBSBML_OPERATION_SUCCESS ); fail_unless(ModelCreator_isSetFamilyName(mc) == 0); i = ModelCreator_setFamilyName(mc, "Keating"); fail_unless(ModelCreator_isSetFamilyName(mc) == 1); i = ModelCreator_unsetFamilyName(mc); fail_unless( i == LIBSBML_OPERATION_SUCCESS ); fail_unless(ModelCreator_isSetFamilyName(mc) == 0); ModelCreator_free(mc); }
END_TEST START_TEST (test_ModelCreator_accessWithNULL) { fail_unless( ModelCreator_clone(NULL) == NULL ); fail_unless( ModelCreator_createFromNode(NULL) == NULL ); ModelCreator_free(NULL); fail_unless( ModelCreator_getEmail(NULL) == NULL ); fail_unless( ModelCreator_getFamilyName(NULL) == NULL ); fail_unless( ModelCreator_getGivenName(NULL) == NULL ); fail_unless( ModelCreator_getOrganisation(NULL) == NULL ); fail_unless( ModelCreator_getOrganization(NULL) == NULL ); fail_unless( ModelCreator_hasRequiredAttributes(NULL) == 0 ); fail_unless( ModelCreator_isSetEmail(NULL) == 0 ); fail_unless( ModelCreator_isSetFamilyName(NULL) == 0 ); fail_unless( ModelCreator_isSetGivenName(NULL) == 0 ); fail_unless( ModelCreator_isSetOrganisation(NULL) == 0 ); fail_unless( ModelCreator_isSetOrganization(NULL) == 0 ); fail_unless( ModelCreator_setEmail(NULL, NULL) == LIBSBML_INVALID_OBJECT ); fail_unless( ModelCreator_setFamilyName(NULL, NULL) == LIBSBML_INVALID_OBJECT ); fail_unless( ModelCreator_setGivenName(NULL, NULL) == LIBSBML_INVALID_OBJECT ); fail_unless( ModelCreator_setOrganisation(NULL, NULL) == LIBSBML_INVALID_OBJECT ); fail_unless( ModelCreator_setOrganization(NULL, NULL) == LIBSBML_INVALID_OBJECT ); fail_unless( ModelCreator_unsetEmail(NULL) == LIBSBML_INVALID_OBJECT ); fail_unless( ModelCreator_unsetFamilyName(NULL) == LIBSBML_INVALID_OBJECT ); fail_unless( ModelCreator_unsetGivenName(NULL) == LIBSBML_INVALID_OBJECT ); fail_unless( ModelCreator_unsetOrganisation(NULL) == LIBSBML_INVALID_OBJECT ); fail_unless( ModelCreator_unsetOrganization(NULL) == LIBSBML_INVALID_OBJECT ); }
END_TEST START_TEST (test_ModelHistory_addCreator) { ModelCreator_t * newMC; ModelHistory_t * history = ModelHistory_create(); fail_unless(ModelHistory_getNumCreators(history) == 0); fail_unless(history != NULL); ModelCreator_t * mc = ModelCreator_create(); fail_unless(mc != NULL); ModelCreator_setFamilyName(mc, "Keating"); ModelCreator_setGivenName(mc, "Sarah"); ModelCreator_setEmail(mc, "*****@*****.**"); ModelCreator_setOrganisation(mc, "UH"); ModelHistory_addCreator(history, mc); fail_unless(ModelHistory_getNumCreators(history) == 1); ModelCreator_free(mc); newMC = (ModelCreator_t*) List_get(ModelHistory_getListCreators(history), 0); fail_unless(newMC != NULL); fail_unless(!strcmp(ModelCreator_getFamilyName(newMC), "Keating")); fail_unless(!strcmp(ModelCreator_getGivenName(newMC), "Sarah")); fail_unless(!strcmp(ModelCreator_getEmail(newMC), "*****@*****.**")); fail_unless(!strcmp(ModelCreator_getOrganisation(newMC), "UH")); ModelHistory_free(history); }
END_TEST START_TEST(test_ModelCreator_setters) { ModelCreator_t * mc = ModelCreator_create(); fail_unless(mc != NULL); fail_unless(ModelCreator_isSetFamilyName(mc) == 0); fail_unless(ModelCreator_isSetGivenName(mc) == 0); fail_unless(ModelCreator_isSetEmail(mc) == 0); fail_unless(ModelCreator_isSetOrganisation(mc) == 0); ModelCreator_setFamilyName(mc, "Keating"); ModelCreator_setGivenName(mc, "Sarah"); ModelCreator_setEmail(mc, "*****@*****.**"); ModelCreator_setOrganisation(mc, "UH"); fail_unless(!strcmp(ModelCreator_getFamilyName(mc), "Keating")); fail_unless(!strcmp(ModelCreator_getGivenName(mc), "Sarah")); fail_unless(!strcmp(ModelCreator_getEmail(mc), "*****@*****.**")); fail_unless(!strcmp(ModelCreator_getOrganisation(mc), "UH")); fail_unless(ModelCreator_isSetFamilyName(mc) == 1); fail_unless(ModelCreator_isSetGivenName(mc) == 1); fail_unless(ModelCreator_isSetEmail(mc) == 1); fail_unless(ModelCreator_isSetOrganisation(mc) == 1); ModelCreator_unsetFamilyName(mc); ModelCreator_unsetGivenName(mc); ModelCreator_unsetEmail(mc); ModelCreator_unsetOrganisation(mc); fail_unless(!strcmp(ModelCreator_getFamilyName(mc), "")); fail_unless(!strcmp(ModelCreator_getGivenName(mc), "")); fail_unless(!strcmp(ModelCreator_getEmail(mc), "")); fail_unless(!strcmp(ModelCreator_getOrganisation(mc), "")); fail_unless(ModelCreator_isSetFamilyName(mc) == 0); fail_unless(ModelCreator_isSetGivenName(mc) == 0); fail_unless(ModelCreator_isSetEmail(mc) == 0); fail_unless(ModelCreator_isSetOrganisation(mc) == 0); // test alternate spelling functions fail_unless(ModelCreator_isSetOrganization(mc) == 0); ModelCreator_setOrganization(mc, "UH"); fail_unless(!strcmp(ModelCreator_getOrganization(mc), "UH")); fail_unless(ModelCreator_isSetOrganization(mc) == 1); ModelCreator_unsetOrganisation(mc); fail_unless(!strcmp(ModelCreator_getOrganization(mc), "")); fail_unless(ModelCreator_isSetOrganization(mc) == 0); ModelCreator_free(mc); }
END_TEST START_TEST (test_ModelHistory_addCreator1) { ModelHistory_t * mh = ModelHistory_create(); ModelCreator_t * mc = ModelCreator_create(); ModelCreator_setFamilyName(mc, "Keating"); ModelCreator_setGivenName(mc, "Sarah"); int i = ModelHistory_addCreator(mh, mc); fail_unless( i == LIBSBML_OPERATION_SUCCESS ); fail_unless(ModelHistory_getNumCreators(mh) == 1); ModelCreator_free(mc); ModelHistory_free(mh); }
END_TEST START_TEST (test_L3_Species_ModelHistory) { ModelHistory_t * history = ModelHistory_create(); SBase_setMetaId((SBase_t *)(S), "_3"); int i = SBase_setModelHistory((SBase_t *)(S), history); fail_unless( i == LIBSBML_INVALID_OBJECT ); fail_unless( !SBase_isSetModelHistory((SBase_t *)(S)) ); ModelCreator_t * mc = ModelCreator_create(); Date_t * date = Date_createFromValues(2005, 12, 30, 12, 15, 45, 1, 2, 0); ModelCreator_setFamilyName(mc, "Keating"); ModelCreator_setGivenName(mc, "Sarah"); ModelCreator_setEmail(mc, "*****@*****.**"); ModelCreator_setOrganisation(mc, "UH"); ModelHistory_addCreator(history, mc); ModelHistory_setCreatedDate(history, date); ModelHistory_setModifiedDate(history, date); i = SBase_setModelHistory((SBase_t *)(S), history); fail_unless( i == LIBSBML_OPERATION_SUCCESS ); fail_unless( SBase_isSetModelHistory((SBase_t *)(S)) ); i = SBase_unsetModelHistory((SBase_t *)(S)); fail_unless( i == LIBSBML_OPERATION_SUCCESS ); fail_unless( !SBase_isSetModelHistory((SBase_t *)(S)) ); fail_unless( SBase_getModelHistory((SBase_t *)(S)) == NULL ); ModelHistory_free(history); ModelCreator_free(mc); Date_free(date); }
int main (int argc, char *argv[]) { SBMLDocument_t* d; Model_t* m; unsigned int errors; if (argc != 3) { printf("\n" " usage: addModelHistory <input-filename> <output-filename>\n" "\n"); return 2; } d = readSBML(argv[1]); errors = SBMLDocument_getNumErrors(d); if (errors > 0) { printf("Read Error(s):\n"); SBMLDocument_printErrors(d, stdout); printf("Correct the above and re-run.\n"); } else { int status; Date_t* date, *date2; ModelHistory_t* h = ModelHistory_create(); ModelCreator_t* c = ModelCreator_create(); ModelCreator_setFamilyName(c, "Keating"); ModelCreator_setGivenName(c, "Sarah"); ModelCreator_setEmail(c, "*****@*****.**"); ModelCreator_setOrganisation(c, "University of Hertfordshire"); status = ModelHistory_addCreator(h, c); printStatus("Status for addCreator: ", status); date = Date_createFromString("1999-11-13T06:54:32"); date2 = Date_createFromString("2007-11-30T06:54:00-02:00"); status = ModelHistory_setCreatedDate(h, date); printStatus("Set created date: ", status); status = ModelHistory_setModifiedDate(h, date2); printStatus("Set modified date: ", status); m = SBMLDocument_getModel(d); status = Model_setModelHistory(m, h); printStatus("Set model history: ", status); writeSBML(d, argv[2]); } SBMLDocument_free(d); return errors; }