4 * Copyright (c) 2002-2011, Communications and Remote Sensing Laboratory, Universite catholique de Louvain (UCL), Belgium
5 * Copyright (c) 2002-2011, Professor Benoit Macq
6 * Copyright (c) 2010-2011, Kaori Hagihara
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
19 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
22 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28 * POSSIBILITY OF SUCH DAMAGE.
33 #include "jpip_parser.h"
34 #include "channel_manager.h"
35 #include "byte_manager.h"
36 #include "auxtrans_manager.h"
39 #include "dec_clientmsg_handler.h"
40 #include "jpipstream_manager.h"
43 #include <sys/types.h>
47 #include "jp2k_encoder.h"
49 server_record_t * init_JPIPserver( int tcp_auxport, int udp_auxport)
51 server_record_t *record = (server_record_t *)malloc( sizeof(server_record_t));
53 record->sessionlist = gene_sessionlist();
54 record->targetlist = gene_targetlist();
55 record->auxtrans = init_aux_transport( tcp_auxport, udp_auxport);
60 void terminate_JPIPserver( server_record_t **rec)
62 delete_sessionlist( &(*rec)->sessionlist);
63 delete_targetlist( &(*rec)->targetlist);
64 close_aux_transport( (*rec)->auxtrans);
69 QR_t * parse_querystring( char *query_string)
73 qr = (QR_t *)malloc( sizeof(QR_t));
75 qr->query = parse_query( query_string);
82 bool process_JPIPrequest( server_record_t *rec, QR_t *qr)
84 target_param_t *target = NULL;
85 session_param_t *cursession = NULL;
86 channel_param_t *curchannel = NULL;
88 if( qr->query->target || qr->query->tid){
89 if( !identify_target( *(qr->query), rec->targetlist, &target))
94 if( !associate_channel( *(qr->query), rec->sessionlist, &cursession, &curchannel))
96 qr->channel = curchannel;
99 if( qr->query->cnew != non){
100 if( !open_channel( *(qr->query), rec->sessionlist, rec->auxtrans, target, &cursession, &curchannel))
102 qr->channel = curchannel;
105 if( qr->query->cclose)
106 if( !close_channel( *(qr->query), rec->sessionlist, &cursession, &curchannel))
109 if( (qr->query->fx > 0 && qr->query->fy > 0) || qr->query->box_type[0][0] != 0)
110 if( !gene_JPIPstream( *(qr->query), target, cursession, curchannel, &qr->msgqueue))
116 void add_EORmsg( int fd, QR_t *qr);
118 void send_responsedata( server_record_t *rec, QR_t *qr)
121 char tmpfname[] = "tmpjpipstream.jpp";
123 Byte8_t len_of_jpipstream;
125 if( (fd = open( tmpfname, O_RDWR|O_CREAT|O_EXCL, S_IRWXU)) == -1){
126 fprintf( FCGI_stderr, "file open error %s", tmpfname);
127 fprintf( FCGI_stdout, "Status: 503\r\n");
128 fprintf( FCGI_stdout, "Reason: Implementation failed\r\n");
132 recons_stream_from_msgqueue( qr->msgqueue, fd);
134 add_EORmsg( fd, qr); // needed at least for tcp and udp
136 len_of_jpipstream = get_filesize( fd);
137 jpipstream = fetch_bytes( fd, 0, len_of_jpipstream);
142 fprintf( FCGI_stdout, "\r\n");
145 if( qr->channel->aux == tcp || qr->channel->aux == udp){
146 send_responsedata_on_aux( qr->channel->aux==tcp, rec->auxtrans, qr->channel->cid, jpipstream, len_of_jpipstream, 1000); // 1KB per frame
150 if( fwrite( jpipstream, len_of_jpipstream, 1, FCGI_stdout) != 1)
151 fprintf( FCGI_stderr, "Error: failed to write jpipstream\n");
157 void add_EORmsg( int fd, QR_t *qr)
159 unsigned char EOR[3];
163 EOR[1] = is_allsent( *(qr->channel->cachemodel)) ? 0x01 : 0x02;
165 if( write( fd, EOR, 3) != 3)
166 fprintf( FCGI_stderr, "Error: failed to write EOR message\n");
170 void end_QRprocess( server_record_t *rec, QR_t **qr)
172 // TODO: record client preferences if necessary
174 delete_query( &((*qr)->query));
175 delete_msgqueue( &((*qr)->msgqueue));
179 void local_log( bool query, bool messages, bool sessions, bool targets, QR_t *qr, server_record_t *rec)
182 print_queryparam( *qr->query);
185 print_msgqueue( qr->msgqueue);
188 print_allsession( rec->sessionlist);
191 print_alltarget( rec->targetlist);
196 dec_server_record_t * init_dec_server( int port)
198 dec_server_record_t *record = (dec_server_record_t *)malloc( sizeof(dec_server_record_t));
200 record->cachelist = gene_cachelist();
201 record->jpipstream = NULL;
202 record->jpipstreamlen = 0;
203 record->msgqueue = gene_msgqueue( true, NULL);
204 record->listening_socket = open_listeningsocket( port);
209 void terminate_dec_server( dec_server_record_t **rec)
211 delete_cachelist( &(*rec)->cachelist);
212 free( (*rec)->jpipstream);
214 if( (*rec)->msgqueue)
215 delete_msgqueue( &((*rec)->msgqueue));
217 if( close_socket( (*rec)->listening_socket) != 0)
223 client_t accept_connection( dec_server_record_t *rec)
227 client = accept_socket( rec->listening_socket);
229 fprintf( stderr, "error: failed to connect to client\n");
234 bool handle_clientreq( client_t client, dec_server_record_t *rec)
237 msgtype_t msgtype = identify_clientmsg( client);
241 handle_JPIPstreamMSG( client, rec->cachelist, &rec->jpipstream, &rec->jpipstreamlen, rec->msgqueue);
245 handle_PNMreqMSG( client, rec->jpipstream, rec->msgqueue, rec->cachelist);
249 handle_XMLreqMSG( client, rec->jpipstream, rec->cachelist);
253 handle_TIDreqMSG( client, rec->cachelist);
257 handle_CIDreqMSG( client, rec->cachelist);
261 handle_dstCIDreqMSG( client, rec->cachelist);
265 handle_SIZreqMSG( client, rec->jpipstream, rec->msgqueue, rec->cachelist);
269 handle_JP2saveMSG( client, rec->cachelist, rec->msgqueue, rec->jpipstream);
274 save_codestream( rec->jpipstream, rec->jpipstreamlen, "jpt");
280 fprintf( stderr, "\t end of the connection\n\n");
281 if( close_socket(client) != 0){
293 jpip_dec_param_t * init_jpipdecoder( bool jp2)
295 jpip_dec_param_t *dec;
297 dec = (jpip_dec_param_t *)calloc( 1, sizeof(jpip_dec_param_t));
299 dec->msgqueue = gene_msgqueue( true, NULL);
302 dec->metadatalist = gene_metadatalist();
308 bool fread_jpip( char fname[], jpip_dec_param_t *dec)
312 if(( infd = open( fname, O_RDONLY)) == -1){
313 fprintf( stderr, "file %s not exist\n", fname);
317 if(!(dec->jpiplen = get_filesize(infd)))
320 dec->jpipstream = (Byte_t *)malloc( dec->jpiplen);
322 if( read( infd, dec->jpipstream, dec->jpiplen) != dec->jpiplen){
323 fprintf( stderr, "file reading error\n");
324 free( dec->jpipstream);
333 void decode_jpip( jpip_dec_param_t *dec)
335 parse_JPIPstream( dec->jpipstream, dec->jpiplen, 0, dec->msgqueue);
337 if( dec->metadatalist){ // JP2 encoding
338 parse_metamsg( dec->msgqueue, dec->jpipstream, dec->jpiplen, dec->metadatalist);
339 dec->ihdrbox = gene_ihdrbox( dec->metadatalist, dec->jpipstream);
341 dec->jp2kstream = recons_jp2( dec->msgqueue, dec->jpipstream, dec->msgqueue->first->csn, &dec->jp2klen);
344 // Notice: arguments fw, fh need to be set for LRCP, PCRL, CPRL
345 dec->jp2kstream = recons_j2k( dec->msgqueue, dec->jpipstream, dec->msgqueue->first->csn, 0, 0, &dec->jp2klen);
348 bool fwrite_jp2k( char fname[], jpip_dec_param_t *dec)
353 if(( outfd = open( fname, O_WRONLY|O_CREAT, _S_IREAD | _S_IWRITE)) == -1){
355 if(( outfd = open( fname, O_WRONLY|O_CREAT, S_IRWXU|S_IRWXG)) == -1){
357 fprintf( stderr, "file %s open error\n", fname);
361 if( write( outfd, dec->jp2kstream, dec->jp2klen) != dec->jp2klen)
362 fprintf( stderr, "j2k file write error\n");
369 void output_log( bool messages, bool metadata, bool ihdrbox, jpip_dec_param_t *dec)
372 print_msgqueue( dec->msgqueue);
375 print_allmetadata( dec->metadatalist);
378 printf("W*H: %d*%d\n", dec->ihdrbox->height, dec->ihdrbox->width);
379 printf("NC: %d, bpc: %d\n", dec->ihdrbox->nc, dec->ihdrbox->bpc);
383 void destroy_jpipdecoder( jpip_dec_param_t **dec)
385 free( (*dec)->jpipstream);
386 delete_msgqueue( &(*dec)->msgqueue);
387 if( (*dec)->metadatalist){
388 delete_metadatalist( &(*dec)->metadatalist);
389 free( (*dec)->ihdrbox);
392 free( (*dec)->jp2kstream);
396 index_t * get_index_from_JP2file( int fd)
400 // Check resource is a JP family file.
401 if( lseek( fd, 0, SEEK_SET)==-1){
402 fprintf( stderr, "Error: File broken (lseek error)\n");
406 data = (char *)malloc( 12); // size of header
407 if( read( fd, data, 12) != 12){
409 fprintf( stderr, "Error: File broken (read error)\n");
413 if( *data || *(data + 1) || *(data + 2) ||
414 *(data + 3) != 12 || strncmp (data + 4, "jP \r\n\x87\n", 8)){
416 fprintf( stderr, "Error: No JPEG 2000 Signature box in this file\n");
421 return parse_jp2file( fd);
424 void destroy_index( index_t **idx)
429 void output_index( index_t *index)
431 print_index( *index);