dungeon_crawler

annotate prototype/imago2/ftype_module.c @ 67:2560a7ab0243

find changesets by author, revision, files, or words in the commit message
internalized libanim, libimago2, and libpsys
author John Tsiombikas <nuclear@member.fsf.org>
date Sun, 07 Oct 2012 02:04:00 +0300
parents
children
rev   line source
nuclear@67 1 /*
nuclear@67 2 libimago - a multi-format image file input/output library.
nuclear@67 3 Copyright (C) 2010 John Tsiombikas <nuclear@member.fsf.org>
nuclear@67 4
nuclear@67 5 This program is free software: you can redistribute it and/or modify
nuclear@67 6 it under the terms of the GNU Lesser General Public License as published
nuclear@67 7 by the Free Software Foundation, either version 3 of the License, or
nuclear@67 8 (at your option) any later version.
nuclear@67 9
nuclear@67 10 This program is distributed in the hope that it will be useful,
nuclear@67 11 but WITHOUT ANY WARRANTY; without even the implied warranty of
nuclear@67 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
nuclear@67 13 GNU Lesser General Public License for more details.
nuclear@67 14
nuclear@67 15 You should have received a copy of the GNU Lesser General Public License
nuclear@67 16 along with this program. If not, see <http://www.gnu.org/licenses/>.
nuclear@67 17 */
nuclear@67 18
nuclear@67 19 #include <stdlib.h>
nuclear@67 20 #include <string.h>
nuclear@67 21 #include "ftype_module.h"
nuclear@67 22
nuclear@67 23 static struct list_node {
nuclear@67 24 struct ftype_module *module;
nuclear@67 25 struct list_node *next;
nuclear@67 26 } *modules;
nuclear@67 27
nuclear@67 28 /* defined in modules.c which is generated by configure */
nuclear@67 29 void img_modules_init();
nuclear@67 30
nuclear@67 31 static int done_init;
nuclear@67 32
nuclear@67 33 int img_register_module(struct ftype_module *mod)
nuclear@67 34 {
nuclear@67 35 struct list_node *node;
nuclear@67 36
nuclear@67 37 if(!(node = malloc(sizeof *node))) {
nuclear@67 38 return -1;
nuclear@67 39 }
nuclear@67 40
nuclear@67 41 node->module = mod;
nuclear@67 42 node->next = modules;
nuclear@67 43 modules = node;
nuclear@67 44 return 0;
nuclear@67 45 }
nuclear@67 46
nuclear@67 47 struct ftype_module *img_find_format_module(struct img_io *io)
nuclear@67 48 {
nuclear@67 49 struct list_node *node;
nuclear@67 50
nuclear@67 51 if(!done_init) {
nuclear@67 52 img_modules_init();
nuclear@67 53 done_init = 1;
nuclear@67 54 }
nuclear@67 55
nuclear@67 56 node = modules;
nuclear@67 57 while(node) {
nuclear@67 58 if(node->module->check(io) != -1) {
nuclear@67 59 return node->module;
nuclear@67 60 }
nuclear@67 61 node = node->next;
nuclear@67 62 }
nuclear@67 63 return 0;
nuclear@67 64 }
nuclear@67 65
nuclear@67 66 struct ftype_module *img_guess_format(const char *fname)
nuclear@67 67 {
nuclear@67 68 struct list_node *node;
nuclear@67 69 char *suffix;
nuclear@67 70 int suffix_len;
nuclear@67 71
nuclear@67 72 if(!done_init) {
nuclear@67 73 img_modules_init();
nuclear@67 74 done_init = 1;
nuclear@67 75 }
nuclear@67 76
nuclear@67 77 if(!(suffix = strrchr(fname, '.'))) {
nuclear@67 78 return 0; /* no suffix, can't guess ... */
nuclear@67 79 }
nuclear@67 80 suffix_len = strlen(suffix);
nuclear@67 81
nuclear@67 82 node = modules;
nuclear@67 83 while(node) {
nuclear@67 84 char *suflist = node->module->suffix;
nuclear@67 85 char *start, *end;
nuclear@67 86
nuclear@67 87 while(*suflist) {
nuclear@67 88 if(!(start = strstr(suflist, suffix))) {
nuclear@67 89 break;
nuclear@67 90 }
nuclear@67 91 end = start + suffix_len;
nuclear@67 92
nuclear@67 93 if(*end == ':' || *end == 0) {
nuclear@67 94 return node->module; /* found it */
nuclear@67 95 }
nuclear@67 96 suflist = end;
nuclear@67 97 }
nuclear@67 98
nuclear@67 99 node = node->next;
nuclear@67 100 }
nuclear@67 101 return 0;
nuclear@67 102 }
nuclear@67 103
nuclear@67 104 struct ftype_module *img_get_module(int idx)
nuclear@67 105 {
nuclear@67 106 struct list_node *node;
nuclear@67 107
nuclear@67 108 if(!done_init) {
nuclear@67 109 img_modules_init();
nuclear@67 110 done_init = 1;
nuclear@67 111 }
nuclear@67 112
nuclear@67 113 node = modules;
nuclear@67 114 while(node && idx--) {
nuclear@67 115 node = node->next;
nuclear@67 116 }
nuclear@67 117 return node->module;
nuclear@67 118 }