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.
 
 
 
 
 
 

290 lines
8.4 KiB

  1. /*
  2. * cacafire fire demo for libcaca
  3. * Copyright (c) 2003 Sam Hocevar <sam@zoy.org>
  4. * 1998, 1999, 2001 Jan Hubicka <hubicka@freesoft.cz>
  5. * All Rights Reserved
  6. *
  7. * $Id$
  8. *
  9. * This program is free software; you can redistribute it and/or
  10. * modify it under the terms of the GNU Lesser General Public
  11. * License as published by the Free Software Foundation; either
  12. * version 2 of the License, or (at your option) any later version.
  13. *
  14. * This program is distributed in the hope that it will be useful,
  15. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  17. * Lesser General Public License for more details.
  18. *
  19. * You should have received a copy of the GNU Lesser General Public
  20. * License along with this program; if not, write to the Free Software
  21. * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  22. * 02111-1307 USA
  23. */
  24. #ifdef LIBCACA
  25. #include "config.h"
  26. #include <stdio.h>
  27. #include <stdlib.h>
  28. #include <string.h>
  29. #include "caca.h"
  30. #else
  31. #include <stdio.h>
  32. #include "aalib.h"
  33. #define XSIZ aa_imgwidth(context)
  34. #define YSIZ (aa_imgheight(context)-4)
  35. #endif
  36. #define MAXTABLE (256*5)
  37. #ifdef LIBCACA
  38. static cucul_t *qq;
  39. static caca_t *kk;
  40. static int XSIZ, YSIZ;
  41. static struct cucul_bitmap *cucul_bitmap;
  42. static char *bitmap;
  43. static int pause = 0;
  44. #else
  45. static aa_context *context;
  46. static aa_renderparams *params;
  47. static aa_palette palette;
  48. #endif
  49. static unsigned int table[MAXTABLE];
  50. #ifdef LIBCACA
  51. static int const pal[] =
  52. #else
  53. __AA_CONST static int pal[] =
  54. #endif
  55. {
  56. 0, 0, 0, 0, 0, 6, 0, 0, 6, 0, 0, 7, 0, 0, 8, 0, 0, 8, 0, 0, 9, 0, 0, 10,
  57. 2, 0, 10, 4, 0, 9, 6, 0, 9, 8, 0, 8, 10, 0, 7, 12, 0, 7, 14, 0, 6, 16, 0, 5,
  58. 18, 0, 5, 20, 0, 4, 22, 0, 4, 24, 0, 3, 26, 0, 2, 28, 0, 2, 30, 0, 1, 32, 0, 0,
  59. 32, 0, 0, 33, 0, 0, 34, 0, 0, 35, 0, 0, 36, 0, 0, 36, 0, 0, 37, 0, 0, 38, 0, 0,
  60. 39, 0, 0, 40, 0, 0, 40, 0, 0, 41, 0, 0, 42, 0, 0, 43, 0, 0, 44, 0, 0, 45, 0, 0,
  61. 46, 1, 0, 47, 1, 0, 48, 2, 0, 49, 2, 0, 50, 3, 0, 51, 3, 0, 52, 4, 0, 53, 4, 0,
  62. 54, 5, 0, 55, 5, 0, 56, 6, 0, 57, 6, 0, 58, 7, 0, 59, 7, 0, 60, 8, 0, 61, 8, 0,
  63. 63, 9, 0, 63, 9, 0, 63, 10, 0, 63, 10, 0, 63, 11, 0, 63, 11, 0, 63, 12, 0, 63, 12, 0,
  64. 63, 13, 0, 63, 13, 0, 63, 14, 0, 63, 14, 0, 63, 15, 0, 63, 15, 0, 63, 16, 0, 63, 16, 0,
  65. 63, 17, 0, 63, 17, 0, 63, 18, 0, 63, 18, 0, 63, 19, 0, 63, 19, 0, 63, 20, 0, 63, 20, 0,
  66. 63, 21, 0, 63, 21, 0, 63, 22, 0, 63, 22, 0, 63, 23, 0, 63, 24, 0, 63, 24, 0, 63, 25, 0,
  67. 63, 25, 0, 63, 26, 0, 63, 26, 0, 63, 27, 0, 63, 27, 0, 63, 28, 0, 63, 28, 0, 63, 29, 0,
  68. 63, 29, 0, 63, 30, 0, 63, 30, 0, 63, 31, 0, 63, 31, 0, 63, 32, 0, 63, 32, 0, 63, 33, 0,
  69. 63, 33, 0, 63, 34, 0, 63, 34, 0, 63, 35, 0, 63, 35, 0, 63, 36, 0, 63, 36, 0, 63, 37, 0,
  70. 63, 38, 0, 63, 38, 0, 63, 39, 0, 63, 39, 0, 63, 40, 0, 63, 40, 0, 63, 41, 0, 63, 41, 0,
  71. 63, 42, 0, 63, 42, 0, 63, 43, 0, 63, 43, 0, 63, 44, 0, 63, 44, 0, 63, 45, 0, 63, 45, 0,
  72. 63, 46, 0, 63, 46, 0, 63, 47, 0, 63, 47, 0, 63, 48, 0, 63, 48, 0, 63, 49, 0, 63, 49, 0,
  73. 63, 50, 0, 63, 50, 0, 63, 51, 0, 63, 52, 0, 63, 52, 0, 63, 52, 0, 63, 52, 0, 63, 52, 0,
  74. 63, 53, 0, 63, 53, 0, 63, 53, 0, 63, 53, 0, 63, 54, 0, 63, 54, 0, 63, 54, 0, 63, 54, 0,
  75. 63, 54, 0, 63, 55, 0, 63, 55, 0, 63, 55, 0, 63, 55, 0, 63, 56, 0, 63, 56, 0, 63, 56, 0,
  76. 63, 56, 0, 63, 57, 0, 63, 57, 0, 63, 57, 0, 63, 57, 0, 63, 57, 0, 63, 58, 0, 63, 58, 0,
  77. 63, 58, 0, 63, 58, 0, 63, 59, 0, 63, 59, 0, 63, 59, 0, 63, 59, 0, 63, 60, 0, 63, 60, 0,
  78. 63, 60, 0, 63, 60, 0, 63, 60, 0, 63, 61, 0, 63, 61, 0, 63, 61, 0, 63, 61, 0, 63, 62, 0,
  79. 63, 62, 0, 63, 62, 0, 63, 62, 0, 63, 63, 0, 63, 63, 1, 63, 63, 2, 63, 63, 3, 63, 63, 4,
  80. 63, 63, 5, 63, 63, 6, 63, 63, 7, 63, 63, 8, 63, 63, 9, 63, 63, 10, 63, 63, 10, 63, 63, 11,
  81. 63, 63, 12, 63, 63, 13, 63, 63, 14, 63, 63, 15, 63, 63, 16, 63, 63, 17, 63, 63, 18, 63, 63, 19,
  82. 63, 63, 20, 63, 63, 21, 63, 63, 21, 63, 63, 22, 63, 63, 23, 63, 63, 24, 63, 63, 25, 63, 63, 26,
  83. 63, 63, 27, 63, 63, 28, 63, 63, 29, 63, 63, 30, 63, 63, 31, 63, 63, 31, 63, 63, 32, 63, 63, 33,
  84. 63, 63, 34, 63, 63, 35, 63, 63, 36, 63, 63, 37, 63, 63, 38, 63, 63, 39, 63, 63, 40, 63, 63, 41,
  85. 63, 63, 42, 63, 63, 42, 63, 63, 43, 63, 63, 44, 63, 63, 45, 63, 63, 46, 63, 63, 47, 63, 63, 48,
  86. 63, 63, 49, 63, 63, 50, 63, 63, 51, 63, 63, 52, 63, 63, 52, 63, 63, 53, 63, 63, 54, 63, 63, 55,
  87. 63, 63, 56, 63, 63, 57, 63, 63, 58, 63, 63, 59, 63, 63, 60, 63, 63, 61, 63, 63, 62, 63, 63, 63};
  88. static void
  89. initialize (void)
  90. {
  91. int i;
  92. #ifdef LIBCACA
  93. unsigned int r[256], g[256], b[256], a[256];
  94. #endif
  95. #ifdef LIBCACA
  96. qq = cucul_init();
  97. if (!qq)
  98. {
  99. printf ("Failed to initialize libcucul\n");
  100. exit (1);
  101. }
  102. kk = caca_attach(qq);
  103. if (!kk)
  104. {
  105. printf ("Failed to initialize libcaca\n");
  106. exit (1);
  107. }
  108. caca_set_delay(kk, 10000);
  109. XSIZ = cucul_get_width(qq) * 2;
  110. YSIZ = cucul_get_height(qq) * 2 - 4;
  111. #else
  112. context = aa_autoinit (&aa_defparams);
  113. if (context == NULL)
  114. {
  115. printf ("Failed to initialize aalib\n");
  116. exit (1);
  117. }
  118. aa_autoinitkbd (context, 0);
  119. params = aa_getrenderparams ();
  120. #endif
  121. for (i = 0; i < 256; i++)
  122. #ifdef LIBCACA
  123. {
  124. r[i] = pal[i * 3] * 64;
  125. g[i] = pal[i * 3 + 1] * 64;
  126. b[i] = pal[i * 3 + 2] * 64;
  127. a[i] = 0xfff;
  128. }
  129. #else
  130. aa_setpalette (palette, i, pal[i * 3] * 4,
  131. pal[i * 3 + 1] * 4, pal[i * 3 + 2] * 4);
  132. #endif
  133. #ifdef LIBCACA
  134. cucul_bitmap = cucul_create_bitmap(qq, 8, XSIZ, YSIZ - 2, XSIZ, 0, 0, 0, 0);
  135. cucul_set_bitmap_palette(qq, cucul_bitmap, r, g, b, a);
  136. bitmap = malloc(4 * cucul_get_width(qq) * cucul_get_height(qq) * sizeof(char));
  137. memset(bitmap, 0, 4 * cucul_get_width(qq) * cucul_get_height(qq));
  138. #else
  139. aa_hidecursor (context);
  140. #endif
  141. }
  142. static void
  143. uninitialize (void)
  144. {
  145. #ifdef LIBCACA
  146. caca_detach(kk);
  147. cucul_end(qq);
  148. #else
  149. aa_close (context);
  150. #endif
  151. exit (0);
  152. }
  153. static void
  154. gentable (void)
  155. {
  156. unsigned int i, p2;
  157. unsigned int minus = 800 / YSIZ;
  158. if (minus == 0)
  159. minus = 1;
  160. for (i = 0; i < MAXTABLE; i++)
  161. {
  162. if (i > minus)
  163. {
  164. p2 = (i - minus) / 5;
  165. table[i] = p2;
  166. }
  167. else
  168. table[i] = 0;
  169. }
  170. }
  171. #define MA 5
  172. static void
  173. firemain (void)
  174. {
  175. register unsigned int i;
  176. unsigned char *p;
  177. #ifndef LIBCACA
  178. char *bitmap = aa_image (context);
  179. #endif
  180. i = 0;
  181. #define END (bitmap + XSIZ * YSIZ)
  182. for (p = (unsigned char*)bitmap;
  183. (char*)p <= (( char *) (END));
  184. p += 1)
  185. {
  186. *p = table[(*(p + XSIZ - 1) + *(p + XSIZ + 1) + *(p + XSIZ)) +
  187. (*(p + 2 * XSIZ - 1) + *(p + 2 * XSIZ + 1))];
  188. }
  189. }
  190. #define min(x,y) ((x)<(y)?(x):(y))
  191. static void
  192. drawfire (void)
  193. {
  194. unsigned int i, last1, i1, i2;
  195. static int loop = 0, sloop = 0;
  196. static unsigned int height = 0;
  197. register unsigned char *p;
  198. #ifndef LIBCACA
  199. char *bitmap = aa_image (context);
  200. #else
  201. if(pause)
  202. goto paused;
  203. #endif
  204. height++;
  205. loop--;
  206. if (loop < 0)
  207. loop = rand () % 3, sloop++;;
  208. i1 = 1;
  209. i2 = 4 * XSIZ + 1;
  210. for (p = (unsigned char *) bitmap + XSIZ * (YSIZ + 0);
  211. p < ((unsigned char *) bitmap + XSIZ * (YSIZ + 1));
  212. p++, i1 += 4, i2 -= 4)
  213. {
  214. last1 = rand () % min (i1, min (i2, height));
  215. i = rand () % 6;
  216. for (; p < (unsigned char *) bitmap + XSIZ * (YSIZ + 1) && i != 0;
  217. p++, i--, i1 += 4, i2 -= 4)
  218. *p = last1, last1 += rand () % 6 - 2, *(p + XSIZ) = last1, last1 +=
  219. rand () % 6 - 2;
  220. *(p + 2 * XSIZ) = last1, last1 += rand () % 6 - 2;
  221. }
  222. i = 0;
  223. firemain ();
  224. #ifdef LIBCACA
  225. paused:
  226. cucul_draw_bitmap(qq, 0, 0,
  227. cucul_get_width(qq) - 1, cucul_get_height(qq) - 1,
  228. cucul_bitmap, bitmap);
  229. caca_display(kk);
  230. /*XSIZ = caca_get_width() * 2;
  231. YSIZ = caca_get_height() * 2 - 4;*/
  232. #else
  233. aa_renderpalette (context, palette, params, 0, 0, aa_scrwidth (context),
  234. aa_scrheight (context));
  235. aa_flush (context);
  236. #endif
  237. }
  238. static void
  239. game (void)
  240. {
  241. #ifndef LIBCACA
  242. int event;
  243. #endif
  244. gentable ();
  245. #ifdef LIBCACA
  246. for(;;)
  247. #else
  248. while (!(event = aa_getevent (context, 0)) || event == AA_RESIZE)
  249. #endif
  250. {
  251. #ifdef LIBCACA
  252. switch (caca_get_event(kk, CACA_EVENT_KEY_PRESS))
  253. {
  254. case CACA_EVENT_KEY_PRESS | CACA_KEY_ESCAPE: return;
  255. case CACA_EVENT_KEY_PRESS | ' ': pause = !pause;
  256. }
  257. #endif
  258. drawfire ();
  259. }
  260. }
  261. int
  262. main (int argc, char **argv)
  263. {
  264. #ifndef LIBCACA
  265. if (!aa_parseoptions (NULL, NULL, &argc, argv) || argc != 1)
  266. {
  267. printf ("%s", aa_help);
  268. exit (1);
  269. }
  270. #endif
  271. initialize ();
  272. #ifndef LIBCACA
  273. aa_resizehandler (context, (void *) aa_resize);
  274. #endif
  275. game ();
  276. uninitialize ();
  277. return 1;
  278. }