← Back to branch summary

~ubuntu-branches/ubuntu/oneiric/mplayer2/oneiric-proposed

« back to all changes in this revision

Viewing changes to mplayer/sub/font_load.c

  • Committer: Bazaar Package Importer
  • Author(s): Reinhard Tartler
  • Date: 2011-03-20 22:48:03 UTC
  • Revision ID: james.westby@ubuntu.com-20110320224803-kc2nlrxz6pcphmf1
Tags: upstream-2.0~rc2
Import upstream version 2.0~rc2

Show diffs side-by-side

added added

removed removed

Lines of Context:
mplayer/sub/font_load.c
 
1
/*
 
2
 * This file is part of MPlayer.
 
3
 *
 
4
 * MPlayer 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
 * MPlayer 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 along
 
15
 * with MPlayer; if not, write to the Free Software Foundation, Inc.,
 
16
 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 
17
 */
 
18
 
 
19
#include "config.h"
 
20
 
 
21
#include <stdio.h>
 
22
#include <stdlib.h>
 
23
#include <string.h>
 
24
#include <sys/types.h>
 
25
#include <sys/stat.h>
 
26
#include <unistd.h>
 
27
 
 
28
#include "font_load.h"
 
29
#include "mp_msg.h"
 
30
 
 
31
raw_file* load_raw(char *name,int verbose){
 
32
    int bpp;
 
33
    raw_file* raw=malloc(sizeof(raw_file));
 
34
    unsigned char head[32];
 
35
    FILE *f=fopen(name,"rb");
 
36
    if(!f) goto err_out;                        // can't open
 
37
    if(fread(head,32,1,f)<1) goto err_out;        // too small
 
38
    if(memcmp(head,"mhwanh",6)) goto err_out;        // not raw file
 
39
    raw->w=head[8]*256+head[9];
 
40
    raw->h=head[10]*256+head[11];
 
41
    raw->c=head[12]*256+head[13];
 
42
    if(raw->w == 0) // 2 bytes were not enough for the width... read 4 bytes from the end of the header
 
43
        raw->w = ((head[28]*0x100 + head[29])*0x100 + head[30])*0x100 + head[31];
 
44
    if(raw->c>256) goto err_out;                 // too many colors!?
 
45
    mp_msg(MSGT_OSD, MSGL_DBG2, "RAW: %s  %d x %d, %d colors\n",name,raw->w,raw->h,raw->c);
 
46
    if(raw->c){
 
47
        raw->pal=malloc(raw->c*3);
 
48
        fread(raw->pal,3,raw->c,f);
 
49
        bpp=1;
 
50
    } else {
 
51
        raw->pal=NULL;
 
52
        bpp=3;
 
53
    }
 
54
    raw->bmp=malloc(raw->h*raw->w*bpp);
 
55
    fread(raw->bmp,raw->h*raw->w*bpp,1,f);
 
56
    fclose(f);
 
57
    return raw;
 
58
 
 
59
err_out:
 
60
    if (f)
 
61
      fclose(f);
 
62
    free(raw);
 
63
    return NULL;
 
64
}
 
65
 
 
66
extern int sub_unicode;
 
67
 
 
68
font_desc_t* read_font_desc(const char* fname,float factor,int verbose){
 
69
unsigned char sor[1024];
 
70
unsigned char sor2[1024];
 
71
font_desc_t *desc;
 
72
FILE *f = NULL;
 
73
char *dn;
 
74
//struct stat fstate;
 
75
char section[64];
 
76
int i,j;
 
77
int chardb=0;
 
78
int fontdb=-1;
 
79
int version=0;
 
80
int first=1;
 
81
 
 
82
desc=malloc(sizeof(font_desc_t));if(!desc) goto fail_out;
 
83
memset(desc,0,sizeof(font_desc_t));
 
84
 
 
85
f=fopen(fname,"rt");if(!f){ mp_msg(MSGT_OSD, MSGL_V, "font: can't open file: %s\n",fname); goto fail_out;}
 
86
 
 
87
i = strlen (fname) - 9;
 
88
if ((dn = malloc(i+1))){
 
89
   strncpy (dn, fname, i);
 
90
   dn[i]='\0';
 
91
}
 
92
 
 
93
desc->fpath = dn; // search in the same dir as fonts.desc
 
94
 
 
95
// desc->fpath=get_path("font/");
 
96
// if (stat(desc->fpath, &fstate)!=0) desc->fpath=DATADIR"/font";
 
97
 
 
98
 
 
99
 
 
100
 
 
101
// set up some defaults, and erase table
 
102
desc->charspace=2;
 
103
desc->spacewidth=12;
 
104
desc->height=0;
 
105
for(i=0;i<65536;i++) desc->start[i]=desc->width[i]=desc->font[i]=-1;
 
106
 
 
107
section[0]=0;
 
108
 
 
109
while(fgets(sor,1020,f)){
 
110
  unsigned char* p[8];
 
111
  int pdb=0;
 
112
  unsigned char *s=sor;
 
113
  unsigned char *d=sor2;
 
114
  int ec=' ';
 
115
  int id=0;
 
116
  sor[1020]=0;
 
117
 
 
118
  /* skip files that look like: TTF (0x00, 0x01), PFM (0x00, 0x01), PFB
 
119
   * (0x80, 0x01), PCF (0x01, 0x66), fon ("MZ"), gzipped (0x1f, 0x8b) */
 
120
 
 
121
  if (first) {
 
122
    if (!sor[0] || sor[1] == 1 || (sor[0] == 'M' && sor[1] == 'Z') || (sor[0] == 0x1f && sor[1] == 0x8b) || (sor[0] == 1 && sor[1] == 0x66)) {
 
123
      mp_msg(MSGT_OSD, MSGL_ERR, "%s doesn't look like a bitmap font description, ignoring.\n", fname);
 
124
      goto fail_out;
 
125
    }
 
126
    first = 0;
 
127
  }
 
128
 
 
129
  p[0]=d;++pdb;
 
130
  while(1){
 
131
      int c=*s++;
 
132
      if(c==0 || c==13 || c==10) break;
 
133
      if(!id){
 
134
        if(c==39 || c==34){ id=c;continue;} // idezojel
 
135
        if(c==';' || c=='#') break;
 
136
        if(c==9) c=' ';
 
137
        if(c==' '){
 
138
          if(ec==' ') continue;
 
139
          *d=0; ++d;
 
140
          p[pdb]=d;++pdb;
 
141
          if(pdb>=8) break;
 
142
          continue;
 
143
        }
 
144
      } else {
 
145
        if(id==c){ id=0;continue;} // idezojel
 
146
 
 
147
      }
 
148
      *d=c;d++;
 
149
      ec=c;
 
150
  }
 
151
  if(d==sor2) continue; // skip empty lines
 
152
  *d=0;
 
153
 
 
154
//  printf("params=%d  sor=%s\n",pdb,sor);
 
155
//  for(i=0;i<pdb;i++) printf("  param %d = '%s'\n",i,p[i]);
 
156
 
 
157
  if(pdb==1 && p[0][0]=='['){
 
158
      int len=strlen(p[0]);
 
159
      if(len && len<63 && p[0][len-1]==']'){
 
160
        strcpy(section,p[0]);
 
161
        mp_msg(MSGT_OSD, MSGL_DBG2, "font: Reading section: %s\n",section);
 
162
        if(strcmp(section,"[files]")==0){
 
163
            ++fontdb;
 
164
            if(fontdb>=16){ mp_msg(MSGT_OSD, MSGL_ERR, "font: Too many bitmaps defined.\n");goto fail_out;}
 
165
        }
 
166
        continue;
 
167
      }
 
168
  }
 
169
 
 
170
  if(strcmp(section,"[fpath]")==0){
 
171
      if(pdb==1){
 
172
          free (desc->fpath); // release previously allocated memory
 
173
          desc->fpath=strdup(p[0]);
 
174
          continue;
 
175
      }
 
176
  } else
 
177
 
 
178
#ifdef __AMIGAOS4__
 
179
#define FONT_PATH_SEP ""
 
180
#else
 
181
//! path seperator for font paths, may not be more than one character
 
182
#define FONT_PATH_SEP "/"
 
183
#endif
 
184
 
 
185
  if(strcmp(section,"[files]")==0){
 
186
      char *default_dir=MPLAYER_DATADIR FONT_PATH_SEP "font";
 
187
      if(pdb==2 && strcmp(p[0],"alpha")==0){
 
188
          char *cp;
 
189
          if (!(cp=malloc(strlen(desc->fpath)+strlen(p[1])+2))) goto fail_out;
 
190
 
 
191
          snprintf(cp,strlen(desc->fpath)+strlen(p[1])+2,"%s" FONT_PATH_SEP "%s",
 
192
                desc->fpath,p[1]);
 
193
          if(!((desc->pic_a[fontdb]=load_raw(cp,verbose)))){
 
194
                free(cp);
 
195
                if (!(cp=malloc(strlen(default_dir)+strlen(p[1])+2)))
 
196
                   goto fail_out;
 
197
                snprintf(cp,strlen(default_dir)+strlen(p[1])+2,"%s" FONT_PATH_SEP "%s",
 
198
                         default_dir,p[1]);
 
199
                if (!((desc->pic_a[fontdb]=load_raw(cp,verbose)))){
 
200
                   mp_msg(MSGT_OSD, MSGL_ERR, "Can't load font bitmap: %s\n",p[1]);
 
201
                   free(cp);
 
202
                   goto fail_out;
 
203
                }
 
204
          }
 
205
          free(cp);
 
206
          continue;
 
207
      }
 
208
      if(pdb==2 && strcmp(p[0],"bitmap")==0){
 
209
          char *cp;
 
210
          if (!(cp=malloc(strlen(desc->fpath)+strlen(p[1])+2))) goto fail_out;
 
211
 
 
212
          snprintf(cp,strlen(desc->fpath)+strlen(p[1])+2,"%s" FONT_PATH_SEP "%s",
 
213
                desc->fpath,p[1]);
 
214
          if(!((desc->pic_b[fontdb]=load_raw(cp,verbose)))){
 
215
                free(cp);
 
216
                if (!(cp=malloc(strlen(default_dir)+strlen(p[1])+2)))
 
217
                   goto fail_out;
 
218
                snprintf(cp,strlen(default_dir)+strlen(p[1])+2,"%s" FONT_PATH_SEP "%s",
 
219
                         default_dir,p[1]);
 
220
                if (!((desc->pic_b[fontdb]=load_raw(cp,verbose)))){
 
221
                   mp_msg(MSGT_OSD, MSGL_ERR, "Can't load font bitmap: %s\n",p[1]);
 
222
                   free(cp);
 
223
                   goto fail_out;
 
224
                }
 
225
          }
 
226
          free(cp);
 
227
          continue;
 
228
      }
 
229
  } else
 
230
 
 
231
  if(strcmp(section,"[info]")==0){
 
232
      if(pdb==2 && strcmp(p[0],"name")==0){
 
233
          desc->name=strdup(p[1]);
 
234
          continue;
 
235
      }
 
236
      if(pdb==2 && strcmp(p[0],"descversion")==0){
 
237
          version=atoi(p[1]);
 
238
          continue;
 
239
      }
 
240
      if(pdb==2 && strcmp(p[0],"spacewidth")==0){
 
241
          desc->spacewidth=atoi(p[1]);
 
242
          continue;
 
243
      }
 
244
      if(pdb==2 && strcmp(p[0],"charspace")==0){
 
245
          desc->charspace=atoi(p[1]);
 
246
          continue;
 
247
      }
 
248
      if(pdb==2 && strcmp(p[0],"height")==0){
 
249
          desc->height=atoi(p[1]);
 
250
          continue;
 
251
      }
 
252
  } else
 
253
 
 
254
  if(strcmp(section,"[characters]")==0){
 
255
      if(pdb==3){
 
256
          int chr=p[0][0];
 
257
          int start=atoi(p[1]);
 
258
          int end=atoi(p[2]);
 
259
          if(sub_unicode && (chr>=0x80)) chr=(chr<<8)+p[0][1];
 
260
          else if(strlen(p[0])!=1) chr=strtol(p[0],NULL,0);
 
261
          if(end<start) {
 
262
              mp_msg(MSGT_OSD, MSGL_WARN, "error in font desc: end<start for char '%c'\n",chr);
 
263
          } else {
 
264
              desc->start[chr]=start;
 
265
              desc->width[chr]=end-start+1;
 
266
              desc->font[chr]=fontdb;
 
267
//              printf("char %d '%c'  start=%d width=%d\n",chr,chr,desc->start[chr],desc->width[chr]);
 
268
              ++chardb;
 
269
          }
 
270
          continue;
 
271
      }
 
272
  }
 
273
  mp_msg(MSGT_OSD, MSGL_ERR, "Syntax error in font desc: %s",sor);
 
274
  goto fail_out;
 
275
 
 
276
}
 
277
fclose(f);
 
278
f = NULL;
 
279
 
 
280
 if (first == 1) {
 
281
   mp_msg(MSGT_OSD, MSGL_ERR, "%s is empty or a directory, ignoring.\n", fname);
 
282
   goto fail_out;
 
283
 }
 
284
 
 
285
//printf("font: pos of U = %d\n",desc->start[218]);
 
286
 
 
287
for(i=0;i<=fontdb;i++){
 
288
    if(!desc->pic_a[i] || !desc->pic_b[i]){
 
289
        mp_msg(MSGT_OSD, MSGL_ERR, "font: Missing bitmap(s) for sub-font #%d\n",i);
 
290
        goto fail_out;
 
291
    }
 
292
    //if(factor!=1.0f)
 
293
    {
 
294
        // re-sample alpha
 
295
        int f=factor*256.0f;
 
296
        int size=desc->pic_a[i]->w*desc->pic_a[i]->h;
 
297
        int j;
 
298
        mp_msg(MSGT_OSD, MSGL_DBG2, "font: resampling alpha by factor %5.3f (%d) ",factor,f);fflush(stdout);
 
299
        for(j=0;j<size;j++){
 
300
            int x=desc->pic_a[i]->bmp[j];       // alpha
 
301
            int y=desc->pic_b[i]->bmp[j];       // bitmap
 
302
 
 
303
#ifdef FAST_OSD
 
304
            x=(x<(255-f))?0:1;
 
305
#else
 
306
 
 
307
            x=255-((x*f)>>8); // scale
 
308
            //if(x<0) x=0; else if(x>255) x=255;
 
309
            //x^=255; // invert
 
310
 
 
311
            if(x+y>255) x=255-y; // to avoid overflows
 
312
 
 
313
            //x=0;
 
314
            //x=((x*f*(255-y))>>16);
 
315
            //x=((x*f*(255-y))>>16)+y;
 
316
            //x=(x*f)>>8;if(x<y) x=y;
 
317
 
 
318
            if(x<1) x=1; else
 
319
            if(x>=252) x=0;
 
320
#endif
 
321
 
 
322
            desc->pic_a[i]->bmp[j]=x;
 
323
//            desc->pic_b[i]->bmp[j]=0; // hack
 
324
        }
 
325
        mp_msg(MSGT_OSD, MSGL_DBG2, "DONE!\n");
 
326
    }
 
327
    if(!desc->height) desc->height=desc->pic_a[i]->h;
 
328
}
 
329
 
 
330
j='_';if(desc->font[j]<0) j='?';
 
331
for(i=0;i<65536;i++)
 
332
  if(desc->font[i]<0){
 
333
      desc->start[i]=desc->start[j];
 
334
      desc->width[i]=desc->width[j];
 
335
      desc->font[i]=desc->font[j];
 
336
  }
 
337
desc->font[' ']=-1;
 
338
desc->width[' ']=desc->spacewidth;
 
339
 
 
340
mp_msg(MSGT_OSD, MSGL_V, "Bitmap font %s loaded successfully! (%d chars)\n",fname,chardb);
 
341
 
 
342
return desc;
 
343
 
 
344
fail_out:
 
345
  if (f)
 
346
    fclose(f);
 
347
  free(desc->fpath);
 
348
  free(desc->name);
 
349
  free(desc);
 
350
  return NULL;
 
351
}
 
352
 
 
353
#ifndef CONFIG_FREETYPE
 
354
void render_one_glyph(font_desc_t *desc, int c) {}
 
355
int kerning(font_desc_t *desc, int prevc, int c) { return 0; }
 
356
#endif