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, *cio_end, *cio_bp;
  31
  32 extern jmp_buf j2k_error;
  33
  34 /* <summary> */
  35 /* Number of bytes written. */
  36 /* </summary> */
  37 int cio_numbytes()
  38 {
  39         return cio_bp - cio_start;
  40 }
  41
  42 /* <summary> */
  43 /* Get position in byte stream. */
  44 /* </summary> */
  45 int cio_tell()
  46 {
  47         return cio_bp - cio_start;
  48 }
  49
  50 /* <summary> */
  51 /* Set position in byte stream. */
  52 /* </summary> */
  53 void cio_seek(int pos)
  54 {
  55         cio_bp = cio_start + pos;
  56 }
  57
  58 /* <summary> */
  59 /* Number of bytes left before the end of the stream. */
  60 /* </summary> */
  61 int cio_numbytesleft()
  62 {
  63         return cio_end - cio_bp;
  64 }
  65
  66 /* <summary> */
  67 /* Get pointer to the current position in the stream. */
  68 /* </summary> */
  69 unsigned char *cio_getbp()
  70 {
  71         return cio_bp;
  72 }
  73
  74 /* <summary> */
  75 /* Initialize byte IO. */
  76 /* </summary> */
  77 void cio_init(unsigned char *bp, int len)
  78 {
  79         cio_start = bp;
  80         cio_end = bp + len;
  81         cio_bp = bp;
  82 }
  83
  84 /* <summary> */
  85 /* Write a byte. */
  86 /* </summary> */
  87 void cio_byteout(unsigned char v)
  88 {
  89         if (cio_bp >= cio_end)
  90                 longjmp(j2k_error, 1);
  91         *cio_bp++ = v;
  92
  93 }
  94
  95 /* <summary> */
  96 /* Read a byte. */
  97 /* </summary> */
  98 unsigned char cio_bytein()
  99 {
 100         if (cio_bp >= cio_end)
 101                 longjmp(j2k_error, 1);
 102         return *cio_bp++;
 103 }
 104
 105 /* <summary> */
 106 /* Write a byte. */
 107 /* </summary> */
 108 void cio_write(unsigned int v, int n)
 109 {
 110         int i;
 111         for (i = n - 1; i >= 0; i--) {
 112                 cio_byteout((unsigned char) ((v >> (i << 3)) & 0xff));
 113         }
 114 }
 115
 116 /* <summary> */
 117 /* Read some bytes. */
 118 /* </summary> */
 119 unsigned int cio_read(int n)
 120 {
 121         int i;
 122         unsigned int v;
 123         v = 0;
 124         for (i = n - 1; i >= 0; i--) {
 125                 v += cio_bytein() << (i << 3);
 126         }
 127         return v;
 128 }
 129
 130 /* <summary> */
 131 /* Write some bytes. */
 132 /* </summary> */
 133 void cio_skip(int n)
 134 {
 135         cio_bp += n;
 136 }