//SPDX-License-Identifier: LGPL-2.0-or-later

/*

   Copyright (c) 2007-2020 Cyril Hrubis <metan@ucw.cz>

 */

#include <math.h>
#include <time.h>
#include <widgets/gp_widgets.h>

static void draw(gp_widget *pixmap, const gp_widget_render_ctx *ctx)
{
        gp_pixmap *pix = pixmap->pixmap->pixmap;
        gp_pixel black = gp_rgb_to_pixmap_pixel(0x00, 0x00, 0x00, pix);
        gp_pixel red   = gp_rgb_to_pixmap_pixel(0xff, 0x00, 0x00, pix);

        gp_fill(pix, ctx->bg_color);

        int w = pix->w;
        int h = pix->h;
        int r = GP_MIN(w, h)/2 - 1;
        int cx = r + (w - 2 * r)/2;
        int cy = r + (h - 2 * r)/2;

        gp_circle(pix, cx, cy, r, black);

        gp_line(pix, cx, cy - r, cx, cy - r + 4, black);
        gp_line(pix, cx, cy + r, cx, cy + r - 4, black);
        gp_line(pix, cx - r, cy, cx - r + 4, cy, black);
        gp_line(pix, cx + r, cy, cx + r - 4, cy, black);

        int csa = r * sin(M_PI/6);
        int cca = r * cos(M_PI/6);
        int csb = (r - 4) * sin(M_PI/6);
        int ccb = (r - 4) * cos(M_PI/6);

        gp_line(pix, cx - csa, cy - cca, cx - csb, cy - ccb, black);
        gp_line(pix, cx + csa, cy - cca, cx + csb, cy - ccb, black);
        gp_line(pix, cx - csa, cy + cca, cx - csb, cy + ccb, black);
        gp_line(pix, cx + csa, cy + cca, cx + csb, cy + ccb, black);

        gp_line(pix, cx - cca, cy - csa, cx - ccb, cy - csb, black);
        gp_line(pix, cx + cca, cy - csa, cx + ccb, cy - csb, black);
        gp_line(pix, cx - cca, cy + csa, cx - ccb, cy + csb, black);
        gp_line(pix, cx + cca, cy + csa, cx + ccb, cy + csb, black);

        time_t timestamp;
        struct tm *tm;

        time(&timestamp);
        tm = localtime(&timestamp);

        float angle;

        angle = 2 * M_PI * (tm->tm_hour%12) / 12 - M_PI/2;

        gp_line(pix, cx, cy,
                cx + 0.6 * r * cos(angle), cy + 0.6 * r * sin(angle), black);

        angle = 2 * M_PI * tm->tm_min / 60 - M_PI/2;

        gp_line(pix, cx, cy,
                cx + 0.8 * r * cos(angle), cy + 0.8 * r * sin(angle), black);

        angle = 2 * M_PI * tm->tm_sec / 60 - M_PI/2;

        gp_line(pix, cx, cy,
                cx + 0.9 * r * cos(angle), cy + 0.8 * r * sin(angle), red);
}

int pixmap_on_event(gp_widget_event *ev)
{
        switch (ev->type) {
        case GP_WIDGET_EVENT_REDRAW:
                draw(ev->self, ev->ctx);
                printf("BBOX " GP_BBOX_FMT "\n", GP_BBOX_PARS((*ev->bbox)));
                return 1;
        default:
                return 0;
        }
}

static uint32_t timer_callback(gp_timer *self)
{
        gp_widget *pixmap = self->priv;
        gp_widget_redraw(pixmap);
        return 1000;
}

static gp_timer tmr = {
        .expires = 1000,
        .callback = timer_callback,
        .id = "Clock redraw"
};

int main(int argc, char *argv[])
{
        gp_widget *layout = gp_widget_grid_new(1, 1, 0);
        gp_widget *pixmap = gp_widget_pixmap_new(GP_WIDGET_SIZE(100, 0, 0),
                                                 GP_WIDGET_SIZE(100, 0, 0),
                                                 pixmap_on_event, NULL);

        gp_widget_grid_put(layout, 0, 0, pixmap);

        layout->align = GP_FILL;
        pixmap->align = GP_FILL;

        tmr.priv = pixmap;

        gp_widget_event_unmask(pixmap, GP_WIDGET_EVENT_REDRAW);

        gp_widgets_timer_ins(&tmr);

        gp_widgets_main_loop(layout, "Clock", NULL, argc, argv);
}