re-added file
[swftools.git] / lib / devices / text.c
1 /* text.c
2
3    Part of the swftools package.
4
5    Copyright (c) 2006 Matthias Kramm <kramm@quiss.org> 
6  
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
20
21 #include <stdlib.h>
22 #include <stdio.h>
23 #include <math.h>
24 #include <stdarg.h>
25 #include <unistd.h>
26 #include <memory.h>
27 #include "../types.h"
28 #include "../mem.h"
29 #include "../gfxdevice.h"
30 #include "../gfxtools.h"
31 #include "../utf8.h"
32
33 typedef struct _textpage {
34     char*text;
35     int textsize;
36     int textpos;
37     struct _textpage*next;
38 } textpage_t;
39
40 typedef struct _internal {
41     textpage_t*first_page;
42     textpage_t*current_page;
43     double currentx;
44     double currenty;
45     double lastadvance;
46 } internal_t;
47
48 int text_setparameter(gfxdevice_t*dev, const char*key, const char*value)
49 {
50     internal_t*i = (internal_t*)dev->internal;
51     return 0;
52 }
53 void text_startpage(gfxdevice_t*dev, int width, int height)
54 {
55     internal_t*i = (internal_t*)dev->internal;
56     if(!i->first_page) {
57         i->first_page = i->current_page = (textpage_t*)malloc(sizeof(textpage_t));
58     } else {
59         i->current_page->next = (textpage_t*)malloc(sizeof(textpage_t));
60         i->current_page = i->current_page->next;
61     }
62     i->current_page->textsize = 4096;
63     i->current_page->text = (char*)malloc(i->current_page->textsize);
64     i->current_page->textpos = 0;
65     i->current_page->next = 0;
66     i->currentx = 0;
67     i->currenty = 0;
68     i->lastadvance = 0;
69 }
70 void text_startclip(gfxdevice_t*dev, gfxline_t*line)
71 {
72     internal_t*i = (internal_t*)dev->internal;
73 }
74 void text_endclip(gfxdevice_t*dev)
75 {
76     internal_t*i = (internal_t*)dev->internal;
77 }
78 void text_stroke(gfxdevice_t*dev, gfxline_t*line, gfxcoord_t width, gfxcolor_t*color, gfx_capType cap_style, gfx_joinType joint_style, gfxcoord_t miterLimit)
79 {
80     internal_t*i = (internal_t*)dev->internal;
81 }
82 void text_fill(gfxdevice_t*dev, gfxline_t*line, gfxcolor_t*color)
83 {
84     internal_t*i = (internal_t*)dev->internal;
85 }
86 void text_fillbitmap(gfxdevice_t*dev, gfxline_t*line, gfximage_t*img, gfxmatrix_t*matrix, gfxcxform_t*cxform)
87 {
88     internal_t*i = (internal_t*)dev->internal;
89 }
90 void text_fillgradient(gfxdevice_t*dev, gfxline_t*line, gfxgradient_t*gradient, gfxgradienttype_t type, gfxmatrix_t*matrix)
91 {
92     internal_t*i = (internal_t*)dev->internal;
93 }
94 void text_addfont(gfxdevice_t*dev, gfxfont_t*font) {}
95
96 static void addchar(gfxdevice_t*dev, int unicode)
97 {
98     internal_t*i = (internal_t*)dev->internal;
99     if(!i->current_page) {
100         text_startpage(dev, 0, 0);
101     }
102     if(i->current_page->textpos + 10 > i->current_page->textsize) {
103         i->current_page->textsize += 4096;
104         i->current_page->text = realloc(i->current_page->text, i->current_page->textsize);
105     }
106     writeUTF8(unicode, &i->current_page->text[i->current_page->textpos]);
107     i->current_page->textpos += strlen(&i->current_page->text[i->current_page->textpos]);
108 }
109
110 void text_drawchar(gfxdevice_t*dev, gfxfont_t*font, int glyphnr, gfxcolor_t*color, gfxmatrix_t*matrix)
111 {
112     internal_t*i = (internal_t*)dev->internal;
113     double xshift = matrix->tx - i->currentx;
114     double yshift = matrix->ty - i->currenty;
115     i->currentx = matrix->tx;
116     i->currenty = matrix->ty;
117
118     if(fabs(yshift)>1.0) {
119         addchar(dev, 10);
120     } else if(xshift > i->lastadvance*1.3 || xshift<0) {
121         addchar(dev, 32);
122     }
123     int u;
124     if(font) {
125         i->lastadvance = font->glyphs[glyphnr].advance*matrix->m00;
126         u = font->glyphs[glyphnr].unicode;
127     } else {
128         u = glyphnr;
129         i->currentx = 0;i->currenty = 0;
130     }
131     if(u>13) {
132         addchar(dev, u);
133     }
134 }
135
136 void text_drawlink(gfxdevice_t*dev, gfxline_t*line, const char*action)
137 {
138     internal_t*i = (internal_t*)dev->internal;
139 }
140
141 void text_endpage(gfxdevice_t*dev)
142 {
143     internal_t*i = (internal_t*)dev->internal;
144 }
145
146 void text_result_write(gfxresult_t*r, int filedesc)
147 {
148     textpage_t*i= (textpage_t*)r->internal;
149 }
150 int text_result_save(gfxresult_t*r, const char*filename)
151 {
152     textpage_t*i= (textpage_t*)r->internal;
153     if(!i) {
154         return 0; // no pages drawn
155     }
156     FILE*fi = fopen(filename, "wb");
157     if(!fi)
158         return 0;
159     while(i) {
160         fwrite(i->text, i->textpos, 1, fi);
161         i = i->next;
162     }
163     fclose(fi);
164     return 1;
165 }
166 void*text_result_get(gfxresult_t*r, const char*name)
167 {
168     textpage_t*i= (textpage_t*)r->internal;
169     if(!strcmp(name,"text")) {
170         textpage_t*j = i;
171         int len = 0;
172         while(j) {
173             len += i->textpos;
174             j = j->next;
175         }
176         char*text = (char*)malloc(len);
177         int pos = 0;
178         j = i;
179         while(j) {
180             memcpy(&text[pos], i->text, i->textpos);
181             pos += i->textpos;
182             j = j->next;
183         }
184         text[pos] = 0;
185         return text;
186     } else if(!strncmp(name,"page",4)) {
187         int pagenr = atoi(&name[4]);
188         if(pagenr<0)
189             pagenr=0;
190         while(pagenr>0) {
191             i = i->next;
192             if(!i)
193                 return 0;
194         }
195         i->text[i->textpos] = 0;
196         return strdup(i->text);
197     }
198     return 0;
199 }
200 void text_result_destroy(gfxresult_t*r)
201 {
202     textpage_t*i= (textpage_t*)r->internal;
203     r->internal = 0;
204     while(i) {
205         textpage_t*next = i->next;
206         free(i->text);i->text = 0;
207         free(i);
208         i = next;
209     }
210     free(r);
211 }
212
213 gfxresult_t* text_finish(struct _gfxdevice*dev)
214 {
215     internal_t*i = (internal_t*)dev->internal;
216     
217     gfxresult_t* res = (gfxresult_t*)rfx_calloc(sizeof(gfxresult_t));
218     
219     res->internal = i->first_page;i->first_page = 0;i->current_page=0;
220     res->write = text_result_write;
221     res->save = text_result_save;
222     res->get = text_result_get;
223     res->destroy = text_result_destroy;
224
225     free(dev->internal); dev->internal = 0; i = 0;
226
227     return res;
228 }
229
230
231
232 void gfxdevice_text_init(gfxdevice_t*dev, gfxdevice_t*out)
233 {
234     internal_t*i = (internal_t*)rfx_calloc(sizeof(internal_t));
235     memset(dev, 0, sizeof(gfxdevice_t));
236
237     dev->name = "text";
238
239     dev->internal = i;
240
241     dev->setparameter = text_setparameter;
242     dev->startpage = text_startpage;
243     dev->startclip = text_startclip;
244     dev->endclip = text_endclip;
245     dev->stroke = text_stroke;
246     dev->fill = text_fill;
247     dev->fillbitmap = text_fillbitmap;
248     dev->fillgradient = text_fillgradient;
249     dev->addfont = text_addfont;
250     dev->drawchar = text_drawchar;
251     dev->drawlink = text_drawlink;
252     dev->endpage = text_endpage;
253     dev->finish = text_finish;
254 }
255