3846f517009c43abc65d227a4695645c9b5f3e8a braney Fri Feb 15 18:31:21 2013 -0800 changes necessary to support assembly hubs (#8072) diff --git src/hg/lib/trackHub.c src/hg/lib/trackHub.c index c26d3dd..6c1108d 100644 --- src/hg/lib/trackHub.c +++ src/hg/lib/trackHub.c @@ -1,584 +1,942 @@ /* trackHub - supports collections of tracks hosted on a remote site. * The basic layout of a data hub is: * hub.txt - contains information about the hub itself * genomes.txt - says which genomes are supported by hub * Contains file name of trackDb.txt for each genome * trackDb.txt - contains a stanza for each track. Stanzas * are in a subset of the usual trackDb format. * How you use the routines here most commonly is as so: * struct trackHub *hub = trackHubOpen(hubRaUrl); * struct trackHubGenome *hubGenome = trackHubFindGenome(hub, "hg19"); * struct trackDb *tdbList = trackHubTracksForGenome(hub, hubGenome); * // do something with tdbList * trackHubClose(&hub); * Note that the tdbList returned does not have the parent/subtrack pointers set. * It is just a simple list of tracks, not a tree. */ #include "common.h" #include "linefile.h" #include "hash.h" #include "options.h" #include "udc.h" #include "ra.h" #include "filePath.h" #include "htmlPage.h" #include "trackDb.h" #include "trackHub.h" #include "errCatch.h" #include "hgBam.h" #include "bigWig.h" #include "bigBed.h" #include "hdb.h" +#include "chromInfo.h" +#include "grp.h" +#include "twoBit.h" +#include "dbDb.h" + +static struct hash *hubCladeHash; // mapping of clade name to hub pointer +static struct hash *hubAssemblyHash; // mapping of assembly name to genome struct +static struct hash *hubOrgHash; // mapping from organism name to hub pointer +struct trackHub *globalAssemblyHubList; // list of trackHubs in the user's cart static boolean hasProtocol(char *urlOrPath) /* Return TRUE if it looks like it has http://, ftp:// etc. */ { return stringIn("://", urlOrPath) != NULL; } char *trackHubRelativeUrl(char *hubUrl, char *path) /* Return full path (in URL form if it's a remote hub) given * path possibly relative to hubUrl. Do a freeMem of result * when done. */ { /* If path itself is a URL then just return a copy of it. */ if (hasProtocol(path)) return cloneString(path); /* If it's a remote hub, let html path expander handle it. */ if (hasProtocol(hubUrl)) return htmlExpandUrl(hubUrl, path); /* If we got to here hub is local, and so is path. Do standard * path parsing. */ return pathRelativeToFile(hubUrl, path); } static void badGenomeStanza(struct lineFile *lf) /* Put up semi-informative error message about a genome stanza being bad. */ { errAbort("Genome stanza should have exactly two lines, one with 'genome' and one with 'trackDb'\n" "Bad stanza format ending line %d of %s", lf->lineIx, lf->fileName); } -static struct trackHubGenome *trackHubGenomeReadRa(char *url, struct hash *hash) +char *trackHubCladeToGenome(char *clade) +/* given a track hub clade(hub name) return the default genome */ +{ +if (hubCladeHash == NULL) + return FALSE; +struct hashEl *hel = hashLookup(hubCladeHash, clade); +if (hel == NULL) + return FALSE; +struct trackHub *trackHub = hel->val; +struct trackHubGenome *hubGenome = trackHub->genomeList; +for(; hubGenome; hubGenome=hubGenome->next) + if (hubGenome->twoBitPath != NULL) + return hubGenome->organism ; +return NULL; +} + +boolean trackHubDatabase(char *database) +/* is this an assembly from an Assembly Data hub? */ +{ +if (hubAssemblyHash == NULL) + return FALSE; +struct hashEl *hel = hashLookup(hubAssemblyHash, database); +if (hel == NULL) + return FALSE; +return TRUE; +} + +char *trackHubAssemblyField(char *database, char *field) +/* get data field from a assembly data hub */ +{ +struct hashEl *hel = hashLookup(hubAssemblyHash, database); +if (hel == NULL) + return NULL; + +struct trackHubGenome *genome = hel->val; +char *ret = hashFindVal(genome->settingsHash, field); + +return cloneString(ret); +} + +static struct dbDb *makeDbDbFromAssemblyGenome(struct trackHubGenome *hubGenome) +{ +struct dbDb *db; + +AllocVar(db); +db->genome = cloneString(hubGenome->organism); +db->organism = cloneString(hubGenome->organism); +db->name = cloneString(hubGenome->name); +db->active = TRUE; +db->description = cloneString(hubGenome->description); + +return db; +} + +struct dbDb *trackHubDbDbFromAssemblyDb(char *database) +/* return a dbDb structure for just this database */ +{ +struct hashEl *hel = hashLookup(hubAssemblyHash, database); +if (hel == NULL) + return NULL; + +struct trackHubGenome *genome = hel->val; +return makeDbDbFromAssemblyGenome(genome); +} + +struct slPair *trackHubGetHubLabels() +/* get a list of labels describing the loaded assembly data hubs */ +{ +if (globalAssemblyHubList == NULL) + return NULL; + +struct slPair *clade, *cladeList = NULL; + +struct trackHub *trackHub = globalAssemblyHubList; + +for(;trackHub; trackHub = trackHub->next) + { + AllocVar(clade); + slAddHead(&cladeList, clade); + + clade->name = cloneString(trackHub->name); + clade->val = cloneString(trackHub->shortLabel); + } +return cladeList; +} + +struct dbDb *trackHubGetDbDbs(char *clade) +/* get a list of dbDb structures for all the tracks in this clade/hub */ +{ +struct dbDb *db, *dbList = NULL; + +if (globalAssemblyHubList != NULL) + { + struct trackHub *trackHub = globalAssemblyHubList; + + for(;trackHub; trackHub = trackHub->next) + { + if ((clade != NULL) && differentString(clade, trackHub->name)) + continue; + + struct trackHubGenome *hubGenome = trackHub->genomeList; + for(; hubGenome; hubGenome = hubGenome->next) + { + if (hubGenome->twoBitPath != NULL) + { + db = makeDbDbFromAssemblyGenome(hubGenome); + slAddHead(&dbList, db); + } + } + } + } + +return dbList; +} + +int trackHubChromCount(char *database) +/* return number of chromosomes in a assembly data hub */ +{ +struct hashEl *hel = hashLookup(hubAssemblyHash, database); +if (hel == NULL) + return 0; + +struct trackHubGenome *genome = hel->val; +struct slName *chromList = twoBitSeqNamesExt(genome->twoBitPath, TRUE); + +return slCount(chromList); +} + +struct slName *trackHubAllChromNames(char *database) +/* return a list of all the chrom names in this assembly hub database */ +{ +struct hashEl *hel = hashLookup(hubAssemblyHash, database); +if (hel == NULL) + return 0; + +struct trackHubGenome *genome = hel->val; +struct slName *chromList = twoBitSeqNamesExt(genome->twoBitPath, TRUE); + +return chromList; +} + +char *trackHubDefaultChrom(char *database) +/* return the default chromosome for this track hub assembly */ +{ +struct hashEl *hel = hashLookup(hubAssemblyHash, database); +if (hel == NULL) + return NULL; + +struct trackHubGenome *genome = hel->val; +struct slName *chromList = twoBitSeqNamesExt(genome->twoBitPath, TRUE); + +return chromList->name; +} + +struct chromInfo *trackHubChromInfo(char *database, char *chrom) +/* return a chromInfo structure for just this chrom in this database */ +{ +if (hubAssemblyHash == NULL) + return NULL; + +struct hashEl *hel = hashLookup(hubAssemblyHash, database); + +if (hel == NULL) + return NULL; + +struct trackHubGenome *genome = hel->val; +struct chromInfo *ci; + +AllocVar(ci); +ci->chrom = cloneString(chrom); +ci->fileName = genome->twoBitPath; +ci->size = twoBitSeqSize(genome->tbf, chrom); + +return ci; +} + +struct chromInfo *trackHubAllChromInfo(char *db) +/* return a chromInfo structure for all the chroms in this database */ +{ +struct hashEl *hel = hashLookup(hubAssemblyHash, db); + +if (hel == NULL) + return NULL; + +struct trackHubGenome *genome = hel->val; +struct chromInfo *ci, *ciList = NULL; +struct slName *chromList = twoBitSeqNamesExt(genome->twoBitPath, TRUE); + +for(; chromList; chromList = chromList->next) + { + AllocVar(ci); + ci->chrom = cloneString(chromList->name); + ci->fileName = genome->twoBitPath; + ci->size = twoBitSeqSize(genome->tbf, chromList->name); + slAddHead(&ciList, ci); + } +return ciList; +} + +static char *getRequiredGrpSetting(struct hash *hash, char *name, struct lineFile *lf) +/* grab a group setting out of the group hash. errAbort if not found */ +{ +char *str; +if ((str = hashFindVal(hash, name)) == NULL) + errAbort("missing required setting '%s' for group on line %d in file %s\n", + name, lf->lineIx, lf->fileName); +return str; +} + +static struct grp *readGroupRa(char *groupFileName) +/* read in the ra file that describes the groups in an assembly hub */ +{ +if (groupFileName == NULL) + return NULL; +struct hash *ra; +struct grp *list = NULL; +struct lineFile *lf = udcWrapShortLineFile(groupFileName, NULL, 16*1024*1024); +while ((ra = raNextRecord(lf)) != NULL) + { + struct grp *grp; + AllocVar(grp); + slAddHead(&list, grp); + + grp->name = cloneString(getRequiredGrpSetting(ra, "name", lf)); + grp->label = cloneString(getRequiredGrpSetting(ra, "label", lf)); + grp->priority = atof(getRequiredGrpSetting(ra, "priority", lf)); + grp->defaultIsClosed = sqlUnsigned(getRequiredGrpSetting(ra,"defaultIsClosed",lf)); + hashFree(&ra); + } +if (list) + slReverse(&list); +lineFileClose(&lf); + +return list; +} + +struct grp *trackHubLoadGroups(char *database) +/* load the grp structures for this track hub database */ +{ +if (hubAssemblyHash == NULL) + return NULL; + +struct hashEl *hel = hashLookup(hubAssemblyHash, database); + +if (hel == NULL) + return NULL; + +struct trackHubGenome *genome = hel->val; +struct grp *list = readGroupRa(genome->groups); +return list; +} + +char *trackHubGenomeNameToDb(char *genome) +/* return assembly name given a genome name if one exists, otherwise NULL */ +{ +struct hashEl *hel; +if ((hubOrgHash != NULL) && (hel = hashLookup(hubOrgHash, genome)) != NULL) + { + struct trackHub *hub = hel->val; + struct trackHubGenome *genomeList = hub->genomeList; + + for(; genomeList; genomeList=genomeList->next) + if ((genomeList->organism != NULL ) && + sameString(genomeList->organism, genome)) + return genomeList->name; + } +return NULL; +} + +char *trackHubAssemblyClade(char *genome) +/* return the clade/hub_name that contains this genome */ +{ +struct hashEl *hel; +if ((hubOrgHash != NULL) && (hel = hashLookup(hubOrgHash, genome)) != NULL) + { + struct trackHub *hub = hel->val; + + return cloneString(hub->name); + } +return NULL; +} + +static void addAssembly(char *name, struct trackHubGenome *genome, struct trackHub *hub) +{ +struct hashEl *hel; + + +if (hubCladeHash == NULL) + hubCladeHash = newHash(5); +if ((hel = hashLookup(hubCladeHash, hub->name)) == NULL) + { + hashAdd(hubCladeHash, hub->name, hub); + slAddHead(&globalAssemblyHubList, hub); + } + +if (hubOrgHash == NULL) + hubOrgHash = newHash(5); +if ((hel = hashLookup(hubOrgHash, genome->organism)) == NULL) + { + hashAdd(hubOrgHash, genome->organism, hub); + } + +if (hubAssemblyHash == NULL) + hubAssemblyHash = newHash(5); +if ((hel = hashLookup(hubAssemblyHash, genome->name)) == NULL) + hashAdd(hubAssemblyHash, genome->name, genome); +} + +static char *addHubName(char *base, char *hubName) +{ +if (base == NULL) + return NULL; + +char buffer[4096]; + +safef(buffer, sizeof(buffer), "%s_%s", hubName, base); + +return cloneString(buffer); +} + +static struct trackHubGenome *trackHubGenomeReadRa(char *url, struct trackHub *hub) /* Read in a genome.ra format url and return it as a list of trackHubGenomes. * Also add it to hash, which is keyed by genome. */ { struct lineFile *lf = udcWrapShortLineFile(url, NULL, 64*1024*1024); struct trackHubGenome *list = NULL, *el; +struct hash *hash = hub->genomeHash; struct hash *ra; while ((ra = raNextRecord(lf)) != NULL) { - if (ra->elCount != 2) - badGenomeStanza(lf); - char *genome = hashFindVal(ra, "genome"); + char *twoBitPath = hashFindVal(ra, "twoBitPath"); + char *genome; + if (twoBitPath != NULL) + genome = addHubName(hashFindVal(ra, "genome"), hub->name); + else + genome = hashFindVal(ra, "genome"); if (genome == NULL) badGenomeStanza(lf); if (hashLookup(hash, genome) != NULL) errAbort("Duplicate genome %s in stanza ending line %d of %s", genome, lf->lineIx, lf->fileName); char *trackDb = hashFindVal(ra, "trackDb"); if (trackDb == NULL) badGenomeStanza(lf); AllocVar(el); el->name = cloneString(genome); el->trackDbFile = trackHubRelativeUrl(url, trackDb); + el->trackHub = hub; hashAdd(hash, el->name, el); slAddHead(&list, el); - hashFree(&ra); + char *groups = hashFindVal(ra, "groups"); + if (twoBitPath != NULL) + { + //printf("reading genome %s twoBitPath %s\n", genome, el->twoBitPath); + el->description = hashFindVal(ra, "description"); + el->organism = addHubName(hashFindVal(ra, "organism"), hub->name); + hashReplace(ra, "organism", el->organism); + el->defaultPos = hashFindVal(ra, "defaultPos"); + el->twoBitPath = trackHubRelativeUrl(url, twoBitPath); + el->tbf = twoBitOpenExt(el->twoBitPath, TRUE); + hashReplace(ra, "htmlPath",trackHubRelativeUrl(url, hashFindVal(ra, "htmlPath"))); + if (groups != NULL) + el->groups = trackHubRelativeUrl(url, groups); + addAssembly(genome, el, hub); + } + el->settingsHash = ra; + hashAdd(ra, "hubName", hub->shortLabel); } /* Clean up and go home. */ lineFileClose(&lf); slReverse(&list); return list; } char *trackHubSetting(struct trackHub *hub, char *name) /* Return setting if it exists, otherwise NULL. */ { return hashFindVal(hub->settings, name); } char *trackHubRequiredSetting(struct trackHub *hub, char *name) /* Return named setting. Abort with error message if not found. */ { char *val = trackHubSetting(hub, name); if (val == NULL) errAbort("Missing required setting '%s' from %s", name, hub->url); return val; } struct trackHub *trackHubOpen(char *url, char *hubName) /* Open up a track hub from url. Reads and parses hub.txt and the genomesFile. * The hubName is generally just the asciified ID number. */ { struct lineFile *lf = udcWrapShortLineFile(url, NULL, 256*1024); struct hash *hubRa = raNextRecord(lf); if (hubRa == NULL) errAbort("empty %s in trackHubOpen", url); if (raNextRecord(lf) != NULL) errAbort("multiple records in %s", url); /* Allocate hub and fill in settings field and url. */ struct trackHub *hub; AllocVar(hub); hub->url = cloneString(url); hub->name = cloneString(hubName); hub->settings = hubRa; /* Fill in required fields from settings. */ trackHubRequiredSetting(hub, "hub"); trackHubRequiredSetting(hub, "email"); hub->shortLabel = trackHubRequiredSetting(hub, "shortLabel"); hub->longLabel = trackHubRequiredSetting(hub, "longLabel"); hub->genomesFile = trackHubRequiredSetting(hub, "genomesFile"); lineFileClose(&lf); char *genomesUrl = trackHubRelativeUrl(hub->url, hub->genomesFile); hub->genomeHash = hashNew(8); -hub->genomeList = trackHubGenomeReadRa(genomesUrl, hub->genomeHash); +hub->genomeList = trackHubGenomeReadRa(genomesUrl, hub); freez(&genomesUrl); return hub; } void trackHubClose(struct trackHub **pHub) /* Close up and free resources from hub. */ { struct trackHub *hub = *pHub; if (hub != NULL) { trackHubGenomeFreeList(&hub->genomeList); freeMem(hub->url); hashFree(&hub->settings); hashFree(&hub->genomeHash); freez(pHub); } } void trackHubGenomeFree(struct trackHubGenome **pGenome) /* Free up genome info. */ { struct trackHubGenome *genome = *pGenome; if (genome != NULL) { freeMem(genome->name); freeMem(genome->trackDbFile); freez(pGenome); } } void trackHubGenomeFreeList(struct trackHubGenome **pList) /* Free a list of dynamically allocated trackHubGenome's */ { struct trackHubGenome *el, *next; for (el = *pList; el != NULL; el = next) { next = el->next; trackHubGenomeFree(&el); } *pList = NULL; } static char *requiredSetting(struct trackHub *hub, struct trackHubGenome *genome, struct trackDb *tdb, char *setting) /* Fetch setting or give an error message, a little more specific than the * error message from trackDbRequiredSetting(). */ { char *val = trackDbSetting(tdb, setting); if (val == NULL) errAbort("Missing required '%s' setting in hub %s genome %s track %s", setting, hub->url, genome->name, tdb->track); return val; } static void expandBigDataUrl(struct trackHub *hub, struct trackHubGenome *genome, struct trackDb *tdb) /* Expand bigDataUrls so that no longer relative to genome->trackDbFile */ { struct hashEl *hel = hashLookup(tdb->settingsHash, "bigDataUrl"); if (hel != NULL) { char *oldVal = hel->val; hel->val = trackHubRelativeUrl(genome->trackDbFile, oldVal); freeMem(oldVal); } } struct trackHubGenome *trackHubFindGenome(struct trackHub *hub, char *genomeName) /* Return trackHubGenome of given name associated with hub. Return NULL if no * such genome. */ { return hashFindVal(hub->genomeHash, genomeName); } static void validateOneTrack( struct trackHub *hub, struct trackHubGenome *genome, struct trackDb *tdb) { /* Check for existence of fields required in all tracks */ requiredSetting(hub, genome, tdb, "shortLabel"); requiredSetting(hub, genome, tdb, "longLabel"); // subtracks is not NULL if a track said we were its parent if (tdb->subtracks != NULL) { boolean isSuper = FALSE; char *superTrack = trackDbSetting(tdb, "superTrack"); if ((superTrack != NULL) && startsWith("on", superTrack)) isSuper = TRUE; if (!(trackDbSetting(tdb, "compositeTrack") || trackDbSetting(tdb, "container") || isSuper)) { errAbort("Parent track %s is not compositeTrack, container, or superTrack in hub %s genome %s", tdb->track, hub->url, genome->name); } } else { /* Check type field. */ char *type = requiredSetting(hub, genome, tdb, "type"); if (!(startsWithWord("bigWig", type) || startsWithWord("bigBed", type) || startsWithWord("vcfTabix", type) || startsWithWord("bam", type))) { errAbort("Unsupported type '%s' in hub %s genome %s track %s", type, hub->url, genome->name, tdb->track); } requiredSetting(hub, genome, tdb, "bigDataUrl"); } } static void markContainers( struct trackHub *hub, struct trackHubGenome *genome, struct trackDb *tdbList) /* mark containers that are parents, or have them */ { struct hash *hash = hashNew(0); struct trackDb *tdb; // add all the track names to a hash for (tdb = tdbList; tdb != NULL; tdb = tdb->next) hashAdd(hash, tdb->track, tdb); // go through and find the container tracks for (tdb = tdbList; tdb != NULL; tdb = tdb->next) { char *parentLine = trackDbLocalSetting(tdb, "parent"); // maybe it's a child of a supertrack? if (parentLine == NULL) { parentLine = trackDbLocalSetting(tdb, "superTrack"); if ((parentLine != NULL) && startsWith("on", parentLine)) parentLine = NULL; } if (parentLine != NULL) { char *parentName = cloneFirstWord(parentLine); struct trackDb *parent = hashFindVal(hash, parentName); if (parent == NULL) errAbort("Parent %s of track %s doesn't exist in hub %s genome %s", parentName, tdb->track, hub->url, genome->name); // mark the parent as a container parent->subtracks = tdb; // ugh...do this so requiredSetting looks at parent // in the case of views. We clear this after // validating anyway tdb->parent = parent; freeMem(parentName); } } hashFree(&hash); } static void validateTracks( struct trackHub *hub, struct trackHubGenome *genome, struct trackDb *tdbList) /* make sure a hub track list has the right settings and its parents exist */ { // mark the containers by setting their subtracks pointer markContainers(hub, genome, tdbList); /* Loop through list checking tags */ struct trackDb *tdb; for (tdb = tdbList; tdb != NULL; tdb = tdb->next) { validateOneTrack(hub, genome, tdb); // clear these two pointers which we set in markContainers tdb->subtracks = NULL; tdb->parent = NULL; } } struct trackDb *trackHubTracksForGenome(struct trackHub *hub, struct trackHubGenome *genome) /* Get list of tracks associated with genome. Check that it only is composed of legal * types. Do a few other quick checks to catch errors early. */ { struct lineFile *lf = udcWrapShortLineFile(genome->trackDbFile, NULL, 64*1024*1024); struct trackDb *tdbList = trackDbFromOpenRa(lf, NULL); lineFileClose(&lf); /* Make bigDataUrls more absolute rather than relative to genome.ra dir */ struct trackDb *tdb; for (tdb = tdbList; tdb != NULL; tdb = tdb->next) expandBigDataUrl(hub, genome, tdb); validateTracks(hub, genome, tdbList); trackDbAddTableField(tdbList); trackHubAddNamePrefix(hub->name, tdbList); +if (genome->twoBitPath == NULL) trackHubAddGroupName(hub->name, tdbList); for (tdb = tdbList; tdb != NULL; tdb = tdb->next) { trackDbFieldsFromSettings(tdb); trackDbPolish(tdb); } return tdbList; } static void reprefixString(char **pString, char *prefix) /* Replace *pString with prefix + *pString, freeing * whatever was in *pString before. */ { char *oldName = *pString; *pString = catTwoStrings(prefix, oldName); freeMem(oldName); } static void addPrefixToSetting(struct hash *settings, char *key, char *prefix) /* Given a settings hash, which is string valued. Old values will be freed. */ { struct hashEl *hel = hashLookup(settings, key); if (hel != NULL) reprefixString((char **)&hel->val, prefix); } static void trackDbListAddNamePrefix(struct trackDb *tdbList, char *prefix) /* Surgically alter tdbList so that it works as if every track was * renamed so as to add a prefix to it's name. */ { struct trackDb *tdb; for (tdb = tdbList; tdb != NULL; tdb = tdb->next) { addPrefixToSetting(tdb->settingsHash, "track", prefix); addPrefixToSetting(tdb->settingsHash, "parent", prefix); reprefixString(&tdb->track, prefix); if (tdb->table != NULL) reprefixString(&tdb->table, prefix); } } void trackHubAddNamePrefix(char *hubName, struct trackDb *tdbList) /* For a hub named "hub_1" add the prefix "hub_1_" to each track and parent field. */ { char namePrefix[PATH_LEN]; safef(namePrefix, sizeof(namePrefix), "%s_", hubName); trackDbListAddNamePrefix(tdbList, namePrefix); } +char *trackHubRemoveHubName(char *name) +/* remove the hub_#_ prefix from a hub name */ +{ +if ((name == NULL) || !startsWith("hub_", name)) + return name; +return strchr(&name[4], '_') + 1; +} + void trackHubAddGroupName(char *hubName, struct trackDb *tdbList) /* Add group tag that references the hubs symbolic name. */ { struct trackDb *tdb; for (tdb = tdbList; tdb != NULL; tdb = tdb->next) { tdb->grp = cloneString(hubName); hashReplace(tdb->settingsHash, "group", tdb->grp); } } static int hubCheckTrack(struct trackHub *hub, struct trackHubGenome *genome, struct trackDb *tdb, struct dyString *errors) /* Make sure that track is ok. */ { struct errCatch *errCatch = errCatchNew(); char *relativeUrl = trackDbSetting(tdb, "bigDataUrl"); int retVal = 0; if (relativeUrl != NULL) { if (errCatchStart(errCatch)) { char *bigDataUrl = trackHubRelativeUrl(genome->trackDbFile, relativeUrl); char *type = trackDbRequiredSetting(tdb, "type"); verbose(2, "checking %s.%s type %s at %s\n", genome->name, tdb->track, type, bigDataUrl); if (startsWithWord("bigWig", type)) { /* Just open and close to verify file exists and is correct type. */ struct bbiFile *bbi = bigWigFileOpen(bigDataUrl); bbiFileClose(&bbi); } else if (startsWithWord("bigBed", type)) { /* Just open and close to verify file exists and is correct type. */ struct bbiFile *bbi = bigBedFileOpen(bigDataUrl); bbiFileClose(&bbi); } else if (startsWithWord("bam", type)) { /* For bam files, the following call checks both main file and index. */ bamFileExists(bigDataUrl); } else errAbort("unrecognized type %s in genome %s track %s", type, genome->name, tdb->track); freez(&bigDataUrl); } errCatchEnd(errCatch); if (errCatch->gotError) { retVal = 1; dyStringPrintf(errors, "%s", errCatch->message->string); } errCatchFree(&errCatch); } return retVal; } -static void fixName(char *name) +void trackHubFixName(char *name) /* change all characters other than alphanumeric, dash, and underbar * to underbar */ { if (name == NULL) return; char *in = name; char c; for(; (c = *in) != 0; in++) { if (c == ' ') break; if (!(isalnum(c) || c == '-' || c == '_')) *in = '_'; } } static void polishOneTrack( struct trackHub *hub, struct trackDb *bt, struct hash *hash) /* get rid of special characters in track name, squirrel away a copy * of the original name for html retrieval, make sure there aren't * two tracks with the same name */ { char *polished = trackDbSetting(bt, "polished"); if (polished != NULL) return; trackDbAddSetting(bt, "polished", "polished"); char *htmlName = trackDbSetting(bt, "html"); /* if the user didn't specify an html variable, set it to be the original * track name */ if (htmlName == NULL) trackDbAddSetting(bt, "html", bt->track); -fixName(bt->track); +trackHubFixName(bt->track); if (hashLookup(hash, bt->track) != NULL) errAbort("more than one track called %s in hub %s\n", bt->track, hub->url); hashStore(hash, bt->track); } void trackHubPolishTrackNames(struct trackHub *hub, struct trackDb *tdbList) /* remove all the special characters from trackHub track names */ { struct trackDb *next, *tdb; struct hash *nameHash = hashNew(5); for (tdb = tdbList; tdb != NULL; tdb = next) { if (tdb->parent != NULL) polishOneTrack(hub, tdb->parent, nameHash); next = tdb->next; polishOneTrack(hub, tdb, nameHash); if (tdb->subtracks != NULL) { trackHubPolishTrackNames(hub, tdb->subtracks); } } } static int hubCheckGenome(struct trackHub *hub, struct trackHubGenome *genome, struct dyString *errors, boolean checkTracks) /* Check out genome within hub. */ { struct errCatch *errCatch = errCatchNew(); struct trackDb *tdbList = NULL; int retVal = 0; if (errCatchStart(errCatch)) { tdbList = trackHubTracksForGenome(hub, genome); trackHubPolishTrackNames(hub, tdbList); } errCatchEnd(errCatch); if (errCatch->gotError) { retVal = 1; dyStringPrintf(errors, "%s", errCatch->message->string); } errCatchFree(&errCatch); if (!checkTracks) return retVal; struct trackDb *tdb; for (tdb = tdbList; tdb != NULL; tdb = tdb->next) retVal |= hubCheckTrack(hub, genome, tdb, errors); verbose(2, "%d tracks in %s\n", slCount(tdbList), genome->name); return retVal; } int trackHubCheck(char *hubUrl, struct dyString *errors, boolean checkTracks) /* hubCheck - Check a track data hub for integrity. Put errors in dyString. * return 0 if hub has no errors, 1 otherwise * if checkTracks is TRUE, individual tracks are checked */ { struct errCatch *errCatch = errCatchNew(); struct trackHub *hub = NULL; int retVal = 0; if (errCatchStart(errCatch)) hub = trackHubOpen(hubUrl, ""); errCatchEnd(errCatch); if (errCatch->gotError) { retVal = 1; dyStringPrintf(errors, "%s", errCatch->message->string); } errCatchFree(&errCatch); if (hub == NULL) return 1; verbose(2, "hub %s\nshortLabel %s\nlongLabel %s\n", hubUrl, hub->shortLabel, hub->longLabel); verbose(2, "%s has %d elements\n", hub->genomesFile, slCount(hub->genomeList)); struct trackHubGenome *genome; for (genome = hub->genomeList; genome != NULL; genome = genome->next) { retVal |= hubCheckGenome(hub, genome, errors, checkTracks); } trackHubClose(&hub); return retVal; } -