Update to MPlayer SVN rev 28800 and FFmpeg SVN rev 17752.
[vaapi:athaifas-mplayer.git] / libass / .svn / text-base / ass_utils.c.svn-base
1 // -*- c-basic-offset: 8; indent-tabs-mode: t -*-
2 // vim:ts=8:sw=8:noet:ai:
3 /*
4  * Copyright (C) 2006 Evgeniy Stepanov <eugeni.stepanov@gmail.com>
5  *
6  * This file is part of libass.
7  *
8  * libass is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * libass is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License along
19  * with libass; if not, write to the Free Software Foundation, Inc.,
20  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
21  */
22
23 #include "config.h"
24
25 #include <stdlib.h>
26 #include <inttypes.h>
27 #include <ft2build.h>
28 #include FT_GLYPH_H
29
30 #include "mputils.h"
31 #include "ass_utils.h"
32
33 int mystrtoi(char** p, int* res)
34 {
35         // NOTE: base argument is ignored, but not used in libass anyway
36         double temp_res;
37         char* start = *p;
38         temp_res = strtod(*p, p);
39         *res = (int) (temp_res + 0.5);
40         if (*p != start) return 1;
41         else return 0;
42 }
43
44 int mystrtoll(char** p, long long* res)
45 {
46         double temp_res;
47         char* start = *p;
48         temp_res = strtod(*p, p);
49         *res = (long long) (temp_res + 0.5);
50         if (*p != start) return 1;
51         else return 0;
52 }
53
54 int mystrtou32(char** p, int base, uint32_t* res)
55 {
56         char* start = *p;
57         *res = strtoll(*p, p, base);
58         if (*p != start) return 1;
59         else return 0;
60 }
61
62 int mystrtod(char** p, double* res)
63 {
64         char* start = *p;
65         *res = strtod(*p, p);
66         if (*p != start) return 1;
67         else return 0;
68 }
69
70 int strtocolor(char** q, uint32_t* res)
71 {
72         uint32_t color = 0;
73         int result;
74         char* p = *q;
75         
76         if (*p == '&') ++p; 
77         else mp_msg(MSGT_ASS, MSGL_DBG2, "suspicious color format: \"%s\"\n", p);
78         
79         if (*p == 'H' || *p == 'h') { 
80                 ++p;
81                 result = mystrtou32(&p, 16, &color);
82         } else {
83                 result = mystrtou32(&p, 0, &color);
84         }
85         
86         {
87                 unsigned char* tmp = (unsigned char*)(&color);
88                 unsigned char b;
89                 b = tmp[0]; tmp[0] = tmp[3]; tmp[3] = b;
90                 b = tmp[1]; tmp[1] = tmp[2]; tmp[2] = b;
91         }
92         if (*p == '&') ++p;
93         *q = p;
94
95         *res = color;
96         return result;
97 }
98
99 #if 0
100 static void sprint_tag(uint32_t tag, char* dst)
101 {
102         dst[0] = (tag >> 24) & 0xFF;
103         dst[1] = (tag >> 16) & 0xFF;
104         dst[2] = (tag >> 8) & 0xFF;
105         dst[3] = tag & 0xFF;
106         dst[4] = 0;
107 }
108
109 void dump_glyph(FT_Glyph g)
110 {
111         char tag[5];
112         int i;
113         FT_OutlineGlyph og = (FT_OutlineGlyph)g;
114         FT_Outline* o = &(og->outline);
115         sprint_tag(g->format, tag);
116         printf("glyph: %p \n", g);
117         printf("format: %s \n", tag);
118         printf("outline: %p \n", o);
119         printf("contours: %d, points: %d, points ptr: %p \n", o->n_contours, o->n_points, o->points);
120         for (i = 0; i < o->n_points; ++i) {
121                 printf("  point %f, %f \n", d6_to_double(o->points[i].x), d6_to_double(o->points[i].y));
122         }
123 }
124 #endif