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.

sdl.c 15 KiB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483
  1. /*
  2. * libcaca Colour ASCII-Art library
  3. * Copyright (c) 2002-2012 Sam Hocevar <sam@hocevar.net>
  4. * 2013 Alex Foulon <alxf@lavabit.com>
  5. * All Rights Reserved
  6. *
  7. * This library is free software. It comes without any warranty, to
  8. * the extent permitted by applicable law. You can redistribute it
  9. * and/or modify it under the terms of the Do What the Fuck You Want
  10. * to Public License, Version 2, as published by Sam Hocevar. See
  11. * http://www.wtfpl.net/ for more details.
  12. *
  13. */
  14. /*
  15. * This file contains a SDL libcaca input and output driver
  16. */
  17. #include "config.h"
  18. #if defined(USE_SDL)
  19. #include <SDL/SDL.h>
  20. #include <SDL/SDL_image.h>
  21. #include <SDL/SDL_ttf.h>
  22. #include <stdio.h>
  23. #include <stdlib.h>
  24. #include <string.h>
  25. #if defined HAVE_LOCALE_H
  26. # include <locale.h>
  27. #endif
  28. #include "caca.h"
  29. #include "caca_internals.h"
  30. static const int video_bpp = 32;
  31. static const Uint32 video_flags = SDL_HWSURFACE
  32. | SDL_HWPALETTE
  33. | SDL_ASYNCBLIT
  34. | SDL_DOUBLEBUF
  35. | SDL_RESIZABLE;
  36. struct driver_private {
  37. SDL_Surface *screen;
  38. caca_font_t *font;
  39. TTF_Font *ttf_font;
  40. int font_width, font_height;
  41. int is_active, use_ttf;
  42. uint32_t attr, ch;
  43. };
  44. static void sdl_write_utf32(caca_display_t *, int, int);
  45. static int sdl_init_graphics(caca_display_t *dp)
  46. {
  47. int width, height, ttf_size;
  48. char const *ttf_font_file, *ttf_font_size;
  49. char const *geometry;
  50. char const * const *fonts;
  51. dp->drv.p = malloc(sizeof(struct driver_private));
  52. if(SDL_Init(SDL_INIT_VIDEO) < 0) {
  53. fprintf(stderr, "error: %s\n", SDL_GetError());
  54. return -1;
  55. }
  56. SDL_EnableUNICODE(SDL_ENABLE);
  57. SDL_WM_SetCaption("Caca for SDL", NULL);
  58. /* ignore unused events */
  59. SDL_EventState(SDL_ACTIVEEVENT, SDL_IGNORE);
  60. SDL_EventState(SDL_VIDEOEXPOSE, SDL_IGNORE);
  61. SDL_EventState(SDL_SYSWMEVENT, SDL_IGNORE);
  62. width = caca_get_canvas_width(dp->cv);
  63. height = caca_get_canvas_height(dp->cv);
  64. dp->drv.p->use_ttf = 0;
  65. fonts = caca_get_font_list();
  66. if(fonts[0] == NULL) {
  67. fprintf(stderr, "error: libcaca was compiled without any fonts\n");
  68. return -1;
  69. }
  70. dp->drv.p->font = caca_load_font(fonts[0], 0);
  71. if(dp->drv.p->font == NULL) {
  72. fprintf(stderr, "error: could not load font \"%s\"\n", fonts[0]);
  73. return -1;
  74. }
  75. dp->drv.p->font_width = caca_get_font_width(dp->drv.p->font);
  76. dp->drv.p->font_height = caca_get_font_height(dp->drv.p->font);
  77. #if defined(HAVE_GETENV)
  78. ttf_font_file = getenv("CACA_FONT");
  79. if(ttf_font_file && *ttf_font_file) {
  80. if(TTF_Init() < 0)
  81. fprintf(stderr, "error: %s\n", TTF_GetError());
  82. ttf_font_size = getenv("CACA_FONT_SIZE");
  83. if(ttf_font_size && *ttf_font_size)
  84. sscanf(ttf_font_size, "%u", &ttf_size);
  85. else
  86. ttf_size = 12;
  87. /* no need to return error, fallback on compiled font */
  88. dp->drv.p->ttf_font = TTF_OpenFont(ttf_font_file, ttf_size);
  89. if(dp->drv.p->ttf_font == NULL) {
  90. fprintf(stderr, "error: %s\n", TTF_GetError());
  91. }
  92. else if(!TTF_FontFaceIsFixedWidth(dp->drv.p->ttf_font)) {
  93. fprintf(stderr, "error: SDL driver accept only fixed width font\n");
  94. }
  95. else {
  96. dp->drv.p->use_ttf = 1;
  97. TTF_SizeUTF8(dp->drv.p->ttf_font, "a",
  98. &dp->drv.p->font_width, &dp->drv.p->font_height);
  99. }
  100. }
  101. geometry = getenv("CACA_GEOMETRY");
  102. if(geometry && *geometry)
  103. sscanf(geometry, "%ux%u", &width, &height);
  104. #endif
  105. #if defined HAVE_LOCALE_H
  106. setlocale(LC_ALL, "");
  107. #endif
  108. dp->drv.p->screen = SDL_SetVideoMode(width * dp->drv.p->font_width,
  109. height * dp->drv.p->font_height,
  110. video_bpp, video_flags);
  111. if(dp->drv.p->screen == NULL) {
  112. fprintf(stderr, "error: %s\n", SDL_GetError());
  113. return -1;
  114. }
  115. dp->drv.p->is_active = 1;
  116. caca_add_dirty_rect(dp->cv, 0, 0, dp->cv->width, dp->cv->height);
  117. dp->resize.allow = 1;
  118. caca_set_canvas_size(dp->cv, width ? width : 80, height ? height : 32);
  119. width = caca_get_canvas_width(dp->cv);
  120. height = caca_get_canvas_height(dp->cv);
  121. dp->resize.allow = 0;
  122. return 0;
  123. }
  124. static int sdl_end_graphics(caca_display_t *dp)
  125. {
  126. if(SDL_WasInit(SDL_INIT_VIDEO) != 0)
  127. SDL_Quit();
  128. if(TTF_WasInit() != 0) {
  129. TTF_CloseFont(dp->drv.p->ttf_font);
  130. TTF_Quit();
  131. }
  132. if(dp->drv.p->font != NULL)
  133. caca_free_font(dp->drv.p->font);
  134. free(dp->drv.p);
  135. return 0;
  136. }
  137. static int sdl_set_display_title(caca_display_t *dp, char const *title)
  138. {
  139. SDL_WM_SetCaption(title, NULL);
  140. return 0;
  141. }
  142. static int sdl_get_display_width(caca_display_t const *dp)
  143. {
  144. return (caca_get_canvas_width(dp->cv) * dp->drv.p->font_width);
  145. }
  146. static int sdl_get_display_height(caca_display_t const *dp)
  147. {
  148. return (caca_get_canvas_height(dp->cv) * dp->drv.p->font_height);
  149. }
  150. static void sdl_display(caca_display_t *dp)
  151. {
  152. int x, y, i;
  153. size_t len;
  154. void *buffer;
  155. SDL_RWops *rw;
  156. SDL_Surface *img;
  157. if(!dp->drv.p->is_active)
  158. return;
  159. if(!dp->drv.p->use_ttf) {
  160. buffer = caca_export_canvas_to_memory(dp->cv, "tga", &len);
  161. if(len > 0) {
  162. rw = SDL_RWFromMem(buffer, len);
  163. img = IMG_LoadTyped_RW(rw, 1, "TGA");
  164. SDL_FillRect(dp->drv.p->screen, NULL, 0x000000);
  165. SDL_BlitSurface(img, NULL, dp->drv.p->screen, NULL);
  166. SDL_FreeSurface(img);
  167. if(buffer != NULL)
  168. free(buffer);
  169. }
  170. }
  171. else {
  172. for(i = 0; i < caca_get_dirty_rect_count(dp->cv); i++)
  173. {
  174. uint32_t const *cvchars, *cvattrs;
  175. int dx, dy, dw, dh;
  176. caca_get_dirty_rect(dp->cv, i, &dx, &dy, &dw, &dh);
  177. cvchars = caca_get_canvas_chars(dp->cv) + dx + dy * dp->cv->width;
  178. cvattrs = caca_get_canvas_attrs(dp->cv) + dx + dy * dp->cv->width;
  179. for(y = dy; y < dy + dh; y++)
  180. {
  181. for(x = dx; x < dx + dw; x++)
  182. {
  183. dp->drv.p->ch = *cvchars++;
  184. dp->drv.p->attr = *cvattrs++;
  185. sdl_write_utf32(dp, x, y);
  186. }
  187. cvchars += dp->cv->width - dw;
  188. cvattrs += dp->cv->width - dw;
  189. }
  190. }
  191. }
  192. SDL_Flip(dp->drv.p->screen);
  193. }
  194. static void sdl_write_utf32(caca_display_t *dp, int x, int y)
  195. {
  196. int bytes;
  197. int style = TTF_STYLE_NORMAL;
  198. char buf[10];
  199. uint16_t color;
  200. uint32_t bg;
  201. SDL_Color fg;
  202. SDL_Rect pos;
  203. SDL_Surface *text;
  204. if(dp->drv.p->ch == CACA_MAGIC_FULLWIDTH)
  205. return;
  206. bytes = caca_utf32_to_utf8(buf, dp->drv.p->ch);
  207. buf[bytes] = '\0';
  208. if(dp->drv.p->attr & CACA_BOLD)
  209. style |= TTF_STYLE_BOLD;
  210. if(dp->drv.p->attr & CACA_ITALICS)
  211. style |= TTF_STYLE_ITALIC;
  212. if(dp->drv.p->attr & CACA_UNDERLINE)
  213. style |= TTF_STYLE_UNDERLINE;
  214. color = caca_attr_to_rgb12_fg(dp->drv.p->attr);
  215. fg.r = ((color & 0xf00) >> 8) * 0x11;
  216. fg.g = ((color & 0xf0) >> 4) * 0x11;
  217. fg.b = ((color & 0xf) >> 0) * 0x11;
  218. color = caca_attr_to_rgb12_bg(dp->drv.p->attr);
  219. bg = ((color & 0xf00) >> 8) * 0x110000;
  220. bg |= ((color & 0x0f0) >> 4) * 0x001100;
  221. bg |= ((color & 0x00f) >> 0) * 0x000011;
  222. pos.x = x * dp->drv.p->font_width;
  223. pos.y = y * dp->drv.p->font_height;
  224. pos.w = dp->drv.p->font_width;
  225. pos.h = dp->drv.p->font_height;
  226. if(caca_utf32_is_fullwidth(dp->drv.p->ch)) {
  227. pos.w *= 2;
  228. pos.h *= 2;
  229. SDL_FillRect(dp->drv.p->screen, &pos, bg);
  230. }
  231. else {
  232. SDL_FillRect(dp->drv.p->screen, &pos, bg);
  233. }
  234. TTF_SetFontStyle(dp->drv.p->ttf_font, style);
  235. text = TTF_RenderUTF8_Blended(dp->drv.p->ttf_font, buf, fg);
  236. SDL_BlitSurface(text, NULL, dp->drv.p->screen, &pos);
  237. SDL_FreeSurface(text);
  238. }
  239. static int sdl_get_event(caca_display_t *dp, caca_privevent_t *ev)
  240. {
  241. SDL_Event event;
  242. while(SDL_PollEvent(&event))
  243. {
  244. size_t bytes;
  245. if(event.type == SDL_QUIT) {
  246. ev->type = CACA_EVENT_QUIT;
  247. return 1;
  248. }
  249. if(event.type == SDL_KEYDOWN || event.type == SDL_KEYUP) {
  250. if(event.type == SDL_KEYDOWN)
  251. ev->type = CACA_EVENT_KEY_PRESS;
  252. else if(event.type == SDL_KEYUP)
  253. ev->type = CACA_EVENT_KEY_RELEASE;
  254. switch(event.key.keysym.sym)
  255. {
  256. case SDLK_BACKSPACE:
  257. ev->data.key.ch = CACA_KEY_BACKSPACE; break;
  258. case SDLK_DELETE:
  259. ev->data.key.ch = CACA_KEY_DELETE; break;
  260. case SDLK_LEFT:
  261. ev->data.key.ch = CACA_KEY_LEFT; break;
  262. case SDLK_RIGHT:
  263. ev->data.key.ch = CACA_KEY_RIGHT; break;
  264. case SDLK_UP:
  265. ev->data.key.ch = CACA_KEY_UP; break;
  266. case SDLK_DOWN:
  267. ev->data.key.ch = CACA_KEY_DOWN; break;
  268. case SDLK_END:
  269. ev->data.key.ch = CACA_KEY_END; break;
  270. case SDLK_ESCAPE:
  271. ev->data.key.ch = CACA_KEY_ESCAPE; break;
  272. case SDLK_HOME:
  273. ev->data.key.ch = CACA_KEY_HOME; break;
  274. case SDLK_INSERT:
  275. ev->data.key.ch = CACA_KEY_INSERT; break;
  276. case SDLK_PAGEDOWN:
  277. ev->data.key.ch = CACA_KEY_PAGEDOWN; break;
  278. case SDLK_PAGEUP:
  279. ev->data.key.ch = CACA_KEY_PAGEUP; break;
  280. case SDLK_PAUSE:
  281. ev->data.key.ch = CACA_KEY_PAUSE; break;
  282. case SDLK_RETURN:
  283. ev->data.key.ch = CACA_KEY_RETURN; break;
  284. case SDLK_TAB:
  285. ev->data.key.ch = CACA_KEY_TAB; break;
  286. case SDLK_F1: ev->data.key.ch = CACA_KEY_F1; break;
  287. case SDLK_F2: ev->data.key.ch = CACA_KEY_F2; break;
  288. case SDLK_F3: ev->data.key.ch = CACA_KEY_F3; break;
  289. case SDLK_F4: ev->data.key.ch = CACA_KEY_F4; break;
  290. case SDLK_F5: ev->data.key.ch = CACA_KEY_F5; break;
  291. case SDLK_F6: ev->data.key.ch = CACA_KEY_F6; break;
  292. case SDLK_F7: ev->data.key.ch = CACA_KEY_F7; break;
  293. case SDLK_F8: ev->data.key.ch = CACA_KEY_F8; break;
  294. case SDLK_F9: ev->data.key.ch = CACA_KEY_F9; break;
  295. case SDLK_F10: ev->data.key.ch = CACA_KEY_F10; break;
  296. case SDLK_F11: ev->data.key.ch = CACA_KEY_F11; break;
  297. case SDLK_F12: ev->data.key.ch = CACA_KEY_F12; break;
  298. case SDLK_KP0:
  299. case SDLK_0: ev->data.key.ch = '0'; break;
  300. case SDLK_KP1:
  301. case SDLK_1: ev->data.key.ch = '1'; break;
  302. case SDLK_KP2:
  303. case SDLK_2: ev->data.key.ch = '2'; break;
  304. case SDLK_KP3:
  305. case SDLK_3: ev->data.key.ch = '3'; break;
  306. case SDLK_KP4:
  307. case SDLK_4: ev->data.key.ch = '4'; break;
  308. case SDLK_KP5:
  309. case SDLK_5: ev->data.key.ch = '5'; break;
  310. case SDLK_KP6:
  311. case SDLK_6: ev->data.key.ch = '6'; break;
  312. case SDLK_KP7:
  313. case SDLK_7: ev->data.key.ch = '7'; break;
  314. case SDLK_KP8:
  315. case SDLK_8: ev->data.key.ch = '8'; break;
  316. case SDLK_KP9:
  317. case SDLK_9: ev->data.key.ch = '9'; break;
  318. default:
  319. ev->data.key.ch = event.key.keysym.unicode; break;
  320. break;
  321. }
  322. ev->data.key.utf32 = (uint32_t) event.key.keysym.sym;
  323. bytes = caca_utf32_to_utf8(ev->data.key.utf8, ev->data.key.utf32);
  324. if(bytes) {
  325. ev->data.key.utf8[bytes] = '\0';
  326. }
  327. else {
  328. ev->data.key.utf8[0] = ev->data.key.ch;
  329. ev->data.key.utf8[1] = '\0';
  330. }
  331. return 1;
  332. }
  333. if(event.type == SDL_VIDEORESIZE) {
  334. ev->type = CACA_EVENT_RESIZE;
  335. ev->data.resize.w = event.resize.w / dp->drv.p->font_width;
  336. ev->data.resize.h = event.resize.h / dp->drv.p->font_height;
  337. dp->resize.w = ev->data.resize.w;
  338. dp->resize.h = ev->data.resize.h;
  339. dp->resize.resized = 1;
  340. return 1;
  341. }
  342. if(event.type == SDL_MOUSEMOTION) {
  343. ev->type = CACA_EVENT_MOUSE_MOTION;
  344. ev->data.mouse.x = event.motion.x / dp->drv.p->font_width;
  345. ev->data.mouse.y = event.motion.y / dp->drv.p->font_height;
  346. return 1;
  347. }
  348. if(event.type == SDL_MOUSEBUTTONDOWN
  349. || event.type == SDL_MOUSEBUTTONUP) {
  350. if(event.type == SDL_MOUSEBUTTONDOWN)
  351. ev->type = CACA_EVENT_MOUSE_PRESS;
  352. else if(event.type == SDL_MOUSEBUTTONUP)
  353. ev->type = CACA_EVENT_MOUSE_RELEASE;
  354. if(event.button.button == SDL_BUTTON_LEFT
  355. || event.button.button == SDL_BUTTON_MIDDLE
  356. || event.button.button == SDL_BUTTON_RIGHT) {
  357. ev->data.mouse.button = event.button.button;
  358. return 1;
  359. }
  360. else {
  361. break;
  362. }
  363. }
  364. }
  365. ev->type = CACA_EVENT_NONE;
  366. return 0;
  367. }
  368. static void sdl_handle_resize(caca_display_t *dp)
  369. {
  370. dp->resize.allow = 1;
  371. caca_set_canvas_size(dp->cv, dp->resize.w, dp->resize.h);
  372. dp->resize.allow = 0;
  373. dp->drv.p->screen = SDL_SetVideoMode(sdl_get_display_width(dp),
  374. sdl_get_display_height(dp),
  375. video_bpp, video_flags);
  376. }
  377. static void sdl_set_mouse(caca_display_t *dp, int flags)
  378. {
  379. if(!flags)
  380. SDL_ShowCursor(SDL_DISABLE);
  381. else
  382. SDL_ShowCursor(SDL_ENABLE);
  383. }
  384. /*
  385. * Driver initialisation
  386. */
  387. int sdl_install(caca_display_t *dp)
  388. {
  389. #if defined HAVE_GETENV
  390. if(!getenv("DISPLAY") || !*(getenv("DISPLAY")))
  391. return -1;
  392. #endif
  393. dp->drv.id = CACA_DRIVER_SDL;
  394. dp->drv.driver = "sdl";
  395. dp->drv.init_graphics = sdl_init_graphics;
  396. dp->drv.end_graphics = sdl_end_graphics;
  397. dp->drv.set_display_title = sdl_set_display_title;
  398. dp->drv.get_display_width = sdl_get_display_width;
  399. dp->drv.get_display_height = sdl_get_display_height;
  400. dp->drv.display = sdl_display;
  401. dp->drv.handle_resize = sdl_handle_resize;
  402. dp->drv.get_event = sdl_get_event;
  403. dp->drv.set_mouse = sdl_set_mouse;
  404. dp->drv.set_cursor = NULL;
  405. return 0;
  406. }
  407. #endif /* USE_SDL */