?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Check for SYS/GL during library init. Reason is that
[AROS.git] / workbench / system / ftmanager / ftmanager.c
blob8d64558cc30ad0e3d3e1947994a8c29b6fd1be5d
1 /*
2 * Based on source from ftmanager from MorphOS for their ft2.library
3 */
4 #define NO_INLINE_STDARG
5
6 #include <libraries/mui.h>
7 #include <libraries/asl.h>
8
9 #include <proto/exec.h>
10 #include <proto/dos.h>
11 #include <proto/intuition.h>
12 #include <proto/muimaster.h>
13 #undef NO_INLINE_STDARG
14 #include <proto/alib.h>
15 #include <proto/codesets.h>
16 #include <proto/freetype2.h>
17 #include <aros/debug.h>
18
19 #include "fontbitmap_class.h"
20 #include "fontinfo_class.h"
21 #include "fontlist_class.h"
22 #include "fontwindow_class.h"
23 #include "globals.h"
24 #include "locale.h"
25
26 #define ARG_TEMPLATE "TTFFONT/A,OUTFONT/A,CODEPAGE"
27
28 #define VERSION "$VER: FTManager 1.4 (22.5.2015) ©2011-2015 The AROS Development Team"
29
30 enum
31 {
32 ARG_TTFFONT,
33 ARG_OUTFONT,
34 ARG_CODEPAGE,
35 ARG_COUNT
36 };
37
38 /***********************************************************************/
39
40 /* Global variables */
41 BPTR destdir;
42 UWORD codepage[256];
43 struct Library *CodesetsBase;
44
45 /***********************************************************************/
46
47 static struct RDArgs *rda;
48 static Object *app;
49 static STRPTR *codesetentries;
50 static STRPTR *codesetsupported;
51
52 /***********************************************************************/
53
54 static void Cleanup(void)
55 {
56 if (rda)
57 FreeArgs(rda);
58
59 CleanupFontListClass();
60 CleanupFontWindowClass();
61 CleanupFontInfoClass();
62 CleanupFontBitmapClass();
63
64 FT_Done_Library(ftlibrary);
65
66 if (codesetsupported)
67 CodesetsFreeA(codesetsupported, NULL);
68 FreeVec(codesetentries);
69 CloseLibrary(CodesetsBase);
70
71 UnLock(destdir);
72 }
73
74 static int Init(BOOL gui)
75 {
76 FT_Error error;
77
78 CodesetsBase = OpenLibrary("codesets.library", 0);
79 if (!CodesetsBase)
80 return 0;
81
82 error = FT_Init_FreeType(&ftlibrary);
83 if (error != 0)
84 {
85 DEBUG_MAIN(dprintf("Init_FreeType error %d\n", error));
86 return 0;
87 }
88
89 if (gui)
90 {
91 if (!InitFontBitmapClass() ||
92 !InitFontInfoClass() ||
93 !InitFontWindowClass() ||
94 !InitFontListClass())
95 {
96 DEBUG_MAIN(dprintf("Can't create custom classes.\n"));
97 return 0;
98 }
99 }
100
101 destdir = Lock("Fonts:", ACCESS_READ);
102
103 return 1;
104 }
105
106
107 static void SetDefaultCodePage(void)
108 {
109 int k;
110 for (k = 0; k < 256; ++k)
111 codepage[k] = k;
112 }
113
114 BOOL IsDefaultCodePage(void)
115 {
116 int k;
117 for (k = 0; k < 256; ++k)
118 if (codepage[k] != k)
119 return FALSE;
120 return TRUE;
121 }
122
123 static BOOL LoadCodePage(int entryindex, char *codepg)
124 {
125 struct codeset *cs = NULL;
126
127 SetDefaultCodePage();
128
129 if (entryindex == 0 && codepg == NULL) // keep default code page
130 {
131 return TRUE;
132 }
133
134 if (codepg)
135 {
136 cs = CodesetsFind(codepg, CSA_FallbackToDefault, FALSE, TAG_DONE);
137 }
138 else if (entryindex > 0)
139 {
140 cs = CodesetsFind(codesetentries[entryindex],
141 CSA_FallbackToDefault, FALSE, TAG_DONE);
142 }
143
144 if (cs)
145 {
146 LONG index;
147 for (index = 0 ; index < 256 ; index++)
148 {
149 codepage[index] = (UWORD)cs->table[index].ucs4;
150 }
151 return TRUE;
152 }
153
154 return FALSE;
155 }
156
157
158 #define ID_SetSrc 1
159 #define ID_SetDestDir 2
160 #define ID_ShowFont 3
161 #define ID_SetCodePage 4
162
163 static int ftmanager_gui(void)
164 {
165 int ret = RETURN_FAIL;
166 Object *win, *src, *dest, *fontlist, *fontlv, *codepagecycle, *quit;
167 int countfrom, countto;
168
169 if (!Init(TRUE))
170 return RETURN_FAIL;
171
172 SetDefaultCodePage();
173
174 codesetsupported = CodesetsSupportedA(NULL); // Available codesets
175 countfrom = 0;
176 while (codesetsupported[countfrom])
177 {
178 countfrom++;
179 }
180 codesetentries = AllocVec((sizeof (STRPTR)) * (countfrom + 2), MEMF_CLEAR);
181 if (!codesetentries)
182 {
183 Cleanup();
184 return RETURN_FAIL;
185 }
186 codesetentries[0] = "----";
187 countfrom = 0;
188 countto = 1;
189 while (codesetsupported[countfrom])
190 {
191 if (strncmp(codesetsupported[countfrom], "UTF", 3))
192 {
193 codesetentries[countto] = codesetsupported[countfrom];
194 countto++;
195 }
196 countfrom++;
197 }
198 app = ApplicationObject,
199 MUIA_Application_Title, __(MSG_APP_NAME),
200 MUIA_Application_Version,(IPTR) VERSION,
201 MUIA_Application_Copyright, "Copyright 2002-2003 by Emmanuel Lesueur",
202 MUIA_Application_Author, "Emmanuel Lesueur",
203 MUIA_Application_Description, __(MSG_APP_TITLE),
204 MUIA_Application_Base, "FTMANAGER",
205 SubWindow, win = WindowObject,
206 MUIA_Window_ID, MAKE_ID('F','T','2','M'),
207 MUIA_Window_Title, __(MSG_WINDOW_TITLE),
208 MUIA_Window_Width, 400,
209 MUIA_Window_RootObject,VGroup,
210 Child, fontlv = ListviewObject,
211 MUIA_Listview_List, fontlist = FontListObject,
212 End,
213 End,
214 Child, ColGroup(2),
215 Child, Label2(_(MSG_LABEL_SOURCE)),
216 Child, PopaslObject,
217 MUIA_Popasl_Type, ASL_FileRequest,
218 MUIA_Popstring_String, src = StringObject,
219 StringFrame,
220 MUIA_String_Contents, __(MSG_ASL_FONTS_TRUETYPE),
221 MUIA_String_AdvanceOnCR, TRUE,
222 MUIA_CycleChain, TRUE,
223 End,
224 MUIA_Popstring_Button, PopButton(MUII_PopDrawer),
225 ASLFR_RejectIcons, TRUE,
226 ASLFR_DrawersOnly, TRUE,
227 End,
228 Child, Label2(_(MSG_LABEL_DESTINATION)),
229 Child, PopaslObject,
230 MUIA_Popasl_Type, ASL_FileRequest,
231 MUIA_Popstring_String, dest = StringObject,
232 StringFrame,
233 MUIA_String_Contents, __(MSG_ASL_FONTS),
234 MUIA_String_AdvanceOnCR, TRUE,
235 MUIA_CycleChain, TRUE,
236 End,
237 MUIA_Popstring_Button, PopButton(MUII_PopDrawer),
238 ASLFR_DoSaveMode, TRUE,
239 ASLFR_DrawersOnly, TRUE,
240 ASLFR_RejectIcons, TRUE,
241 End,
242 Child, Label2(_(MSG_LABEL_CODEPAGE)),
243 Child, codepagecycle = CycleObject,
244 MUIA_Cycle_Entries, codesetentries,
245 End,
246 End,
247 Child, quit = SimpleButton(_(MSG_QUIT)),
248 End,
249 End,
250 End;
251
252 if (app)
253 {
254 IPTR t;
255
256 ret = RETURN_OK;
257
258 DoMethod(src, MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
259 fontlist, 2, MUIM_FontList_AddDir, MUIV_TriggerValue);
260
261 DoMethod(dest, MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime,
262 app, 2, MUIM_Application_ReturnID, ID_SetDestDir);
263
264 DoMethod(codepagecycle, MUIM_Notify, MUIA_Cycle_Active, MUIV_EveryTime,
265 app, 2, MUIM_Application_ReturnID, ID_SetCodePage);
266
267 DoMethod(fontlv, MUIM_Notify, MUIA_Listview_DoubleClick, TRUE,
268 app, 2, MUIM_Application_ReturnID, ID_ShowFont);
269
270 DoMethod(win, MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
271 app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
272
273 DoMethod(quit, MUIM_Notify, MUIA_Pressed, FALSE,
274 app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
275
276 DoMethod(fontlist, MUIM_FontList_AddDir, XGET(src, MUIA_String_Contents));
277
278 set(win, MUIA_Window_Open, TRUE);
279 t = 0;
280 get(win, MUIA_Window_Open, &t);
281 if (t)
282 {
283 BOOL running = TRUE;
284 ULONG sigs = 0;
285 ULONG id;
286
287 do
288 {
289 id = DoMethod(app, MUIM_Application_NewInput, &sigs);
290 switch (id)
291 {
292 case MUIV_Application_ReturnID_Quit:
293 running = FALSE;
294 sigs = 0;
295 break;
296
297 case ID_SetDestDir:
298 {
299 CONST_STRPTR name = NULL;
300 BPTR newdir;
301
302 get(dest, MUIA_String_Contents, &name);
303 if (!name)
304 break;
305
306 newdir = Lock(name, ACCESS_READ);
307 if (newdir)
308 {
309 UnLock(destdir);
310 destdir = newdir;
311 }
312 }
313 break;
314
315 case ID_ShowFont:
316 {
317 struct MUIS_FontList_Entry *entry;
318 Object *w;
319
320 DoMethod(fontlist, MUIM_List_GetEntry, MUIV_List_GetEntry_Active, &entry);
321
322 w = FontWindowObject,
323 MUIA_FontWindow_Filename, entry->FileName,
324 MUIA_UserData, app,
325 End;
326
327 if (w)
328 {
329 DoMethod(w, MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
330 app, 6, MUIM_Application_PushMethod, app, 3,
331 MUIM_CallHook, &CloseWinHook, w);
332
333 DoMethod(app, OM_ADDMEMBER, w);
334 set(w, MUIA_Window_Open, TRUE);
335 get(w, MUIA_Window_Open, &t);
336 if (!t)
337 {
338 MUI_DisposeObject(w);
339 }
340 }
341
342 }
343 break;
344
345 case ID_SetCodePage:
346 {
347 IPTR entry = 0;
348 get(codepagecycle, MUIA_Cycle_Active, &entry);
349 LoadCodePage(entry, NULL);
350 }
351 break;
352 }
353
354 if (sigs)
355 {
356 sigs = Wait(sigs | SIGBREAKF_CTRL_C);
357 if (sigs & SIGBREAKF_CTRL_C)
358 {
359 running = FALSE;
360 }
361 }
362 }
363 while (running);
364 }
365 else
366 {
367 printf("Can't open window.\n");
368 }
369
370 MUI_DisposeObject(app);
371 }
372 else
373 {
374 printf("Can't create MUI application.\n");
375 }
376
377 Cleanup();
378
379 return ret;
380 }
381
382 static int ftmanager_cli(void)
383 {
384 // TODO implement me
385 return RETURN_FAIL;
386 }
387
388 int main(int argc, char **argv)
389 {
390 int retval = RETURN_FAIL;
391
392 Locale_Initialize();
393
394 if (argc > 1)
395 {
396 retval = ftmanager_cli();
397 }
398 else
399 {
400 // Starting from CLI without arguments opens GUI, too
401 retval = ftmanager_gui();
402 }
403
404 Locale_Deinitialize();
405
406 return retval;
407 }
Mirror of AROS' svn.