~ubuntu-branches/ubuntu/raring/png23d/raring

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
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
/* bitmap.c
 *
 * Copyright 2011 Vincent Sanders <vince@kyllikki.org>
 *
 * Licenced under the MIT License,
 *                http://www.opensource.org/licenses/mit-license.php
 *
 * This file is part of png23d. 
 * 
 * png to bitmap conversion
 */

#include <stdbool.h>
#include <stdint.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>

#include <png.h>

#include "bitmap.h"

bitmap *
create_bitmap(const char *filename)
{
    unsigned int hdr_len = 8;
    FILE *fp; /* input file pointer */
    png_byte header[hdr_len]; /* input firl header bytes to check it is a png */
    int bit_depth;
    int color_type;
    int interlace_method;
    int compression_method;
    int filter_method;
    png_uint_32 width;
    png_uint_32 height;
    int channels;
    png_structp png_ptr; /* png read context */
    png_infop info_ptr;/* png information before decode */
    png_infop end_info; /* png info after decode */
    png_bytep *row_pointers; /* storage for row pointers */
    unsigned int row_loop; /* loop to initialise row pointers */
    bitmap *bm = NULL;


    if (strcmp(filename, "-") == 0) {
        fp = fdopen(dup(STDIN_FILENO), "rb");
    } else {
        fp = fopen(filename, "rb");
    }
    if (!fp) {
        return bm;
    }

    if (fread(header, 1, hdr_len, fp) != hdr_len) {
        fclose(fp);
        return bm;
    }

    if (png_sig_cmp(header, 0, hdr_len) != 0) {
        fclose(fp);
        return bm;
    }

    png_ptr = png_create_read_struct(PNG_LIBPNG_VER_STRING, NULL, NULL, NULL);
    if (!png_ptr) {
        fclose(fp);
        return bm;
    }

    info_ptr = png_create_info_struct(png_ptr);
    if (!info_ptr)  {
        png_destroy_read_struct(&png_ptr, (png_infopp)NULL, (png_infopp)NULL);
        fclose(fp);
        return bm;
    }

    end_info = png_create_info_struct(png_ptr);
    if (!end_info) {
        png_destroy_read_struct(&png_ptr, &info_ptr, (png_infopp)NULL);
        fclose(fp);
        return bm;
    }

    if (setjmp(png_jmpbuf(png_ptr))) {
        goto create_bitmap_error;
    }

    png_init_io(png_ptr, fp);

    png_set_sig_bytes(png_ptr, hdr_len);

    png_read_info(png_ptr, info_ptr);


    png_get_IHDR(png_ptr, info_ptr, &width, &height,
                 &bit_depth, &color_type, &interlace_method,
                 &compression_method, &filter_method);

    /* set up input filtering */
    if (color_type == PNG_COLOR_TYPE_PALETTE)
        png_set_palette_to_rgb(png_ptr);

    if (color_type == PNG_COLOR_TYPE_GRAY &&
        bit_depth < 8) png_set_expand_gray_1_2_4_to_8(png_ptr);

    if (bit_depth == 16)
        png_set_strip_16(png_ptr);

    if (color_type & PNG_COLOR_MASK_ALPHA)
        png_set_strip_alpha(png_ptr);

    if (color_type == PNG_COLOR_TYPE_RGB ||
        color_type == PNG_COLOR_TYPE_RGB_ALPHA ||
        color_type == PNG_COLOR_TYPE_PALETTE)
        png_set_rgb_to_gray_fixed(png_ptr, 1, -1, -1);

    png_read_update_info(png_ptr, info_ptr);

    /* check filters result in single 8bit channel */
    channels = png_get_channels(png_ptr, info_ptr);

    if (channels != 1) {
        goto create_bitmap_error;
    }
    
    bm = calloc(1, sizeof(bitmap));
    if (bm == NULL) {
        goto create_bitmap_error;
    }

    bm->data = malloc(width *height);
    if (bm->data != NULL) {
        row_pointers = malloc(sizeof(png_bytep) * height);
        if (row_pointers != NULL) {
            bm->width = width;
            bm->height = height;

            for (row_loop = 0; row_loop < height; row_loop++) {
                *(row_pointers + row_loop) = bm->data + (row_loop * width);
            }

            png_read_image(png_ptr, row_pointers);
    
            png_read_end(png_ptr, end_info);

            free(row_pointers);
        } else {
            free(bm->data);
            free(bm);
            bm = NULL;
        }
    }

create_bitmap_error:

    png_destroy_read_struct(&png_ptr, &info_ptr, &end_info);

    fclose(fp);

    return bm;
}

void
free_bitmap(bitmap *bm)
{
    free(bm->data);
    free(bm);
}