dd919a184eed24110f134dec8b56b61f034d23a0 kate Mon Jun 10 18:26:45 2019 -0700 Finish initial implementation of multi-region link on interact track details. refs #22422 diff --git src/hg/hgc/interactClick.c src/hg/hgc/interactClick.c index 08529d1..81d4128 100644 --- src/hg/hgc/interactClick.c +++ src/hg/hgc/interactClick.c @@ -144,30 +144,94 @@ if (differentString(name, inter->sourceName) && differentString(name, inter->targetName)) continue; } } minStart = inter->chromStart < minStart ? inter->chromStart : minStart; maxEnd = inter->chromEnd > maxEnd ? inter->chromEnd : maxEnd; slAddHead(&filtered, ipr); } *retStart = minStart; *retEnd = maxEnd; // consider sorting on score or position return filtered; } +static char *makeInteractRegionFile(struct interact *inter) +/* Create bed file in trash directory with end coordinates for multi-region mode */ +{ +struct tempName mrTn; +trashDirFile(&mrTn, "hgt", "custRgn_interact", ".bed"); +FILE *f = fopen(mrTn.forCgi, "w"); +if (f == NULL) + errAbort("can't create temp file %s", mrTn.forCgi); +char regionInfo[1024]; +// TODO: check chrom bounds +int padding = 5; +safef(regionInfo, sizeof regionInfo, "#padding %d\n", padding); +mustWrite(f, regionInfo, strlen(regionInfo)); +//warn("%s", regionInfo); + +safef(regionInfo, sizeof regionInfo, "#shortDesc %s\n", inter->name); +mustWrite(f, regionInfo, strlen(regionInfo)); +//warn("%s", regionInfo); +char *region1Chrom = inter->sourceChrom, *region2Chrom = inter->targetChrom; +int region1Start = inter->sourceStart, region1End = inter->sourceEnd; +int region2Start = inter->targetStart, region2End = inter->targetEnd; +if (sameString(inter->sourceChrom, inter->targetChrom)) + { + if (inter->sourceStart > inter->targetStart) + { + region1Start = inter->targetStart; + region1End = inter->targetEnd; + region2Start = inter->sourceStart; + region2End = inter->sourceEnd; + } + } +else + { + if (sameString(inter->chrom, inter->targetChrom)) + { + region1Chrom = inter->targetChrom; + region1Start = inter->targetStart; + region1End = inter->targetEnd; + region2Chrom = inter->sourceChrom; + region2Start = inter->sourceStart; + region2End = inter->sourceEnd; + } + } +safef(regionInfo, sizeof regionInfo, "%s\t%d\t%d\n" + "%s\t%d\t%d\n", + region1Chrom, region1Start, region1End, + region2Chrom, region2Start, region2End); +mustWrite(f, regionInfo, strlen(regionInfo)); +//warn("%s", regionInfo); +fclose(f); + +// create SHA1 file; used to see if file has changed +unsigned char hash[SHA_DIGEST_LENGTH]; +SHA1((const unsigned char *)regionInfo, strlen(regionInfo), hash); +char newSha1[(SHA_DIGEST_LENGTH + 1) * 2]; +hexBinaryString(hash, SHA_DIGEST_LENGTH, newSha1, (SHA_DIGEST_LENGTH + 1) * 2); +char sha1File[1024]; +safef(sha1File, sizeof sha1File, "%s.sha1", mrTn.forCgi); +f = mustOpen(sha1File, "w"); +mustWrite(f, newSha1, strlen(newSha1)); +carefulClose(&f); +return cloneString(mrTn.forCgi); +} + void doInteractRegionDetails(struct trackDb *tdb, struct interact *inter) { /* print info for both regions */ /* Use different labels: 1) directional (source/target) 2) non-directional same chrom (lower/upper) 3) non-directional other chrom (this/other) */ char startBuf[1024], endBuf[1024], sizeBuf[1024]; printf("Interaction region: "); if (interactOtherChrom(inter)) printf("across chromosomes
"); else { sprintLongWithCommas(startBuf, inter->chromStart+1); @@ -224,67 +288,64 @@ sprintLongWithCommas(sizeBuf, region2End - region2Start); printf("%s region: %s  " "%s:%s-%s %s", region2Label, region2Name, region2Chrom, region2Start+1, region2End, region2Chrom, startBuf, endBuf, inter->targetStrand[0] == '.' ? "" : inter->targetStrand); printf("  %s bp
\n", sizeBuf); int distance = interactRegionDistance(inter); if (distance > 0) { // same chrom sprintLongWithCommas(sizeBuf, distance); printf("Distance between midpoints: %s bp
\n", sizeBuf); } -// print link to multi-region view of ends +// print link to multi-region view of ends if appropriate +// (or provide a link to remove if already in this mode) -// create bed file in trash directory with end coordinates -struct tempName mrTn; -trashDirFile(&mrTn, "hgt", "custRgn_interact", ".bed"); -FILE *f = fopen(mrTn.forCgi, "w"); -if (f == NULL) - errAbort("can't create temp file %s", mrTn.forCgi); -char regionInfo[1024]; -// TODO: check chrom bounds -int padding = 2; -safef(regionInfo, sizeof regionInfo, "%s\t%d\t%d\n" - "%s\t%d\t%d\n", - region1Chrom, region1Start-padding, region1End+padding, - region2Chrom, region2Start-padding, region2End+padding); -mustWrite(f, regionInfo, strlen(regionInfo)); -fclose(f); +if (!interactEndsOverlap(inter)) + { + char *virtShortDesc = cartOptionalString(cart, "virtShortDesc"); + //warn("virtShortDesc: %s", virtShortDesc); + if (virtShortDesc && sameString(virtShortDesc, inter->name)) + { + printf("
" + "Show interaction in normal browser view (exit multi-region view)"); -// create SHA1 file; used to see if file has changed -unsigned char hash[SHA_DIGEST_LENGTH]; -SHA1((const unsigned char *)regionInfo, strlen(regionInfo), hash); -char newSha1[(SHA_DIGEST_LENGTH + 1) * 2]; -hexBinaryString(hash, SHA_DIGEST_LENGTH, newSha1, (SHA_DIGEST_LENGTH + 1) * 2); -char sha1File[1024]; -safef(sha1File, sizeof sha1File, "%s.sha1", mrTn.forCgi); -f = mustOpen(sha1File, "w"); -mustWrite(f, newSha1, strlen(newSha1)); -carefulClose(&f); -// TODO: add cart variable to set viewport to entire virtual chromosome (TBD galt) + } + else + { + char *regionFile = makeInteractRegionFile(inter); + //warn("regionFile: %s", regionFile); printf("
" - "Show both ends of interaction in multi-region browser view", - cgiEncode(mrTn.forCgi)); + "Show both ends of interaction in multi-region browser view (custom region mode)", + inter->name, cgiEncode(regionFile)); + } + printf("   "); + printf("(Help)\n"); + } #ifdef TODO /* TODO: get count and score stats of all interactions in window ?*/ double *scores; AllocArray(scores, count); #endif } void doInteractItemDetails(struct trackDb *tdb, struct interactPlusRow *ipr, char *item, boolean isMultiple) /* Details of interaction item */ { struct interact *inter = ipr->interact; struct slPair *fields = getFields(tdb, ipr->row); printCustomUrlWithFields(tdb, inter->name, inter->name, TRUE, fields); if (!isEmptyTextField(inter->name))