You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

649 lines
19 KiB

  1. /*
  2. * cacaview image viewer for libcaca
  3. * Copyright (c) 2003 Sam Hocevar <sam@zoy.org>
  4. * All Rights Reserved
  5. *
  6. * $Id$
  7. *
  8. * This program is free software; you can redistribute it and/or
  9. * modify it under the terms of the GNU Lesser General Public
  10. * License as published by the Free Software Foundation; either
  11. * version 2 of the License, or (at your option) any later version.
  12. *
  13. * This program is distributed in the hope that it will be useful,
  14. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  16. * Lesser General Public License for more details.
  17. *
  18. * You should have received a copy of the GNU Lesser General Public
  19. * License along with this program; if not, write to the Free Software
  20. * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  21. * 02111-1307 USA
  22. */
  23. #include "config.h"
  24. #include <stdio.h>
  25. #include <string.h>
  26. #include <malloc.h>
  27. #include <unistd.h>
  28. #if defined(HAVE_IMLIB2_H)
  29. # include <Imlib2.h>
  30. #else
  31. # include <stdio.h>
  32. #endif
  33. #include "caca.h"
  34. /* Local macros */
  35. #define STATUS_DITHERING 1
  36. #define STATUS_ANTIALIASING 2
  37. #define STATUS_BACKGROUND 3
  38. /* Local functions */
  39. static void load_image(const char *);
  40. static void unload_image(void);
  41. static void draw_checkers(unsigned int, unsigned int,
  42. unsigned int, unsigned int);
  43. #if !defined(HAVE_IMLIB2_H)
  44. static int freadint(FILE *);
  45. static int freadshort(FILE *);
  46. static int freadchar(FILE *);
  47. #endif
  48. /* Local variables */
  49. #if defined(HAVE_IMLIB2_H)
  50. Imlib_Image image = NULL;
  51. #endif
  52. char *pixels = NULL;
  53. struct caca_bitmap *bitmap = NULL;
  54. int x, y;
  55. unsigned int w, h, depth, bpp, rmask, gmask, bmask, amask;
  56. #if !defined(HAVE_IMLIB2_H)
  57. unsigned int red[256], green[256], blue[256], alpha[256];
  58. #endif
  59. int main(int argc, char **argv)
  60. {
  61. int quit = 0, update = 1, help = 0, fullscreen = 0, status = 0;
  62. int reload = 0, zoom = 0;
  63. char **list = NULL;
  64. int current = 0, items = 0, opts = 1;
  65. int i;
  66. /* Initialise libcaca */
  67. if(caca_init())
  68. {
  69. fprintf(stderr, "%s: unable to initialise libcaca\n", argv[0]);
  70. return 1;
  71. }
  72. /* Load items into playlist */
  73. for(i = 1; i < argc; i++)
  74. {
  75. /* Skip options except after `--' */
  76. if(opts && argv[i][0] == '-')
  77. {
  78. if(argv[i][1] == '-' && argv[i][2] == '\0')
  79. opts = 0;
  80. continue;
  81. }
  82. /* Add argv[i] to the list */
  83. if(items)
  84. list = realloc(list, (items + 1) * sizeof(char *));
  85. else
  86. list = malloc(sizeof(char *));
  87. list[items] = argv[i];
  88. items++;
  89. reload = 1;
  90. }
  91. /* Go ! */
  92. while(!quit)
  93. {
  94. int ww = caca_get_width();
  95. int wh = caca_get_height();
  96. int event, new_status = 0, new_help = 0;
  97. while((event = caca_get_event()))
  98. {
  99. switch(event)
  100. {
  101. case CACA_EVENT_KEY_PRESS | 'n':
  102. case CACA_EVENT_KEY_PRESS | 'N':
  103. if(items) current = (current + 1) % items;
  104. reload = 1;
  105. break;
  106. case CACA_EVENT_KEY_PRESS | 'p':
  107. case CACA_EVENT_KEY_PRESS | 'P':
  108. if(items) current = (items + current - 1) % items;
  109. reload = 1;
  110. break;
  111. case CACA_EVENT_KEY_PRESS | 'f':
  112. case CACA_EVENT_KEY_PRESS | 'F':
  113. fullscreen = ~fullscreen;
  114. update = 1;
  115. break;
  116. case CACA_EVENT_KEY_PRESS | 'b':
  117. i = 1 + caca_get_feature(CACA_BACKGROUND);
  118. if(i > CACA_BACKGROUND_MAX) i = CACA_BACKGROUND_MIN;
  119. caca_set_feature(i);
  120. new_status = STATUS_BACKGROUND;
  121. update = 1;
  122. break;
  123. case CACA_EVENT_KEY_PRESS | 'B':
  124. i = -1 + caca_get_feature(CACA_BACKGROUND);
  125. if(i < CACA_BACKGROUND_MIN) i = CACA_BACKGROUND_MAX;
  126. caca_set_feature(i);
  127. new_status = STATUS_BACKGROUND;
  128. update = 1;
  129. break;
  130. case CACA_EVENT_KEY_PRESS | 'a':
  131. i = 1 + caca_get_feature(CACA_ANTIALIASING);
  132. if(i > CACA_ANTIALIASING_MAX) i = CACA_ANTIALIASING_MIN;
  133. caca_set_feature(i);
  134. new_status = STATUS_ANTIALIASING;
  135. update = 1;
  136. break;
  137. case CACA_EVENT_KEY_PRESS | 'A':
  138. i = -1 + caca_get_feature(CACA_ANTIALIASING);
  139. if(i < CACA_ANTIALIASING_MIN) i = CACA_ANTIALIASING_MAX;
  140. caca_set_feature(i);
  141. new_status = STATUS_ANTIALIASING;
  142. update = 1;
  143. break;
  144. case CACA_EVENT_KEY_PRESS | 'd':
  145. i = 1 + caca_get_feature(CACA_DITHERING);
  146. if(i > CACA_DITHERING_MAX) i = CACA_DITHERING_MIN;
  147. caca_set_feature(i);
  148. new_status = STATUS_DITHERING;
  149. update = 1;
  150. break;
  151. case CACA_EVENT_KEY_PRESS | 'D':
  152. i = -1 + caca_get_feature(CACA_DITHERING);
  153. if(i < CACA_DITHERING_MIN) i = CACA_DITHERING_MAX;
  154. caca_set_feature(i);
  155. new_status = STATUS_DITHERING;
  156. update = 1;
  157. break;
  158. case CACA_EVENT_KEY_PRESS | '+':
  159. zoom++;
  160. if(zoom > 48) zoom = 48; else update = 1;
  161. break;
  162. case CACA_EVENT_KEY_PRESS | '-':
  163. zoom--;
  164. if(zoom < -48) zoom = -48; else update = 1;
  165. break;
  166. case CACA_EVENT_KEY_PRESS | 'x':
  167. case CACA_EVENT_KEY_PRESS | 'X':
  168. zoom = 0;
  169. update = 1;
  170. break;
  171. case CACA_EVENT_KEY_PRESS | 'k':
  172. case CACA_EVENT_KEY_PRESS | 'K':
  173. case CACA_EVENT_KEY_PRESS | CACA_KEY_UP:
  174. if(zoom > 0) y -= 1 + h / (2 + zoom) / 8;
  175. update = 1;
  176. break;
  177. case CACA_EVENT_KEY_PRESS | 'j':
  178. case CACA_EVENT_KEY_PRESS | 'J':
  179. case CACA_EVENT_KEY_PRESS | CACA_KEY_DOWN:
  180. if(zoom > 0) y += 1 + h / (2 + zoom) / 8;
  181. update = 1;
  182. break;
  183. case CACA_EVENT_KEY_PRESS | 'h':
  184. case CACA_EVENT_KEY_PRESS | 'H':
  185. case CACA_EVENT_KEY_PRESS | CACA_KEY_LEFT:
  186. if(zoom > 0) x -= 1 + w / (2 + zoom) / 8;
  187. update = 1;
  188. break;
  189. case CACA_EVENT_KEY_PRESS | 'l':
  190. case CACA_EVENT_KEY_PRESS | 'L':
  191. case CACA_EVENT_KEY_PRESS | CACA_KEY_RIGHT:
  192. if(zoom > 0) x += 1 + w / (2 + zoom) / 8;
  193. update = 1;
  194. break;
  195. case CACA_EVENT_KEY_PRESS | '?':
  196. new_help = !help;
  197. update = 1;
  198. break;
  199. case CACA_EVENT_KEY_PRESS | 'q':
  200. case CACA_EVENT_KEY_PRESS | 'Q':
  201. quit = 1;
  202. break;
  203. }
  204. if(status || new_status)
  205. status = new_status;
  206. if(help || new_help)
  207. help = new_help;
  208. }
  209. if(items && reload)
  210. {
  211. char *buffer;
  212. int len = strlen(" Loading `%s'... ") + strlen(list[current]);
  213. if(len < ww + 1)
  214. len = ww + 1;
  215. buffer = malloc(len);
  216. /* Reset image-specific runtime variables */
  217. zoom = 0;
  218. sprintf(buffer, " Loading `%s'... ", list[current]);
  219. buffer[ww] = '\0';
  220. caca_set_color(CACA_COLOR_WHITE, CACA_COLOR_BLUE);
  221. caca_putstr((ww - strlen(buffer)) / 2, wh / 2, buffer);
  222. caca_refresh();
  223. unload_image();
  224. load_image(list[current]);
  225. reload = 0;
  226. update = 1;
  227. free(buffer);
  228. }
  229. if(!update)
  230. {
  231. usleep(10000);
  232. continue;
  233. }
  234. caca_clear();
  235. if(!items)
  236. {
  237. caca_set_color(CACA_COLOR_WHITE, CACA_COLOR_BLUE);
  238. caca_printf(ww / 2 - 5, wh / 2, " No image. ");
  239. }
  240. else if(!pixels)
  241. {
  242. char *buffer;
  243. int len = strlen(" Error loading `%s'. ") + strlen(list[current]);
  244. if(len < ww + 1)
  245. len = ww + 1;
  246. buffer = malloc(len);
  247. sprintf(buffer, " Error loading `%s'. ", list[current]);
  248. buffer[ww] = '\0';
  249. caca_set_color(CACA_COLOR_WHITE, CACA_COLOR_BLUE);
  250. caca_putstr((ww - strlen(buffer)) / 2, wh / 2, buffer);
  251. free(buffer);
  252. }
  253. else if(zoom < 0)
  254. {
  255. int xo = (ww - 1) / 2;
  256. int yo = (wh - 1) / 2;
  257. int xn = (ww - 1) / (2 - zoom);
  258. int yn = (wh - 1) / (2 - zoom);
  259. draw_checkers(xo - xn, yo - yn, xo + xn, yo + yn);
  260. caca_draw_bitmap(xo - xn, yo - yn, xo + xn, yo + yn,
  261. bitmap, pixels);
  262. }
  263. else if(zoom > 0)
  264. {
  265. struct caca_bitmap *newbitmap;
  266. int xn = w / (2 + zoom);
  267. int yn = h / (2 + zoom);
  268. if(x < xn) x = xn;
  269. if(y < yn) y = yn;
  270. if(xn + x > (int)w) x = w - xn;
  271. if(yn + y > (int)h) y = h - yn;
  272. newbitmap = caca_create_bitmap(bpp, 2 * xn, 2 * yn, depth * w,
  273. rmask, gmask, bmask, amask);
  274. #if !defined(HAVE_IMLIB2_H)
  275. if(bpp == 8)
  276. caca_set_bitmap_palette(newbitmap, red, green, blue, alpha);
  277. #endif
  278. draw_checkers(0, fullscreen ? 0 : 1,
  279. ww - 1, fullscreen ? wh - 1 : wh - 3);
  280. caca_draw_bitmap(0, fullscreen ? 0 : 1,
  281. ww - 1, fullscreen ? wh - 1 : wh - 3,
  282. newbitmap,
  283. pixels + depth * (x - xn) + depth * w * (y - yn));
  284. caca_free_bitmap(newbitmap);
  285. }
  286. else
  287. {
  288. draw_checkers(0, fullscreen ? 0 : 1,
  289. ww - 1, fullscreen ? wh - 1 : wh - 3);
  290. caca_draw_bitmap(0, fullscreen ? 0 : 1,
  291. ww - 1, fullscreen ? wh - 1 : wh - 3,
  292. bitmap, pixels);
  293. }
  294. if(!fullscreen)
  295. {
  296. caca_set_color(CACA_COLOR_WHITE, CACA_COLOR_BLUE);
  297. caca_draw_line(0, 0, ww - 1, 0, ' ');
  298. caca_draw_line(0, wh - 2, ww - 1, wh - 2, '-');
  299. caca_putstr(0, 0, "q:Quit np:Next/Prev +-x:Zoom "
  300. "hjkl:Move d:Dithering a:Antialias");
  301. caca_putstr(ww - strlen("?:Help"), 0, "?:Help");
  302. caca_printf(3, wh - 2, "cacaview %s", VERSION);
  303. caca_printf(ww - 14, wh - 2,
  304. "(zoom: %s%i)", zoom > 0 ? "+" : "", zoom);
  305. caca_set_color(CACA_COLOR_LIGHTGRAY, CACA_COLOR_BLACK);
  306. caca_draw_line(0, wh - 1, ww - 1, wh - 1, ' ');
  307. switch(status)
  308. {
  309. case STATUS_ANTIALIASING:
  310. caca_printf(0, wh - 1, "Antialiasing: %s",
  311. caca_get_feature_name(caca_get_feature(CACA_ANTIALIASING)));
  312. break;
  313. case STATUS_DITHERING:
  314. caca_printf(0, wh - 1, "Dithering: %s",
  315. caca_get_feature_name(caca_get_feature(CACA_DITHERING)));
  316. break;
  317. case STATUS_BACKGROUND:
  318. caca_printf(0, wh - 1, "Background: %s",
  319. caca_get_feature_name(caca_get_feature(CACA_BACKGROUND)));
  320. break;
  321. }
  322. }
  323. if(help)
  324. {
  325. caca_set_color(CACA_COLOR_WHITE, CACA_COLOR_BLUE);
  326. caca_putstr(ww - 25, 2, " +: zoom in ");
  327. caca_putstr(ww - 25, 3, " -: zoom out ");
  328. caca_putstr(ww - 25, 4, " x: reset zoom ");
  329. caca_putstr(ww - 25, 5, " ---------------------- ");
  330. caca_putstr(ww - 25, 6, " hjkl: move view ");
  331. caca_putstr(ww - 25, 7, " arrows: move view ");
  332. caca_putstr(ww - 25, 8, " ---------------------- ");
  333. caca_putstr(ww - 25, 9, " a: antialiasing method ");
  334. caca_putstr(ww - 25, 10, " d: dithering method ");
  335. caca_putstr(ww - 25, 11, " b: background mode ");
  336. caca_putstr(ww - 25, 12, " ---------------------- ");
  337. caca_putstr(ww - 25, 13, " ?: help ");
  338. caca_putstr(ww - 25, 14, " q: quit ");
  339. }
  340. caca_refresh();
  341. update = 0;
  342. }
  343. /* Clean up */
  344. unload_image();
  345. caca_end();
  346. return 0;
  347. }
  348. static void unload_image(void)
  349. {
  350. #if defined(HAVE_IMLIB2_H)
  351. if(image)
  352. imlib_free_image();
  353. image = NULL;
  354. pixels = NULL;
  355. #else
  356. if(pixels)
  357. free(pixels);
  358. pixels = NULL;
  359. #endif
  360. if(bitmap)
  361. caca_free_bitmap(bitmap);
  362. bitmap = NULL;
  363. }
  364. static void load_image(const char *name)
  365. {
  366. #if defined(HAVE_IMLIB2_H)
  367. /* Load the new image */
  368. image = imlib_load_image(name);
  369. if(!image)
  370. return;
  371. imlib_context_set_image(image);
  372. pixels = (char *)imlib_image_get_data_for_reading_only();
  373. w = imlib_image_get_width();
  374. h = imlib_image_get_height();
  375. rmask = 0x00ff0000;
  376. gmask = 0x0000ff00;
  377. bmask = 0x000000ff;
  378. amask = 0xff000000;
  379. bpp = 32;
  380. depth = 4;
  381. /* Create the libcaca bitmap */
  382. bitmap = caca_create_bitmap(bpp, w, h, depth * w,
  383. rmask, gmask, bmask, amask);
  384. if(!bitmap)
  385. {
  386. imlib_free_image();
  387. image = NULL;
  388. }
  389. #else
  390. /* Try to load a BMP file */
  391. FILE *fp;
  392. unsigned int i, colors, offset, tmp, planes;
  393. fp = fopen(name, "rb");
  394. if(!fp)
  395. return;
  396. if(freadshort(fp) != 0x4d42)
  397. {
  398. fclose(fp);
  399. return;
  400. }
  401. freadint(fp); /* size */
  402. freadshort(fp); /* reserved 1 */
  403. freadshort(fp); /* reserved 2 */
  404. offset = freadint(fp);
  405. tmp = freadint(fp); /* header size */
  406. if(tmp == 40)
  407. {
  408. w = freadint(fp);
  409. h = freadint(fp);
  410. planes = freadshort(fp);
  411. bpp = freadshort(fp);
  412. tmp = freadint(fp); /* compression */
  413. if(tmp != 0)
  414. {
  415. fclose(fp);
  416. return;
  417. }
  418. freadint(fp); /* sizeimage */
  419. freadint(fp); /* xpelspermeter */
  420. freadint(fp); /* ypelspermeter */
  421. freadint(fp); /* biclrused */
  422. freadint(fp); /* biclrimportantn */
  423. colors = (offset - 54) / 4;
  424. for(i = 0; i < colors && i < 256; i++)
  425. {
  426. blue[i] = freadchar(fp) * 16;
  427. green[i] = freadchar(fp) * 16;
  428. red[i] = freadchar(fp) * 16;
  429. alpha[i] = 0;
  430. freadchar(fp);
  431. }
  432. }
  433. else if(tmp == 12)
  434. {
  435. w = freadint(fp);
  436. h = freadint(fp);
  437. planes = freadshort(fp);
  438. bpp = freadshort(fp);
  439. colors = (offset - 26) / 3;
  440. for(i = 0; i < colors && i < 256; i++)
  441. {
  442. blue[i] = freadchar(fp);
  443. green[i] = freadchar(fp);
  444. red[i] = freadchar(fp);
  445. alpha[i] = 0;
  446. }
  447. }
  448. else
  449. {
  450. fclose(fp);
  451. return;
  452. }
  453. /* Fill the rest of the palette */
  454. for(i = colors; i < 256; i++)
  455. blue[i] = green[i] = red[i] = alpha[i] = 0;
  456. depth = (bpp + 7) / 8;
  457. /* Sanity check */
  458. if(!w || w > 0x10000 || !h || h > 0x10000 || planes != 1 /*|| bpp != 24*/)
  459. {
  460. fclose(fp);
  461. return;
  462. }
  463. /* Allocate the pixel buffer */
  464. pixels = malloc(w * h * depth);
  465. if(!pixels)
  466. {
  467. fclose(fp);
  468. return;
  469. }
  470. memset(pixels, 0, w * h * depth);
  471. /* Read the bitmap data */
  472. for(i = h; i--; )
  473. {
  474. unsigned int j, k, bits = 0;
  475. switch(bpp)
  476. {
  477. case 1:
  478. for(j = 0; j < w; j++)
  479. {
  480. k = j % 32;
  481. if(k == 0)
  482. bits = freadint(fp);
  483. pixels[w * i * depth + j] =
  484. (bits >> ((k & ~0xf) + 0xf - (k & 0xf))) & 0x1;
  485. }
  486. break;
  487. case 4:
  488. for(j = 0; j < w; j++)
  489. {
  490. k = j % 8;
  491. if(k == 0)
  492. bits = freadint(fp);
  493. pixels[w * i * depth + j] =
  494. (bits >> (4 * ((k & ~0x1) + 0x1 - (k & 0x1)))) & 0xf;
  495. }
  496. break;
  497. default:
  498. /* Works for 8bpp, but also for 16, 24 etc. */
  499. fread(pixels + w * i * depth, w * depth, 1, fp);
  500. /* Pad reads to 4 bytes */
  501. tmp = (w * depth) % 4;
  502. tmp = (4 - tmp) % 4;
  503. while(tmp--)
  504. freadchar(fp);
  505. break;
  506. }
  507. }
  508. switch(depth)
  509. {
  510. case 3:
  511. rmask = 0xff0000;
  512. gmask = 0x00ff00;
  513. bmask = 0x0000ff;
  514. amask = 0x000000;
  515. break;
  516. case 2: /* XXX: those are the 16 bits values */
  517. rmask = 0x7c00;
  518. gmask = 0x03e0;
  519. bmask = 0x001f;
  520. amask = 0x0000;
  521. break;
  522. case 1:
  523. default:
  524. bpp = 8;
  525. rmask = gmask = bmask = amask = 0;
  526. break;
  527. }
  528. fclose(fp);
  529. /* Create the libcaca bitmap */
  530. bitmap = caca_create_bitmap(bpp, w, h, depth * w,
  531. rmask, gmask, bmask, amask);
  532. if(!bitmap)
  533. {
  534. free(pixels);
  535. pixels = NULL;
  536. return;
  537. }
  538. if(bpp == 8)
  539. caca_set_bitmap_palette(bitmap, red, green, blue, alpha);
  540. #endif
  541. x = w / 2;
  542. y = h / 2;
  543. }
  544. static void draw_checkers(unsigned int x1, unsigned int y1,
  545. unsigned int x2, unsigned int y2)
  546. {
  547. unsigned int xn, yn;
  548. for(yn = y1; yn <= y2; yn++)
  549. for(xn = x1; xn <= x2; xn++)
  550. {
  551. if((((xn - x1) / 5) ^ ((yn - y1) / 3)) & 1)
  552. caca_set_color(CACA_COLOR_LIGHTGRAY, CACA_COLOR_DARKGRAY);
  553. else
  554. caca_set_color(CACA_COLOR_DARKGRAY, CACA_COLOR_LIGHTGRAY);
  555. caca_putchar(xn, yn, ' ');
  556. }
  557. }
  558. #if !defined(HAVE_IMLIB2_H)
  559. static int freadint(FILE *fp)
  560. {
  561. unsigned char buffer[4];
  562. fread(buffer, 4, 1, fp);
  563. return ((int)buffer[3] << 24) | ((int)buffer[2] << 16)
  564. | ((int)buffer[1] << 8) | ((int)buffer[0]);
  565. }
  566. static int freadshort(FILE *fp)
  567. {
  568. unsigned char buffer[2];
  569. fread(buffer, 2, 1, fp);
  570. return ((int)buffer[1] << 8) | ((int)buffer[0]);
  571. }
  572. static int freadchar(FILE *fp)
  573. {
  574. unsigned char buffer;
  575. fread(&buffer, 1, 1, fp);
  576. return (int)buffer;
  577. }
  578. #endif