Remove pthread.h from source. We should be using asterisk/lock.h everywhere instead...
[asterisk/asterisk.git] / image.c
1 /*
2  * Asterisk -- A telephony toolkit for Linux.
3  *
4  * Channel Management
5  * 
6  * Copyright (C) 1999, Mark Spencer
7  *
8  * Mark Spencer <markster@linux-support.net>
9  *
10  * This program is free software, distributed under the terms of
11  * the GNU General Public License
12  */
13
14 #include <stdio.h>
15 #include <stdlib.h>
16 #include <string.h>
17 #include <sys/time.h>
18 #include <sys/stat.h>
19 #include <signal.h>
20 #include <errno.h>
21 #include <unistd.h>
22 #include <asterisk/sched.h>
23 #include <asterisk/options.h>
24 #include <asterisk/channel.h>
25 #include <asterisk/channel_pvt.h>
26 #include <asterisk/logger.h>
27 #include <asterisk/file.h>
28 #include <asterisk/image.h>
29 #include <asterisk/translate.h>
30 #include <asterisk/cli.h>
31 #include <asterisk/lock.h>
32 #include "asterisk.h"
33 #include "astconf.h"
34
35 static struct ast_imager *list;
36 AST_MUTEX_DEFINE_STATIC(listlock);
37
38 int ast_image_register(struct ast_imager *img)
39 {
40         if (option_verbose > 1)
41                 ast_verbose(VERBOSE_PREFIX_2 "Registered format '%s' (%s)\n", img->name, img->desc);
42         ast_mutex_lock(&listlock);
43         img->next = list;
44         list = img;
45         ast_mutex_unlock(&listlock);
46         return 0;
47 }
48
49 void ast_image_unregister(struct ast_imager *img)
50 {
51         struct ast_imager *i, *prev = NULL;
52         ast_mutex_lock(&listlock);
53         i = list;
54         while(i) {
55                 if (i == img) {
56                         if (prev) 
57                                 prev->next = i->next;
58                         else
59                                 list = i->next;
60                         break;
61                 }
62                 prev = i;
63                 i = i->next;
64         }
65         ast_mutex_unlock(&listlock);
66         if (i && (option_verbose > 1))
67                 ast_verbose(VERBOSE_PREFIX_2 "Unregistered format '%s' (%s)\n", img->name, img->desc);
68 }
69
70 int ast_supports_images(struct ast_channel *chan)
71 {
72         if (!chan || !chan->pvt)
73                 return 0;
74         if (!chan->pvt->send_image)
75                 return 0;
76         return 1;
77 }
78
79 static int file_exists(char *filename)
80 {
81         int res;
82         struct stat st;
83         res = stat(filename, &st);
84         if (!res)
85                 return st.st_size;
86         return 0;
87 }
88
89 static void make_filename(char *buf, int len, char *filename, char *preflang, char *ext)
90 {
91         if (filename[0] == '/') {
92                 if (preflang && strlen(preflang))
93                         snprintf(buf, len, "%s-%s.%s", filename, preflang, ext);
94                 else
95                         snprintf(buf, len, "%s.%s", filename, ext);
96         } else {
97                 if (preflang && strlen(preflang))
98                         snprintf(buf, len, "%s/%s/%s-%s.%s", ast_config_AST_VAR_DIR, "images", filename, preflang, ext);
99                 else
100                         snprintf(buf, len, "%s/%s/%s.%s", ast_config_AST_VAR_DIR, "images", filename, ext);
101         }
102 }
103
104 struct ast_frame *ast_read_image(char *filename, char *preflang, int format)
105 {
106         struct ast_imager *i;
107         char buf[256];
108         char tmp[80];
109         char *e;
110         struct ast_imager *found = NULL;
111         int fd;
112         int len=0;
113         struct ast_frame *f = NULL;
114 #if 0 /* We need to have some sort of read-only lock */
115         ast_mutex_lock(&listlock);
116 #endif  
117         i = list;
118         while(!found && i) {
119                 if (i->format & format) {
120                         char *stringp=NULL;
121                         strncpy(tmp, i->exts, sizeof(tmp)-1);
122                         stringp=tmp;
123                         e = strsep(&stringp, "|");
124                         while(e) {
125                                 make_filename(buf, sizeof(buf), filename, preflang, e);
126                                 if ((len = file_exists(buf))) {
127                                         found = i;
128                                         break;
129                                 }
130                                 make_filename(buf, sizeof(buf), filename, NULL, e);
131                                 if ((len = file_exists(buf))) {
132                                         found = i;
133                                         break;
134                                 }
135                                 e = strsep(&stringp, "|");
136                         }
137                 }
138                 i = i->next;
139         }
140         if (found) {
141                 fd = open(buf, O_RDONLY);
142                 if (fd > -1) {
143                         if (!found->identify || found->identify(fd)) {
144                                 /* Reset file pointer */
145                                 lseek(fd, 0, SEEK_SET);
146                                 f = found->read_image(fd,len); 
147                         } else
148                                 ast_log(LOG_WARNING, "%s does not appear to be a %s file\n", buf, i->name);
149                         close(fd);
150                 } else
151                         ast_log(LOG_WARNING, "Unable to open '%s': %s\n", buf, strerror(errno));
152         } else
153                 ast_log(LOG_WARNING, "Image file '%s' not found\n", filename);
154 #if 0
155         ast_mutex_unlock(&listlock);
156 #endif  
157         return f;
158 }
159
160
161 int ast_send_image(struct ast_channel *chan, char *filename)
162 {
163         struct ast_frame *f;
164         int res = -1;
165         if (chan->pvt->send_image) {
166                 f = ast_read_image(filename, chan->language, -1);
167                 if (f) {
168                         res = chan->pvt->send_image(chan, f);
169                         ast_frfree(f);
170                 }
171         }
172         return res;
173 }
174
175 static int show_image_formats(int fd, int argc, char *argv[])
176 {
177 #define FORMAT "%10s %10s %50s %10s\n"
178 #define FORMAT2 "%10s %10s %50s %10s\n"
179         struct ast_imager *i;
180         if (argc != 3)
181                 return RESULT_SHOWUSAGE;
182         ast_cli(fd, FORMAT, "Name", "Extensions", "Description", "Format");
183         i = list;
184         while(i) {
185                 ast_cli(fd, FORMAT2, i->name, i->exts, i->desc, ast_getformatname(i->format));
186                 i = i->next;
187         };
188         return RESULT_SUCCESS;
189 }
190
191 struct ast_cli_entry show_images =
192 {
193         { "show", "image", "formats" },
194         show_image_formats,
195         "Displays image formats",
196 "Usage: show image formats\n"
197 "       displays currently registered image formats (if any)\n"
198 };
199
200
201 int ast_image_init(void)
202 {
203         ast_cli_register(&show_images);
204         return 0;
205 }
206