src/useful.c

   1 /* useful.c
   2  * Copyright (C) 1993-2021 Olly Betts
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  17  */
  18
  19 #ifdef HAVE_CONFIG_H
  20 # include <config.h>
  21 #endif
  22
  23 #include "useful.h"
  24 #include "osdepend.h"
  25
  26 #ifdef WORDS_BIGENDIAN
  27
  28 extern void
  29 useful_put16(int16_t word, FILE *fh)
  30 {
  31    uint16_t w = (uint16_t)word;
  32    PUTC((char)(w), fh);
  33    PUTC((char)(w >> 8l), fh);
  34 }
  35
  36 extern void
  37 useful_put32(int32_t word, FILE *fh)
  38 {
  39    uint32_t w = (uint32_t)word;
  40    PUTC((char)(w), fh);
  41    PUTC((char)(w >> 8l), fh);
  42    PUTC((char)(w >> 16l), fh);
  43    PUTC((char)(w >> 24l), fh);
  44 }
  45
  46 extern int16_t
  47 useful_get16(FILE *fh)
  48 {
  49    uint16_t w;
  50    w = GETC(fh);
  51    w |= (uint16_t)(GETC(fh) << 8l);
  52    return (int16_t)w;
  53 }
  54
  55 extern int32_t
  56 useful_get32(FILE *fh)
  57 {
  58    uint32_t w;
  59    w = GETC(fh);
  60    w |= (uint32_t)(GETC(fh) << 8l);
  61    w |= (uint32_t)(GETC(fh) << 16l);
  62    w |= (uint32_t)(GETC(fh) << 24l);
  63    return (int32_t)w;
  64 }
  65 #endif