mg-samples-1.6.10.tar.gz

/* $Id: scrnsaver.c,v 1.5 2005-09-04 08:24:53 weiym Exp $ ****************************************************************************** Flying-GGIs - Another neat GGI demo... Porting to MiniGUI by WEI Yongming Authors: 1998 Andrew Apted [andrew@ggi-project.org] This software is placed in the public domain and can be used freely for any purpose. It comes without any kind of warranty, either expressed or implied, including, but not limited to the implied warranties of merchantability or fitness for a particular purpose. Use it at your own risk. the author is not responsible for any damage or consequences raised by use or inability to use this program. ****************************************************************************** */ /* This is needed for the HAVE_* macros */ #include <stdio.h> #include <stdlib.h> #include <string.h> #include <ctype.h> #include <sys/time.h> #include <time.h> #include <unistd.h> #include <math.h> #include <minigui/common.h> #include <minigui/minigui.h> #include <minigui/gdi.h> #include <minigui/window.h> #define fixed gal_sint32 /* 16.16 */ #define DEFAULT_WIDTH 1024 #define DEFAULT_HEIGHT 768 #define DEFAULT_GENTIME 200 /* msec */ #define DEFAULT_MAXSIZE 100 /* percent */ #define DEFAULT_CLUSTERSIZE 100 /* percent */ #define DEFAULT_SPEED 30 /* Global Info */ static int screen_width; static int screen_height; static int screen_diag; static int banner_width; static int banner_height; static int banner_diag; static int gen_time; /* msec */ static fixed max_size; /* default 1.0 = full screen */ static int cluster_size; /* pixels */ static int fixed_speed=0; static int speed; static int use_putbox; static gal_pixel lookup[256]; static void *image_buf; static int image_size; typedef struct texture { struct texture *succ; struct texture *tail; fixed mid_x, mid_y; fixed size; fixed millis; fixed speed; gal_uint8 color; } Texture; static Texture *texture_list; static char *banner[46]; static void banner_size(int *width, int *height) { *width=0; for (*height=0; banner[*height] != NULL; (*height)++) { int len = strlen(banner[*height]); if (len > *width) { *width = len; } } } static int random_in_range(int low, int high) { return low + random() % (high-low+1); } static void setup_palette(void) { int i; use_putbox = 0; if (GetGDCapability (HDC_SCREEN, GDCAP_DEPTH) == 8) use_putbox = 1; for (i=0; i < 256; i++) { GAL_Color col; col.r = ((i >> 5) & 7) * 0xffff / 7; col.g = ((i >> 2) & 7) * 0xffff / 7; col.b = ((i) & 3) * 0xffff / 3; lookup[i] = RGB2Pixel (HDC_SCREEN, col.r, col.g, col.b); } } static gal_uint8 trans_buffer[8192]; static void translate_hline(HDC hdc, int x, int y, int w, gal_uint8 *data) { int ww = w; #ifdef _USE_NEWGAL BITMAP bmp = {BMP_TYPE_NORMAL}; #else BITMAP bmp; #endif gal_uint8 *buf1 = (gal_uint8 *) trans_buffer; gal_uint16 *buf2 = (gal_uint16 *) trans_buffer; gal_uint32 *buf4 = (gal_uint32 *) trans_buffer; switch ( GetGDCapability (hdc, GDCAP_BPP)) { case 1: for (; ww > 0; ww--) { *buf1++ = lookup[*data++]; } break; case 2: for (; ww > 0; ww--) { *buf2++ = lookup[*data++]; } break; case 3: for (; ww > 0; ww--) { gal_pixel pix = lookup[*data++]; *buf1++ = pix; pix >>= 8; *buf1++ = pix; pix >>= 8; *buf1++ = pix; } break; case 4: for (; ww > 0; ww--) { *buf4++ = lookup[*data++]; } break; } #ifdef _USE_NEWGAL bmp.bmBitsPerPixel = GetGDCapability (hdc, GDCAP_DEPTH); bmp.bmBytesPerPixel = GetGDCapability (hdc, GDCAP_BPP); bmp.bmPitch = w; #endif bmp.bmWidth = w; bmp.bmHeight = 1; bmp.bmBits = trans_buffer; FillBoxWithBitmap (hdc, x, y, 0, 0, &bmp); } static void update_frame(HDC hdc) { if (use_putbox) { #ifdef _USE_NEWGAL BITMAP bmp = {BMP_TYPE_NORMAL}; bmp.bmBitsPerPixel = GetGDCapability (hdc, GDCAP_DEPTH); bmp.bmBytesPerPixel = GetGDCapability (hdc, GDCAP_BPP); bmp.bmPitch = screen_width; #else BITMAP bmp; #endif bmp.bmWidth = screen_width; bmp.bmHeight = screen_height; bmp.bmBits = image_buf; FillBoxWithBitmap (hdc, 0, 0, 0, 0, &bmp); } else { int y; gal_uint8 *src = (gal_uint8 *) image_buf; for (y=0; y < screen_height; y++) { translate_hline(hdc, 0, y, screen_width, src); src += screen_width; } } } static void init_textures(void) { texture_list = NULL; } static void free_textures(void) { Texture *t; while (texture_list != NULL) { t = texture_list; texture_list = t->succ; free(t); } } static void add_texture(int x, int y, gal_uint8 color) { Texture *t; t = (Texture *) malloc(sizeof(Texture)); t->mid_x = x << 16; t->mid_y = y << 16; t->millis = 0; t->color = color; t->speed = speed + (fixed_speed ? 0 : random_in_range(-(speed/2), +(speed/2))); t->succ = texture_list; texture_list = t; } static void render_texture(int width, int height, Texture *t) { int x, y; int sx, sy, bx; int dx, dy; gal_uint8 *dest; height <<= 16; width <<= 16; dx = dy = t->size * screen_diag / banner_diag; bx = t->mid_x - (banner_width * dx / 2); sy = t->mid_y - (banner_height * dy / 2); for (y=0; (banner[y] != NULL) && (sy < height); y++, sy += dy) { char *pos = banner[y]; if (sy >= 0) { dest = image_buf; dest += ((sy>>16) * screen_width); for (x=0, sx=bx; (*pos != 0) && (sx < width); x++, pos++, sx += dx) { if ((sx >= 0) && (*pos == '#')) { dest[sx>>16] = t->color; } } } } } static void update_texture(Texture *t, Texture ***prev_ptr, int millis) { t->millis += millis; t->size = t->millis * t->speed; if (t->size > max_size) { /* remove texture */ **prev_ptr = t->succ; free(t); return; } *prev_ptr = &t->succ; render_texture(screen_width, screen_height, t); } static void update_all_textures(int millis) { Texture *cur; Texture **prev_ptr; cur = texture_list; prev_ptr = (Texture **) &texture_list; while (cur != NULL) { update_texture(cur, &prev_ptr, millis); cur = *prev_ptr; } } static struct timeval cur_time, prev_time; static int gen_millis; static void InitFlyingGUI (void) { /* initialize */ srand(time(NULL)); banner_size(&banner_width, &banner_height); banner_diag = sqrt(banner_width * banner_width + banner_height * banner_height); screen_width = DEFAULT_WIDTH; screen_height = DEFAULT_HEIGHT; gen_time = DEFAULT_GENTIME; speed = -1; max_size = -1; cluster_size = -1; init_textures(); if (speed < 0) { speed = DEFAULT_SPEED; } if (max_size < 0) { max_size = DEFAULT_MAXSIZE; } max_size = (max_size << 16) / 100; if (cluster_size < 0) { cluster_size = DEFAULT_CLUSTERSIZE; } setup_palette(); screen_diag = sqrt(screen_width * screen_width + screen_height * screen_height); image_size = screen_width * screen_height * 1; image_buf = malloc(image_size); gettimeofday (&prev_time, NULL); gen_millis=0; } #define CMPOPT(x,s,l,n) (((strcmp(x,s)==0) || \ (strcmp(x,l)==0)) && ((i+n) < argc)) static void OnPaint (HDC hdc) { int x, y; int millis; x = screen_wid