annotate PsiCLASS-1.0.2/samtools-0.1.19/examples/bam2bed.c @ 0:903fc43d6227 draft default tip

Uploaded
author lsong10
date Fri, 26 Mar 2021 16:52:45 +0000
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
1 #include <stdio.h>
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
2 #include "sam.h"
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
3 static int fetch_func(const bam1_t *b, void *data)
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
4 {
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
5 samfile_t *fp = (samfile_t*)data;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
6 uint32_t *cigar = bam1_cigar(b);
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
7 const bam1_core_t *c = &b->core;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
8 int i, l;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
9 if (b->core.tid < 0) return 0;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
10 for (i = l = 0; i < c->n_cigar; ++i) {
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
11 int op = cigar[i]&0xf;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
12 if (op == BAM_CMATCH || op == BAM_CDEL || op == BAM_CREF_SKIP)
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
13 l += cigar[i]>>4;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
14 }
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
15 printf("%s\t%d\t%d\t%s\t%d\t%c\n", fp->header->target_name[c->tid],
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
16 c->pos, c->pos + l, bam1_qname(b), c->qual, (c->flag&BAM_FREVERSE)? '-' : '+');
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
17 return 0;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
18 }
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
19 int main(int argc, char *argv[])
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
20 {
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
21 samfile_t *fp;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
22 if (argc == 1) {
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
23 fprintf(stderr, "Usage: bam2bed <in.bam> [region]\n");
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
24 return 1;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
25 }
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
26 if ((fp = samopen(argv[1], "rb", 0)) == 0) {
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
27 fprintf(stderr, "bam2bed: Fail to open BAM file %s\n", argv[1]);
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
28 return 1;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
29 }
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
30 if (argc == 2) { /* if a region is not specified */
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
31 bam1_t *b = bam_init1();
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
32 while (samread(fp, b) >= 0) fetch_func(b, fp);
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
33 bam_destroy1(b);
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
34 } else {
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
35 int ref, beg, end;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
36 bam_index_t *idx;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
37 if ((idx = bam_index_load(argv[1])) == 0) {
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
38 fprintf(stderr, "bam2bed: BAM indexing file is not available.\n");
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
39 return 1;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
40 }
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
41 bam_parse_region(fp->header, argv[2], &ref, &beg, &end);
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
42 if (ref < 0) {
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
43 fprintf(stderr, "bam2bed: Invalid region %s\n", argv[2]);
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
44 return 1;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
45 }
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
46 bam_fetch(fp->x.bam, idx, ref, beg, end, fp, fetch_func);
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
47 bam_index_destroy(idx);
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
48 }
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
49 samclose(fp);
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
50 return 0;
903fc43d6227 Uploaded
lsong10
parents:
diff changeset
51 }