Renumber variants by allele count.
[lightning.git] / slicenumpy.go
1 // Copyright (C) The Lightning Authors. All rights reserved.
2 //
3 // SPDX-License-Identifier: AGPL-3.0
4
5 package lightning
6
7 import (
8         "bufio"
9         "bytes"
10         "flag"
11         "fmt"
12         "io"
13         "net/http"
14         _ "net/http/pprof"
15         "os"
16         "runtime"
17         "sort"
18         "strings"
19         "sync"
20         "sync/atomic"
21
22         "git.arvados.org/arvados.git/sdk/go/arvados"
23         "github.com/arvados/lightning/hgvs"
24         "github.com/kshedden/gonpy"
25         "github.com/sirupsen/logrus"
26         log "github.com/sirupsen/logrus"
27 )
28
29 type sliceNumpy struct {
30         filter filter
31 }
32
33 func (cmd *sliceNumpy) RunCommand(prog string, args []string, stdin io.Reader, stdout, stderr io.Writer) int {
34         var err error
35         defer func() {
36                 if err != nil {
37                         fmt.Fprintf(stderr, "%s\n", err)
38                 }
39         }()
40         flags := flag.NewFlagSet("", flag.ContinueOnError)
41         flags.SetOutput(stderr)
42         pprof := flags.String("pprof", "", "serve Go profile data at http://`[addr]:port`")
43         runlocal := flags.Bool("local", false, "run on local host (default: run in an arvados container)")
44         projectUUID := flags.String("project", "", "project `UUID` for output data")
45         priority := flags.Int("priority", 500, "container request priority")
46         inputDir := flags.String("input-dir", "./in", "input `directory`")
47         outputDir := flags.String("output-dir", "./out", "output `directory`")
48         ref := flags.String("ref", "", "reference name (if blank, choose last one that appears in input)")
49         regionsFilename := flags.String("regions", "", "only output columns/annotations that intersect regions in specified bed `file`")
50         expandRegions := flags.Int("expand-regions", 0, "expand specified regions by `N` base pairs on each side`")
51         cmd.filter.Flags(flags)
52         err = flags.Parse(args)
53         if err == flag.ErrHelp {
54                 err = nil
55                 return 0
56         } else if err != nil {
57                 return 2
58         }
59
60         if *pprof != "" {
61                 go func() {
62                         log.Println(http.ListenAndServe(*pprof, nil))
63                 }()
64         }
65
66         if !*runlocal {
67                 runner := arvadosContainerRunner{
68                         Name:        "lightning slice-numpy",
69                         Client:      arvados.NewClientFromEnv(),
70                         ProjectUUID: *projectUUID,
71                         RAM:         250000000000,
72                         VCPUs:       32,
73                         Priority:    *priority,
74                         KeepCache:   2,
75                         APIAccess:   true,
76                 }
77                 err = runner.TranslatePaths(inputDir, regionsFilename)
78                 if err != nil {
79                         return 1
80                 }
81                 runner.Args = []string{"slice-numpy", "-local=true",
82                         "-pprof", ":6060",
83                         "-input-dir", *inputDir,
84                         "-output-dir", "/mnt/output",
85                         "-regions", *regionsFilename,
86                         "-expand-regions", fmt.Sprintf("%d", *expandRegions),
87                 }
88                 runner.Args = append(runner.Args, cmd.filter.Args()...)
89                 var output string
90                 output, err = runner.Run()
91                 if err != nil {
92                         return 1
93                 }
94                 fmt.Fprintln(stdout, output)
95                 return 0
96         }
97
98         infiles, err := allGobFiles(*inputDir)
99         if err != nil {
100                 return 1
101         }
102         if len(infiles) == 0 {
103                 err = fmt.Errorf("no input files found in %s", *inputDir)
104                 return 1
105         }
106         sort.Strings(infiles)
107
108         var cgnames []string
109         var refseq map[string][]tileLibRef
110         in0, err := open(infiles[0])
111         if err != nil {
112                 return 1
113         }
114         taglen := -1
115         DecodeLibrary(in0, strings.HasSuffix(infiles[0], ".gz"), func(ent *LibraryEntry) error {
116                 if len(ent.TagSet) > 0 {
117                         taglen = len(ent.TagSet[0])
118                 }
119                 for _, cseq := range ent.CompactSequences {
120                         if cseq.Name == *ref || *ref == "" {
121                                 refseq = cseq.TileSequences
122                         }
123                 }
124                 for _, cg := range ent.CompactGenomes {
125                         cgnames = append(cgnames, cg.Name)
126                 }
127                 return nil
128         })
129         if err != nil {
130                 return 1
131         }
132         in0.Close()
133         if refseq == nil {
134                 err = fmt.Errorf("%s: reference sequence not found", infiles[0])
135                 return 1
136         }
137         if taglen < 0 {
138                 err = fmt.Errorf("tagset not found")
139                 return 1
140         }
141         sort.Strings(cgnames)
142
143         {
144                 labelsFilename := *outputDir + "/labels.csv"
145                 log.Infof("writing labels to %s", labelsFilename)
146                 var f *os.File
147                 f, err = os.Create(labelsFilename)
148                 if err != nil {
149                         return 1
150                 }
151                 defer f.Close()
152                 for i, name := range cgnames {
153                         _, err = fmt.Fprintf(f, "%d,%q\n", i, trimFilenameForLabel(name))
154                         if err != nil {
155                                 err = fmt.Errorf("write %s: %w", labelsFilename, err)
156                                 return 1
157                         }
158                 }
159                 err = f.Close()
160                 if err != nil {
161                         err = fmt.Errorf("close %s: %w", labelsFilename, err)
162                         return 1
163                 }
164         }
165
166         log.Info("building list of reference tiles to load") // TODO: more efficient if we had saved all ref tiles in slice0
167         type reftileinfo struct {
168                 variant  tileVariantID
169                 seqname  string // chr1
170                 pos      int    // distance from start of chr1 to start of tile
171                 tiledata []byte // acgtggcaa...
172         }
173         reftile := map[tagID]*reftileinfo{}
174         for seqname, cseq := range refseq {
175                 for _, libref := range cseq {
176                         reftile[libref.Tag] = &reftileinfo{seqname: seqname, variant: libref.Variant}
177                 }
178         }
179         log.Info("loading reference tiles from all slices")
180         throttle := throttle{Max: runtime.GOMAXPROCS(0)}
181         for _, infile := range infiles {
182                 infile := infile
183                 throttle.Go(func() error {
184                         defer log.Infof("%s: done", infile)
185                         f, err := open(infile)
186                         if err != nil {
187                                 return err
188                         }
189                         defer f.Close()
190                         return DecodeLibrary(f, strings.HasSuffix(infile, ".gz"), func(ent *LibraryEntry) error {
191                                 for _, tv := range ent.TileVariants {
192                                         if dst, ok := reftile[tv.Tag]; ok && dst.variant == tv.Variant {
193                                                 dst.tiledata = tv.Sequence
194                                         }
195                                 }
196                                 return nil
197                         })
198                 })
199         }
200         throttle.Wait()
201
202         log.Info("reconstructing reference sequences")
203         for seqname, cseq := range refseq {
204                 seqname, cseq := seqname, cseq
205                 throttle.Go(func() error {
206                         defer log.Printf("... %s done", seqname)
207                         pos := 0
208                         for _, libref := range cseq {
209                                 rt := reftile[libref.Tag]
210                                 rt.pos = pos
211                                 pos += len(rt.tiledata) - taglen
212                         }
213                         return nil
214                 })
215         }
216         throttle.Wait()
217
218         log.Info("TODO: determining which tiles intersect given regions")
219
220         log.Info("generating annotations and numpy matrix for each slice")
221         var done int64
222         for infileIdx, infile := range infiles {
223                 infileIdx, infile := infileIdx, infile
224                 throttle.Go(func() error {
225                         seq := make(map[tagID][]TileVariant, 50000)
226                         cgs := make(map[string]CompactGenome, len(cgnames))
227                         f, err := open(infile)
228                         if err != nil {
229                                 return err
230                         }
231                         defer f.Close()
232                         log.Infof("reading %s", infile)
233                         err = DecodeLibrary(f, strings.HasSuffix(infile, ".gz"), func(ent *LibraryEntry) error {
234                                 for _, tv := range ent.TileVariants {
235                                         variants := seq[tv.Tag]
236                                         for len(variants) <= int(tv.Variant) {
237                                                 variants = append(variants, TileVariant{})
238                                         }
239                                         variants[int(tv.Variant)] = tv
240                                         seq[tv.Tag] = variants
241                                 }
242                                 for _, cg := range ent.CompactGenomes {
243                                         cgs[cg.Name] = cg
244                                 }
245                                 return nil
246                         })
247                         if err != nil {
248                                 return err
249                         }
250                         tagstart := cgs[cgnames[0]].StartTag
251                         tagend := cgs[cgnames[0]].EndTag
252
253                         // TODO: filters
254
255                         log.Infof("renumbering variants for tags %d-%d", tagstart, tagend)
256                         variantRemap := make([][]tileVariantID, tagend-tagstart)
257                         var wg sync.WaitGroup
258                         for tag, variants := range seq {
259                                 tag, variants := tag, variants
260                                 wg.Add(1)
261                                 go func() {
262                                         defer wg.Done()
263                                         count := make([]tileVariantID, len(variants))
264                                         for _, cg := range cgs {
265                                                 idx := (tag - tagstart) * 2
266                                                 count[cg.Variants[idx]]++
267                                                 count[cg.Variants[idx+1]]++
268                                         }
269                                         ranked := make([]tileVariantID, len(variants))
270                                         for i := range ranked {
271                                                 ranked[i] = tileVariantID(i)
272                                         }
273                                         sort.Slice(ranked, func(i, j int) bool {
274                                                 if i == 0 {
275                                                         return true // leave ranked[0] at position 0, unused
276                                                 } else if j == 0 {
277                                                         return false // ditto
278                                                 }
279                                                 if cri, crj := count[ranked[i]], count[ranked[j]]; cri != crj {
280                                                         return cri > crj
281                                                 } else {
282                                                         return bytes.Compare(variants[ranked[i]].Blake2b[:], variants[ranked[j]].Blake2b[:]) < 0
283                                                 }
284                                         })
285                                         remap := make([]tileVariantID, len(ranked))
286                                         for i, r := range ranked {
287                                                 remap[r] = tileVariantID(i)
288                                         }
289                                         variantRemap[tag-tagstart] = remap
290                                 }()
291                         }
292                         wg.Wait()
293
294                         annotationsFilename := fmt.Sprintf("%s/matrix.%04d.annotations.csv", *outputDir, infileIdx)
295                         log.Infof("writing %s", annotationsFilename)
296                         annof, err := os.Create(annotationsFilename)
297                         if err != nil {
298                                 return err
299                         }
300                         annow := bufio.NewWriterSize(annof, 1<<20)
301                         for tag, variants := range seq {
302                                 rt, ok := reftile[tag]
303                                 if !ok {
304                                         // Reference does not use any
305                                         // variant of this tile.
306                                         // TODO: log this? mention it
307                                         // in annotations?
308                                         continue
309                                 }
310                                 outcol := tag - tagID(tagstart)
311                                 reftilestr := strings.ToUpper(string(rt.tiledata))
312                                 remap := variantRemap[tag-tagstart]
313                                 for v, tv := range variants {
314                                         if len(tv.Sequence) < taglen || !bytes.HasSuffix(rt.tiledata, tv.Sequence[len(tv.Sequence)-taglen:]) {
315                                                 continue
316                                         }
317                                         if lendiff := len(rt.tiledata) - len(tv.Sequence); lendiff < -1000 || lendiff > 1000 {
318                                                 continue
319                                         }
320                                         diffs, _ := hgvs.Diff(reftilestr, strings.ToUpper(string(tv.Sequence)), 0)
321                                         for _, diff := range diffs {
322                                                 diff.Position += rt.pos
323                                                 fmt.Fprintf(annow, "%d,%d,%d,%s:g.%s\n", tag, outcol, remap[v], rt.seqname, diff.String())
324                                         }
325                                 }
326                         }
327                         err = annow.Flush()
328                         if err != nil {
329                                 return err
330                         }
331                         err = annof.Close()
332                         if err != nil {
333                                 return err
334                         }
335
336                         log.Infof("%s: preparing numpy", infile)
337                         rows := len(cgnames)
338                         cols := 2 * int(tagend-tagstart)
339                         out := make([]int16, rows*cols)
340                         for row, name := range cgnames {
341                                 out := out[row*cols:]
342                                 for col, v := range cgs[name].Variants {
343                                         if variants, ok := seq[tagstart+tagID(col/2)]; ok && len(variants) > int(v) && len(variants[v].Sequence) > 0 {
344                                                 out[col] = int16(variantRemap[col/2][v])
345                                         } else {
346                                                 out[col] = -1
347                                         }
348                                 }
349                         }
350
351                         fnm := fmt.Sprintf("%s/matrix.%04d.npy", *outputDir, infileIdx)
352                         output, err := os.Create(fnm)
353                         if err != nil {
354                                 return err
355                         }
356                         defer output.Close()
357                         bufw := bufio.NewWriterSize(output, 1<<26)
358                         npw, err := gonpy.NewWriter(nopCloser{bufw})
359                         if err != nil {
360                                 return err
361                         }
362                         log.WithFields(logrus.Fields{
363                                 "filename": fnm,
364                                 "rows":     rows,
365                                 "cols":     cols,
366                         }).Info("writing numpy")
367                         npw.Shape = []int{rows, cols}
368                         npw.WriteInt16(out)
369                         err = bufw.Flush()
370                         if err != nil {
371                                 return err
372                         }
373                         err = output.Close()
374                         if err != nil {
375                                 return err
376                         }
377                         log.Infof("%s: done (%d/%d)", infile, int(atomic.AddInt64(&done, 1)), len(infiles))
378                         return nil
379                 })
380         }
381         if err = throttle.Wait(); err != nil {
382                 return 1
383         }
384         return 0
385 }