forked from KolibriOS/kolibrios
769 lines
21 KiB
C
769 lines
21 KiB
C
/*
|
|
* Copyright (c) 2003-2004, Yannick Verschueren
|
|
* Copyright (c) 2003-2004, Communications and remote sensing Laboratory, Universite catholique de Louvain, Belgium
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
|
|
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
|
|
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <setjmp.h>
|
|
#include <math.h>
|
|
|
|
#include "j2k.h"
|
|
#include "cio.h"
|
|
#include "tcd.h"
|
|
#include "int.h"
|
|
|
|
#define JPIP_CIDX 0x63696478 /* Codestream index */
|
|
#define JPIP_CPTR 0x63707472 /* Codestream Finder Box */
|
|
#define JPIP_MANF 0x6d616e66 /* Manifest Box */
|
|
#define JPIP_FAIX 0x66616978 /* Fragment array Index box */
|
|
#define JPIP_MHIX 0x6d686978 /* Main Header Index Table */
|
|
#define JPIP_TPIX 0x74706978 /* Tile-part Index Table box */
|
|
#define JPIP_THIX 0x74686978 /* Tile header Index Table box */
|
|
#define JPIP_PPIX 0x70706978 /* Precinct Packet Index Table box */
|
|
#define JPIP_PHIX 0x70686978 /* Packet Header index Table */
|
|
#define JPIP_FIDX 0x66696478 /* File Index */
|
|
#define JPIP_FPTR 0x66707472 /* File Finder */
|
|
#define JPIP_PRXY 0x70727879 /* Proxy boxes */
|
|
#define JPIP_IPTR 0x69707472 /* Index finder box */
|
|
#define JPIP_PHLD 0x70686c64 /* Place holder */
|
|
|
|
#define JP2C 0x6a703263
|
|
|
|
//static info_marker_t marker_jpip[32], marker_local_jpip[32]; /* SIZE to precise ! */
|
|
//static int num_marker_jpip, num_marker_local_jpip;
|
|
|
|
/*
|
|
* Write the CPTR box
|
|
*
|
|
* Codestream finder box (box)
|
|
*
|
|
*/
|
|
void jpip_write_cptr(int offset, info_image_t img)
|
|
{
|
|
int len, lenp;
|
|
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_CPTR,4); /* T */
|
|
cio_write(0,2); /* DR A PRECISER !! */
|
|
cio_write(0,2); /* CONT */
|
|
cio_write(offset,8); /* COFF A PRECISER !! */
|
|
cio_write(img.codestream_size,8); /* CLEN */
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
}
|
|
|
|
/*
|
|
* Read the CPTR box
|
|
*
|
|
* Codestream finder box (box)
|
|
*
|
|
*/
|
|
void jpip_read_cptr()
|
|
{
|
|
int DR, CONT;
|
|
long long Coff, codestream_size;
|
|
|
|
DR = cio_read(2); /* DR */
|
|
CONT = cio_read(2); /* CONT */
|
|
Coff = cio_read(8); /* COFF */
|
|
codestream_size = cio_read(8); /* CLEN */
|
|
}
|
|
|
|
/*
|
|
* Write the MANF box
|
|
*
|
|
* Manifest box (box)
|
|
*
|
|
*/
|
|
void jpip_write_manf(int second, int v, info_marker_t *marker)
|
|
{
|
|
int len, lenp, i;
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_MANF,4); /* T */
|
|
|
|
if (second) /* Write only during the second pass */
|
|
{
|
|
for(i=0;i<v;i++)
|
|
{
|
|
cio_write(marker[i].len,4); /* Marker length */
|
|
cio_write(marker[i].type,4); /* Marker type */
|
|
}
|
|
}
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
}
|
|
|
|
/*
|
|
* Read the MANF box
|
|
*
|
|
* Manifest box (box)
|
|
*
|
|
*/
|
|
void jpip_read_manf(int len)
|
|
{
|
|
int i, v, marker_len, marker_type;
|
|
|
|
v = (len - 8)/ 8;
|
|
|
|
for(i=0;i<v;i++)
|
|
{
|
|
marker_len = cio_read(4); /* Marker length */
|
|
marker_type = cio_read(4); /* Marker type */
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Write the MHIX box
|
|
*
|
|
* Main Header Index Table (box)
|
|
*
|
|
*/
|
|
int jpip_write_mhix(info_image_t img, int status, int tileno)
|
|
{
|
|
int len, lenp, i;
|
|
info_tile_t *tile;
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_MHIX, 4); /* MHIX */
|
|
|
|
if (status) /* MAIN HEADER */
|
|
{
|
|
cio_write(img.Main_head_end,8); /* TLEN */
|
|
|
|
for(i = 0; i < img.num_marker; i++) /* Marker restricted to 1 apparition */
|
|
{
|
|
cio_write(img.marker[i].type, 2);
|
|
cio_write(0, 2);
|
|
cio_write(img.marker[i].start_pos, 8);
|
|
cio_write(img.marker[i].len, 2);
|
|
}
|
|
|
|
/* Marker NOT restricted to 1 apparition */
|
|
for(i = img.marker_mul.num_COC - 1; i >= 0; i--) /* COC */
|
|
{
|
|
cio_write(img.marker_mul.COC[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(img.marker_mul.COC[i].start_pos, 8);
|
|
cio_write(img.marker_mul.COC[i].len, 2);
|
|
}
|
|
|
|
for(i = img.marker_mul.num_RGN - 1; i >= 0; i--) /* RGN */
|
|
{
|
|
cio_write(img.marker_mul.RGN[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(img.marker_mul.RGN[i].start_pos, 8);
|
|
cio_write(img.marker_mul.RGN[i].len, 2);
|
|
}
|
|
|
|
for(i = img.marker_mul.num_QCC - 1; i >= 0; i--) /* QCC */
|
|
{
|
|
cio_write(img.marker_mul.QCC[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(img.marker_mul.QCC[i].start_pos, 8);
|
|
cio_write(img.marker_mul.QCC[i].len, 2);
|
|
}
|
|
|
|
for(i = img.marker_mul.num_TLM - 1; i >= 0; i--) /* TLM */
|
|
{
|
|
cio_write(img.marker_mul.TLM[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(img.marker_mul.TLM[i].start_pos, 8);
|
|
cio_write(img.marker_mul.TLM[i].len, 2);
|
|
}
|
|
|
|
for(i = img.marker_mul.num_PLM - 1; i >= 0; i--) /* PLM */
|
|
{
|
|
cio_write(img.marker_mul.PLM[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(img.marker_mul.PLM[i].start_pos, 8);
|
|
cio_write(img.marker_mul.PLM[i].len, 2);
|
|
}
|
|
|
|
for(i = img.marker_mul.num_PPM - 1; i >= 0; i--) /* PPM */
|
|
{
|
|
cio_write(img.marker_mul.PPM[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(img.marker_mul.PPM[i].start_pos, 8);
|
|
cio_write(img.marker_mul.PPM[i].len, 2);
|
|
}
|
|
|
|
for(i = img.marker_mul.num_COM - 1; i >= 0; i--) /* COM */
|
|
{
|
|
cio_write(img.marker_mul.COM[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(img.marker_mul.COM[i].start_pos, 8);
|
|
cio_write(img.marker_mul.COM[i].len, 2);
|
|
}
|
|
}
|
|
else /* TILE HEADER */
|
|
{
|
|
tile = &img.tile[tileno];
|
|
cio_write(tile->tile_parts[0].length_header, 8); /* TLEN */
|
|
|
|
for(i = 0; i < tile->num_marker; i++) /* Marker restricted to 1 apparition */
|
|
{
|
|
cio_write(tile->marker[i].type, 2);
|
|
cio_write(0, 2);
|
|
cio_write(tile->marker[i].start_pos, 8);
|
|
cio_write(tile->marker[i].len, 2);
|
|
}
|
|
|
|
/* Marker NOT restricted to 1 apparition */
|
|
for(i = tile->marker_mul.num_COC - 1; i >= 0; i--) /* COC */
|
|
{
|
|
cio_write(tile->marker_mul.COC[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(tile->marker_mul.COC[i].start_pos, 8);
|
|
cio_write(tile->marker_mul.COC[i].len, 2);
|
|
}
|
|
|
|
for(i = tile->marker_mul.num_RGN - 1; i >= 0; i--) /* RGN */
|
|
{
|
|
cio_write(tile->marker_mul.RGN[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(tile->marker_mul.RGN[i].start_pos, 8);
|
|
cio_write(tile->marker_mul.RGN[i].len, 2);
|
|
}
|
|
|
|
for(i = tile->marker_mul.num_QCC - 1; i >= 0; i--) /* QCC */
|
|
{
|
|
cio_write(tile->marker_mul.QCC[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(tile->marker_mul.QCC[i].start_pos, 8);
|
|
cio_write(tile->marker_mul.QCC[i].len, 2);
|
|
}
|
|
|
|
for(i = tile->marker_mul.num_PLT - 1; i >= 0; i--) /* PLT */
|
|
{
|
|
cio_write(tile->marker_mul.PLT[i].type,2);
|
|
cio_write(i,2);
|
|
cio_write(tile->marker_mul.PLT[i].start_pos,8);
|
|
cio_write(tile->marker_mul.PLT[i].len,2);
|
|
}
|
|
|
|
for(i = tile->marker_mul.num_PPT - 1; i >= 0; i--) /* PPT */
|
|
{
|
|
cio_write(tile->marker_mul.PPT[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(tile->marker_mul.PPT[i].start_pos, 8);
|
|
cio_write(tile->marker_mul.PPT[i].len, 2);
|
|
}
|
|
|
|
for(i = tile->marker_mul.num_COM - 1; i >= 0; i--) /* COM */
|
|
{
|
|
cio_write(tile->marker_mul.COM[i].type, 2);
|
|
cio_write(i, 2);
|
|
cio_write(tile->marker_mul.COM[i].start_pos, 8);
|
|
cio_write(tile->marker_mul.COM[i].len, 2);
|
|
}
|
|
}
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
|
|
return len;
|
|
}
|
|
|
|
/*
|
|
* Read the MHIX box
|
|
*
|
|
* Main Header Index Table (box)
|
|
*
|
|
*/
|
|
void jpip_read_mhix(int len)
|
|
{
|
|
int i, v, marker_type, marker_start_pos, marker_len, marker_remains;
|
|
|
|
v = (len - 8) / 14;
|
|
|
|
for (i=0; i<v ; i++)
|
|
{
|
|
marker_type = cio_read(2); /* Type of the marker */
|
|
marker_remains = cio_read(2); /* Number of same markers following */
|
|
marker_start_pos = cio_read(2); /* Start position of the marker */
|
|
marker_len = cio_read(2); /* Length of the marker */
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Write the FAIX box
|
|
*
|
|
* Fragment array Index box (box)
|
|
*
|
|
*/
|
|
int jpip_write_faix(int v, int compno, info_image_t img, j2k_cp_t *j2k_cp, int version)
|
|
{
|
|
int len, lenp, i, j;
|
|
/*int version = 0;*/
|
|
int tileno, resno, precno, layno, num_packet=0;
|
|
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_FAIX, 4); /* FAIX */
|
|
cio_write(version,1); /* Version 0 = 4 bytes */
|
|
|
|
switch(v)
|
|
{
|
|
case 0: /* TPIX */
|
|
cio_write(img.num_max_tile_parts,(version & 0x01)?8:4); /* NMAX */
|
|
cio_write(img.tw*img.th,(version & 0x01)?8:4); /* M */
|
|
for (i = 0; i < img.tw*img.th; i++)
|
|
{
|
|
for (j = 0; j < img.tile[i].numparts ; j++)
|
|
{
|
|
cio_write(img.tile[i].tile_parts[j].start_pos,(version & 0x01)?8:4); /* start position */
|
|
cio_write(img.tile[i].tile_parts[j].length,(version & 0x01)?8:4); /* length */
|
|
if (version & 0x02)
|
|
cio_write(img.tile[i].tile_parts[j].num_reso_AUX,4); /* Aux_i,j : Auxiliary value */
|
|
//cio_write(0,4);
|
|
}
|
|
/* PADDING */
|
|
while (j < img.num_max_tile_parts)
|
|
{
|
|
cio_write(0,(version & 0x01)?8:4); /* start position */
|
|
cio_write(0,(version & 0x01)?8:4); /* length */
|
|
if (version & 0x02)
|
|
cio_write(0,4); /* Aux_i,j : Auxiliary value */
|
|
j++;
|
|
}
|
|
}
|
|
break;
|
|
|
|
/* case 1: */ /* THIX */
|
|
/* cio_write(1,(version & 0x01)?8:4); */ /* NMAX */
|
|
/* cio_write(img.tw*img.th,(version & 0x01)?8:4); */ /* M */
|
|
/* for (i=0;i<img.tw*img.th;i++) */
|
|
/* { */
|
|
/* cio_write(img.tile[i].start_pos,(version & 0x01)?8:4); */ /* start position */
|
|
/* cio_write(img.tile[i].end_header-img.tile[i].start_pos,(version & 0x01)?8:4); */ /* length */
|
|
/* if (version & 0x02)*/
|
|
/* cio_write(0,4); */ /* Aux_i,j : Auxiliary value */
|
|
/* } */
|
|
/* break; */
|
|
|
|
case 2: /* PPIX NOT FINISHED !! */
|
|
cio_write(img.num_packet_max,(version & 0x01)?8:4); /* NMAX */
|
|
cio_write(img.tw*img.th,(version & 0x01)?8:4); /* M */
|
|
for(tileno=0;tileno<img.tw*img.th;tileno++)
|
|
{
|
|
info_tile_t *tile_Idx = &img.tile[tileno];
|
|
info_compo_t *compo_Idx = &tile_Idx->compo[compno];
|
|
int correction;
|
|
|
|
num_packet=0;
|
|
|
|
if(j2k_cp->tcps[tileno].csty&J2K_CP_CSTY_EPH)
|
|
correction=3;
|
|
else
|
|
correction=1;
|
|
for(resno=0;resno<img.Decomposition+1;resno++)
|
|
{
|
|
info_reso_t *reso_Idx = &compo_Idx->reso[resno];
|
|
for (precno=0;precno<img.tile[tileno].pw*img.tile[tileno].ph;precno++)
|
|
{
|
|
info_prec_t *prec_Idx = &reso_Idx->prec[precno];
|
|
for(layno=0;layno<img.Layer;layno++)
|
|
{
|
|
info_layer_t *layer_Idx = &prec_Idx->layer[layno];
|
|
cio_write(layer_Idx->offset,(version & 0x01)?8:4); /* start position */
|
|
cio_write((layer_Idx->len_header-correction)?0:layer_Idx->len,(version & 0x01)?8:4); /* length */
|
|
if (version & 0x02)
|
|
cio_write(0,4); /* Aux_i,j : Auxiliary value */
|
|
num_packet++;
|
|
}
|
|
}
|
|
}
|
|
/* PADDING */
|
|
while (num_packet < img.num_packet_max)
|
|
{
|
|
cio_write(0,(version & 0x01)?8:4); /* start position */
|
|
cio_write(0,(version & 0x01)?8:4); /* length */
|
|
if (version & 0x02)
|
|
cio_write(0,4); /* Aux_i,j : Auxiliary value */
|
|
num_packet++;
|
|
}
|
|
}
|
|
|
|
break;
|
|
|
|
case 3: /* PHIX NOT FINISHED !! */
|
|
cio_write(img.num_packet_max,(version & 0x01)?8:4); /* NMAX */
|
|
cio_write(img.tw*img.th,(version & 0x01)?8:4); /* M */
|
|
for(tileno=0;tileno<img.tw*img.th;tileno++)
|
|
{
|
|
info_tile_t *tile_Idx = &img.tile[tileno];
|
|
info_compo_t *compo_Idx = &tile_Idx->compo[compno];
|
|
int correction;
|
|
|
|
num_packet = 0;
|
|
if(j2k_cp->tcps[tileno].csty&J2K_CP_CSTY_EPH)
|
|
correction=3;
|
|
else
|
|
correction=1;
|
|
for(resno=0;resno<img.Decomposition+1;resno++)
|
|
{
|
|
info_reso_t *reso_Idx = &compo_Idx->reso[resno];
|
|
for (precno=0;precno<img.tile[tileno].pw*img.tile[tileno].ph;precno++)
|
|
{
|
|
info_prec_t *prec_Idx = &reso_Idx->prec[precno];
|
|
for(layno=0;layno<img.Layer;layno++)
|
|
{
|
|
info_layer_t *layer_Idx = &prec_Idx->layer[layno];
|
|
cio_write(layer_Idx->offset_header,(version & 0x01)?8:4); /* start position */
|
|
cio_write((layer_Idx->len_header-correction)?0:layer_Idx->len_header,(version & 0x01)?8:4); /* length */
|
|
if (version & 0x02)
|
|
cio_write(0,4); /* Aux_i,j : Auxiliary value */
|
|
num_packet++;
|
|
}
|
|
}
|
|
}
|
|
/* PADDING */
|
|
while (num_packet<img.num_packet_max)
|
|
{
|
|
cio_write(0,(version & 0x01)?8:4); /* start position */
|
|
cio_write(0,(version & 0x01)?8:4); /* length */
|
|
if (version & 0x02)
|
|
cio_write(0,4); /* Aux_i,j : Auxiliary value */
|
|
num_packet++;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
|
|
return len;
|
|
}
|
|
|
|
/*
|
|
* Write the TPIX box
|
|
*
|
|
* Tile-part Index table box (superbox)
|
|
*
|
|
*/
|
|
int jpip_write_tpix(info_image_t img, j2k_cp_t *j2k_cp, int version)
|
|
{
|
|
int len, lenp;
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_TPIX, 4); /* TPIX */
|
|
|
|
jpip_write_faix(0,0,img, j2k_cp, version);
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
|
|
return len;
|
|
}
|
|
|
|
/*
|
|
* Write the THIX box
|
|
*
|
|
* Tile header Index table box (superbox)
|
|
*
|
|
*/
|
|
//int jpip_write_thix(info_image_t img, j2k_cp_t *j2k_cp)
|
|
// {
|
|
// int len, lenp;
|
|
// lenp=cio_tell();
|
|
// cio_skip(4); /* L [at the end] */
|
|
// cio_write(JPIP_THIX, 4); /* THIX */
|
|
|
|
// jpip_write_faix(1,0,img, j2k_cp);
|
|
|
|
// len=cio_tell()-lenp;
|
|
// cio_seek(lenp);
|
|
// cio_write(len, 4); /* L */
|
|
// cio_seek(lenp+len);
|
|
|
|
// return len;
|
|
//}
|
|
|
|
int jpip_write_thix(info_image_t img, j2k_cp_t *j2k_cp)
|
|
{
|
|
int len, lenp, i;
|
|
int tileno;
|
|
info_marker_t *marker;
|
|
int num_marker_local_jpip;
|
|
|
|
marker = (info_marker_t*)calloc(sizeof(info_marker_t), j2k_cp->tw*j2k_cp->th);
|
|
|
|
for ( i = 0; i < 2 ; i++ )
|
|
{
|
|
if (i) cio_seek(lenp);
|
|
|
|
lenp = cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_THIX, 4); /* THIX */
|
|
jpip_write_manf(i, j2k_cp->tw*j2k_cp->th, marker);
|
|
num_marker_local_jpip=img.Comp;
|
|
|
|
for (tileno = 0; tileno < j2k_cp->tw*j2k_cp->th; tileno++)
|
|
{
|
|
marker[tileno].len = jpip_write_mhix(img, 1, tileno);
|
|
marker[tileno].type = JPIP_MHIX;
|
|
}
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
}
|
|
|
|
free(marker);
|
|
|
|
return len;
|
|
}
|
|
/*
|
|
* Write the PPIX box
|
|
*
|
|
* Precinct Packet Index table box (superbox)
|
|
*
|
|
*/
|
|
int jpip_write_ppix(info_image_t img,j2k_cp_t *j2k_cp)
|
|
{
|
|
int len, lenp, compno, i;
|
|
info_marker_t *marker;
|
|
int num_marker_local_jpip;
|
|
marker = (info_marker_t*)calloc(sizeof(info_marker_t), img.Comp);
|
|
|
|
for (i=0;i<2;i++)
|
|
{
|
|
if (i) cio_seek(lenp);
|
|
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_PPIX, 4); /* PPIX */
|
|
jpip_write_manf(i,img.Comp,marker);
|
|
num_marker_local_jpip=img.Comp;
|
|
|
|
for (compno=0; compno<img.Comp; compno++)
|
|
{
|
|
marker[compno].len=jpip_write_faix(2,compno,img, j2k_cp, 0);
|
|
marker[compno].type=JPIP_FAIX;
|
|
}
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
}
|
|
|
|
free(marker);
|
|
|
|
return len;
|
|
}
|
|
|
|
/*
|
|
* Write the PHIX box
|
|
*
|
|
* Packet Header Index table box (superbox)
|
|
*
|
|
*/
|
|
int jpip_write_phix(info_image_t img, j2k_cp_t *j2k_cp)
|
|
{
|
|
int len, lenp=0, compno, i;
|
|
info_marker_t *marker;
|
|
|
|
marker = (info_marker_t*)calloc(sizeof(info_marker_t), img.Comp);
|
|
|
|
for (i=0;i<2;i++)
|
|
{
|
|
if (i) cio_seek(lenp);
|
|
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_PHIX, 4); /* PHIX */
|
|
|
|
jpip_write_manf(i,img.Comp,marker);
|
|
|
|
for (compno=0; compno<img.Comp; compno++)
|
|
{
|
|
marker[compno].len=jpip_write_faix(3,compno,img, j2k_cp, 0);
|
|
marker[compno].type=JPIP_FAIX;
|
|
}
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
}
|
|
|
|
free(marker);
|
|
|
|
return len;
|
|
}
|
|
|
|
/*
|
|
* Write the CIDX box
|
|
*
|
|
* Codestream Index box (superbox)
|
|
*
|
|
*/
|
|
int jpip_write_cidx(int offset, info_image_t img, j2k_cp_t *j2k_cp, int version)
|
|
{
|
|
int len, lenp = 0, i;
|
|
info_marker_t *marker_jpip;
|
|
int num_marker_jpip = 0;
|
|
|
|
marker_jpip = (info_marker_t*)calloc(sizeof(info_marker_t), 32);
|
|
|
|
for (i=0;i<2;i++)
|
|
{
|
|
if(i)
|
|
cio_seek(lenp);
|
|
|
|
lenp=cio_tell();
|
|
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_CIDX, 4); /* CIDX */
|
|
jpip_write_cptr(offset, img);
|
|
|
|
jpip_write_manf(i,num_marker_jpip, marker_jpip);
|
|
|
|
num_marker_jpip=0;
|
|
marker_jpip[num_marker_jpip].len=jpip_write_mhix(img, 0, 0);
|
|
marker_jpip[num_marker_jpip].type=JPIP_MHIX;
|
|
num_marker_jpip++;
|
|
|
|
marker_jpip[num_marker_jpip].len=jpip_write_tpix(img, j2k_cp, version);
|
|
marker_jpip[num_marker_jpip].type=JPIP_TPIX;
|
|
num_marker_jpip++;
|
|
|
|
marker_jpip[num_marker_jpip].len=jpip_write_thix(img, j2k_cp);
|
|
marker_jpip[num_marker_jpip].type=JPIP_THIX;
|
|
num_marker_jpip++;
|
|
|
|
marker_jpip[num_marker_jpip].len=jpip_write_ppix(img, j2k_cp);
|
|
marker_jpip[num_marker_jpip].type=JPIP_PPIX;
|
|
num_marker_jpip++;
|
|
|
|
marker_jpip[num_marker_jpip].len=jpip_write_phix(img, j2k_cp);
|
|
marker_jpip[num_marker_jpip].type=JPIP_PHIX;
|
|
num_marker_jpip++;
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
}
|
|
|
|
free(marker_jpip);
|
|
|
|
return len;
|
|
|
|
}
|
|
|
|
/*
|
|
* Write the IPTR box
|
|
*
|
|
* Index Finder box
|
|
*
|
|
*/
|
|
void jpip_write_iptr(int offset, int length)
|
|
{
|
|
int len, lenp;
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_IPTR, 4); /* IPTR */
|
|
|
|
cio_write(offset,8);
|
|
cio_write(length,8);
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
}
|
|
|
|
/*
|
|
* Write the PRXY box
|
|
*
|
|
* proxy (box)
|
|
*
|
|
*/
|
|
void jpip_write_prxy(int offset_jp2c, int length_jp2c, int offset_idx, int length_idx)
|
|
{
|
|
int len, lenp;
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_PRXY, 4); /* IPTR */
|
|
|
|
cio_write(offset_jp2c,8); /* OOFF */
|
|
cio_write(length_jp2c,4); /* OBH part 1 */
|
|
cio_write(JP2C,4); /* OBH part 2 */
|
|
|
|
cio_write(1,1); /* NI */
|
|
|
|
cio_write(offset_idx,8); /* IOFF */
|
|
cio_write(length_idx,4); /* IBH part 1 */
|
|
cio_write(JPIP_CIDX,4); /* IBH part 2 */
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
}
|
|
|
|
|
|
/*
|
|
* Write the FIDX box
|
|
*
|
|
* File Index (superbox)
|
|
*
|
|
*/
|
|
int jpip_write_fidx(int offset_jp2c, int length_jp2c, int offset_idx, int length_idx)
|
|
{
|
|
int len, lenp;
|
|
lenp=cio_tell();
|
|
cio_skip(4); /* L [at the end] */
|
|
cio_write(JPIP_FIDX, 4); /* IPTR */
|
|
|
|
jpip_write_prxy(offset_jp2c, length_jp2c, offset_idx, offset_jp2c);
|
|
|
|
len=cio_tell()-lenp;
|
|
cio_seek(lenp);
|
|
cio_write(len, 4); /* L */
|
|
cio_seek(lenp+len);
|
|
|
|
return len;
|
|
}
|