src/lib/openjpip/byte_manager.c

   1 /*
   2  * $Id$
   3  *
   4  * Copyright (c) 2002-2014, Universite catholique de Louvain (UCL), Belgium
   5  * Copyright (c) 2002-2014, Professor Benoit Macq
   6  * Copyright (c) 2010-2011, Kaori Hagihara
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  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.
  17  *
  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.
  29  */
  30
  31 #include <stdio.h>
  32 #ifdef _WIN32
  33 #include <io.h>
  34 #else
  35 #include <sys/types.h>
  36 #include <unistd.h>
  37 #endif
  38 #include <stdlib.h>
  39 #include <sys/stat.h>
  40 #include "byte_manager.h"
  41
  42 #ifdef SERVER
  43 #include "fcgi_stdio.h"
  44 #define logstream FCGI_stdout
  45 #else
  46 #define FCGI_stdout stdout
  47 #define FCGI_stderr stderr
  48 #define logstream stderr
  49 #endif /*SERVER*/
  50
  51
  52 Byte_t * fetch_bytes( int fd, OPJ_OFF_T offset, OPJ_SIZE_T size)
  53 {
  54   Byte_t *data;
  55
  56   if( lseek( fd, offset, SEEK_SET)==-1){
  57     fprintf( FCGI_stdout, "Reason: Target broken (fseek error)\r\n");
  58     fprintf( FCGI_stderr, "Error: error in fetch_bytes( %d, %ld, %lu)\n", fd, offset, size);
  59     return NULL;
  60   }
  61
  62   data = (Byte_t *)malloc( size);
  63
  64   if( (OPJ_SIZE_T)read( fd, data, size) != size){
  65     free( data);
  66     fprintf( FCGI_stdout, "Reason: Target broken (read error)\r\n");
  67     fprintf( FCGI_stderr, "Error: error in fetch_bytes( %d, %ld, %lu)\n", fd, offset, size);
  68     return NULL;
  69   }
  70   return data;
  71 }
  72
  73 Byte_t fetch_1byte( int fd, OPJ_OFF_T offset)
  74 {
  75   Byte_t code;
  76
  77   if( lseek( fd, offset, SEEK_SET)==-1){
  78     fprintf( FCGI_stdout, "Reason: Target broken (seek error)\r\n");
  79     fprintf( FCGI_stderr, "Error: error in fetch_1byte( %d, %ld)\n", fd, offset);
  80     return 0;
  81   }
  82
  83   if( read( fd, &code, 1) != 1){
  84     fprintf( FCGI_stdout, "Reason: Target broken (read error)\r\n");
  85     fprintf( FCGI_stderr, "Error: error in fetch_bytes( %d, %ld)\n", fd, offset);
  86     return 0;
  87   }
  88   return code;
  89 }
  90
  91 Byte2_t fetch_2bytebigendian( int fd, OPJ_OFF_T offset)
  92 {
  93   Byte_t *data;
  94   Byte2_t code;
  95
  96   if(!(data = fetch_bytes( fd, offset, 2))){
  97     fprintf( FCGI_stderr, "Error: error in fetch_2bytebigendian( %d, %ld)\n", fd, offset);
  98     return 0;
  99   }
 100   code = big2(data);
 101   free( data);
 102
 103   return code;
 104 }
 105
 106 Byte4_t fetch_4bytebigendian( int fd, OPJ_OFF_T offset)
 107 {
 108   Byte_t *data;
 109   Byte4_t code;
 110
 111   if(!(data = fetch_bytes( fd, offset, 4))){
 112     fprintf( FCGI_stderr, "Error: error in fetch_4bytebigendian( %d, %ld)\n", fd, offset);
 113     return 0;
 114   }
 115   code = big4(data);
 116   free( data);
 117
 118   return code;
 119 }
 120
 121 Byte8_t fetch_8bytebigendian( int fd, OPJ_OFF_T offset)
 122 {
 123   Byte_t *data;
 124   Byte8_t code;
 125
 126   if(!(data = fetch_bytes( fd, offset, 8))){
 127     fprintf( FCGI_stderr, "Error: error in fetch_8bytebigendian( %d, %ld)\n", fd, offset);
 128     return 0;
 129   }
 130   code = big8(data);
 131   free( data);
 132
 133   return code;
 134 }
 135
 136
 137 Byte2_t big2( Byte_t *buf)
 138 {
 139   return (Byte2_t)((((Byte2_t) buf[0]) << 8) + ((Byte2_t) buf[1]));
 140 }
 141
 142 Byte4_t big4( Byte_t *buf)
 143 {
 144   return (((((((Byte4_t) buf[0]) << 8) + ((Byte4_t) buf[1])) << 8)
 145            + ((Byte4_t) buf[2])) << 8) + ((Byte4_t) buf[3]);
 146 }
 147
 148 Byte8_t big8( Byte_t *buf)
 149 {
 150   return (((Byte8_t) big4 (buf)) << 32)
 151         + ((Byte8_t) big4 (buf + 4));
 152 }
 153
 154 void modify_4Bytecode( Byte4_t code, Byte_t *stream)
 155 {
 156   *stream     = (Byte_t) ((Byte4_t)(code & 0xff000000) >> 24);
 157   *(stream+1) = (Byte_t) ((Byte4_t)(code & 0x00ff0000) >> 16);
 158   *(stream+2) = (Byte_t) ((Byte4_t)(code & 0x0000ff00) >> 8);
 159   *(stream+3) = (Byte_t) (code & 0x000000ff);
 160 }
 161
 162 OPJ_OFF_T get_filesize( int fd)
 163 {
 164   struct stat sb;
 165
 166   if( fstat( fd, &sb) == -1){
 167     fprintf( FCGI_stdout, "Reason: Target broken (fstat error)\r\n");
 168     fprintf( FCGI_stderr, "Error: error in get_filesize( %d)\n", fd);
 169     return 0;
 170   }
 171   return sb.st_size;
 172 }