fixed some corner cases in drawing code to get the same results as before with way...
[rrdtool.git] / libraries / afm / test-afm.c
1 #include "rrd_afm.h"
2 #include <stdio.h>
3
4 FILE *fp;
5
6 static void make_tests(void);
7 static void print(const char *s);
8 double y = 0;
9 //static const char *font = "Times-Roman";
10 static const char *font = "Times Bold Italic";
11 //static const char *font = "Courier";
12 //static const char *font = "Courier Bold Oblique";
13
14 void make_tests()
15 {
16 #ifdef __APPLE__
17 #define charset_legend "Macintosh charset"
18 #define AE "\xAE"
19 #define ae "\xBE"
20 #define oe "\xBF"
21 #define aa "\x8C"
22 #define NBSP "\x00CA"
23 #else
24 #define charset_legend "IsoLatin1 charset"
25 #define AE "\xC6"
26 #define ae "\xE6"
27 #define oe "\xF8"
28 #define aa "\xA5"
29 #define NBSP "\x00A0"
30 #endif
31   print(AE); /* very wide char */
32   print(AE AE AE AE AE AE AE AE AE AE AE AE AE AE AE);
33   print(charset_legend);
34   print("S,");
35   print("sfil");
36   print("Hello, world");
37   print("AVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAVAV");
38   print("AAAAAAAAAAAAAAAAAAVVVVVVVVVVVVVVVVVV");
39   print("fiffififfififfififfififfififfififfi");
40   print("fi");
41   print("fil");
42   print("fifififififififififififififififififififififififififi");
43   print(AE "bleskiver med gl"oe"gg. " NBSP NBSP NBSP NBSP NBSP NBSP NBSP
44       AE" Fywerhus: 'A "ae" u "aa" "ae" "oe" i "ae" fywer'.");
45   print("Ingef"ae"rp"ae"rer med karamelsauce. R"oe"dgr"oe"d med fl"oe"de.");
46   print("(Optional.) Ligature sequence where successor and ligature are both names.  The current character may join ...");
47 }
48
49 static void vline(double x, double y1, double y2)
50 {
51   fprintf(fp, "<line x1=\"%.2f\" y1=\"%.2f\" x2=\"%.2f\" y2=\"%.2f\""
52       " stroke-width=\"1\" stroke=\"#000\"/>\n",
53       x, y1, x, y2);
54 }
55
56 static void print(const char *s)
57 {
58   double size = 12;
59   double x = 10;
60   double width = afm_get_text_width(0, font, size, 4, s);
61   unsigned char *up = (unsigned char*)s;
62   fprintf(stderr, "Width = %f for '%s'\n", width, s);
63   y += 10;
64   vline(x, y, y + 5);
65   fprintf(fp, "<text x=\"%.2f\" y=\"%.2f\" font-size=\"%.2f\">", x, y, size);
66   while (*up) {
67     unsigned char ch = afm_host2unicode(*up);
68     if (ch < 127)
69       putc(ch, fp);
70     else
71       fprintf(fp, "&#%d;", ch);
72     up++;
73   }
74   fputs("</text>\n", fp);
75   vline(x + width, y, y + 5);
76   y += 1.1 * size;
77 }
78
79 static void header()
80 {
81    fprintf(fp,
82  "<?xml version=\"1.0\" standalone=\"no\"?>\n"
83  "<!DOCTYPE svg PUBLIC \"-//W3C//DTD SVG 1.0//EN\"\n"
84  "   \"http://www.w3.org/TR/2001/REC-SVG-20010904/DTD/svg10.dtd\">\n"
85  "<svg width=\"650\" height=\"400\" preserveAspectRatio=\"xMidYMid\"\n"
86  "    font-family=\"%s\">\n", font);
87  }
88
89
90 static void footer()
91 {
92    fputs("</svg>\n", fp);
93 }
94
95 int main()
96 {
97   fp = fopen("test.svg", "w");
98   if (fp == NULL) {
99     fprintf(stderr, "Can't create output.\n");
100     exit(1);
101   }
102   header();
103   make_tests();
104   footer();
105   fclose(fp);
106   return 0;
107 }
108