other/pamendian.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73

/*=============================================================================
                              pamendian
===============================================================================

  Reverse the endianness of multi-byte samples in a Netpbm stream.
  I.e. convert between the true format and the little endian variation of
  it.
=============================================================================*/

#include "pam.h"


static sample
reverseSample(sample       const insample,
              unsigned int const bytesPerSample) {
/*----------------------------------------------------------------------------
  Return a sample whose value is the least significant
  'bytesPerSample' bytes, in reverse order.
-----------------------------------------------------------------------------*/
    unsigned int bytePos;
    sample shiftedInsample;
    sample outsample;
    shiftedInsample = insample;  /* initial value */
    outsample = 0;  /* initial value */
    for (bytePos = 0; bytePos < bytesPerSample; ++bytePos) {
        outsample = outsample * 256 + (shiftedInsample & 0xff);
        shiftedInsample >>= 8;
    }
    return outsample;
}


int main(int argc, const char ** argv) {

    struct pam inpam, outpam;
    tuple * intuplerow;
    tuple * outtuplerow;
    unsigned int row;

    pm_proginit(&argc, argv);

    pnm_readpaminit(stdin, &inpam, PAM_STRUCT_SIZE(tuple_type));

    outpam = inpam;
    outpam.file = stdout;

    pnm_writepaminit(&outpam);

    intuplerow  = pnm_allocpamrow(&inpam);
    outtuplerow = pnm_allocpamrow(&outpam);

    for (row = 0; row < inpam.height; row++) {
        unsigned int col;
        pnm_readpamrow(&inpam, intuplerow);
        for (col = 0; col < inpam.width; col++) {
            unsigned int plane;
            for (plane = 0; plane < inpam.depth; plane++)
                outtuplerow[col][plane] =
                    reverseSample(intuplerow[col][plane],
                                  inpam.bytes_per_sample);
        }
        pnm_writepamrow(&outpam, outtuplerow);
    }

    pnm_freepamrow(outtuplerow);
    pnm_freepamrow(intuplerow);

    return 0;
}