-static int view_aux(const bam1_t *b, void *data)
-{
- bam_view1((bam_header_t*)data, b);
- return 0;
-}
-static int view_auxb(const bam1_t *b, void *data)
-{
- bam_write1((bamFile)data, b);
- return 0;
-}
-
-int bam_view(int argc, char *argv[])
-{
- bamFile fp, fpout = 0;
- bam_header_t *header;
- bam1_t *b;
- int ret, c, is_bam = 0, is_header = 0, is_headeronly = 0;
- while ((c = getopt(argc, argv, "bhH")) >= 0) {
- switch (c) {
- case 'b': is_bam = 1; break;
- case 'h': is_header = 1; break;
- case 'H': is_headeronly = 1; break;
- default: fprintf(stderr, "Unrecognized option: -%c\n", c); return 1;
- }
- }
- if (argc == optind) {
- fprintf(stderr, "Usage: samtools view [-bhH] <in.bam> [<region> [...]]\n");
- return 1;
- }
- fp = strcmp(argv[optind], "-")? bam_open(argv[optind], "r") : bam_dopen(fileno(stdin), "r");
- assert(fp);
- header = bam_header_read(fp);
- if (header == 0) {
- fprintf(stderr, "[bam_view] fail to read the BAM header. Abort!\n");
- return 1;
- }
- if (is_bam) {
- assert(fpout = bam_dopen(fileno(stdout), "w"));
- bam_header_write(fpout, header);
- }
- if (is_header || is_headeronly) {
- int i, c;
- c = header->text[header->l_text-1];
- header->text[header->l_text-1] = 0;
- printf("%s", header->text);
- if (c) putchar(c);
- header->text[header->l_text-1] = c;
- for (i = 0; i < header->n_targets; ++i)
- printf("@SQ\tSN:%s\tLN:%d\n", header->target_name[i], header->target_len[i]);
- if (is_headeronly) {
- bam_header_destroy(header);
- bam_close(fp);
- return 0;
- }
- }
- if (optind + 1 == argc) {
- b = (bam1_t*)calloc(1, sizeof(bam1_t));
- while ((ret = bam_read1(fp, b)) >= 0) bam_view1(header, b);
- if (ret < -1) fprintf(stderr, "[bam_view] truncated file? Continue anyway. (%d)\n", ret);
- free(b->data); free(b);
- } else {
- int i;
- bam_index_t *idx;
- idx = bam_index_load(argv[optind]);
- for (i = optind + 1; i < argc; ++i) {
- int tid, beg, end;
- bam_parse_region(header, argv[i], &tid, &beg, &end);
- if (tid < 0) {
- fprintf(stderr, "[bam_view] fail to get the reference name. Abort!\n");
- return 1;
- }
- if (is_bam) bam_fetch(fp, idx, tid, beg, end, fpout, view_auxb);
- else bam_fetch(fp, idx, tid, beg, end, header, view_aux);
- }
- bam_index_destroy(idx);
- }
- bam_header_destroy(header);
- bam_close(fp);
- if (is_bam) bam_close(fpout);
- return 0;
-}
-