1 files changed, 262 insertions, 0 deletions
diff --git a/table_windows.go b/table_windows.go
new file mode 100644
index 0000000..21d681d
--- /dev/null
+++ b/table_windows.go
@@ -0,0 +1,262 @@
+// 28 july 2014
+
+package ui
+
+import (
+	"fmt"
+	"unsafe"
+	"reflect"
+)
+
+// #include "winapi_windows.h"
+import "C"
+
+type table struct {
+	*tablebase
+	_hwnd		C.HWND
+	noautosize	bool
+	colcount		C.int
+	hotrow		C.int
+	hotcol		C.int
+	pushedrow	C.int
+	pushedcol	C.int
+	selected		*event
+}
+
+func finishNewTable(b *tablebase, ty reflect.Type) Table {
+	t := &table{
+		_hwnd:		C.newControl(C.xWC_LISTVIEW,
+			C.LVS_REPORT | C.LVS_OWNERDATA | C.LVS_NOSORTHEADER | C.LVS_SHOWSELALWAYS | C.LVS_SINGLESEL | C.WS_HSCROLL | C.WS_VSCROLL | C.WS_TABSTOP,
+			C.WS_EX_CLIENTEDGE),		// WS_EX_CLIENTEDGE without WS_BORDER will show the canonical visual styles border (thanks to MindChild in irc.efnet.net/#winprog)
+		tablebase:		b,
+		hotrow:		-1,
+		hotcol:		-1,
+		pushedrow:	-1,
+		pushedcol:	-1,
+		selected:		newEvent(),
+	}
+	C.setTableSubclass(t._hwnd, unsafe.Pointer(t))
+	// LVS_EX_FULLROWSELECT gives us selection across the whole row, not just the leftmost column; this makes the list view work like on other platforms
+	// LVS_EX_SUBITEMIMAGES gives us images in subitems, which will be important when both images and checkboxes are added
+	C.tableAddExtendedStyles(t._hwnd, C.LVS_EX_FULLROWSELECT | C.LVS_EX_SUBITEMIMAGES)
+	// this must come after the subclass because it uses one of our private messages
+	C.SendMessageW(t._hwnd, C.msgTableMakeInitialCheckboxImageList, 0, 0)
+	for i := 0; i < ty.NumField(); i++ {
+		C.tableAppendColumn(t._hwnd, C.int(i), toUTF16(ty.Field(i).Name))
+	}
+	t.colcount = C.int(ty.NumField())
+	return t
+}
+
+func (t *table) Unlock() {
+	t.unlock()
+	// there's a possibility that user actions can happen at this point, before the view is updated
+	// alas, this is something we have to deal with, because Unlock() can be called from any thread
+	go func() {
+		Do(func() {
+			t.RLock()
+			defer t.RUnlock()
+			C.tableUpdate(t._hwnd, C.int(reflect.Indirect(reflect.ValueOf(t.data)).Len()))
+		})
+	}()
+}
+
+func (t *table) LoadImageList(il ImageList) {
+	il.apply(t._hwnd, C.msgLoadImageList)
+}
+
+func (t *table) Selected() int {
+	t.RLock()
+	defer t.RUnlock()
+	return int(C.tableSelectedItem(t._hwnd))
+}
+
+func (t *table) Select(index int) {
+	t.RLock()
+	defer t.RUnlock()
+	C.tableSelectItem(t._hwnd, C.intptr_t(index))
+}
+
+func (t *table) OnSelected(f func()) {
+	t.selected.set(f)
+}
+
+func printMask(item *C.LVITEMW) {
+fmt.Printf("%d %d ", item.iItem, item.iSubItem)
+x := item.mask
+if x&C.LVIF_COLUMNS != 0{ fmt.Print("LVIF_COLUMNS ") }
+if x&C.LVIF_DI_SETITEM != 0{ fmt.Print("LVIF_DI_SETITEM ") }
+if x&C.LVIF_GROUPID != 0{ fmt.Print("LVIF_GROUPID ") }
+if x&C.LVIF_IMAGE != 0{ fmt.Print("LVIF_IMAGE ") }
+if x&C.LVIF_INDENT != 0{ fmt.Print("LVIF_INDENT ") }
+if x&C.LVIF_NORECOMPUTE != 0{ fmt.Print("LVIF_NORECOMPUTE ") }
+if x&C.LVIF_PARAM != 0{ fmt.Print("LVIF_PARAM ") }
+if x&C.LVIF_STATE != 0{ fmt.Print("LVIF_STATE ") }
+if x&C.LVIF_TEXT != 0{ fmt.Print("LVIF_TEXT ") }
+fmt.Print("\n")
+}
+
+//export tableGetCell
+func tableGetCell(data unsafe.Pointer, item *C.LVITEMW) {
+	t := (*table)(data)
+	t.RLock()
+	defer t.RUnlock()
+	d := reflect.Indirect(reflect.ValueOf(t.data))
+	datum := d.Index(int(item.iItem)).Field(int(item.iSubItem))
+printMask(item)
+	isText := true
+	if item.mask & C.LVIF_IMAGE != 0 {
+		if datum.Type() == reflect.TypeOf(ImageIndex(0)) {
+			item.iImage = C.int(datum.Interface().(ImageIndex))
+			isText = false
+		}
+		// else let the default behavior work
+	}
+	if item.mask & C.LVIF_INDENT != 0 {
+		// always have an indent of zero
+		item.iIndent = 0
+	}
+	if item.mask & C.LVIF_STATE != 0 {
+		// start by not changing any state
+		item.stateMask = 0
+		if datum.Kind() == reflect.Bool {
+			item.stateMask = C.LVIS_STATEIMAGEMASK
+			// state image index is 1-based
+			curstate := ((item.state & C.LVIS_STATEIMAGEMASK) >> 12)
+			if curstate > 0 {
+				curstate--
+			}
+			if datum.Bool() == true {
+				curstate |= C.checkboxStateChecked
+			} else {
+				curstate &^= C.checkboxStateChecked
+			}
+			if item.iItem == t.hotrow && item.iSubItem == t.hotcol {
+				curstate |= C.checkboxStateHot
+			} else {
+				curstate &^= C.checkboxStateHot
+			}
+			if item.iItem == t.pushedrow && item.iSubItem == t.pushedcol {
+				curstate |= C.checkboxStatePushed
+			} else {
+				curstate &^= C.checkboxStatePushed
+			}
+			item.state = (curstate + 1) << 12
+			isText = false
+		}
+	}
+	if item.mask & C.LVIF_TEXT != 0 {
+		if isText {
+			s := fmt.Sprintf("%v", datum)
+			item.pszText = toUTF16(s)
+		}
+		// else let the default handler work
+	}
+}
+
+// the column autoresize policy is simple:
+// on every table.commitResize() call, if the columns have not been resized by the user, autoresize
+func (t *table) autoresize() {
+	t.RLock()
+	defer t.RUnlock()
+	if !t.noautosize {
+		C.tableAutosizeColumns(t._hwnd, t.colcount)
+	}
+}
+
+//export tableStopColumnAutosize
+func tableStopColumnAutosize(data unsafe.Pointer) {
+	t := (*table)(data)
+	t.noautosize = true
+}
+
+//export tableColumnCount
+func tableColumnCount(data unsafe.Pointer) C.int {
+	t := (*table)(data)
+	return t.colcount
+}
+
+//export tableSetHot
+func tableSetHot(data unsafe.Pointer, row C.int, col C.int) {
+	t := (*table)(data)
+	redraw := (row != t.hotrow || col != t.hotcol)
+	t.hotrow = row
+	t.hotcol = col
+	if redraw {
+		C.tableUpdate(t._hwnd, C.int(reflect.Indirect(reflect.ValueOf(t.data)).Len()))
+	}
+}
+
+//export tablePushed
+func tablePushed(data unsafe.Pointer, row C.int, col C.int) {
+	t := (*table)(data)
+	t.pushedrow = row
+	t.pushedcol = col
+	C.tableUpdate(t._hwnd, C.int(reflect.Indirect(reflect.ValueOf(t.data)).Len()))
+}
+
+//export tableToggled
+func tableToggled(data unsafe.Pointer, row C.int, col C.int) {
+	t := (*table)(data)
+	t.Lock()
+	defer func() {
+		// reset for next time
+		t.pushedrow = -1
+		t.pushedcol = -1
+		// and THEN unlock so the reset takes effect
+		t.Unlock()
+	}()
+	if row == -1 || col == -1 {		// discard extras sent by handle() in table_windows.c
+		return
+	}
+	if row != t.pushedrow || col != t.pushedcol {				// mouse moved out
+		return
+	}
+	d := reflect.Indirect(reflect.ValueOf(t.data))
+	datum := d.Index(int(row)).Field(int(col))
+	if datum.Kind() == reflect.Bool {
+		datum.SetBool(!datum.Bool())
+		return
+	}
+	panic(fmt.Errorf("tableSetHot() on non-checkbox at (%d, %d)", row, col))
+}
+
+//export tableSelectionChanged
+func tableSelectionChanged(data unsafe.Pointer) {
+	t := (*table)(data)
+	t.selected.fire()
+}
+
+func (t *table) hwnd() C.HWND {
+	return t._hwnd
+}
+
+func (t *table) setParent(p *controlParent) {
+	basesetParent(t, p)
+}
+
+func (t *table) allocate(x int, y int, width int, height int, d *sizing) []*allocation {
+	return baseallocate(t, x, y, width, height, d)
+}
+
+const (
+	// from C++ Template 05 in http://msdn.microsoft.com/en-us/library/windows/desktop/bb226818%28v=vs.85%29.aspx as this is the best I can do for now
+	// there IS a message LVM_APPROXIMATEVIEWRECT that can do calculations, but it doesn't seem to work right when asked to base its calculations on the current width/height on Windows and wine...
+	tableWidth = 183
+	tableHeight = 50
+)
+
+func (t *table) preferredSize(d *sizing) (width, height int) {
+	return fromdlgunitsX(tableWidth, d), fromdlgunitsY(tableHeight, d)
+}
+
+func (t *table) commitResize(a *allocation, d *sizing) {
+	basecommitResize(t, a, d)
+	t.RLock()
+	defer t.RUnlock()
+	t.autoresize()
+}
+
+func (t *table) getAuxResizeInfo(d *sizing) {
+	basegetAuxResizeInfo(t, d)
+}