encode_accessors.c 6.83 KB
Newer Older
1 2 3 4
/**
 * @file encode_accessors.c
 *
 * @section LICENSE
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
5
 * Copyright 2012 - 2017
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
#include <stdint.h>
53
#include <string.h>
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
54 55 56
#include "libaec.h"
#include "encode.h"
#include "encode_accessors.h"
57

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

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

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

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

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

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
84
uint32_t aec_get_lsb_24(struct aec_stream *strm)
85
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
86
    uint32_t data = ((uint32_t)strm->next_in[2] << 16)
87 88 89 90 91 92 93 94
        | ((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
95
uint32_t aec_get_msb_24(struct aec_stream *strm)
96
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
97
    uint32_t data = ((uint32_t)strm->next_in[0] << 16)
98 99 100 101 102 103 104 105
        | ((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
106
uint32_t aec_get_lsb_32(struct aec_stream *strm)
107
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
108
    uint32_t data = ((uint32_t)strm->next_in[3] << 24)
109 110 111 112 113 114 115 116 117
        | ((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
118
uint32_t aec_get_msb_32(struct aec_stream *strm)
119
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
120
    uint32_t data = ((uint32_t)strm->next_in[0] << 24)
121 122 123 124 125 126 127 128 129
        | ((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
130
void aec_get_rsi_8(struct aec_stream *strm)
131
{
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
132 133
    uint32_t *restrict out = strm->state->data_raw;
    unsigned const char *restrict in = strm->next_in;
134 135
    int rsi = strm->rsi * strm->block_size;

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
136
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
137 138
        out[i] = (uint32_t)in[i];

139 140 141
    strm->next_in += rsi;
    strm->avail_in -= rsi;
}
142

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

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

152 153 154 155
    strm->next_in += 2 * rsi;
    strm->avail_in -= 2 * rsi;
}

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

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

165 166 167 168
    strm->next_in += 2 * rsi;
    strm->avail_in -= 2 * rsi;
}

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

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

180 181 182
    strm->next_in += 3 * rsi;
    strm->avail_in -= 3 * rsi;
}
183

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

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

195 196 197
    strm->next_in += 3 * rsi;
    strm->avail_in -= 3 * rsi;
}
198

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

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

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
216
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
217 218 219 220 221
        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);

222 223 224
    strm->next_in += 4 * rsi;
    strm->avail_in -= 4 * rsi;
}
225

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
226
AEC_GET_RSI_NATIVE_32(msb);
227

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

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

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
238
    for (int i = 0; i < rsi; i++)
Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
239 240 241 242
        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];
243
}
244

Mathis Rosenhauer's avatar
Mathis Rosenhauer committed
245
AEC_GET_RSI_NATIVE_32(lsb)
246

247
#endif /* !WORDS_BIGENDIAN */