diff options
Diffstat (limited to 'src/toolbox.c')
| -rw-r--r-- | src/toolbox.c | 456 |
1 files changed, 456 insertions, 0 deletions
diff --git a/src/toolbox.c b/src/toolbox.c new file mode 100644 index 0000000..5de9982 --- /dev/null +++ b/src/toolbox.c @@ -0,0 +1,456 @@ +#include <stdio.h> +#include <string.h> +#include <stdlib.h> +#include <ctype.h> +#include <time.h> + +#include "swis.h" + +#include "tboxlibs/event.h" +#include "tboxlibs/gadgets.h" +#include "tboxlibs/quit.h" +#include "tboxlibs/toolbox.h" +#include "tboxlibs/wimp.h" +#include "tboxlibs/wimplib.h" + +#include "encoding.h" +#include "ft.h" +#include "fm.h" +#include "glyph.h" +#include "glyphs.h" +#include "intmetrics.h" +#include "outlines.h" +#include "utils.h" + +#define Convert_Font 0x101 + +int ttf2f_quit = 0; +MessagesFD messages_file; +ObjectId main_window; +int converting = 0; + +/* Wimp Messages we're interested in */ +static int messages [] ={ + Wimp_MDataLoad, + Wimp_MQuit, + 0}; + +/* Toolbox events we're interested in */ +static int tbcodes [] ={ + Convert_Font, + Quit_Quit, + Toolbox_Error, + 0}; + +static void ttf2f_init(int argc, char **argv); +static void ttf2f_exit(void); +static void register_toolbox_handlers(void); +static int toolbox_event_quit(int event_code, ToolboxEvent *event, + IdBlock *id_block, void *handle); +static int toolbox_event_error(int event_code, ToolboxEvent *event, + IdBlock *id_block, void *handle); +static int convert_font(int event_code, ToolboxEvent *event, + IdBlock *id_block, void *handle); +static void register_message_handlers(void); +static int wimp_message_quit(WimpMessage *message,void *handle); +static int wimp_message_dataload(WimpMessage *message,void *handle); +static void progress_bar(int value); + +int main(int argc, char **argv) +{ + ttf2f_init(argc, argv); + + while (!ttf2f_quit) + ttf2f_poll(0); + + ttf2f_exit(); + + return 0; +} + + +void ttf2f_init(int argc, char **argv) +{ + _kernel_oserror *error; + IdBlock toolbox_block; + char *stringset; + + ft_init(); + load_glyph_list(); + + error = event_initialise(&toolbox_block); + if (error) { + fprintf(stderr, "event_initialise: 0x%x: %s\n", + error->errnum, error->errmess); + exit(1); + } + + event_set_mask(Wimp_Poll_NullMask | + Wimp_Poll_PointerLeavingWindowMask | + Wimp_Poll_PointerEnteringWindowMask | + Wimp_Poll_MouseClickMask | + Wimp_Poll_KeyPressedMask | + Wimp_Poll_LoseCaretMask | + Wimp_Poll_GainCaretMask); + + register_toolbox_handlers(); + register_message_handlers(); + + error = toolbox_initialise(0, 310, messages, tbcodes, + "<TTF2F$Dir>", &messages_file, + &toolbox_block, NULL, NULL, NULL); + if (error) { + fprintf(stderr, "toolbox_initialise: 0x%x: %s\n", + error->errnum, error->errmess); + exit(1); + } + + error = toolbox_create_object(0, "main", &main_window); + if (error) { + fprintf(stderr, "toolbox_create_object: 0x%x: %s\n", + error->errnum, error->errmess); + exit(1); + } + + stringset = getenv("Font$Path"); + if (stringset) { + error = stringset_set_available(0, main_window, 7, + stringset); + if (error) { + fprintf(stderr, + "stringset_set_available: 0x%x: %s\n", + error->errnum, error->errmess); + exit(1); + } + } +} + +void ttf2f_poll(int active) +{ + _kernel_oserror *error; + int event; + unsigned int mask; + WimpPollBlock block; + + if (active || converting) { + event_set_mask(0x3972); + error = event_poll(&event, &block, 0); + } else { + event_get_mask(&mask); + event_set_mask(mask | Wimp_Poll_NullMask); + error = event_poll(&event, &block, 0); + } + if (error) + fprintf(stderr, "event_poll: 0x%x: %s\n", + error->errnum, error->errmess); +} + +void ttf2f_exit(void) +{ + _kernel_oserror *error; + + ft_fini(); + destroy_glyphs(); + + error = event_finalise(); + if (error) + fprintf(stderr, "event_finalise: 0x%x: %s\n", + error->errnum, error->errmess); +} + +/** + * Register event handlers with the toolbox + */ +void register_toolbox_handlers(void) +{ + _kernel_oserror *error; + + error = event_register_toolbox_handler(-1, Quit_Quit, + toolbox_event_quit, 0); + if (error) + fprintf(stderr, "registering Quit_Quit: 0x%x: %s\n", + error->errnum, error->errmess); + + error = event_register_toolbox_handler(-1, Toolbox_Error, + toolbox_event_error, 0); + if (error) + fprintf(stderr, "registering Quit_Quit: 0x%x: %s\n", + error->errnum, error->errmess); + + error = event_register_toolbox_handler(-1, Convert_Font, + convert_font, 0); + if (error) + fprintf(stderr, "registering Convert_Font: 0x%x: %s\n", + error->errnum, error->errmess); +} + +/** + * Handle quit events + */ +int toolbox_event_quit(int event_code, ToolboxEvent *event, + IdBlock *id_block, void *handle) +{ + ttf2f_quit = 1; + + return 1; +} + +/** + * Handle toolbox errors + */ +int toolbox_event_error(int event_code, ToolboxEvent *event, + IdBlock *id_block, void *handle) +{ + ToolboxErrorEvent *error = (ToolboxErrorEvent *)event; + + fprintf(stderr, "toolbox error: 0x%x: %s\n", + error->errnum, error->errmess); + + return 1; +} + +/** + * Register message handlers + */ +void register_message_handlers(void) +{ + _kernel_oserror *error; + + error = event_register_message_handler(Wimp_MQuit, wimp_message_quit, + 0); + if (error) + fprintf(stderr, "registering Wimp_MQuit handler: 0x%x: %s\n", + error->errnum, error->errmess); + + error = event_register_message_handler(Wimp_MDataLoad, + wimp_message_dataload, + 0); + if (error) + fprintf(stderr, + "registering Wimp_MDataLoad handler: 0x%x: %s\n", + error->errnum, error->errmess); +} + +/** + * Handle quit messages + */ +int wimp_message_quit(WimpMessage *message,void *handle) +{ + ttf2f_quit = 1; + + return 1; +} + +/** + * Handle dataload messages + */ +int wimp_message_dataload(WimpMessage *message,void *handle) +{ + _kernel_oserror *error; + WimpDataLoadMessage *dl = &message->data.data_load; + + error = displayfield_set_value(0, main_window, 0, dl->leaf_name); + if (error) { + fprintf(stderr, "displayfield_set_value: 0x%x: %s\n", + error->errnum, error->errmess); + } + + message->hdr.action_code = Wimp_MDataLoadAck; + message->hdr.your_ref = message->hdr.my_ref; + error = wimp_send_message(17, message, message->hdr.sender, 0, 0); + if (error) { + fprintf(stderr, "wimp_send_message: 0x%x: %s\n", + error->errnum, error->errmess); + } + + return 1; +} + + + + +int convert_font(int event_code, ToolboxEvent *event, + IdBlock *id_block, void *handle) +{ + _kernel_oserror *error, erblock = { 123456, "Invalid Parameters" }; + char ifilename[256], ofilename[256], save_in[1024]; + char *token; + int count = 0; + int nglyphs, i; + struct glyph *glyph_list, *g; + struct font_metrics *metrics; + + if (converting) + return 1; + + converting = 1; + + /* get input file */ + error = displayfield_get_value(0, main_window, 0, ifilename, 256, 0); + if (error) { + fprintf(stderr, "displayfield_get_value: 0x%x: %s\n", + error->errnum, error->errmess); + } + + /* read font name */ + error = writablefield_get_value(0, main_window, 3, ofilename, 256, 0); + if (error) { + fprintf(stderr, "writablefield_get_value: 0x%x: %s\n", + error->errnum, error->errmess); + } + + /* read save location */ + error = stringset_get_selected(0, main_window, 7, save_in, 1024, 0); + if (error) { + fprintf(stderr, "stringset_get_selected: 0x%x: %s\n", + error->errnum, error->errmess); + } + + /* sanity check */ + if (strcmp(save_in, "Save in") == 0 || strcmp(ofilename, "") == 0 || + strcmp(ifilename, "Filename") == 0) { + wimp_report_error(&erblock, 0x5, "TTF2f"); + converting = 0; + return 1; + } + + /* create output directories */ + token = strtok(ofilename, "."); + while (token) { + if (count) + strcat(save_in, "."); + strcat(save_in, token); + error = _swix(OS_File, _INR(0,1) | _IN(4), 8, save_in, 0); + if (error) { + fprintf(stderr, "os_file: 0x%x: %s\n", + error->errnum, error->errmess); + wimp_report_error(error, 0x5, "TTF2f"); + converting = 0; + return 1; + } + token = strtok(NULL, "."); + count++; + } + + /* re-read font name - previously corrupted by strtok */ + error = writablefield_get_value(0, main_window, 3, ofilename, 256, 0); + if (error) { + fprintf(stderr, "writablefield_get_value: 0x%x: %s\n", + error->errnum, error->errmess); + } + + if (open_font(ifilename)) { + snprintf(erblock.errmess, 252, "Unknown font format"); + wimp_report_error(&erblock, 0x5, "TTF2f"); + converting = 0; + return 1; + } + + nglyphs = count_glyphs(); + + fprintf(stderr, "%d x %d = %d\n", nglyphs, sizeof(struct glyph), nglyphs * sizeof(struct glyph)); + + glyph_list = (struct glyph *)calloc(nglyphs, sizeof(struct glyph)); + if (!glyph_list) { + fprintf(stderr, "malloc failed\n"); + snprintf(erblock.errmess, 252, "Insufficient memory"); + wimp_report_error(&erblock, 0x5, "TTF2f"); + converting = 0; + return 1; + } + + /* Initialise glyph list */ + for (i = 0; i != nglyphs; i++) { + g = &glyph_list[i]; + + g->code = -1; + } + + /* create buffer for font metrics data */ + metrics = calloc(1, sizeof(struct font_metrics)); + if (!metrics) { + free(glyph_list); + close_font(); + fprintf(stderr, "malloc failed\n"); + snprintf(erblock.errmess, 252, "Insufficient memory"); + wimp_report_error(&erblock, 0x5, "TTF2f"); + converting = 0; + return 1; + } + + /* read global font metrics */ + if (fnmetrics(metrics)) { + free(glyph_list); + free(metrics); + close_font(); + snprintf(erblock.errmess, 252, "Insufficient memory"); + wimp_report_error(&erblock, 0x5, "TTF2f"); + converting = 0; + return 1; + } + + /* map glyph ids to charcodes */ + if (glenc(glyph_list)) { + free(glyph_list); + free(metrics); + close_font(); + snprintf(erblock.errmess, 252, "Unknown encoding"); + wimp_report_error(&erblock, 0x5, "TTF2f"); + converting = 0; + return 1; + } + + /* extract glyph names */ + if (glnames(glyph_list)) { + free(glyph_list); + free(metrics); + close_font(); + snprintf(erblock.errmess, 252, "Insufficient memory"); + wimp_report_error(&erblock, 0x5, "TTF2f"); + converting = 0; + return 1; + } + + /* olive */ + slider_set_colour(0, main_window, 8, 13, 0); + + /* extract glyph metrics */ + glmetrics(glyph_list, progress_bar); + + /* red */ + slider_set_colour(0, main_window, 8, 11, 13); + + /* write intmetrics file */ + write_intmetrics(save_in, ofilename, glyph_list, nglyphs, metrics, progress_bar); + + /* blue */ + slider_set_colour(0, main_window, 8, 8, 11); + + /* write outlines file */ + write_outlines(save_in, ofilename, glyph_list, nglyphs, metrics, progress_bar); + + /* green */ + slider_set_colour(0, main_window, 8, 10, 8); + + /* write encoding file */ + write_encoding(save_in, ofilename, glyph_list, nglyphs, 0, progress_bar); + + /* reset slider */ + slider_set_colour(0, main_window, 8, 8, 0); + slider_set_value(0, main_window, 8, 0); + + free(glyph_list); + free(metrics); + + close_font(); + + converting = 0; + + return 1; +} + +void progress_bar(int value) +{ + slider_set_value(0, main_window, 8, value); +} + |