libopenjpeg/cio.c

   1 /*
   2  * Copyright (c) 2001-2002, David Janssens
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
  15  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  18  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  19  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  20  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  21  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  22  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  23  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  24  * POSSIBILITY OF SUCH DAMAGE.
  25  */
  26
  27 #include "cio.h"
  28 #include <setjmp.h>
  29
  30 static unsigned char *cio_start;        /* pointer to the start of the stream */
  31 static unsigned char *cio_end;  /* pointer to the end of the stream */
  32 static unsigned char *cio_bp;   /* pointer to the present position */
  33
  34 extern jmp_buf j2k_error;
  35
  36 /*
  37  * Number of bytes written.
  38  */
  39 int cio_numbytes()
  40 {
  41     return cio_bp - cio_start;
  42 }
  43
  44 /*
  45  * Get position in byte stream.
  46  */
  47 int cio_tell()
  48 {
  49     return cio_bp - cio_start;
  50 }
  51
  52 /*
  53  * Set position in byte stream.
  54  *
  55  * pos : position, in number of bytes, from the beginning of the stream
  56  */
  57 void cio_seek(int pos)
  58 {
  59     cio_bp = cio_start + pos;
  60 }
  61
  62 /*
  63  * Number of bytes left before the end of the stream.
  64  */
  65 int cio_numbytesleft()
  66 {
  67     return cio_end - cio_bp;
  68 }
  69
  70 /*
  71  * Get pointer to the current position in the stream.
  72  */
  73 unsigned char *cio_getbp()
  74 {
  75     return cio_bp;
  76 }
  77
  78 /*
  79  * Initialize byte IO
  80  *
  81  * bp  : destination/source stream
  82  * len : length of the stream
  83  */
  84 void cio_init(unsigned char *bp, int len)
  85 {
  86     cio_start = bp;
  87     cio_end = bp + len;
  88     cio_bp = bp;
  89 }
  90
  91 /*
  92  * Write a byte.
  93  */
  94 void cio_byteout(unsigned char v)
  95 {
  96     if (cio_bp >= cio_end)
  97         longjmp(j2k_error, 1);
  98     *cio_bp++ = v;
  99
 100 }
 101
 102 /*
 103  * Read a byte.
 104  */
 105 unsigned char cio_bytein()
 106 {
 107     if (cio_bp >= cio_end)
 108         longjmp(j2k_error, 1);
 109     return *cio_bp++;
 110 }
 111
 112 /*
 113  * Write some bytes.
 114  *
 115  * v : value to write
 116  * n : number of bytes to write
 117  */
 118 void cio_write(unsigned int v, int n)
 119 {
 120     int i;
 121     for (i = n - 1; i >= 0; i--) {
 122         cio_byteout((unsigned char) ((v >> (i << 3)) & 0xff));
 123     }
 124 }
 125
 126 /*
 127  * Read some bytes.
 128  *
 129  * n : number of bytes to read
 130  *
 131  * return : value of the n bytes read
 132  */
 133 unsigned int cio_read(int n)
 134 {
 135     int i;
 136     unsigned int v;
 137     v = 0;
 138     for (i = n - 1; i >= 0; i--) {
 139         v += cio_bytein() << (i << 3);
 140     }
 141     return v;
 142 }
 143
 144 /*
 145  * Skip some bytes.
 146  *
 147  * n : number of bytes to skip
 148  */
 149 void cio_skip(int n)
 150 {
 151     cio_bp += n;
 152 }