add back datatoc, use this instead of cmake script which was too slow.
[blender-staging.git] / source / blender / datatoc / datatoc.c
1 /*
2  * ***** BEGIN GPL LICENSE BLOCK *****
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version.
8  *
9  * This program 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
15  * along with this program; if not, write to the Free Software Foundation,
16  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17  *
18  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
19  * All rights reserved.
20  *
21  * The Original Code is: all of this file.
22  *
23  * Contributor(s): none yet.
24  *
25  * ***** END GPL LICENSE BLOCK *****
26  */
27
28 #include <stdio.h>
29 #include <string.h>
30 #include <stdlib.h>
31
32 /* #define VERBOSE */
33
34 #define MAX2(x, y)               ( (x) > (y) ? (x) : (y) )
35 #define MAX3(x, y, z)             MAX2(MAX2((x), (y)), (z) )
36
37 static char *basename(char *string)
38 {
39         char *lfslash, *lbslash;
40
41         lfslash = strrchr(string, '/');
42         lbslash = strrchr(string, '\\');
43         if (lbslash) lbslash++;
44         if (lfslash) lfslash++;
45
46         return MAX3(string, lfslash, lbslash);
47 }
48
49 int main(int argc, char **argv)
50 {
51         FILE *fpin,  *fpout;
52         char sizest[256];
53         long size;
54         int i;
55
56         if (argc < 2) {
57                 printf("Usage: datatoc <data_file_from> <data_file_to>\n");
58                 exit(1);
59         }
60
61         fpin = fopen(argv[1], "rb");
62         if (!fpin) {
63                 printf("Unable to open input <%s>\n", argv[1]);
64                 exit(1);
65         }
66
67         argv[1] = basename(argv[1]);
68
69         fseek(fpin, 0L,  SEEK_END);
70         size = ftell(fpin);
71         fseek(fpin, 0L,  SEEK_SET);
72
73         if (argv[1][0] == '.') argv[1]++;
74
75 #ifdef VERBOSE
76         printf("Making C file <%s>\n", argv[2]);
77 #endif
78
79         for (i = 0; i < (int)strlen(argv[1]); i++)
80                 if (argv[1][i] == '.') argv[1][i] = '_';
81
82         sprintf(sizest, "%d", (int)size);
83
84 #ifdef VERBOSE
85         printf("Input filesize is %d, Output size should be %d\n",
86                (int)size,
87                (int)(((int)size) * 4 +
88                      strlen("/* DataToC output of file <> */\n\n") +
89                      strlen("char datatoc_[] = {\"") +
90                      strlen("\"};\n") +
91                      (strlen(argv[1]) * 3) +
92                      strlen(sizest) +
93                      strlen("int datatoc__size = ;\n") +
94                      (((int)(size / 256) + 1) * 5)));
95 #endif
96
97         fpout = fopen(argv[2], "w");
98         if (!fpout) {
99                 fprintf(stderr, "Unable to open output <%s>\n", argv[2]);
100                 exit(1);
101         }
102
103         fprintf(fpout, "/* DataToC output of file <%s> */\n\n", argv[1]);
104         fprintf(fpout, "int datatoc_%s_size = %s;\n", argv[1], sizest);
105         fprintf(fpout, "char datatoc_%s[] = {\n", argv[1]);
106         while (size--) {
107                 if (size % 32 == 31) {
108                         fprintf(fpout, "\n");
109                 }
110
111                 /* fprintf (fpout, "\\x%02x", getc(fpin)); */
112                 fprintf(fpout, "%3d,", getc(fpin));
113         }
114
115         fprintf(fpout, "\n};\n\n");
116
117         fclose(fpin);
118         fclose(fpout);
119         return 0;
120 }