functional listbox

git-svn-id: http://svn2.nishi.boats/svn/milsko/trunk@328 b9cfdab3-6d41-4d17-bbe4-086880011989

src/widget/listbox.c

@@ -1,24 +1,154 @@
 /* $Id$ */
 #include <Mw/Milsko.h>
 
-static int create(MwWidget handle) {
-	int st;
+#include "../../external/stb_ds.h"
 
-	if((st = MwViewportClass->create(handle)) != 0) return st;
+static int get_first_entry(MwListBox lb) {
+	int st = 0;
+	st     = MwGetInteger(lb->vscroll, MwNvalue);
+	st     = st * (MwGetInteger(lb->vscroll, MwNmaxValue) - MwGetInteger(lb->vscroll, MwNareaShown)) / MwGetInteger(lb->vscroll, MwNmaxValue);
+	if(st < 0) st = 0;
+
+	return st;
+}
+
+static void vscroll_changed(MwWidget handle, void* user, void* call) {
+	MwListBox lb = handle->parent->internal;
+	MwForceRender(lb->frame);
+}
+
+static void frame_mouse_down(MwWidget handle, void* user, void* call) {
+	MwListBox  lb = handle->parent->internal;
+	MwLLMouse* m  = call;
+	int	   st = 0;
+	int	   i;
+	int	   y = MwDefaultBorderWidth;
+	int	   h = MwGetInteger(handle, MwNheight);
+
+	st = get_first_entry(lb);
+	for(i = 0; i < (h - MwDefaultBorderWidth * 2) / MwTextHeight(handle, "M"); i++) {
+		if(y <= m->point.y && m->point.y <= (y + MwTextHeight(handle, "M"))) {
+			lb->selected = st + i;
+		}
+		y += MwTextHeight(handle, "M");
+	}
+
+	MwForceRender(lb->frame);
+}
+
+static void frame_draw(MwWidget handle) {
+	MwRect	  r;
+	MwListBox lb   = handle->parent->internal;
+	MwLLColor base = MwParseColor(handle, MwGetText(handle, MwNbackground));
+	MwLLColor text = MwParseColor(handle, MwGetText(handle, MwNforeground));
+	int	  i;
+	MwPoint	  p;
+	int	  st = 0;
+
+	r.x	 = 0;
+	r.y	 = 0;
+	r.width	 = MwGetInteger(handle, MwNwidth);
+	r.height = MwGetInteger(handle, MwNheight);
+
+	p.x = MwDefaultBorderWidth;
+	p.y = MwDefaultBorderWidth;
+
+	st = get_first_entry(lb);
+
+	for(i = st; i < arrlen(lb->list) && i < st + (r.height - MwDefaultBorderWidth * 2) / MwTextHeight(handle, "M"); i++) {
+		int selected = lb->selected == i ? 1 : 0;
+
+		if(selected) {
+			MwRect r2;
+			r2.x	  = 0;
+			r2.y	  = p.y;
+			r2.width  = r.width;
+			r2.height = MwTextHeight(handle, lb->list[i]);
+			MwDrawRect(handle, &r2, text);
+		}
+		p.y += MwTextHeight(handle, lb->list[i]) / 2;
+		MwDrawTextEx(handle, &p, lb->list[i], 0, MwALIGNMENT_BEGINNING, selected ? base : text, selected ? text : base);
+		p.y += MwTextHeight(handle, lb->list[i]) / 2;
+	}
+
+	MwDrawFrame(handle, &r, base, 1);
+
+	MwLLFreeColor(text);
+	MwLLFreeColor(base);
+}
+
+static void resize(MwWidget handle) {
+	MwListBox lb = handle->internal;
+	int	  w  = MwGetInteger(handle, MwNwidth);
+	int	  h  = MwGetInteger(handle, MwNheight);
+	int	  ih;
+	if(lb->vscroll == NULL) {
+		lb->vscroll = MwVaCreateWidget(MwScrollBarClass, "vscroll", handle, w - 16, 0, 16, h, NULL);
+		MwAddUserHandler(lb->vscroll, MwNchangedHandler, vscroll_changed, NULL);
+	} else {
+		MwVaApply(lb->vscroll,
+			  MwNx, w - 16,
+			  MwNy, 0,
+			  MwNwidth, 16,
+			  MwNheight, h,
+			  NULL);
+	}
+	if(lb->frame == NULL) {
+		lb->frame	       = MwVaCreateWidget(MwFrameClass, "frame", handle, 0, 0, w - 16, h, NULL);
+		lb->frame->draw_inject = frame_draw;
+		MwAddUserHandler(lb->frame, MwNmouseDownHandler, frame_mouse_down, NULL);
+	} else {
+		MwVaApply(lb->frame,
+			  MwNx, 0,
+			  MwNy, 0,
+			  MwNwidth, w - 16,
+			  MwNheight, h,
+			  NULL);
+	}
+
+	ih = arrlen(lb->list);
+
+	MwVaApply(lb->vscroll,
+		  MwNareaShown, h / MwTextHeight(handle, "M"),
+		  MwNmaxValue, ih,
+		  NULL);
+}
+
+static int create(MwWidget handle) {
+	MwListBox lb = malloc(sizeof(*lb));
+	memset(lb, 0, sizeof(*lb));
+
+	handle->internal = lb;
+
+	MwSetDefault(handle);
+
+	resize(handle);
+	lb->list     = NULL;
+	lb->selected = -1;
 
 	return 0;
 }
 
 static void destroy(MwWidget handle) {
-	MwViewportClass->destroy(handle);
+	free(handle->internal);
 }
 
 static void draw(MwWidget handle) {
-	MwViewportClass->draw(handle);
+	MwRect	  r;
+	MwLLColor base = MwParseColor(handle, MwGetText(handle, MwNbackground));
+
+	r.x	 = 0;
+	r.y	 = 0;
+	r.width	 = MwGetInteger(handle, MwNwidth);
+	r.height = MwGetInteger(handle, MwNheight);
+
+	MwDrawRect(handle, &r, base);
+
+	MwLLFreeColor(base);
 }
 
 static void prop_change(MwWidget handle, const char* prop) {
-	MwViewportClass->prop_change(handle, prop);
+	if(strcmp(prop, MwNwidth) == 0 || strcmp(prop, MwNheight) == 0) resize(handle);
 }
 
 MwClassRec MwListBoxClassRec = {
@@ -38,3 +168,18 @@ MwClassRec MwListBoxClassRec = {
     NULL,
     NULL};
 MwClass MwListBoxClass = &MwListBoxClassRec;
+
+void MwListBoxInsert(MwWidget handle, int index, const char* text) {
+	char*	  str = malloc(strlen(text) + 1);
+	MwListBox lb  = handle->internal;
+
+	strcpy(str, text);
+
+	if(index == -1) index = arrlen(lb->list);
+	arrins(lb->list, index, str);
+
+	resize(handle);
+	if(index < (MwGetInteger(lb->vscroll, MwNvalue) + MwGetInteger(lb->vscroll, MwNareaShown))) {
+		MwForceRender(lb->frame);
+	}
+}