examples/demo/demo.c

   1 /**
   2  * \file
   3  * <!--
   4  * This file is part of BeRTOS.
   5  *
   6  * Bertos is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  *
  20  * As a special exception, you may use this file as part of a free software
  21  * library without restriction.  Specifically, if other files instantiate
  22  * templates or use macros or inline functions from this file, or you compile
  23  * this file and link it with other files to produce an executable, this
  24  * file does not by itself cause the resulting executable to be covered by
  25  * the GNU General Public License.  This exception does not however
  26  * invalidate any other reasons why the executable file might be covered by
  27  * the GNU General Public License.
  28  *
  29  * Copyright 2006, 2008 Develer S.r.l. (http://www.develer.com/)
  30  * -->
  31  *
  32  * \brief Multifunction system test for BeRTOS modules.
  33  *
  34  * \version $Id$
  35  * \author Bernie Innocenti <bernie@codewiz.org>
  36  */
  37
  38 #include <cfg/macros.h>
  39
  40 #include <emul/emul.h>
  41 #include <emul/kfile_posix.h>
  42
  43 #include <kern/irq.h>
  44 #include <kern/proc.h>
  45 #include <kern/monitor.h>
  46 #include <kern/msg.h>
  47
  48 #include <drv/timer.h>
  49 #include <drv/buzzer.h>
  50 #include <drv/lcd_gfx.h>
  51 #include <drv/kbd.h>
  52
  53 #include <gfx/gfx.h>
  54 #include <gfx/win.h>
  55 #include <gfx/text.h>
  56 #include <gfx/font.h>
  57
  58 #include <gui/menu.h>
  59 #include <icons/logo.h>
  60
  61 /**
  62  * Refresh the GUI.
  63  */
  64 void refresh(void)
  65 {
  66         PROC_ATOMIC(
  67                 lcd_blitBitmap(&lcd_bitmap);
  68                 emul_idle();
  69         );
  70 }
  71
  72 /**
  73  * Draw a pentacle in the provided bitmap.
  74  */
  75 static void magic(struct Bitmap *bitmap, coord_t x, coord_t y)
  76 {
  77         static const coord_t coords[] = { 120, 34, 90, 90, 30, 90, 0, 34, 60, 0, 90, 90, 0, 34, 120, 34, 30, 90, 60, 0 };
  78         unsigned int i;
  79
  80         gfx_moveTo(bitmap, coords[countof(coords)-2]/2 + x, coords[countof(coords)-1]/3 + y);
  81         for (i = 0; i < countof(coords); i += 2)
  82                 gfx_lineTo(bitmap, coords[i]/2 + x, coords[i+1]/3 + y);
  83 }
  84
  85 static void hello_world(Bitmap *bm)
  86 {
  87         extern const Font font_ncenB18;
  88         const Font *old_font;
  89
  90         PROC_ATOMIC(
  91                 old_font = bm->font;
  92
  93                 gfx_bitmapClear(bm);
  94
  95                 /* Set big font */
  96                 gfx_setFont(bm, &font_ncenB18);
  97
  98                 text_xprintf(bm, 1, 0, STYLEF_BOLD | TEXT_FILL | TEXT_CENTER,
  99                                 "Hello, world!");
 100
 101                 lcd_blitBitmap(bm);
 102         );
 103
 104         timer_delay(1000);
 105
 106         PROC_ATOMIC(
 107                 /* Restore old font */
 108                 gfx_setFont(bm, old_font);
 109         );
 110 }
 111
 112 /**
 113  * Show the splash screen
 114  */
 115 static void bouncing_logo(Bitmap *bm)
 116 {
 117         const long SPEED_SCALE = 1000;
 118         const long GRAVITY_ACCEL = 10;
 119         const long BOUNCE_ELASTICITY = 2;
 120         long h = (long)(-bertos_logo.height) * SPEED_SCALE;
 121         long speed = 1000;
 122
 123         /* Repeat until logo stands still on the bottom edge */
 124         while (!((speed == 0) && (h == 0)))
 125         {
 126                 /* Move */
 127                 h += speed;
 128
 129                 /* Gravity acceleration */
 130                 speed += GRAVITY_ACCEL;
 131
 132                 if (h > 0 && speed > 0)
 133                 {
 134                         /* Bounce */
 135                         speed = - (speed / BOUNCE_ELASTICITY);
 136
 137                 }
 138
 139                 /* Update graphics */
 140                 PROC_ATOMIC(
 141                         gfx_bitmapClear(bm);
 142                         gfx_blitImage(bm,
 143                                 (bm->width - bertos_logo.width) / 2,
 144                                 h / SPEED_SCALE,
 145                                 &bertos_logo);
 146                         lcd_blitBitmap(bm);
 147                 );
 148                 timer_delay(10);
 149         }
 150 }
 151
 152 void win_demo(Bitmap *bm)
 153 {
 154         const coord_t small_left = 45, small_top = 30, small_width = 50, small_height = 30;
 155         const coord_t large_left = -10, large_top = 10, large_width = 85, large_height = 41;
 156
 157         Window root_win, small_win, large_win;
 158         Bitmap small_bm, large_bm;
 159         uint8_t small_raster[RAST_SIZE(small_width, small_height)];
 160         uint8_t large_raster[RAST_SIZE(large_width, large_height)];
 161
 162         win_create(&root_win, bm);
 163
 164         gfx_bitmapInit(&large_bm, large_raster, large_width, large_height);
 165         win_create(&large_win, &large_bm);
 166         win_open(&large_win, &root_win);
 167         win_move(&large_win, large_left, large_top);
 168
 169         gfx_bitmapInit(&small_bm, small_raster, small_width, small_height);
 170         win_create(&small_win, &small_bm);
 171         win_open(&small_win, &root_win);
 172         win_move(&small_win, small_left, small_top);
 173
 174
 175         coord_t x = 0, y = LCD_WIDTH / 2;
 176         coord_t xdir = +1, ydir = -1;
 177         coord_t xdir_large = +1;
 178         coord_t ydir_small = +1;
 179         int raise_counter = 0;
 180         int i;
 181
 182         for(;;)
 183         {
 184                 PROC_ATOMIC(
 185                         /* Background animation */
 186                         bm = root_win.bitmap;
 187                         gfx_bitmapClear(bm);
 188                         // gfx_setClipRect(bm, 0, 0, bm->width, bm->height);
 189                         // gfx_rectDraw(bm, 10, 10, bm->width-10, bm->height-10);
 190                         // gfx_setClipRect(bm, 11, 11, bm->width-11, bm->height-11);
 191                         magic(bm, x, y);
 192                         x += xdir;
 193                         y += ydir;
 194                         if (x >= bm->width)  xdir = -1;
 195                         if (x <= -50)        xdir = +1;
 196                         if (y >= bm->height) ydir = -1;
 197                         if (y <= -50)        ydir = +1;
 198
 199                         /* Large window animation */
 200                         bm = large_win.bitmap;
 201                         gfx_bitmapClear(bm);
 202                         for (i = 0; i < bm->height / 2; i += 2)
 203                                 gfx_rectDraw(bm, 0 + i, 0 + i, bm->width - i, bm->height - i);
 204
 205                         /* Small window animation */
 206                         bm = small_win.bitmap;
 207                         gfx_bitmapClear(bm);
 208                         gfx_rectDraw(bm, 0, 0, bm->width, bm->height);
 209                         gfx_line(bm, 0, 0, bm->width, bm->height);
 210                         gfx_line(bm, bm->width, 0, 0, bm->height);
 211
 212                         /* Move windows around */
 213                         win_move(&large_win, large_win.geom.xmin + xdir_large, large_top);
 214                         if (large_win.geom.xmin < -20) xdir_large = +1;
 215                         if (large_win.geom.xmin > RECT_WIDTH(&root_win.geom) - 5) xdir_large = -1;
 216
 217                         win_move(&small_win, small_left, small_win.geom.ymin + ydir_small);
 218                         if (small_win.geom.ymin < -20) ydir_small = +1;
 219                         if (small_win.geom.ymin > RECT_HEIGHT(&root_win.geom) - 5) ydir_small = -1;
 220
 221                         ++raise_counter;
 222                         if (raise_counter % 997 == 0)
 223                                 win_raise(&small_win);
 224                         else if (raise_counter % 731 == 0)
 225                                 win_raise(&large_win);
 226
 227                         win_compose(&root_win);
 228                 );
 229                 /* Also does LCD refresh, etc. */
 230                 if (kbd_peek())
 231                         break;
 232         }
 233 }
 234
 235 void proc_demo(void)
 236 {
 237         proc_testRun();
 238 }
 239
 240 void timer_demo(void)
 241 {
 242         timer_testRun();
 243         timer_testTearDown();
 244 }
 245
 246
 247 /* SETTINGS SUBMENU */
 248
 249 static struct MenuItem settings_items[] =
 250 {
 251         { (const_iptr_t)"System",     0, (MenuHook)0,  (iptr_t)0 },
 252         { (const_iptr_t)"Language",   0, (MenuHook)0,  (iptr_t)0 },
 253         { (const_iptr_t)"Networking", 0, (MenuHook)0,  (iptr_t)0 },
 254         { (const_iptr_t)"Date & Time",0, (MenuHook)0,  (iptr_t)0 },
 255         { (const_iptr_t)"Power Saving", MIF_TOGGLE, (MenuHook)0, (iptr_t)0 },
 256         { (const_iptr_t)0, 0, NULL, (iptr_t)0 }
 257 };
 258 static struct Menu settings_menu = { settings_items, "Settings Menu", MF_STICKY | MF_SAVESEL, &lcd_bitmap, 0 };
 259
 260
 261 /* MX SUBMENU */
 262
 263 static struct MenuItem mx_items[] =
 264 {
 265         { (const_iptr_t)"Mouse",                  MIF_CHECKIT | MIF_EXCLUDE_1 | MIF_EXCLUDE_2, (MenuHook)0,  (iptr_t)0 },
 266         { (const_iptr_t)"Keyboard", MIF_CHECKED | MIF_CHECKIT | MIF_EXCLUDE_0 | MIF_EXCLUDE_2, (MenuHook)0,  (iptr_t)0 },
 267         { (const_iptr_t)"Joystick", MIF_CHECKIT | MIF_EXCLUDE_0 | MIF_EXCLUDE_1, (MenuHook)0,  (iptr_t)0 },
 268         { (const_iptr_t)"Autosave", MIF_CHECKED | MIF_CHECKIT | MIF_TOGGLE, (MenuHook)0,  (iptr_t)0 },
 269         { (const_iptr_t)0, 0, NULL, (iptr_t)0 }
 270 };
 271
 272 static struct Menu mx_menu = { mx_items, (const_iptr_t)0, MF_STICKY | MF_SAVESEL, &lcd_bitmap, 0 };
 273
 274
 275 /* DISPLAY SUBMENU */
 276
 277 static struct MenuItem display_items[] =
 278 {
 279         { (const_iptr_t)"Background", 0, (MenuHook)0, (iptr_t)0 },
 280         { (const_iptr_t)"Colors",     0, (MenuHook)0, (iptr_t)0 },
 281         { (const_iptr_t)"Style",      0, (MenuHook)0, (iptr_t)0 },
 282         { (const_iptr_t)"Icon Theme", 0, (MenuHook)0, (iptr_t)0 },
 283         { (const_iptr_t)0, 0, NULL, (iptr_t)0 }
 284 };
 285 static struct Menu display_menu = { display_items, "Display Menu", MF_SAVESEL, &lcd_bitmap, 0 };
 286
 287
 288 /* MAIN MENU */
 289
 290 static struct MenuItem main_items[] =
 291 {
 292         { (const_iptr_t)"Win Fly",     0, (MenuHook)win_demo,     (iptr_t)&lcd_bitmap    },
 293         { (const_iptr_t)"Bounce!",     0, (MenuHook)bouncing_logo,(iptr_t)&lcd_bitmap    },
 294         { (const_iptr_t)"Hello World", 0, (MenuHook)hello_world,  (iptr_t)&lcd_bitmap    },
 295         { (const_iptr_t)"Scheduling",  0, (MenuHook)proc_demo,    (iptr_t)&lcd_bitmap    },
 296         { (const_iptr_t)"Timer Test",  0, (MenuHook)timer_demo,   (iptr_t)&lcd_bitmap    },
 297         { (const_iptr_t)"Menu MX",     0, (MenuHook)menu_handle,  (iptr_t)&mx_menu       },
 298         { (const_iptr_t)"Display",     0, (MenuHook)menu_handle,  (iptr_t)&display_menu  },
 299         { (const_iptr_t)"Settings",    0, (MenuHook)menu_handle,  (iptr_t)&settings_menu },
 300         { (const_iptr_t)0, 0, NULL, (iptr_t)0 }
 301 };
 302 static struct Menu main_menu = { main_items, "Main Menu", MF_STICKY, &lcd_bitmap, 0 };
 303
 304 #if CONFIG_KERN_HEAP
 305 #define monitor_stack NULL
 306 #else
 307 static PROC_DEFINE_STACK(monitor_stack, KERN_MINSTACKSIZE);
 308 #endif
 309
 310 int main(int argc, char *argv[])
 311 {
 312         emul_init(&argc, argv);
 313
 314         timer_init();
 315         buz_init();
 316         kbd_init();
 317         lcd_init();
 318         proc_init();
 319         monitor_start(KERN_MINSTACKSIZE, monitor_stack);
 320
 321         menu_handle(&main_menu);
 322
 323         timer_cleanup();
 324         emul_cleanup();
 325         return 0;
 326 }