source: libcaca/trunk/caca/caca.c @ 2519

Last change on this file since 2519 was 2519, checked in by Sam Hocevar, 11 years ago
  • Fix plugin build.
  • Property svn:keywords set to Id
File size: 11.7 KB
Line 
1/*
2 *  libcaca       Colour ASCII-Art library
3 *  Copyright (c) 2006 Sam Hocevar <sam@zoy.org>
4 *                All Rights Reserved
5 *
6 *  $Id: caca.c 2519 2008-07-05 16:39:56Z sam $
7 *
8 *  This library is free software. It comes without any warranty, to
9 *  the extent permitted by applicable law. You can redistribute it
10 *  and/or modify it under the terms of the Do What The Fuck You Want
11 *  To Public License, Version 2, as published by Sam Hocevar. See
12 *  http://sam.zoy.org/wtfpl/COPYING for more details.
13 */
14
15/*
16 *  This file contains the main functions used by \e libcaca applications to
17 *  initialise the library, get the screen properties, set the framerate and
18 *  so on.
19 */
20
21#include "config.h"
22
23#if !defined(__KERNEL__)
24#   include <stdlib.h>
25#   include <string.h>
26#   include <stdio.h>
27#   if defined(USE_PLUGINS)
28#       if defined(HAVE_DLFCN_H)
29#           include <dlfcn.h>
30#       endif
31#   endif
32#endif
33
34#include "cucul.h"
35#include "caca.h"
36#include "caca_internals.h"
37
38#if defined(USE_PLUGINS)
39#   define gl_install(p) caca_plugin_install(p, "gl")
40#   define x11_install(p) caca_plugin_install(p, "x11")
41#endif
42
43static int caca_can_resize(caca_display_t *);
44static int caca_install_driver(caca_display_t *, char const *);
45static int caca_uninstall_driver(caca_display_t *);
46static int caca_select_driver(caca_display_t *, char const *);
47#if defined(USE_PLUGINS)
48static int caca_plugin_install(caca_display_t *, char const *);
49#endif
50
51/** \brief Attach a caca graphical context to a cucul canvas.
52 *
53 *  Create a graphical context using device-dependent features (ncurses for
54 *  terminals, an X11 window, a DOS command window...) that attaches to a
55 *  libcucul canvas. Everything that gets drawn in the libcucul canvas can
56 *  then be displayed by the libcaca driver.
57 *
58 *  If no cucul canvas is provided, a new one is created. Its handle can be
59 *  retrieved using caca_get_canvas() and it is automatically destroyed when
60 *  caca_free_display() is called.
61 *
62 *  See also caca_create_display_with_driver().
63 *
64 *  If an error occurs, NULL is returned and \b errno is set accordingly:
65 *  - \c ENOMEM Not enough memory.
66 *  - \c ENODEV Graphical device could not be initialised.
67 *
68 *  \param cv The cucul canvas or NULL to create a canvas automatically.
69 *  \return The caca graphical context or NULL if an error occurred.
70 */
71caca_display_t * caca_create_display(cucul_canvas_t *cv)
72{
73    return caca_create_display_with_driver(cv, NULL);
74}
75
76/** \brief Attach a specific caca graphical context to a cucul canvas.
77 *
78 *  Create a graphical context using device-dependent features (ncurses for
79 *  terminals, an X11 window, a DOS command window...) that attaches to a
80 *  libcucul canvas. Everything that gets drawn in the libcucul canvas can
81 *  then be displayed by the libcaca driver.
82 *
83 *  If no cucul canvas is provided, a new one is created. Its handle can be
84 *  retrieved using caca_get_canvas() and it is automatically destroyed when
85 *  caca_free_display() is called.
86 *
87 *  If no driver name is provided, \e libcaca will try to autodetect the best
88 *  output driver it can.
89 *
90 *  See also caca_create_display().
91 *
92 *  If an error occurs, NULL is returned and \b errno is set accordingly:
93 *  - \c ENOMEM Not enough memory.
94 *  - \c ENODEV Graphical device could not be initialised.
95 *
96 *  \param cv The cucul canvas or NULL to create a canvas automatically.
97 *  \param driver A string describing the desired output driver or NULL to
98 *                choose the best driver automatically.
99 *  \return The caca graphical context or NULL if an error occurred.
100 */
101caca_display_t * caca_create_display_with_driver(cucul_canvas_t *cv,
102                                                 char const *driver)
103{
104    caca_display_t *dp = malloc(sizeof(caca_display_t));
105
106    if(!dp)
107    {
108        seterrno(ENOMEM);
109        return NULL;
110    }
111
112    if((dp->autorelease = (cv == NULL)))
113    {
114        cv = cucul_create_canvas(0, 0);
115    }
116
117    dp->cv = cv;
118
119    if(cucul_manage_canvas(cv, (int (*)(void *))caca_can_resize, (void *)dp))
120    {
121        if(dp->autorelease)
122            cucul_free_canvas(dp->cv);
123        free(dp);
124        seterrno(EBUSY);
125        return NULL;
126    }
127
128    if(caca_install_driver(dp, driver))
129    {
130        cucul_unmanage_canvas(cv, (int (*)(void *))caca_can_resize, (void *)dp);
131        if(dp->autorelease)
132            cucul_free_canvas(dp->cv);
133        free(dp);
134        seterrno(ENODEV);
135        return NULL;
136    }
137
138    return dp;
139}
140
141/** \brief Get available display drivers
142 *
143 *  Return a list of available display drivers. The list is a NULL-terminated
144 *  array of strings, interleaving a string containing the internal value for
145 *  the display driver, and a string containing the natural language
146 *  description for that driver.
147 *
148 *  This function never fails.
149 *
150 *  \return An array of strings.
151 */
152char const * const * caca_get_display_driver_list(void)
153{
154    static char const * const list[] =
155    {
156#if defined(USE_COCOA)
157        "cocoa", "Mac OS X Cocoa",
158#endif
159#if defined(USE_WIN32)
160        "win32", "Windows console",
161#endif
162#if defined(USE_CONIO)
163        "conio", "MS-DOS conio",
164#endif
165#if defined(USE_X11)
166        "x11", "X11 graphical window",
167#endif
168#if defined(USE_GL)
169        "gl", "OpenGL window",
170#endif
171#if defined(USE_SLANG)
172        "slang", "S-Lang console library",
173#endif
174#if defined(USE_NCURSES)
175        "ncurses", "ncurses console library",
176#endif
177#if defined(USE_VGA)
178        "vga", "direct VGA memory",
179#endif
180#if !defined(__KERNEL__)
181        "raw", "raw libcaca output",
182#endif
183        NULL, NULL
184    };
185
186    return list;
187}
188
189/** \brief Return a caca graphical context's current output driver.
190 *
191 *  Return the given display's current output driver.
192 *
193 *  This function never fails.
194 *
195 *  \param dp The caca display.
196 *  \return A static string.
197 */
198char const * caca_get_display_driver(caca_display_t *dp)
199{
200    return dp->drv.driver;
201}
202
203/** \brief Set the output driver.
204 *
205 *  Dynamically change the given display's output driver.
206 *
207 *  FIXME: decide what to do in case of failure
208 *
209 *  \param dp The caca display.
210 *  \param driver A string describing the desired output driver or NULL to
211 *                choose the best driver automatically.
212 *  \return 0 in case of success, -1 if an error occurred.
213 */
214int caca_set_display_driver(caca_display_t *dp, char const *driver)
215{
216    caca_uninstall_driver(dp);
217    if(caca_install_driver(dp, driver))
218    {
219        seterrno(ENODEV);
220        return -1;
221    }
222
223    return 0;
224}
225
226/** \brief Detach a caca graphical context from a cucul backend context.
227 *
228 *  Detach a graphical context from its cucul backend and destroy it. The
229 *  libcucul canvas continues to exist and other graphical contexts can be
230 *  attached to it afterwards.
231 *
232 *  If the cucul canvas was automatically created by caca_create_display(),
233 *  it is automatically destroyed and any handle to it becomes invalid.
234 *
235 *  This function never fails.
236 *
237 *  \param dp The libcaca graphical context.
238 *  \return This function always returns 0.
239 */
240int caca_free_display(caca_display_t *dp)
241{
242    caca_uninstall_driver(dp);
243    cucul_unmanage_canvas(dp->cv, (int (*)(void *))caca_can_resize, (void *)dp);
244    if(dp->autorelease)
245        cucul_free_canvas(dp->cv);
246    free(dp);
247
248    return 0;
249}
250
251/** \brief Get the canvas attached to a caca graphical context.
252 *
253 *  Return a handle on the \e cucul_canvas_t object that was either attached
254 *  or created by caca_create_display().
255 *
256 *  This function never fails.
257 *
258 *  \param dp The libcaca graphical context.
259 *  \return The libcucul canvas.
260 */
261cucul_canvas_t * caca_get_canvas(caca_display_t *dp)
262{
263    return dp->cv;
264}
265
266/** \brief Return the \e libcaca version.
267 *
268 *  Return a read-only string with the \e libcaca version information.
269 *
270 *  This function never fails.
271 *
272 *  \return The \e libcaca version information.
273 */
274char const * caca_get_version(void)
275{
276    return VERSION;
277}
278
279/*
280 * XXX: The following functions are local.
281 */
282
283static int caca_can_resize(caca_display_t *dp)
284{
285    return dp->resize.allow;
286}
287
288static int caca_install_driver(caca_display_t *dp, char const *driver)
289{
290#if defined(USE_PLUGINS)
291    dp->plugin = NULL;
292#endif
293
294    if(caca_select_driver(dp, driver))
295    {
296#if defined(USE_PLUGINS)
297        if(dp->plugin)
298            dlclose(dp->plugin);
299#endif
300        return -1;
301    }
302
303    if(dp->drv.init_graphics(dp))
304    {
305#if defined(USE_PLUGINS)
306        if(dp->plugin)
307            dlclose(dp->plugin);
308#endif
309        return -1;
310    }
311
312    /* Graphics stuff */
313    dp->delay = 0;
314    dp->rendertime = 0;
315
316    /* Events stuff */
317#if defined(USE_SLANG) || defined(USE_NCURSES)
318    dp->events.key_timer.last_sec = 0;
319    dp->events.key_timer.last_usec = 0;
320    dp->events.last_key_ticks = 0;
321    dp->events.autorepeat_ticks = 0;
322    dp->events.last_key_event.type = CACA_EVENT_NONE;
323#endif
324#if defined(USE_SLANG) || defined(USE_NCURSES) || defined(USE_CONIO) || defined(USE_GL)
325    dp->events.queue = 0;
326#endif
327
328    dp->timer.last_sec = 0;
329    dp->timer.last_usec = 0;
330    dp->lastticks = 0;
331
332    /* Mouse position */
333    dp->mouse.x = cucul_get_canvas_width(dp->cv) / 2;
334    dp->mouse.y = cucul_get_canvas_height(dp->cv) / 2;
335
336    /* Resize events */
337    dp->resize.resized = 0;
338    dp->resize.allow = 0;
339
340    return 0;
341}
342
343static int caca_uninstall_driver(caca_display_t *dp)
344{
345    dp->drv.end_graphics(dp);
346#if defined(USE_PLUGINS)
347    if(dp->plugin)
348        dlclose(dp->plugin);
349#endif
350
351    return 0;
352}
353
354static int caca_select_driver(caca_display_t *dp, char const *driver)
355{
356    char const *var = driver;
357#if defined(HAVE_GETENV)
358    if(!var)
359        var = getenv("CACA_DRIVER");
360#endif
361
362#if defined(HAVE_STRCASECMP)
363    /* If the environment variable was set, use it */
364    if(var && *var)
365    {
366#if defined(USE_COCOA)
367        if(!strcasecmp(var, "cocoa")) return cocoa_install(dp);
368#endif
369#if defined(USE_WIN32)
370        if(!strcasecmp(var, "win32")) return win32_install(dp);
371#endif
372#if defined(USE_CONIO)
373        if(!strcasecmp(var, "conio")) return conio_install(dp);
374#endif
375#if defined(USE_X11)
376        if(!strcasecmp(var, "x11")) return x11_install(dp);
377#endif
378#if defined(USE_GL)
379        if(!strcasecmp(var, "gl")) return gl_install(dp);
380#endif
381#if !defined(__KERNEL__)
382        if(!strcasecmp(var, "raw")) return raw_install(dp);
383#endif
384#if defined(USE_SLANG)
385        if(!strcasecmp(var, "slang")) return slang_install(dp);
386#endif
387#if defined(USE_NCURSES)
388        if(!strcasecmp(var, "ncurses")) return ncurses_install(dp);
389#endif
390#if defined(USE_VGA)
391        if(!strcasecmp(var, "vga")) return vga_install(dp);
392#endif
393        return -1;
394    }
395#endif
396
397#if defined(USE_COCOA)
398    if(cocoa_install(dp) == 0) return 0;
399#endif
400#if defined(USE_WIN32)
401    if(win32_install(dp) == 0) return 0;
402#endif
403#if defined(USE_CONIO)
404    if(conio_install(dp) == 0) return 0;
405#endif
406#if defined(USE_VGA)
407    if(vga_install(dp) == 0) return 0;
408#endif
409#if defined(USE_X11)
410    if(x11_install(dp) == 0) return 0;
411#endif
412#if defined(USE_GL)
413    if(gl_install(dp) == 0) return 0;
414#endif
415    /* ncurses has a higher priority than slang because it has better colour
416     * support across terminal types, despite being slightly slower. */
417#if defined(USE_NCURSES)
418    if(ncurses_install(dp) == 0) return 0;
419#endif
420#if defined(USE_SLANG)
421    if(slang_install(dp) == 0) return 0;
422#endif
423
424    return -1;
425}
426
427#if defined(USE_PLUGINS)
428static int caca_plugin_install(caca_display_t *dp, char const *driver)
429{
430    char buf[512];
431    int (*sym) (caca_display_t *);
432
433    sprintf(buf, "%s/lib%s_plugin.so", PLUGINDIR, driver);
434    dp->plugin = dlopen(buf, RTLD_NOW);
435    if(!dp->plugin)
436    {
437        sprintf(buf, "lib%s_plugin.so", driver);
438        dp->plugin = dlopen(buf, RTLD_NOW);
439        if(!dp->plugin)
440            return -1;
441    }
442
443    sprintf(buf, "%s_install", driver);
444    sym = dlsym(dp->plugin, buf);
445    if(!sym)
446    {
447        dlclose(dp->plugin);
448        return -1;
449    }
450
451    return sym(dp);
452}
453#endif
454
Note: See TracBrowser for help on using the repository browser.