254 lines
6.7 KiB
C
254 lines
6.7 KiB
C
/*
|
|
* $Id$
|
|
*
|
|
* Copyright (c) 2002-2011, Communications and Remote Sensing Laboratory, Universite catholique de Louvain (UCL), Belgium
|
|
* Copyright (c) 2002-2011, Professor Benoit Macq
|
|
* Copyright (c) 2010-2011, Kaori Hagihara
|
|
* 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 "metadata_manager.h"
|
|
#include "opj_inttypes.h"
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <limits.h>
|
|
#include <assert.h>
|
|
|
|
#ifdef SERVER
|
|
#include "fcgi_stdio.h"
|
|
#define logstream FCGI_stdout
|
|
#else
|
|
#define FCGI_stdout stdout
|
|
#define FCGI_stderr stderr
|
|
#define logstream stderr
|
|
#endif /*SERVER*/
|
|
|
|
|
|
metadatalist_param_t * gene_metadatalist(void)
|
|
{
|
|
metadatalist_param_t *list;
|
|
|
|
list = (metadatalist_param_t *)malloc( sizeof(metadatalist_param_t));
|
|
|
|
list->first = NULL;
|
|
list->last = NULL;
|
|
|
|
return list;
|
|
}
|
|
|
|
metadatalist_param_t * const_metadatalist( int fd)
|
|
{
|
|
metadatalist_param_t *metadatalist;
|
|
metadata_param_t *metabin;
|
|
boxlist_param_t *toplev_boxlist;
|
|
box_param_t *box, *next;
|
|
placeholderlist_param_t *phldlist;
|
|
placeholder_param_t *phld;
|
|
Byte8_t idx;
|
|
Byte8_t filesize;
|
|
|
|
if(!(filesize = (Byte8_t)get_filesize( fd)))
|
|
return NULL;
|
|
|
|
if( !(toplev_boxlist = get_boxstructure( fd, 0, filesize))){
|
|
fprintf( FCGI_stderr, "Error: Not correctl JP2 format\n");
|
|
return NULL;
|
|
}
|
|
|
|
phldlist = gene_placeholderlist();
|
|
metadatalist = gene_metadatalist();
|
|
|
|
box = toplev_boxlist->first;
|
|
idx = 0;
|
|
while( box){
|
|
next = box->next;
|
|
if( strncmp( box->type, "jP ",4)!=0 && strncmp( box->type, "ftyp",4)!=0 && strncmp( box->type, "jp2h",4)!=0){
|
|
boxlist_param_t *boxlist = NULL;
|
|
boxcontents_param_t *boxcontents = NULL;
|
|
|
|
phld = gene_placeholder( box, ++idx);
|
|
insert_placeholder_into_list( phld, phldlist);
|
|
|
|
boxlist = get_boxstructure( box->fd, get_DBoxoff( box), get_DBoxlen(box));
|
|
if( !boxlist)
|
|
boxcontents = gene_boxcontents( get_DBoxoff( box), get_DBoxlen(box));
|
|
|
|
delete_box_in_list( &box, toplev_boxlist);
|
|
metabin = gene_metadata( idx, boxlist, NULL, boxcontents);
|
|
insert_metadata_into_list( metabin, metadatalist);
|
|
}
|
|
box = next;
|
|
}
|
|
|
|
metabin = gene_metadata( 0, toplev_boxlist, phldlist, NULL);
|
|
insert_metadata_into_list( metabin, metadatalist);
|
|
|
|
return metadatalist;
|
|
}
|
|
|
|
void delete_metadatalist( metadatalist_param_t **list)
|
|
{
|
|
metadata_param_t *ptr, *next;
|
|
|
|
ptr = (*list)->first;
|
|
|
|
while( ptr != NULL){
|
|
next=ptr->next;
|
|
delete_metadata( &ptr);
|
|
ptr=next;
|
|
}
|
|
free( *list);
|
|
}
|
|
|
|
metadata_param_t * gene_metadata( Byte8_t idx, boxlist_param_t *boxlist, placeholderlist_param_t *phldlist, boxcontents_param_t *boxcontents)
|
|
{
|
|
metadata_param_t *bin;
|
|
|
|
bin = (metadata_param_t *)malloc( sizeof(metadata_param_t));
|
|
bin->idx = idx;
|
|
bin->boxlist = boxlist;
|
|
bin->placeholderlist = phldlist;
|
|
bin->boxcontents = boxcontents;
|
|
bin->next = NULL;
|
|
|
|
return bin;
|
|
}
|
|
|
|
void delete_metadata( metadata_param_t **metadata)
|
|
{
|
|
delete_boxlist( &((*metadata)->boxlist));
|
|
delete_placeholderlist( &((*metadata)->placeholderlist));
|
|
if((*metadata)->boxcontents)
|
|
free((*metadata)->boxcontents);
|
|
#ifndef SERVER
|
|
/* fprintf( logstream, "local log: Metadata-bin: %d deleted\n", (*metadata)->idx);*/
|
|
#endif
|
|
free( *metadata);
|
|
}
|
|
|
|
void insert_metadata_into_list( metadata_param_t *metabin, metadatalist_param_t *metadatalist)
|
|
{
|
|
if( metadatalist->first)
|
|
metadatalist->last->next = metabin;
|
|
else
|
|
metadatalist->first = metabin;
|
|
metadatalist->last = metabin;
|
|
}
|
|
|
|
void print_metadata( metadata_param_t *metadata)
|
|
{
|
|
boxcontents_param_t *boxcont;
|
|
fprintf( logstream, "metadata-bin %" PRIu64 " info:\n", metadata->idx);
|
|
print_allbox( metadata->boxlist);
|
|
print_allplaceholder( metadata->placeholderlist);
|
|
|
|
boxcont = metadata->boxcontents;
|
|
if( boxcont)
|
|
fprintf( logstream, "box contents:\n"
|
|
"\t offset: %" PRId64 " %#" PRIx64 "\n"
|
|
"\t length: %" PRId64 " %#" PRIx64 "\n", boxcont->offset,
|
|
boxcont->offset, boxcont->length, boxcont->length);
|
|
}
|
|
|
|
void print_allmetadata( metadatalist_param_t *list)
|
|
{
|
|
metadata_param_t *ptr;
|
|
|
|
fprintf( logstream, "all metadata info: \n");
|
|
ptr = list->first;
|
|
while( ptr != NULL){
|
|
print_metadata( ptr);
|
|
ptr=ptr->next;
|
|
}
|
|
}
|
|
|
|
boxcontents_param_t * gene_boxcontents( OPJ_OFF_T offset, OPJ_SIZE_T length)
|
|
{
|
|
boxcontents_param_t *contents;
|
|
|
|
contents = (boxcontents_param_t *)malloc( sizeof(boxcontents_param_t));
|
|
|
|
contents->offset = offset;
|
|
contents->length = length;
|
|
|
|
return contents;
|
|
}
|
|
|
|
metadata_param_t * search_metadata( Byte8_t idx, metadatalist_param_t *list)
|
|
{
|
|
metadata_param_t *found;
|
|
|
|
found = list->first;
|
|
|
|
while( found){
|
|
|
|
if( found->idx == idx)
|
|
return found;
|
|
|
|
found = found->next;
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
Byte8_t search_metadataidx( char boxtype[4], metadatalist_param_t *list)
|
|
{
|
|
/* MM FIXME: what is the return type of this function ?
|
|
Byte8_t or int ? */
|
|
metadata_param_t *ptr;
|
|
int i;
|
|
|
|
for( i=0; i<4; i++)
|
|
if( boxtype[i] == '_')
|
|
boxtype[i] = ' ';
|
|
|
|
ptr = list->first;
|
|
while( ptr){
|
|
if( ptr->boxlist){
|
|
box_param_t *box = ptr->boxlist->first;
|
|
while( box){
|
|
if( strncmp ( boxtype, box->type, 4) == 0)
|
|
return ptr->idx;
|
|
box = box->next;
|
|
}
|
|
}
|
|
ptr = ptr->next;
|
|
}
|
|
|
|
ptr = list->first;
|
|
while( ptr){
|
|
if( ptr->placeholderlist){
|
|
placeholder_param_t *phld = ptr->placeholderlist->first;
|
|
while( phld){
|
|
if( strncmp ( boxtype, (char *)phld->OrigBH+4, 4) == 0){
|
|
return phld->OrigID;
|
|
}
|
|
phld = phld->next;
|
|
}
|
|
}
|
|
ptr = ptr->next;
|
|
}
|
|
return (Byte8_t)-1;
|
|
}
|