void testOrg(struct htmlPage *rootPage, struct htmlForm *rootForm, char *org)
/* Test on organism. */
{
struct htmlPage *orgPage;
struct htmlForm *mainForm;
struct htmlFormVar *dbVar;
struct slName *db;
int dbIx;
/* Get page with little selected beyond organism. This page
* will get whacked around a little by testDb, so set range
* position and db to something safe each time through. */
htmlPageSetVar(rootPage, rootForm, "org", org);
htmlPageSetVar(rootPage, NULL, "db", NULL);
htmlPageSetVar(rootPage, NULL, hgtaRegionType, NULL);
htmlPageSetVar(rootPage, NULL, "position", NULL);
orgPage = htmlPageFromForm(rootPage, rootPage->forms, "submit", "Go");
if ((mainForm = htmlFormGet(orgPage, "mainForm")) == NULL)
{
errAbort("Couldn't get main form on orgPage");
}
if ((dbVar = htmlFormVarGet(mainForm, "db")) == NULL)
errAbort("Couldn't get org var");
for (db = dbVar->values, dbIx=0; db != NULL && dbIx < clDbs;
db = db->next, ++dbIx)
{
testDb(orgPage, org, db->name);
}
htmlPageFree(&orgPage);
}
void hgTablesTest(char *url, char *logName)
/* hgTablesTest - Test hgTables web page. */
{
/* Get default page, and open log. */
struct htmlPage *rootPage = htmlPageGet(url);
if (appendLog)
logFile = mustOpen(logName, "a");
else
logFile = mustOpen(logName, "w");
if (! endsWith(url, "hgTables"))
warn("Warning: first argument should be a complete URL to hgTables, "
"but doesn't look like one (%s)", url);
htmlPageValidateOrAbort(rootPage);
/* Go test what they've specified in command line. */
if (clDb != NULL)
{
testDb(rootPage, NULL, clDb);
}
else
{
struct htmlForm *mainForm;
struct htmlFormVar *orgVar;
if ((mainForm = htmlFormGet(rootPage, "mainForm")) == NULL)
errAbort("Couldn't get main form");
if ((orgVar = htmlFormVarGet(mainForm, "org")) == NULL)
errAbort("Couldn't get org var");
if (clOrg != NULL)
testOrg(rootPage, mainForm, clOrg);
else
{
struct slName *org;
int orgIx;
for (org = orgVar->values, orgIx=0; org != NULL && orgIx < clOrgs;
org = org->next, ++orgIx)
{
testOrg(rootPage, mainForm, org->name);
}
}
}
/* Do some more complex tests on uniProt. */
testJoining(rootPage);
testFilter(rootPage);
testIdentifier(rootPage);
/* Clean up and report. */
htmlPageFree(&rootPage);
slReverse(&tablesTestList);
reportSummary(tablesTestList, stdout);
reportAll(tablesTestList, logFile);
fprintf(logFile, "---------------------------------------------\n");
reportSummary(tablesTestList, logFile);
}
void testOrg(struct htmlPage *rootPage, struct htmlForm *rootForm, char *org, char *forceDb)
/* Test on organism. If forceDb is non-null, only test on
* given database. */
{
struct htmlPage *orgPage;
struct htmlForm *mainForm;
struct htmlFormVar *dbVar;
struct slName *db;
htmlPageSetVar(rootPage, rootForm, "org", org);
htmlPageSetVar(rootPage, rootForm, "db", NULL);
htmlPageSetVar(rootPage, rootForm, searchVarName, "");
orgPage = htmlPageFromForm(rootPage, rootPage->forms, "submit", "Go");
if ((mainForm = htmlFormGet(orgPage, "mainForm")) == NULL)
errAbort("Couldn't get main form on orgPage");
if ((dbVar = htmlFormVarGet(mainForm, "db")) == NULL)
errAbort("Couldn't get org var");
for (db = dbVar->values; db != NULL; db = db->next)
{
if (forceDb == NULL || sameString(forceDb, db->name))
testDb(orgPage, org, db->name);
}
htmlPageFree(&orgPage);
}
