2004/01/14 09:46:41
[org.ibex.core.git] / src / org / xwt / plat / GCJ.cc
1 // Copyright 2002 Adam Megacz, see the COPYING file for licensing [LGPL]
2
3 // Inclusions /////////////////////////////////////////////////////////
4
5 #include <gcj/cni.h>
6 #include <gcj/array.h>
7 extern "C" {
8
9 // hack for broken Solaris headers
10 #define _WCHAR_T
11
12 #include <stdlib.h>
13 #include <stdio.h>
14 #include <setjmp.h>
15 #include "jpeglib.h"
16 }
17 #include <org/xwt/Platform.h>
18 #include <org/xwt/Picture.h>
19 #include <org/xwt/plat/GCJ.h>
20 #include <java/io/InputStream.h>
21 #include <java/io/ByteArrayInputStream.h>
22 #include <java/lang/RuntimeException.h>
23 #include <org/xwt/plat/GCJ.h>
24 #include <org/xwt/util/Log.h>
25
26 #ifndef TRUE
27 #define TRUE 1
28 #endif
29 using org::xwt::util::Log;
30
31 #define TRUE 1
32
33 // builtin.xwar /////////////////////////////////////////////////////////
34
35 extern unsigned char builtin_bytes[];
36 extern int builtin_length;
37
38 java::io::InputStream* org::xwt::plat::GCJ::_getBuiltinInputStream() {
39     jbyteArray ret = JvNewByteArray(builtin_length);
40     memcpy(elements(ret), builtin_bytes, builtin_length);
41     return new java::io::ByteArrayInputStream(ret);
42 }
43
44
45
46 // JPEG ////////////////////////////////////////////////////////////////
47
48 typedef struct {
49     struct jpeg_source_mgr pub;
50     java::io::InputStream *is;
51     jbyteArray buf;
52 } my_source_mgr_t;
53
54 typedef struct {
55     struct jpeg_error_mgr pub;
56     jmp_buf setjmp_buffer;
57 } my_error_mgr_t;
58
59 static void error_exit (j_common_ptr cinfo) {
60     my_error_mgr_t *myerr = (my_error_mgr_t*) cinfo->err;
61     longjmp(myerr->setjmp_buffer,1);
62 }
63
64 static void term_source (j_decompress_ptr cinfo) { }
65 static void init_source (j_decompress_ptr cinfo) { }
66
67 boolean fill_input_buffer (j_decompress_ptr cinfo) {
68     my_source_mgr_t* src = (my_source_mgr_t*) cinfo->src;
69     JOCTET *p = (JOCTET*)elements(src->buf);
70     jint n;
71     try {
72         n = src->is->read(src->buf, 0, src->buf->length);
73     } catch(java::lang::Throwable *e) {
74         n = -1;
75     }
76     
77     src->pub.next_input_byte = p;
78     
79     if (n <= 0) {
80         // the JPEG library specifically suggests padding the end with EOF markers
81         p[0] = 0xff;
82         p[1] = JPEG_EOI;
83         src->pub.bytes_in_buffer = 2;
84     } else {
85         src->pub.bytes_in_buffer = n;
86     }
87     return 1;
88 }
89
90 void skip_input_data (j_decompress_ptr cinfo, long num_bytes) {
91     my_source_mgr_t* src = (my_source_mgr_t*) cinfo->src;
92     
93     if (num_bytes <= 0) return; 
94     
95     while (num_bytes > src->pub.bytes_in_buffer) {
96         num_bytes -= src->pub.bytes_in_buffer;
97         fill_input_buffer(cinfo);
98     }
99     src->pub.next_input_byte += num_bytes;
100     src->pub.bytes_in_buffer -= num_bytes;
101 }
102
103 void org::xwt::plat::GCJ::_decodeJPEG(java::io::InputStream* is, org::xwt::Picture* p) {
104     struct jpeg_decompress_struct cinfo;
105     my_error_mgr_t jerr;
106     my_source_mgr_t src;
107     
108     src.is = is;
109     src.buf = JvNewByteArray(16384);
110     
111     src.pub.init_source = init_source;
112     src.pub.fill_input_buffer = fill_input_buffer;
113     src.pub.skip_input_data = skip_input_data;
114     src.pub.resync_to_restart = jpeg_resync_to_restart;
115     src.pub.term_source = term_source;
116     src.pub.next_input_byte = NULL;
117     src.pub.bytes_in_buffer = 0;
118     
119     if (setjmp(jerr.setjmp_buffer)) {
120         // FEATURE - we should handle errors better than this
121         char msgbuf[JMSG_LENGTH_MAX];
122         (jerr.pub.format_message)((j_common_ptr)&cinfo, msgbuf);
123         Log::info(&GCJ::class$,JvNewStringLatin1(msgbuf));
124         jpeg_destroy_decompress(&cinfo);
125         return;
126     }
127   
128     jpeg_create_decompress(&cinfo);
129     
130     cinfo.src = &src.pub;
131     cinfo.err = jpeg_std_error(&jerr.pub);
132     jerr.pub.error_exit = error_exit;
133     
134     jpeg_read_header(&cinfo,TRUE);
135     jpeg_start_decompress(&cinfo);
136     
137     p->width = cinfo.output_width;
138     p->height = cinfo.output_height;
139     p->data = JvNewIntArray(p->width * p->height);
140     
141     while (cinfo.output_scanline < cinfo.output_height) {
142         JSAMPLE *dest = (JSAMPLE*) (elements(p->data) + cinfo.output_scanline * p->width);
143         jpeg_read_scanlines(&cinfo,&dest,1);
144     }
145     jpeg_finish_decompress(&cinfo);
146     jpeg_destroy_decompress(&cinfo);
147     
148     for(int i=0;i<p->data->length;i++)
149         elements(p->data)[i] |= 0xff000000; // alpha channel
150 }
151
152 // C++ new/delete operators (JvMalloc never fails)
153 void* operator new(size_t size) { return JvMalloc(size); }
154 void* operator new[](size_t size) { return JvMalloc(size);}
155 void operator delete(void *p) { JvFree(p); }
156 void operator delete[](void *p) { JvFree(p); }