encode_accessors.c 6.86 KB
Newer Older
1 2 3 4
/**
 * @file encode_accessors.c
 *
 * @section LICENSE
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
5
 * Copyright 2012 - 2016
6
 *
7 8 9 10
 * Mathis Rosenhauer, Moritz Hanke, Joerg Behrens
 * Deutsches Klimarechenzentrum GmbH
 * Bundesstr. 45a
 * 20146 Hamburg Germany
11
 *
12 13 14 15 16
 * Luis Kornblueh
 * Max-Planck-Institut fuer Meteorologie
 * Bundesstr. 53
 * 20146 Hamburg
 * Germany
17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49
 *
 * 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 HOLDER 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.
 *
 * @section DESCRIPTION
 *
 * Read various data types from input stream
 *
 */

50
#include <config.h>
51 52 53 54 55

#if HAVE_STDINT_H
# include <stdint.h>
#endif

56
#include <string.h>
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
57 58 59
#include "libaec.h"
#include "encode.h"
#include "encode_accessors.h"
60

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
61
uint32_t aec_get_8(struct aec_stream *strm)
62 63 64 65 66
{
    strm->avail_in--;
    return *strm->next_in++;
}

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
67
uint32_t aec_get_lsb_16(struct aec_stream *strm)
68
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
69
    uint32_t data = ((uint32_t)strm->next_in[1] << 8)
70 71 72 73 74 75 76
        | (uint32_t)strm->next_in[0];

    strm->next_in += 2;
    strm->avail_in -= 2;
    return data;
}

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
77
uint32_t aec_get_msb_16(struct aec_stream *strm)
78
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
79
    uint32_t data = ((uint32_t)strm->next_in[0] << 8)
80 81 82 83 84 85 86
        | (uint32_t)strm->next_in[1];

    strm->next_in += 2;
    strm->avail_in -= 2;
    return data;
}

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
87
uint32_t aec_get_lsb_24(struct aec_stream *strm)
88
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
89
    uint32_t data = ((uint32_t)strm->next_in[2] << 16)
90 91 92 93 94 95 96 97
        | ((uint32_t)strm->next_in[1] << 8)
        | (uint32_t)strm->next_in[0];

    strm->next_in += 3;
    strm->avail_in -= 3;
    return data;
}

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
98
uint32_t aec_get_msb_24(struct aec_stream *strm)
99
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
100
    uint32_t data = ((uint32_t)strm->next_in[0] << 16)
101 102 103 104 105 106 107 108
        | ((uint32_t)strm->next_in[1] << 8)
        | (uint32_t)strm->next_in[2];

    strm->next_in += 3;
    strm->avail_in -= 3;
    return data;
}

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
109
uint32_t aec_get_lsb_32(struct aec_stream *strm)
110
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
111
    uint32_t data = ((uint32_t)strm->next_in[3] << 24)
112 113 114 115 116 117 118 119 120
        | ((uint32_t)strm->next_in[2] << 16)
        | ((uint32_t)strm->next_in[1] << 8)
        | (uint32_t)strm->next_in[0];

    strm->next_in += 4;
    strm->avail_in -= 4;
    return data;
}

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
121
uint32_t aec_get_msb_32(struct aec_stream *strm)
122
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
123
    uint32_t data = ((uint32_t)strm->next_in[0] << 24)
124 125 126 127 128 129 130 131 132
        | ((uint32_t)strm->next_in[1] << 16)
        | ((uint32_t)strm->next_in[2] << 8)
        | (uint32_t)strm->next_in[3];

    strm->next_in += 4;
    strm->avail_in -= 4;
    return data;
}

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
133
void aec_get_rsi_8(struct aec_stream *strm)
134
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
135 136
    uint32_t *restrict out = strm->state->data_raw;
    unsigned const char *restrict in = strm->next_in;
137 138
    int rsi = strm->rsi * strm->block_size;

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
139
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
140 141
        out[i] = (uint32_t)in[i];

142 143 144
    strm->next_in += rsi;
    strm->avail_in -= rsi;
}
145

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
146
void aec_get_rsi_lsb_16(struct aec_stream *strm)
147
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
148 149
    uint32_t *restrict out = strm->state->data_raw;
    const unsigned char *restrict in = strm->next_in;
150 151
    int rsi = strm->rsi * strm->block_size;

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
152
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
153 154
        out[i] = (uint32_t)in[2 * i] | ((uint32_t)in[2 * i + 1] << 8);

155 156 157 158
    strm->next_in += 2 * rsi;
    strm->avail_in -= 2 * rsi;
}

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
159
void aec_get_rsi_msb_16(struct aec_stream *strm)
160
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
161 162
    uint32_t *restrict out = strm->state->data_raw;
    const unsigned char *restrict in = strm->next_in;
163 164
    int rsi = strm->rsi * strm->block_size;

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
165
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
166 167
        out[i] = ((uint32_t)in[2 * i] << 8) | (uint32_t)in[2 * i + 1];

168 169 170 171
    strm->next_in += 2 * rsi;
    strm->avail_in -= 2 * rsi;
}

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
172
void aec_get_rsi_lsb_24(struct aec_stream *strm)
173
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
174 175
    uint32_t *restrict out = strm->state->data_raw;
    const unsigned char *restrict in = strm->next_in;
176 177
    int rsi = strm->rsi * strm->block_size;

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
178
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
179 180 181 182
        out[i] = (uint32_t)in[3 * i]
            | ((uint32_t)in[3 * i + 1] << 8)
            | ((uint32_t)in[3 * i + 2] << 16);

183 184 185
    strm->next_in += 3 * rsi;
    strm->avail_in -= 3 * rsi;
}
186

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
187
void aec_get_rsi_msb_24(struct aec_stream *strm)
188
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
189 190
    uint32_t *restrict out = strm->state->data_raw;
    const unsigned char *restrict in = strm->next_in;
191 192
    int rsi = strm->rsi * strm->block_size;

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
193
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
194 195 196 197
        out[i] = ((uint32_t)in[3 * i] << 16)
            | ((uint32_t)in[3 * i + 1] << 8)
            | (uint32_t)in[3 * i + 2];

198 199 200
    strm->next_in += 3 * rsi;
    strm->avail_in -= 3 * rsi;
}
201

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
202 203
#define AEC_GET_RSI_NATIVE_32(BO)                       \
    void aec_get_rsi_##BO##_32(struct aec_stream *strm) \
204 205
    {                                               \
        int rsi = strm->rsi * strm->block_size;     \
206
        memcpy(strm->state->data_raw,               \
207 208 209
               strm->next_in, 4 * rsi);             \
        strm->next_in += 4 * rsi;                   \
        strm->avail_in -= 4 * rsi;                  \
210 211
    }

212
#ifdef WORDS_BIGENDIAN
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
213
void aec_get_rsi_lsb_32(struct aec_stream *strm)
214
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
215 216
    uint32_t *restrict out = strm->state->data_raw;
    const unsigned char *restrict in = strm->next_in;
217 218
    int rsi = strm->rsi * strm->block_size;

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
219
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
220 221 222 223 224
        out[i] = (uint32_t)in[4 * i]
            | ((uint32_t)in[4 * i + 1] << 8)
            | ((uint32_t)in[4 * i + 2] << 16)
            | ((uint32_t)in[4 * i + 3] << 24);

225 226 227
    strm->next_in += 4 * rsi;
    strm->avail_in -= 4 * rsi;
}
228

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
229
AEC_GET_RSI_NATIVE_32(msb);
230

231
#else /* !WORDS_BIGENDIAN */
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
232
void aec_get_rsi_msb_32(struct aec_stream *strm)
233
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
234 235
    uint32_t *restrict out = strm->state->data_raw;
    const unsigned char *restrict in = strm->next_in;
236 237 238 239 240
    int rsi = strm->rsi * strm->block_size;

    strm->next_in += 4 * rsi;
    strm->avail_in -= 4 * rsi;

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
241
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
242 243 244 245
        out[i] = ((uint32_t)in[4 * i] << 24)
            | ((uint32_t)in[4 * i + 1] << 16)
            | ((uint32_t)in[4 * i + 2] << 8)
            | (uint32_t)in[4 * i + 3];
246
}
247

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
248
AEC_GET_RSI_NATIVE_32(lsb)
249

250
#endif /* !WORDS_BIGENDIAN */