Krolyxon
Commit a754115

Branches

Refs →

nsxivthumbs.c

599 lines · 13.8 KB · C

Raw Blame History Download
1/* Copyright 2011 Bert Muennich
2 *
3 * This file is part of sxiv.
4 *
5 * sxiv is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published
7 * by the Free Software Foundation; either version 2 of the License,
8 * or (at your option) any later version.
9 *
10 * sxiv is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with sxiv. If not, see <http://www.gnu.org/licenses/>.
17 */
18
19#include "sxiv.h"
20#define _THUMBS_CONFIG
21#include "config.h"
22
23#include <errno.h>
24#include <stdlib.h>
25#include <string.h>
26#include <sys/types.h>
27#include <sys/stat.h>
28#include <unistd.h>
29#include <utime.h>
30
31#if HAVE_LIBEXIF
32#include <libexif/exif-data.h>
33void exif_auto_orientate(const fileinfo_t*);
34#endif
35Imlib_Image img_open(const fileinfo_t*);
36
37static char *cache_dir;
38
39char* tns_cache_filepath(const char *filepath)
40{
41 size_t len;
42 char *cfile = NULL;
43
44 if (*filepath != '/')
45 return NULL;
46
47 if (strncmp(filepath, cache_dir, strlen(cache_dir)) != 0) {
48 /* don't cache images inside the cache directory! */
49 len = strlen(cache_dir) + strlen(filepath) + 2;
50 cfile = (char*) emalloc(len);
51 snprintf(cfile, len, "%s/%s", cache_dir, filepath + 1);
52 }
53 return cfile;
54}
55
56Imlib_Image tns_cache_load(const char *filepath, bool *outdated)
57{
58 char *cfile;
59 struct stat cstats, fstats;
60 Imlib_Image im = NULL;
61
62 if (stat(filepath, &fstats) < 0)
63 return NULL;
64
65 if ((cfile = tns_cache_filepath(filepath)) != NULL) {
66 if (stat(cfile, &cstats) == 0) {
67 if (cstats.st_mtime == fstats.st_mtime)
68 im = imlib_load_image(cfile);
69 else
70 *outdated = true;
71 }
72 free(cfile);
73 }
74 return im;
75}
76
77void tns_cache_write(Imlib_Image im, const char *filepath, bool force)
78{
79 char *cfile, *dirend;
80 struct stat cstats, fstats;
81 struct utimbuf times;
82 Imlib_Load_Error err;
83
84 if (options->private_mode)
85 return;
86
87 if (stat(filepath, &fstats) < 0)
88 return;
89
90 if ((cfile = tns_cache_filepath(filepath)) != NULL) {
91 if (force || stat(cfile, &cstats) < 0 ||
92 cstats.st_mtime != fstats.st_mtime)
93 {
94 if ((dirend = strrchr(cfile, '/')) != NULL) {
95 *dirend = '\0';
96 if (r_mkdir(cfile) == -1) {
97 error(0, errno, "%s", cfile);
98 goto end;
99 }
100 *dirend = '/';
101 }
102 imlib_context_set_image(im);
103 if (imlib_image_has_alpha()) {
104 imlib_image_set_format("png");
105 } else {
106 imlib_image_set_format("jpg");
107 imlib_image_attach_data_value("quality", NULL, 90, NULL);
108 }
109 imlib_save_image_with_error_return(cfile, &err);
110 if (err)
111 goto end;
112 times.actime = fstats.st_atime;
113 times.modtime = fstats.st_mtime;
114 utime(cfile, &times);
115 }
116end:
117 free(cfile);
118 }
119}
120
121void tns_clean_cache(tns_t *tns)
122{
123 int dirlen;
124 char *cfile, *filename;
125 r_dir_t dir;
126
127 if (r_opendir(&dir, cache_dir, true) < 0) {
128 error(0, errno, "%s", cache_dir);
129 return;
130 }
131
132 dirlen = strlen(cache_dir);
133
134 while ((cfile = r_readdir(&dir, false)) != NULL) {
135 filename = cfile + dirlen;
136 if (access(filename, F_OK) < 0) {
137 if (unlink(cfile) < 0)
138 error(0, errno, "%s", cfile);
139 }
140 free(cfile);
141 }
142 r_closedir(&dir);
143}
144
145
146void tns_init(tns_t *tns, fileinfo_t *files, const int *cnt, int *sel,
147 win_t *win)
148{
149 int len;
150 const char *homedir, *dsuffix = "";
151
152 if (cnt != NULL && *cnt > 0) {
153 tns->thumbs = (thumb_t*) emalloc(*cnt * sizeof(thumb_t));
154 memset(tns->thumbs, 0, *cnt * sizeof(thumb_t));
155 } else {
156 tns->thumbs = NULL;
157 }
158 tns->files = files;
159 tns->cnt = cnt;
160 tns->initnext = tns->loadnext = 0;
161 tns->first = tns->end = tns->r_first = tns->r_end = 0;
162 tns->sel = sel;
163 tns->win = win;
164 tns->dirty = false;
165
166 tns->zl = THUMB_SIZE;
167 tns_zoom(tns, 0);
168
169 if ((homedir = getenv("XDG_CACHE_HOME")) == NULL || homedir[0] == '\0') {
170 homedir = getenv("HOME");
171 dsuffix = "/.cache";
172 }
173 if (homedir != NULL) {
174 free(cache_dir);
175 len = strlen(homedir) + strlen(dsuffix) + 6;
176 cache_dir = (char*) emalloc(len);
177 snprintf(cache_dir, len, "%s%s/sxiv", homedir, dsuffix);
178 } else {
179 error(0, 0, "Cache directory not found");
180 }
181}
182
183CLEANUP void tns_free(tns_t *tns)
184{
185 int i;
186
187 if (tns->thumbs != NULL) {
188 for (i = 0; i < *tns->cnt; i++) {
189 if (tns->thumbs[i].im != NULL) {
190 imlib_context_set_image(tns->thumbs[i].im);
191 imlib_free_image();
192 }
193 }
194 free(tns->thumbs);
195 tns->thumbs = NULL;
196 }
197
198 free(cache_dir);
199 cache_dir = NULL;
200}
201
202Imlib_Image tns_scale_down(Imlib_Image im, int dim)
203{
204 int w, h;
205 float z, zw, zh;
206
207 imlib_context_set_image(im);
208 w = imlib_image_get_width();
209 h = imlib_image_get_height();
210 zw = (float) dim / (float) w;
211 zh = (float) dim / (float) h;
212 z = MIN(zw, zh);
213 z = MIN(z, 1.0);
214
215 if (z < 1.0) {
216 imlib_context_set_anti_alias(1);
217 im = imlib_create_cropped_scaled_image(0, 0, w, h,
218 MAX(z * w, 1), MAX(z * h, 1));
219 if (im == NULL)
220 error(EXIT_FAILURE, ENOMEM, NULL);
221 imlib_free_image_and_decache();
222 }
223 return im;
224}
225
226bool tns_load(tns_t *tns, int n, bool force, bool cache_only)
227{
228 int maxwh = thumb_sizes[ARRLEN(thumb_sizes)-1];
229 bool cache_hit = false;
230 char *cfile;
231 thumb_t *t;
232 fileinfo_t *file;
233 Imlib_Image im = NULL;
234
235 if (n < 0 || n >= *tns->cnt)
236 return false;
237 file = &tns->files[n];
238 if (file->name == NULL || file->path == NULL)
239 return false;
240
241 t = &tns->thumbs[n];
242
243 if (t->im != NULL) {
244 imlib_context_set_image(t->im);
245 imlib_free_image();
246 t->im = NULL;
247 }
248
249 if (!force) {
250 if ((im = tns_cache_load(file->path, &force)) != NULL) {
251 imlib_context_set_image(im);
252 if (imlib_image_get_width() < maxwh &&
253 imlib_image_get_height() < maxwh)
254 {
255 if ((cfile = tns_cache_filepath(file->path)) != NULL) {
256 unlink(cfile);
257 free(cfile);
258 }
259 imlib_free_image_and_decache();
260 im = NULL;
261 } else {
262 cache_hit = true;
263 }
264#if HAVE_LIBEXIF
265 } else if (!force && !options->private_mode) {
266 int pw = 0, ph = 0, w, h, x = 0, y = 0;
267 bool err;
268 float zw, zh;
269 ExifData *ed;
270 ExifEntry *entry;
271 ExifContent *ifd;
272 ExifByteOrder byte_order;
273 int tmpfd;
274 char tmppath[] = "/tmp/sxiv-XXXXXX";
275 Imlib_Image tmpim;
276
277 if ((ed = exif_data_new_from_file(file->path)) != NULL) {
278 if (ed->data != NULL && ed->size > 0 &&
279 (tmpfd = mkstemp(tmppath)) >= 0)
280 {
281 err = write(tmpfd, ed->data, ed->size) != ed->size;
282 close(tmpfd);
283
284 if (!err && (tmpim = imlib_load_image(tmppath)) != NULL) {
285 byte_order = exif_data_get_byte_order(ed);
286 ifd = ed->ifd[EXIF_IFD_EXIF];
287 entry = exif_content_get_entry(ifd, EXIF_TAG_PIXEL_X_DIMENSION);
288 if (entry != NULL)
289 pw = exif_get_long(entry->data, byte_order);
290 entry = exif_content_get_entry(ifd, EXIF_TAG_PIXEL_Y_DIMENSION);
291 if (entry != NULL)
292 ph = exif_get_long(entry->data, byte_order);
293
294 imlib_context_set_image(tmpim);
295 w = imlib_image_get_width();
296 h = imlib_image_get_height();
297
298 if (pw > w && ph > h && (pw - ph >= 0) == (w - h >= 0)) {
299 zw = (float) pw / (float) w;
300 zh = (float) ph / (float) h;
301 if (zw < zh) {
302 pw /= zh;
303 x = (w - pw) / 2;
304 w = pw;
305 } else if (zw > zh) {
306 ph /= zw;
307 y = (h - ph) / 2;
308 h = ph;
309 }
310 }
311 if (w >= maxwh || h >= maxwh) {
312 if ((im = imlib_create_cropped_image(x, y, w, h)) == NULL)
313 error(EXIT_FAILURE, ENOMEM, NULL);
314 }
315 imlib_free_image_and_decache();
316 }
317 unlink(tmppath);
318 }
319 exif_data_unref(ed);
320 }
321#endif
322 }
323 }
324
325 if (im == NULL) {
326 if ((im = img_open(file)) == NULL)
327 return false;
328 }
329 imlib_context_set_image(im);
330
331 if (!cache_hit) {
332#if HAVE_LIBEXIF
333 exif_auto_orientate(file);
334#endif
335 im = tns_scale_down(im, maxwh);
336 imlib_context_set_image(im);
337 if (imlib_image_get_width() == maxwh || imlib_image_get_height() == maxwh)
338 tns_cache_write(im, file->path, true);
339 }
340
341 if (cache_only) {
342 imlib_free_image_and_decache();
343 } else {
344 t->im = tns_scale_down(im, thumb_sizes[tns->zl]);
345 imlib_context_set_image(t->im);
346 t->w = imlib_image_get_width();
347 t->h = imlib_image_get_height();
348 tns->dirty = true;
349 }
350 file->flags |= FF_TN_INIT;
351
352 if (n == tns->initnext)
353 while (++tns->initnext < *tns->cnt && ((++file)->flags & FF_TN_INIT));
354 if (n == tns->loadnext && !cache_only)
355 while (++tns->loadnext < tns->end && (++t)->im != NULL);
356
357 return true;
358}
359
360void tns_unload(tns_t *tns, int n)
361{
362 thumb_t *t;
363
364 if (n < 0 || n >= *tns->cnt)
365 return;
366
367 t = &tns->thumbs[n];
368
369 if (t->im != NULL) {
370 imlib_context_set_image(t->im);
371 imlib_free_image();
372 t->im = NULL;
373 }
374}
375
376void tns_check_view(tns_t *tns, bool scrolled)
377{
378 int r;
379
380 if (tns == NULL)
381 return;
382
383 tns->first -= tns->first % tns->cols;
384 r = *tns->sel % tns->cols;
385
386 if (scrolled) {
387 /* move selection into visible area */
388 if (*tns->sel >= tns->first + tns->cols * tns->rows)
389 *tns->sel = tns->first + r + tns->cols * (tns->rows - 1);
390 else if (*tns->sel < tns->first)
391 *tns->sel = tns->first + r;
392 } else {
393 /* scroll to selection */
394 if (tns->first + tns->cols * tns->rows <= *tns->sel) {
395 tns->first = *tns->sel - r - tns->cols * (tns->rows - 1);
396 tns->dirty = true;
397 } else if (tns->first > *tns->sel) {
398 tns->first = *tns->sel - r;
399 tns->dirty = true;
400 }
401 }
402}
403
404void tns_render(tns_t *tns)
405{
406 thumb_t *t;
407 win_t *win;
408 int i, cnt, r, x, y;
409
410 if (!tns->dirty)
411 return;
412
413 win = tns->win;
414 win_clear(win);
415 imlib_context_set_drawable(win->buf.pm);
416
417 tns->cols = MAX(1, win->w / tns->dim);
418 tns->rows = MAX(1, win->h / tns->dim);
419
420 if (*tns->cnt < tns->cols * tns->rows) {
421 tns->first = 0;
422 cnt = *tns->cnt;
423 } else {
424 tns_check_view(tns, false);
425 cnt = tns->cols * tns->rows;
426 if ((r = tns->first + cnt - *tns->cnt) >= tns->cols)
427 tns->first -= r - r % tns->cols;
428 if (r > 0)
429 cnt -= r % tns->cols;
430 }
431 r = cnt % tns->cols ? 1 : 0;
432 tns->x = x = (win->w - MIN(cnt, tns->cols) * tns->dim) / 2 + tns->bw + 3;
433 tns->y = y = (win->h - (cnt / tns->cols + r) * tns->dim) / 2 + tns->bw + 3;
434 tns->loadnext = *tns->cnt;
435 tns->end = tns->first + cnt;
436
437 for (i = tns->r_first; i < tns->r_end; i++) {
438 if ((i < tns->first || i >= tns->end) && tns->thumbs[i].im != NULL)
439 tns_unload(tns, i);
440 }
441 tns->r_first = tns->first;
442 tns->r_end = tns->end;
443
444 for (i = tns->first; i < tns->end; i++) {
445 t = &tns->thumbs[i];
446 if (t->im != NULL) {
447 t->x = x + (thumb_sizes[tns->zl] - t->w) / 2;
448 t->y = y + (thumb_sizes[tns->zl] - t->h) / 2;
449 imlib_context_set_image(t->im);
450 imlib_render_image_on_drawable_at_size(t->x, t->y, t->w, t->h);
451 if (tns->files[i].flags & FF_MARK)
452 tns_mark(tns, i, true);
453 } else {
454 tns->loadnext = MIN(tns->loadnext, i);
455 }
456 if ((i + 1) % tns->cols == 0) {
457 x = tns->x;
458 y += tns->dim;
459 } else {
460 x += tns->dim;
461 }
462 }
463 tns->dirty = false;
464 tns_highlight(tns, *tns->sel, true);
465}
466
467void tns_mark(tns_t *tns, int n, bool mark)
468{
469 if (n >= 0 && n < *tns->cnt && tns->thumbs[n].im != NULL) {
470 win_t *win = tns->win;
471 thumb_t *t = &tns->thumbs[n];
472 unsigned long col = win->fullscreen ? win->black.pixel : win->bg.pixel;
473 int x = t->x + t->w, y = t->y + t->h;
474
475 win_draw_rect(win, x - 1, y + 1, 1, tns->bw, true, 1, col);
476 win_draw_rect(win, x + 1, y - 1, tns->bw, 1, true, 1, col);
477
478 if (mark)
479 col = win->fullscreen && win->light ? win->bg.pixel : win->fg.pixel;
480
481 win_draw_rect(win, x, y, tns->bw + 2, tns->bw + 2, true, 1, col);
482
483 if (!mark && n == *tns->sel)
484 tns_highlight(tns, n, true);
485 }
486}
487
488void tns_highlight(tns_t *tns, int n, bool hl)
489{
490 if (n >= 0 && n < *tns->cnt && tns->thumbs[n].im != NULL) {
491 win_t *win = tns->win;
492 thumb_t *t = &tns->thumbs[n];
493 unsigned long col;
494 int oxy = (tns->bw + 1) / 2 + 1, owh = tns->bw + 2;
495
496 if (hl)
497 col = win->fullscreen && win->light ? win->bg.pixel : win->fg.pixel;
498 else
499 col = win->fullscreen ? win->black.pixel : win->bg.pixel;
500
501 win_draw_rect(win, t->x - oxy, t->y - oxy, t->w + owh, t->h + owh,
502 false, tns->bw, col);
503
504 if (tns->files[n].flags & FF_MARK)
505 tns_mark(tns, n, true);
506 }
507}
508
509bool tns_move_selection(tns_t *tns, direction_t dir, int cnt)
510{
511 int old, max;
512
513 old = *tns->sel;
514 cnt = cnt > 1 ? cnt : 1;
515
516 switch (dir) {
517 case DIR_UP:
518 *tns->sel = MAX(*tns->sel - cnt * tns->cols, *tns->sel % tns->cols);
519 break;
520 case DIR_DOWN:
521 max = tns->cols * ((*tns->cnt - 1) / tns->cols) +
522 MIN((*tns->cnt - 1) % tns->cols, *tns->sel % tns->cols);
523 *tns->sel = MIN(*tns->sel + cnt * tns->cols, max);
524 break;
525 case DIR_LEFT:
526 *tns->sel = MAX(*tns->sel - cnt, 0);
527 break;
528 case DIR_RIGHT:
529 *tns->sel = MIN(*tns->sel + cnt, *tns->cnt - 1);
530 break;
531 }
532
533 if (*tns->sel != old) {
534 tns_highlight(tns, old, false);
535 tns_check_view(tns, false);
536 if (!tns->dirty)
537 tns_highlight(tns, *tns->sel, true);
538 }
539 return *tns->sel != old;
540}
541
542bool tns_scroll(tns_t *tns, direction_t dir, bool screen)
543{
544 int d, max, old;
545
546 old = tns->first;
547 d = tns->cols * (screen ? tns->rows : 1);
548
549 if (dir == DIR_DOWN) {
550 max = *tns->cnt - tns->cols * tns->rows;
551 if (*tns->cnt % tns->cols != 0)
552 max += tns->cols - *tns->cnt % tns->cols;
553 tns->first = MIN(tns->first + d, max);
554 } else if (dir == DIR_UP) {
555 tns->first = MAX(tns->first - d, 0);
556 }
557
558 if (tns->first != old) {
559 tns_check_view(tns, true);
560 tns->dirty = true;
561 }
562 return tns->first != old;
563}
564
565bool tns_zoom(tns_t *tns, int d)
566{
567 int i, oldzl;
568
569 oldzl = tns->zl;
570 tns->zl += -(d < 0) + (d > 0);
571 tns->zl = MAX(tns->zl, 0);
572 tns->zl = MIN(tns->zl, ARRLEN(thumb_sizes)-1);
573
574 tns->bw = ((thumb_sizes[tns->zl] - 1) >> 5) + 1;
575 tns->bw = MIN(tns->bw, 4);
576 tns->dim = thumb_sizes[tns->zl] + 2 * tns->bw + 6;
577
578 if (tns->zl != oldzl) {
579 for (i = 0; i < *tns->cnt; i++)
580 tns_unload(tns, i);
581 tns->dirty = true;
582 }
583 return tns->zl != oldzl;
584}
585
586int tns_translate(tns_t *tns, int x, int y)
587{
588 int n;
589
590 if (x < tns->x || y < tns->y)
591 return -1;
592
593 n = tns->first + (y - tns->y) / tns->dim * tns->cols +
594 (x - tns->x) / tns->dim;
595 if (n >= *tns->cnt)
596 n = -1;
597
598 return n;
599}