toaruos/apps/julia.c

330 lines
7.4 KiB
C

/* vim: ts=4 sw=4 noexpandtab
* This file is part of ToaruOS and is released under the terms
* of the NCSA / University of Illinois License - see LICENSE.md
* Copyright (C) 2013-2018 K. Lange
*
* Julia Fractal Generator
*
* This is the updated windowed version of the
* julia fractal generator demo.
*/
#include <stdio.h>
#include <stdint.h>
#include <syscall.h>
#include <string.h>
#include <stdlib.h>
#include <time.h>
#include <unistd.h>
#include <getopt.h>
#include <toaru/yutani.h>
#include <toaru/graphics.h>
#include <toaru/decorations.h>
#include <toaru/menu.h>
#define DIRECT_OFFSET(x,y) ((x) + (y) * window->width)
/*
* Macros make verything easier.
*/
#define SPRITE(sprite,x,y) sprite->bitmap[sprite->width * (y) + (x)]
#define GFX_(xpt, ypt) ((uint32_t *)window->buffer)[DIRECT_OFFSET(xpt+decor_left_width,ypt+decor_top_height)]
/* Pointer to graphics memory */
static yutani_t * yctx;
static yutani_window_t * window = NULL;
static gfx_context_t * ctx = NULL;
/* Julia fractals elements */
float conx = -0.74; /* real part of c */
float cony = 0.1; /* imag part of c */
float Maxx = 2; /* X bounds */
float Minx = -2;
float Maxy = 1; /* Y bounds */
float Miny = -1;
float initer = 1000; /* Iteration levels */
float pixcorx; /* Internal values */
float pixcory;
int newcolor; /* Color we're placing */
int lastcolor; /* Last color we placed */
int no_repeat = 0; /* Repeat colors? */
/*
* Color table
* These are orange/red shades from the Ubuntu platte.
*/
int colors[] = {
0xFFeec73e,
0xFFf0a513,
0xFFfb8b00,
0xFFf44800,
0xFFffff99,
0xFFffff00,
0xFFfdca01,
0xFF986601,
0xFFf44800,
0xFFfd3301,
0xFFd40000,
0xFF980101,
};
int left = 40;
int top = 40;
int width = 300;
int height = 300;
void julia(int xpt, int ypt) {
long double x = xpt * pixcorx + Minx;
long double y = Maxy - ypt * pixcory;
long double xnew = 0;
long double ynew = 0;
int k = 0;
for (k = 0; k <= initer; k++) {
xnew = x * x - y * y + conx;
ynew = 2 * x * y + cony;
x = xnew;
y = ynew;
if ((x * x + y * y) > 4)
break;
}
int color;
if (no_repeat) {
color = 12 * k / initer;
} else {
color = k;
if (color > 11) {
color = color % 12;
}
}
if (k >= initer) {
GFX_(xpt,ypt) = rgb(0,0,0);
} else {
GFX_(xpt,ypt) = colors[color];
}
newcolor = color;
}
void usage(char * argv[]) {
printf(
"Julia fractal generator.\n"
"\n"
"usage: %s [-n] [-i \033[3miniter\033[0m] [-x \033[3mminx\033[0m] \n"
" [-X \033[3mmaxx\033[0m] [-c \033[3mconx\033[0m] [-C \033[3mcony\033[0m]\n"
" [-W \033[3mwidth\033[0m] [-H \033[3mheight\033[0m] [-h]\n"
"\n"
" -n --no-repeat \033[3mDo not repeat colors\033[0m\n"
" -i --initer \033[3mInitializer value\033[0m\n"
" -x --minx \033[3mMinimum X value\033[0m\n"
" -X --maxx \033[3mMaximum X value\033[0m\n"
" -c --conx \033[3mcon x\033[0m\n"
" -C --cony \033[3mcon y\033[0m\n"
" -W --width \033[3mWindow width\033[0m\n"
" -H --height \033[3mWindow height\033[0m\n"
" -h --help \033[3mShow this help message.\033[0m\n",
argv[0]);
}
static void decors() {
render_decorations(window, ctx, "Julia Fractals");
}
void redraw() {
printf("initer: %f\n", initer);
printf("X: %f %f\n", Minx, Maxx);
float _x = Maxx - Minx;
float _y = _x / width * height;
Miny = 0 - _y / 2;
Maxy = _y / 2;
printf("Y: %f %f\n", Miny, Maxy);
printf("conx: %f cony: %f\n", conx, cony);
decors();
newcolor = 0;
lastcolor = 0;
pixcorx = (Maxx - Minx) / width;
pixcory = (Maxy - Miny) / height;
int j = 0;
do {
int i = 1;
do {
julia(i,j);
if (lastcolor != newcolor) julia(i-1,j);
else if (i > 0) GFX_(i-1,j) = colors[lastcolor];
newcolor = lastcolor;
i+= 2;
} while ( i < width );
yutani_flip(yctx, window);
++j;
} while ( j < height );
}
void resize_finish(int w, int h) {
yutani_window_resize_accept(yctx, window, w, h);
reinit_graphics_yutani(ctx, window);
width = w - decor_left_width - decor_right_width;
height = h - decor_top_height - decor_bottom_height;
draw_fill(ctx, rgb(0,0,0));
decors();
yutani_window_resize_done(yctx, window);
redraw();
yutani_flip(yctx, window);
}
int main(int argc, char * argv[]) {
static struct option long_opts[] = {
{"no-repeat", no_argument, 0, 'n'},
{"initer", required_argument, 0, 'i'},
{"minx", required_argument, 0, 'x'},
{"maxx", required_argument, 0, 'X'},
{"conx", required_argument, 0, 'c'},
{"cony", required_argument, 0, 'C'},
{"width", required_argument, 0, 'W'},
{"height", required_argument, 0, 'H'},
{"help", no_argument, 0, 'h'},
{0,0,0,0}
};
if (argc > 1) {
/* Read some arguments */
int index, c;
while ((c = getopt_long(argc, argv, "ni:x:X:c:C:W:H:h", long_opts, &index)) != -1) {
if (!c) {
if (long_opts[index].flag == 0) {
c = long_opts[index].val;
}
}
switch (c) {
case 'n':
no_repeat = 1;
break;
case 'i':
initer = atof(optarg);
break;
case 'x':
Minx = atof(optarg);
break;
case 'X':
Maxx = atof(optarg);
break;
case 'c':
conx = atof(optarg);
break;
case 'C':
cony = atof(optarg);
break;
case 'W':
width = atoi(optarg);
break;
case 'H':
height = atoi(optarg);
break;
case 'h':
usage(argv);
exit(0);
break;
default:
break;
}
}
}
yctx = yutani_init();
if (!yctx) {
fprintf(stderr, "%s: failed to connect to compositor\n", argv[0]);
return 1;
}
init_decorations();
window = yutani_window_create(yctx, width + decor_width(), height + decor_height());
yutani_window_move(yctx, window, left, top);
yutani_window_advertise_icon(yctx, window, "Julia Fractals", "julia");
ctx = init_graphics_yutani(window);
redraw();
yutani_flip(yctx, window);
int playing = 1;
while (playing) {
yutani_msg_t * m = yutani_poll(yctx);
while (m) {
if (menu_process_event(yctx, m)) {
/* just decorations should be fine */
decors();
yutani_flip(yctx, window);
}
switch (m->type) {
case YUTANI_MSG_KEY_EVENT:
{
struct yutani_msg_key_event * ke = (void*)m->data;
if (ke->event.action == KEY_ACTION_DOWN && ke->event.keycode == 'q') {
playing = 0;
}
}
break;
case YUTANI_MSG_WINDOW_FOCUS_CHANGE:
{
struct yutani_msg_window_focus_change * wf = (void*)m->data;
yutani_window_t * win = hashmap_get(yctx->windows, (void*)wf->wid);
if (win && win == window) {
win->focused = wf->focused;
decors();
yutani_flip(yctx, window);
}
}
break;
case YUTANI_MSG_RESIZE_OFFER:
{
struct yutani_msg_window_resize * wr = (void*)m->data;
resize_finish(wr->width, wr->height);
}
break;
case YUTANI_MSG_WINDOW_MOUSE_EVENT:
{
struct yutani_msg_window_mouse_event * me = (void*)m->data;
int result = decor_handle_event(yctx, m);
switch (result) {
case DECOR_CLOSE:
playing = 0;
break;
case DECOR_RIGHT:
/* right click in decoration, show appropriate menu */
decor_show_default_menu(window, window->x + me->new_x, window->y + me->new_y);
break;
default:
/* Other actions */
break;
}
}
break;
case YUTANI_MSG_WINDOW_CLOSE:
case YUTANI_MSG_SESSION_END:
playing = 0;
break;
default:
break;
}
free(m);
m = yutani_poll_async(yctx);
}
}
yutani_close(yctx, window);
return 0;
}