source: libcaca/trunk/src/cacaview.c @ 1462

Last change on this file since 1462 was 1462, checked in by Sam Hocevar, 13 years ago
  • Bwarf, typo in the no warranty clause.
  • Property svn:keywords set to Id
File size: 15.0 KB
Line 
1/*
2 *  cacaview      image viewer for libcaca
3 *  Copyright (c) 2003-2006 Sam Hocevar <sam@zoy.org>
4 *                All Rights Reserved
5 *
6 *  $Id: cacaview.c 1462 2006-12-12 01:53:54Z sam $
7 *
8 *  This program 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#include "config.h"
16#include "common.h"
17
18#if !defined(__KERNEL__)
19#   include <stdio.h>
20#   include <string.h>
21#   include <stdlib.h>
22#endif
23
24#if defined(HAVE_SLEEP)
25#   include <windows.h>
26#endif
27
28#include "cucul.h"
29#include "caca.h"
30#include "common-image.h"
31
32/* Local macros */
33#define MODE_IMAGE 1
34#define MODE_FILES 2
35
36#define STATUS_DITHERING 1
37#define STATUS_ANTIALIASING 2
38#define STATUS_BACKGROUND 3
39
40#define ZOOM_FACTOR 1.08f
41#define ZOOM_MAX 50
42#define GAMMA_FACTOR 1.04f
43#define GAMMA_MAX 100
44#define GAMMA(g) (((g) < 0) ? 1.0 / gammatab[-(g)] : gammatab[(g)])
45#define PAD_STEP 0.15
46
47/* libcucul/libcaca contexts */
48cucul_canvas_t *cv; caca_display_t *dp;
49
50/* Local functions */
51static void print_status(void);
52static void print_help(int, int);
53static void set_zoom(int);
54static void set_gamma(int);
55static void draw_checkers(int, int, int, int);
56
57/* Local variables */
58struct image *im = NULL;
59
60float zoomtab[ZOOM_MAX + 1];
61float gammatab[GAMMA_MAX + 1];
62float xfactor = 1.0, yfactor = 1.0, dx = 0.5, dy = 0.5;
63int zoom = 0, g = 0, fullscreen = 0, mode, ww, wh;
64
65int main(int argc, char **argv)
66{
67    int quit = 0, update = 1, help = 0, status = 0;
68    int reload = 0;
69
70    char **list = NULL;
71    int current = 0, items = 0, opts = 1;
72    int i;
73
74    /* Initialise libcucul */
75    cv = cucul_create_canvas(0, 0);
76    if(!cv)
77    {
78        fprintf(stderr, "%s: unable to initialise libcucul\n", argv[0]);
79        return 1;
80    }
81
82    dp = caca_create_display(cv);
83    if(!dp)
84    {
85        fprintf(stderr, "%s: unable to initialise libcaca\n", argv[0]);
86        return 1;
87    }
88
89    /* Set the window title */
90    caca_set_display_title(dp, "cacaview");
91
92    ww = cucul_get_canvas_width(cv);
93    wh = cucul_get_canvas_height(cv);
94
95    /* Fill the zoom table */
96    zoomtab[0] = 1.0;
97    for(i = 0; i < ZOOM_MAX; i++)
98        zoomtab[i + 1] = zoomtab[i] * ZOOM_FACTOR;
99
100    /* Fill the gamma table */
101    gammatab[0] = 1.0;
102    for(i = 0; i < GAMMA_MAX; i++)
103        gammatab[i + 1] = gammatab[i] * GAMMA_FACTOR;
104
105    /* Load items into playlist */
106    for(i = 1; i < argc; i++)
107    {
108        /* Skip options except after `--' */
109        if(opts && argv[i][0] == '-')
110        {
111            if(argv[i][1] == '-' && argv[i][2] == '\0')
112                opts = 0;
113            continue;
114        }
115
116        /* Add argv[i] to the list */
117        if(items)
118            list = realloc(list, (items + 1) * sizeof(char *));
119        else
120            list = malloc(sizeof(char *));
121        list[items] = argv[i];
122        items++;
123
124        reload = 1;
125    }
126
127    /* Go ! */
128    while(!quit)
129    {
130        caca_event_t ev;
131        unsigned int const event_mask = CACA_EVENT_KEY_PRESS
132                                      | CACA_EVENT_RESIZE
133                                      | CACA_EVENT_MOUSE_PRESS;
134        unsigned int new_status = 0, new_help = 0;
135        int event;
136
137        if(update)
138            event = caca_get_event(dp, event_mask, &ev, 0);
139        else
140            event = caca_get_event(dp, event_mask, &ev, -1);
141
142        while(event)
143        {
144            if(ev.type & CACA_EVENT_MOUSE_PRESS)
145            {
146                if(ev.data.mouse.button == 1)
147                {
148                    if(items) current = (current + 1) % items;
149                    reload = 1;
150                }
151                else if(ev.data.mouse.button == 2)
152                {
153                    if(items) current = (items + current - 1) % items;
154                    reload = 1;
155                }
156            }
157            else if(ev.type & CACA_EVENT_KEY_PRESS) switch(ev.data.key.ch)
158            {
159            case 'n':
160            case 'N':
161                if(items) current = (current + 1) % items;
162                reload = 1;
163                break;
164            case 'p':
165            case 'P':
166                if(items) current = (items + current - 1) % items;
167                reload = 1;
168                break;
169            case 'f':
170            case 'F':
171                fullscreen = ~fullscreen;
172                update = 1;
173                set_zoom(zoom);
174                break;
175#if 0 /* FIXME */
176            case 'b':
177                i = 1 + cucul_get_feature(cv, CUCUL_BACKGROUND);
178                if(i > CUCUL_BACKGROUND_MAX) i = CUCUL_BACKGROUND_MIN;
179                cucul_set_feature(cv, i);
180                new_status = STATUS_BACKGROUND;
181                update = 1;
182                break;
183            case 'B':
184                i = -1 + cucul_get_feature(cv, CUCUL_BACKGROUND);
185                if(i < CUCUL_BACKGROUND_MIN) i = CUCUL_BACKGROUND_MAX;
186                cucul_set_feature(cv, i);
187                new_status = STATUS_BACKGROUND;
188                update = 1;
189                break;
190            case 'a':
191                i = 1 + cucul_get_feature(cv, CUCUL_ANTIALIASING);
192                if(i > CUCUL_ANTIALIASING_MAX) i = CUCUL_ANTIALIASING_MIN;
193                cucul_set_feature(cv, i);
194                new_status = STATUS_ANTIALIASING;
195                update = 1;
196                break;
197            case 'A':
198                i = -1 + cucul_get_feature(cv, CUCUL_ANTIALIASING);
199                if(i < CUCUL_ANTIALIASING_MIN) i = CUCUL_ANTIALIASING_MAX;
200                cucul_set_feature(cv, i);
201                new_status = STATUS_ANTIALIASING;
202                update = 1;
203                break;
204            case 'd':
205                i = 1 + cucul_get_feature(cv, CUCUL_DITHERING);
206                if(i > CUCUL_DITHERING_MAX) i = CUCUL_DITHERING_MIN;
207                cucul_set_feature(cv, i);
208                new_status = STATUS_DITHERING;
209                update = 1;
210                break;
211            case 'D':
212                i = -1 + cucul_get_feature(cv, CUCUL_DITHERING);
213                if(i < CUCUL_DITHERING_MIN) i = CUCUL_DITHERING_MAX;
214                cucul_set_feature(cv, i);
215                new_status = STATUS_DITHERING;
216                update = 1;
217                break;
218#endif
219            case '+':
220                update = 1;
221                set_zoom(zoom + 1);
222                break;
223            case '-':
224                update = 1;
225                set_zoom(zoom - 1);
226                break;
227            case 'G':
228                update = 1;
229                set_gamma(g + 1);
230                break;
231            case 'g':
232                update = 1;
233                set_gamma(g - 1);
234                break;
235            case 'x':
236            case 'X':
237                update = 1;
238                set_zoom(0);
239                set_gamma(0);
240                break;
241            case 'k':
242            case 'K':
243            case CACA_KEY_UP:
244                if(yfactor > 1.0) dy -= PAD_STEP / yfactor;
245                if(dy < 0.0) dy = 0.0;
246                update = 1;
247                break;
248            case 'j':
249            case 'J':
250            case CACA_KEY_DOWN:
251                if(yfactor > 1.0) dy += PAD_STEP / yfactor;
252                if(dy > 1.0) dy = 1.0;
253                update = 1;
254                break;
255            case 'h':
256            case 'H':
257            case CACA_KEY_LEFT:
258                if(xfactor > 1.0) dx -= PAD_STEP / xfactor;
259                if(dx < 0.0) dx = 0.0;
260                update = 1;
261                break;
262            case 'l':
263            case 'L':
264            case CACA_KEY_RIGHT:
265                if(xfactor > 1.0) dx += PAD_STEP / xfactor;
266                if(dx > 1.0) dx = 1.0;
267                update = 1;
268                break;
269            case '?':
270                new_help = !help;
271                update = 1;
272                break;
273            case 'q':
274            case 'Q':
275                quit = 1;
276                break;
277            }
278            else if(ev.type == CACA_EVENT_RESIZE)
279            {
280                caca_refresh_display(dp);
281                ww = ev.data.resize.w;
282                wh = ev.data.resize.h;
283                update = 1;
284                set_zoom(zoom);
285            }
286
287            if(status || new_status)
288                status = new_status;
289
290            if(help || new_help)
291                help = new_help;
292
293            event = caca_get_event(dp, CACA_EVENT_KEY_PRESS, &ev, 0);
294        }
295
296        if(items && reload)
297        {
298            char *buffer;
299            int len = strlen(" Loading `%s'... ") + strlen(list[current]);
300
301            if(len < ww + 1)
302                len = ww + 1;
303
304            buffer = malloc(len);
305
306            sprintf(buffer, " Loading `%s'... ", list[current]);
307            buffer[ww] = '\0';
308            cucul_set_color_ansi(cv, CUCUL_WHITE, CUCUL_BLUE);
309            cucul_put_str(cv, (ww - strlen(buffer)) / 2, wh / 2, buffer);
310            caca_refresh_display(dp);
311            ww = cucul_get_canvas_width(cv);
312            wh = cucul_get_canvas_height(cv);
313
314            if(im)
315                unload_image(im);
316            im = load_image(list[current]);
317            reload = 0;
318
319            /* Reset image-specific runtime variables */
320            dx = dy = 0.5;
321            update = 1;
322            set_zoom(0);
323            set_gamma(0);
324
325            free(buffer);
326        }
327
328        cucul_set_color_ansi(cv, CUCUL_WHITE, CUCUL_BLACK);
329        cucul_clear_canvas(cv);
330
331        if(!items)
332        {
333            cucul_set_color_ansi(cv, CUCUL_WHITE, CUCUL_BLUE);
334            cucul_printf(cv, ww / 2 - 5, wh / 2, " No image. ");
335        }
336        else if(!im)
337        {
338#if defined(USE_IMLIB2)
339#   define ERROR_STRING " Error loading `%s'. "
340#else
341#   define ERROR_STRING " Error loading `%s'. Only BMP is supported. "
342#endif
343            char *buffer;
344            int len = strlen(ERROR_STRING) + strlen(list[current]);
345
346            if(len < ww + 1)
347                len = ww + 1;
348
349            buffer = malloc(len);
350
351            sprintf(buffer, ERROR_STRING, list[current]);
352            buffer[ww] = '\0';
353            cucul_set_color_ansi(cv, CUCUL_WHITE, CUCUL_BLUE);
354            cucul_put_str(cv, (ww - strlen(buffer)) / 2, wh / 2, buffer);
355            free(buffer);
356        }
357        else
358        {
359            float xdelta, ydelta;
360            int y, height;
361
362            y = fullscreen ? 0 : 1;
363            height = fullscreen ? wh : wh - 3;
364
365            xdelta = (xfactor > 1.0) ? dx : 0.5;
366            ydelta = (yfactor > 1.0) ? dy : 0.5;
367
368            draw_checkers(ww * (1.0 - xfactor) / 2,
369                          y + height * (1.0 - yfactor) / 2,
370                          ww * xfactor, height * yfactor);
371
372            cucul_dither_bitmap(cv, ww * (1.0 - xfactor) * xdelta,
373                            y + height * (1.0 - yfactor) * ydelta,
374                            ww * xfactor + 1, height * yfactor + 1,
375                            im->dither, im->pixels);
376        }
377
378        if(!fullscreen)
379        {
380            print_status();
381
382#if 0 /* FIXME */
383            cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
384            switch(status)
385            {
386                case STATUS_ANTIALIASING:
387                    cucul_printf(cv, 0, wh - 1, "Antialiasing: %s",
388                  cucul_get_feature_name(cucul_get_feature(cv, CUCUL_ANTIALIASING)));
389                    break;
390                case STATUS_DITHERING:
391                    cucul_printf(cv, 0, wh - 1, "Dithering: %s",
392                  cucul_get_feature_name(cucul_get_feature(cv, CUCUL_DITHERING)));
393                    break;
394                case STATUS_BACKGROUND:
395                    cucul_printf(cv, 0, wh - 1, "Background: %s",
396                  cucul_get_feature_name(cucul_get_feature(cv, CUCUL_BACKGROUND)));
397                    break;
398            }
399#endif
400        }
401
402        if(help)
403        {
404            print_help(ww - 26, 2);
405        }
406
407        caca_refresh_display(dp);
408        update = 0;
409    }
410
411    /* Clean up */
412    if(im)
413        unload_image(im);
414    caca_free_display(dp);
415    cucul_free_canvas(cv);
416
417    return 0;
418}
419
420static void print_status(void)
421{
422    cucul_set_color_ansi(cv, CUCUL_WHITE, CUCUL_BLUE);
423    cucul_draw_line(cv, 0, 0, ww - 1, 0, ' ');
424    cucul_draw_line(cv, 0, wh - 2, ww - 1, wh - 2, '-');
425    cucul_put_str(cv, 0, 0, "q:Quit  np:Next/Prev  +-x:Zoom  gG:Gamma  "
426                            "hjkl:Move  d:Dither  a:Antialias");
427    cucul_put_str(cv, ww - strlen("?:Help"), 0, "?:Help");
428    cucul_printf(cv, 3, wh - 2, "cacaview %s", VERSION);
429    cucul_printf(cv, ww - 30, wh - 2, "(gamma: %#.3g)", GAMMA(g));
430    cucul_printf(cv, ww - 14, wh - 2, "(zoom: %s%i)", zoom > 0 ? "+" : "", zoom);
431
432    cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
433    cucul_draw_line(cv, 0, wh - 1, ww - 1, wh - 1, ' ');
434}
435
436static void print_help(int x, int y)
437{
438    static char const *help[] =
439    {
440        " +: zoom in              ",
441        " -: zoom out             ",
442        " g: decrease gamma       ",
443        " G: increase gamma       ",
444        " x: reset zoom and gamma ",
445        " ----------------------- ",
446        " hjkl: move view         ",
447        " arrows: move view       ",
448        " ----------------------- ",
449        " a: antialiasing method  ",
450        " d: dithering method     ",
451        " b: background mode      ",
452        " ----------------------- ",
453        " ?: help                 ",
454        " q: quit                 ",
455        NULL
456    };
457
458    int i;
459
460    cucul_set_color_ansi(cv, CUCUL_WHITE, CUCUL_BLUE);
461
462    for(i = 0; help[i]; i++)
463        cucul_put_str(cv, x, y + i, help[i]);
464}
465
466static void set_zoom(int new_zoom)
467{
468    int height;
469
470    if(!im)
471        return;
472
473    zoom = new_zoom;
474
475    if(zoom > ZOOM_MAX) zoom = ZOOM_MAX;
476    if(zoom < -ZOOM_MAX) zoom = -ZOOM_MAX;
477
478    ww = cucul_get_canvas_width(cv);
479    height = fullscreen ? wh : wh - 3;
480
481    xfactor = (zoom < 0) ? 1.0 / zoomtab[-zoom] : zoomtab[zoom];
482    yfactor = xfactor * ww / height * im->h / im->w
483               * cucul_get_canvas_height(cv) / cucul_get_canvas_width(cv)
484               * caca_get_display_width(dp) / caca_get_display_height(dp);
485
486    if(yfactor > xfactor)
487    {
488        float tmp = xfactor;
489        xfactor = tmp * tmp / yfactor;
490        yfactor = tmp;
491    }
492}
493
494static void set_gamma(int new_gamma)
495{
496    if(!im)
497        return;
498
499    g = new_gamma;
500
501    if(g > GAMMA_MAX) g = GAMMA_MAX;
502    if(g < -GAMMA_MAX) g = -GAMMA_MAX;
503
504    cucul_set_dither_gamma(im->dither,
505                           (g < 0) ? 1.0 / gammatab[-g] : gammatab[g]);
506}
507
508static void draw_checkers(int x, int y, int w, int h)
509{
510    int xn, yn;
511
512    if(x + w > (int)cucul_get_canvas_width(cv))
513        w = cucul_get_canvas_width(cv) - x;
514    if(y + h > (int)cucul_get_canvas_height(cv))
515        h = cucul_get_canvas_height(cv) - y;
516
517    for(yn = y > 0 ? y : 0; yn < y + h; yn++)
518        for(xn = x > 0 ? x : 0; xn < x + w; xn++)
519    {
520        if((((xn - x) / 5) ^ ((yn - y) / 3)) & 1)
521            cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_DARKGRAY);
522        else
523            cucul_set_color_ansi(cv, CUCUL_DARKGRAY, CUCUL_LIGHTGRAY);
524        cucul_put_char(cv, xn, yn, ' ');
525    }
526}
527
Note: See TracBrowser for help on using the repository browser.