#include #include "../external/stb_ds.h" static void lldrawhandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; (void)data; MwLLBeginDraw(handle); h->bgcolor = NULL; MwDispatch(h, draw); if(h->draw_inject != NULL) h->draw_inject(h); MwDispatchUserHandler(h, MwNdrawHandler, NULL); MwLLEndDraw(handle); } static void lluphandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; MwLLMouse* p = data; if(p->button == MwLLMouseLeft) h->pressed = 0; h->mouse_point.x = p->point.x; h->mouse_point.y = p->point.y; if(p->button == MwLLMouseLeft) MwDispatch(h, click); MwDispatch3(h, mouse_up, data); MwDispatchUserHandler(h, MwNmouseUpHandler, data); } static void lldownhandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; MwLLMouse* p = data; if(p->button == MwLLMouseLeft) h->pressed = 1; h->mouse_point.x = p->point.x; h->mouse_point.y = p->point.y; MwDispatch3(h, mouse_down, data); MwDispatchUserHandler(h, MwNmouseDownHandler, data); } static void llresizehandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; int i; (void)data; MwDispatchUserHandler(h, MwNresizeHandler, NULL); for(i = 0; i < arrlen(h->children); i++) { MwDispatch(h->children[i], parent_resize); } MwDispatch(h, resize); } static void llclosehandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; int n; (void)data; if((n = MwGetInteger(h, MwNmain)) != MwDEFAULT && n) { while(h != NULL) { h->close = 1; MwDispatchUserHandler(h, MwNcloseHandler, NULL); h = h->parent; } } else { h->close = 1; MwDispatchUserHandler(h, MwNcloseHandler, NULL); } } static void llmovehandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; MwPoint* p = data; h->mouse_point.x = p->x; h->mouse_point.y = p->y; MwDispatch(h, mouse_move); MwDispatchUserHandler(h, MwNmouseMoveHandler, data); } static void llkeyhandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; int key = *(int*)data; MwDispatch3(h, key, key); MwDispatchUserHandler(h, MwNkeyHandler, data); } static void llkeyrelhandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; MwDispatchUserHandler(h, MwNkeyReleaseHandler, data); } static void llfocusinhandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; MwDispatchUserHandler(h, MwNfocusInHandler, data); } static void llfocusouthandler(MwLL handle, void* data) { MwWidget h = (MwWidget)handle->common.user; MwDispatchUserHandler(h, MwNfocusOutHandler, data); } MwWidget MwCreateWidget(MwClass widget_class, const char* name, MwWidget parent, int x, int y, unsigned int width, unsigned int height) { MwWidget h = malloc(sizeof(*h)); h->name = MwStringDuplicate(name); h->parent = parent; h->children = NULL; if(widget_class != NULL) { if((h->lowlevel = MwLLCreate(parent == NULL ? NULL : parent->lowlevel, x, y, width, height)) == NULL) { free(h->name); free(h); return NULL; } } else { h->lowlevel = NULL; } h->widget_class = widget_class; h->pressed = 0; h->close = 0; h->destroy_queue = NULL; h->prop_event = 1; h->draw_inject = NULL; h->tick_list = NULL; h->destroyed = 0; h->dark_theme = 0; h->bgcolor = NULL; if(parent == NULL) arrput(h->tick_list, h); if(h->lowlevel != NULL) { h->lowlevel->common.user = h; h->lowlevel->common.handler->draw = lldrawhandler; h->lowlevel->common.handler->up = lluphandler; h->lowlevel->common.handler->down = lldownhandler; h->lowlevel->common.handler->resize = llresizehandler; h->lowlevel->common.handler->close = llclosehandler; h->lowlevel->common.handler->move = llmovehandler; h->lowlevel->common.handler->key = llkeyhandler; h->lowlevel->common.handler->key_released = llkeyrelhandler; h->lowlevel->common.handler->focus_in = llfocusinhandler; h->lowlevel->common.handler->focus_out = llfocusouthandler; } if(parent != NULL) arrput(parent->children, h); sh_new_strdup(h->text); sh_new_strdup(h->integer); sh_new_strdup(h->handler); sh_new_strdup(h->data); shdefault(h->integer, MwDEFAULT); shdefault(h->text, NULL); shdefault(h->handler, NULL); shdefault(h->data, NULL); h->prop_event = 0; if(MwDispatch2(h, create) != 0) { h->widget_class = NULL; MwDestroyWidget(h); return NULL; } if(h->widget_class == NULL) { MwSetDefault(h); } h->prop_event = 1; if(h->widget_class != NULL && h->widget_class->tick != NULL) { MwAddTickList(h); } if(h->parent != NULL) MwDispatch(h->parent, children_update); return h; } MwWidget MwVaCreateWidget(MwClass widget_class, const char* name, MwWidget parent, int x, int y, unsigned int width, unsigned int height, ...) { MwWidget h; va_list va; va_start(va, height); h = MwVaListCreateWidget(widget_class, name, parent, x, y, width, height, va); va_end(va); return h; } MwWidget MwVaListCreateWidget(MwClass widget_class, const char* name, MwWidget parent, int x, int y, unsigned int width, unsigned int height, va_list va) { MwWidget h; h = MwCreateWidget(widget_class, name, parent, x, y, width, height); MwVaListApply(h, va); return h; } static void MwFreeWidget(MwWidget handle) { int i; MwWidget root = handle; handle->destroyed = 0; MwDispatch(handle, destroy); for(i = 0; i < arrlen(handle->children); i++) { MwFreeWidget(handle->children[i]); } while(root->parent != NULL) root = root->parent; for(i = 0; i < arrlen(root->tick_list); i++) { if(handle == root->tick_list[i]) { arrdel(root->tick_list, i); i--; } } free(handle->name); if(handle->lowlevel != NULL) MwLLDestroy(handle->lowlevel); shfree(handle->integer); for(i = 0; i < shlen(handle->text); i++) { free(handle->text[i].value); handle->text[i].value = NULL; } shfree(handle->text); for(i = 0; i < shlen(handle->handler); i++) { arrfree(handle->handler[i].value); } shfree(handle->handler); shfree(handle->data); arrfree(handle->destroy_queue); arrfree(handle->tick_list); free(handle); } static void destroy_children(MwWidget handle) { int i; for(i = 0; i < arrlen(handle->children); i++) { destroy_children(handle->children[i]); } handle->destroyed = 1; } void MwDestroyWidget(MwWidget handle) { if(handle->parent != NULL) { int i; for(i = 0; i < arrlen(handle->parent->destroy_queue); i++) { if(handle->parent->destroy_queue[i] == handle) break; } if(i == arrlen(handle->parent->destroy_queue)) { arrput(handle->parent->destroy_queue, handle); } } destroy_children(handle); handle->destroyed = 1; } void MwVaWidgetExecute(MwWidget handle, const char* func_name, void* out, ...) { va_list args; va_start(args, out); MwVaListWidgetExecute(handle, func_name, out, args); va_end(args); } void MwVaListWidgetExecute(MwWidget handle, const char* func_name, void* out, va_list va) { if(handle->widget_class->execute != NULL) { handle->widget_class->execute(handle, func_name, out, va); } } static void clean_destroy_queue(MwWidget handle) { int i, j; for(i = 0; i < arrlen(handle->destroy_queue); i++) { MwWidget w = handle->destroy_queue[i]; MwFreeWidget(w); } for(i = 0; i < arrlen(handle->destroy_queue); i++) { for(j = 0; j < arrlen(handle->children); j++) { if(handle->children[j] == handle->destroy_queue[i]) { arrdel(handle->children, j); break; } } } arrfree(handle->destroy_queue); } int MwStep(MwWidget handle) { int i; MwWidget* widgets = NULL; if(setjmp(handle->before_step)) return 0; for(i = 0; i < arrlen(handle->children); i++) { arrput(widgets, handle->children[i]); } for(i = 0; i < arrlen(widgets); i++) MwStep(widgets[i]); arrfree(widgets); handle->prop_event = 0; if(handle->lowlevel != NULL && MwLLPending(handle->lowlevel)) MwLLNextEvent(handle->lowlevel); handle->prop_event = 1; clean_destroy_queue(handle); if(handle->parent == NULL && handle->destroyed) { MwFreeWidget(handle); return 1; } return 0; } int MwPending(MwWidget handle) { int i; for(i = 0; i < arrlen(handle->children); i++) { if(MwPending(handle->children[i])) return 1; } return (arrlen(handle->destroy_queue) > 0 ? 1 : 0) || (handle->widget_class == NULL ? 0 : MwLLPending(handle->lowlevel)); } void MwLoop(MwWidget handle) { long tick = MwTimeGetTick(); int i; long wait = MwGetInteger(handle, MwNwaitMS); long over = 0; if(wait == MwDEFAULT) wait = MwWaitMS; while(!handle->close) { int v = 0; long t, t2; long more; while(MwPending(handle)) { if((v = MwStep(handle)) != 0) break; } if(v != 0) break; for(i = 0; i < arrlen(handle->tick_list); i++) { MwDispatch(handle->tick_list[i], tick); MwDispatchUserHandler(handle->tick_list[i], MwNtickHandler, NULL); } more = over % (wait / 2); t = (tick + wait - more) - (t2 = MwTimeGetTick()); if(t > 0) { MwTimeSleep(t); tick = MwTimeGetTick(); over -= more; } else { tick = t2; over += -t; } } } void MwSetInteger(MwWidget handle, const char* key, int n) { int xy; int wh = 0; if((xy = ((strcmp(key, MwNx) == 0 || strcmp(key, MwNy) == 0) ? 1 : 0)) || (wh = ((strcmp(key, MwNwidth) == 0 || strcmp(key, MwNheight) == 0)) ? 1 : 0)) { int x, y; unsigned int w, h; MwLLGetXYWH(handle->lowlevel, &x, &y, &w, &h); if(strcmp(key, MwNx) == 0) x = n; if(strcmp(key, MwNy) == 0) y = n; if(strcmp(key, MwNwidth) == 0) w = n; if(strcmp(key, MwNheight) == 0) h = n; if(xy) MwLLSetXY(handle->lowlevel, x, y); if(wh) MwLLSetWH(handle->lowlevel, w, h); } else { shput(handle->integer, key, n); } if(handle->prop_event) { MwDispatch3(handle, prop_change, key); if(handle->parent != NULL) MwDispatch4(handle->parent, children_prop_change, handle, key); } } void MwSetText(MwWidget handle, const char* key, const char* value) { if(strcmp(key, MwNtitle) == 0) { MwLLSetTitle(handle->lowlevel, value); } else { char* v = value == NULL ? NULL : MwStringDuplicate(value); if(shgeti(handle->text, key) != -1) free(shget(handle->text, key)); if(value != NULL) { shput(handle->text, key, v); } else { shdel(handle->text, key); } } if(handle->prop_event) { MwDispatch3(handle, prop_change, key); if(handle->parent != NULL) MwDispatch4(handle->parent, children_prop_change, handle, key); } if(strcmp(key, MwNbackground) == 0 || strcmp(key, MwNforeground) == 0 || strcmp(key, MwNsubBackground) == 0 || strcmp(key, MwNsubForeground) == 0) { MwForceRender(handle); } } void MwSetVoid(MwWidget handle, const char* key, void* value) { if(strcmp(key, MwNiconPixmap) == 0) { MwLLSetIcon(handle->lowlevel, value); } else if(strcmp(key, MwNsizeHints) == 0) { MwSizeHints* sz = value; MwLLBeginStateChange(handle->lowlevel); MwLLSetSizeHints(handle->lowlevel, sz->min_width, sz->min_height, sz->max_width, sz->max_height); MwLLEndStateChange(handle->lowlevel); } else { shput(handle->data, key, value); } if(handle->prop_event) { MwDispatch3(handle, prop_change, key); if(handle->parent != NULL) MwDispatch4(handle->parent, children_prop_change, handle, key); } } static int inherit_integer(MwWidget handle, const char* key, int default_v) { int v; if(handle->parent != NULL && (v = MwGetInteger(handle->parent, key)) != MwDEFAULT) { return v; } return default_v; } int MwGetInteger(MwWidget handle, const char* key) { if(strcmp(key, MwNx) == 0 || strcmp(key, MwNy) == 0 || strcmp(key, MwNwidth) == 0 || strcmp(key, MwNheight) == 0) { int x, y; unsigned int w, h; MwLLGetXYWH(handle->lowlevel, &x, &y, &w, &h); if(strcmp(key, MwNx) == 0) return x; if(strcmp(key, MwNy) == 0) return y; if(strcmp(key, MwNwidth) == 0) return w; if(strcmp(key, MwNheight) == 0) return h; return MwDEFAULT; } else { if(shgeti(handle->integer, key) == -1) { #if defined(USE_STB_TRUETYPE) || defined(USE_FREETYPE2) if(strcmp(key, MwNbitmapFont) == 0) return inherit_integer(handle, key, 0); #else if(strcmp(key, MwNbitmapFont) == 0) return inherit_integer(handle, key, 1); #endif #ifdef USE_CLASSIC_THEME if(strcmp(key, MwNmodernLook) == 0) return inherit_integer(handle, key, 0); #else if(strcmp(key, MwNmodernLook) == 0) return inherit_integer(handle, key, 1); #endif } return shget(handle->integer, key); } } const char* MwGetText(MwWidget handle, const char* key) { if(shgeti(handle->text, key) == -1 && (strcmp(key, MwNbackground) == 0 || strcmp(key, MwNforeground) == 0 || strcmp(key, MwNsubBackground) == 0 || strcmp(key, MwNsubForeground) == 0)) { const char* v = NULL; MwWidget h = handle->parent; while(h != NULL) { if((v = MwGetText(h, key)) != NULL) break; h = h->parent; } if(v == NULL) { if(handle->dark_theme) { if(strcmp(key, MwNbackground) == 0) return MwDefaultDarkBackground; if(strcmp(key, MwNforeground) == 0) return MwDefaultDarkForeground; if(strcmp(key, MwNsubBackground) == 0) return MwDefaultDarkSubBackground; if(strcmp(key, MwNsubForeground) == 0) return MwDefaultDarkSubForeground; } else { if(strcmp(key, MwNbackground) == 0) return MwDefaultBackground; if(strcmp(key, MwNforeground) == 0) return MwDefaultForeground; if(strcmp(key, MwNsubBackground) == 0) return MwDefaultSubBackground; if(strcmp(key, MwNsubForeground) == 0) return MwDefaultSubForeground; } } return v; } return shget(handle->text, key); } void* MwGetVoid(MwWidget handle, const char* key) { return shget(handle->data, key); } void MwVaApply(MwWidget handle, ...) { va_list va; va_start(va, handle); MwVaListApply(handle, va); va_end(va); } void MwVaListApply(MwWidget handle, va_list va) { char* key; int x = MwDEFAULT, y = MwDEFAULT, w = MwDEFAULT, h = MwDEFAULT; while((key = va_arg(va, char*)) != NULL) { if(key[0] == 'I') { int n = va_arg(va, int); if(strcmp(key, MwNx) == 0) { x = n; } else if(strcmp(key, MwNy) == 0) { y = n; } else if(strcmp(key, MwNwidth) == 0) { w = n; } else if(strcmp(key, MwNheight) == 0) { h = n; } else { MwSetInteger(handle, key, n); } } else if(key[0] == 'S') { char* t = va_arg(va, char*); MwSetText(handle, key, t); } else if(key[0] == 'C') { MwUserHandler h = va_arg(va, MwUserHandler); MwAddUserHandler(handle, key, h, NULL); } else if(key[0] == 'V') { void* v = va_arg(va, void*); MwSetVoid(handle, key, v); } } if(x != MwDEFAULT && y != MwDEFAULT) { MwLLSetXY(handle->lowlevel, x, y); if(handle->prop_event) { MwDispatch3(handle, prop_change, MwNx); MwDispatch3(handle, prop_change, MwNy); } } else { if(x != MwDEFAULT) { MwSetInteger(handle, MwNx, x); } else if(y != MwDEFAULT) { MwSetInteger(handle, MwNy, y); } } if(w != MwDEFAULT && h != MwDEFAULT) { MwLLSetWH(handle->lowlevel, w, h); if(handle->prop_event) { MwDispatch3(handle, prop_change, MwNwidth); MwDispatch3(handle, prop_change, MwNheight); } } else { if(w != MwDEFAULT) { MwSetInteger(handle, MwNwidth, w); } else if(h != MwDEFAULT) { MwSetInteger(handle, MwNheight, h); } } } #if defined(USE_STB_TRUETYPE) || defined(USE_FREETYPE2) static void set_font(MwWidget handle) { void* f; MwWidget h = handle; while(h != NULL) { if((f = MwGetVoid(h, MwNfont)) != NULL) { MwSetVoid(handle, MwNfont, f); return; } h = h->parent; } f = MwFontLoad(MwTTFData, MwTTFDataSize); MwSetVoid(handle, MwNfont, f); } static void set_boldfont(MwWidget handle) { void* f; MwWidget h = handle; while(h != NULL) { if((f = MwGetVoid(h, MwNboldFont)) != NULL) { MwSetVoid(handle, MwNboldFont, f); return; } h = h->parent; } f = MwFontLoad(MwBoldTTFData, MwBoldTTFDataSize); MwSetVoid(handle, MwNboldFont, f); } #endif void MwSetDefault(MwWidget handle) { if(handle->lowlevel != NULL) MwLLSetCursor(handle->lowlevel, &MwCursorDefault, &MwCursorDefaultMask); #if defined(USE_STB_TRUETYPE) || defined(USE_FREETYPE2) set_font(handle); set_boldfont(handle); #endif } void MwHideCursor(MwWidget handle) { MwLLSetCursor(handle->lowlevel, &MwCursorHidden, &MwCursorHiddenMask); } void MwDispatchUserHandler(MwWidget handle, const char* key, void* handler_data) { int ind = shgeti(handle->handler, key); int p = handle->prop_event; int i; if(ind == -1) return; if(handle->destroyed) return; if(!p) handle->prop_event = 1; for(i = 0; i < arrlen(handle->handler[ind].value); i++) { handle->handler[ind].value[i].handler(handle, handle->handler[ind].value[i].user_data, handler_data); } if(!p) handle->prop_event = 0; } void MwAddUserHandler(MwWidget handle, const char* key, MwUserHandler handler, void* user_data) { int ind; MwUserHandlerArray a; a.handler = handler; a.user_data = user_data; ind = shgeti(handle->handler, key); if(ind == -1) { MwUserHandlerKeyValue e; e.key = (char*)key; e.value = NULL; arrput(e.value, a); shputs(handle->handler, e); } else { arrput(handle->handler[ind].value, a); } } static MwErrorHandler error_handler = NULL; static void* error_user_data = NULL; void MwSetErrorHandler(MwErrorHandler handler, void* user_data) { error_handler = handler; error_user_data = user_data; } void MwDispatchError(int code, const char* message) { if(error_handler != NULL) { error_handler(code, message, error_user_data); } else { #ifdef _WIN32 char buffer[1024]; sprintf(buffer, "Error: %s\r\nCode : %d\r\n\r\nMilsko is exiting.", message, code); MessageBox(NULL, buffer, "Error", MB_ICONERROR | MB_OK); #else fprintf(stderr, "Error: %s\nCode : %d\n\nMilsko is exiting.", message, code); #endif exit(1); } } void MwGetBeforeStep(MwWidget handle, jmp_buf* jmpbuf) { memcpy(jmpbuf, &handle->before_step, sizeof(*jmpbuf)); } void MwForceRender(MwWidget handle) { MwLLForceRender(handle->lowlevel); } void MwForceRender2(MwWidget handle, void* ptr) { (void)ptr; MwForceRender(handle); } void MwAddTickList(MwWidget handle) { MwWidget root = handle; while(root->parent != NULL) root = root->parent; arrput(root->tick_list, handle); } void MwFocus(MwWidget handle) { MwLLFocus(handle->lowlevel); } void MwGrabPointer(MwWidget handle, int toggle) { if(toggle) MwFocus(handle); MwLLGrabPointer(handle->lowlevel, toggle); } static void force_render_all(MwWidget handle) { int i; for(i = 0; i < arrlen(handle->children); i++) { force_render_all(handle->children[i]); } if(handle->lowlevel != NULL) MwForceRender(handle); } void MwToggleDarkTheme(MwWidget handle, int toggle) { int old = handle->dark_theme; if(old != toggle) { handle->dark_theme = toggle; force_render_all(handle); } } MwWidget MwGetParent(MwWidget handle) { return handle->parent; } typedef int (*call_t)(void); int MwLibraryInit(void) { call_t calls[] = { #ifdef USE_WAYLAND MwLLWaylandCallInit, #endif #ifdef USE_X11 MwLLX11CallInit, #endif #ifdef USE_GDI MwLLGDICallInit, #endif NULL}; int i; for(i = 0; calls[i] != NULL; i++) { if(calls[i]() == 0) return 0; } return 1; } void MwShow(MwWidget handle, int toggle) { MwLLShow(handle->lowlevel, toggle); } void MwReparent(MwWidget handle, MwWidget new_parent) { if(handle->parent != NULL) { int i; for(i = 0; i < arrlen(handle->parent->children); i++) { if(handle->parent->children[i] == handle) { arrdel(handle->parent->children, i); break; } } MwDispatch(handle->parent, children_update); } handle->parent = new_parent; arrput(new_parent->children, handle); MwDispatch(handle->parent, children_update); } MwClass MwGetClass(MwWidget handle) { return handle->widget_class; } const char* MwGetName(MwWidget handle) { return handle->name; } MwWidget* MwGetChildren(MwWidget handle) { MwWidget* c = malloc(sizeof(*c) * (arrlen(handle->children) + 1)); int i; for(i = 0; i < arrlen(handle->children); i++) { c[i] = handle->children[i]; } c[arrlen(handle->children)] = 0; return c; } void MwGetCursorCoord(MwWidget handle, MwPoint* point) { MwLLGetCursorCoord(handle->lowlevel, point); } void MwGetScreenSize(MwWidget handle, MwRect* rect) { MwLLGetScreenSize(handle->lowlevel, rect); }