1 files changed, 88 insertions, 0 deletions
diff --git a/newctrl/group_unix.go b/newctrl/group_unix.go
new file mode 100644
index 0000000..2078ffc
--- /dev/null
+++ b/newctrl/group_unix.go
@@ -0,0 +1,88 @@
+// +build !windows,!darwin
+
+// 15 august 2014
+
+package ui
+
+import (
+	"unsafe"
+)
+
+// #include "gtk_unix.h"
+import "C"
+
+type group struct {
+	*controlSingleWidget
+	gcontainer *C.GtkContainer
+	frame      *C.GtkFrame
+
+	child			Control
+	container		*container
+
+	margined		bool
+}
+
+func newGroup(text string, control Control) Group {
+	ctext := togstr(text)
+	defer freegstr(ctext)
+	widget := C.gtk_frame_new(ctext)
+	g := &group{
+		controlSingleWidget:	newControlSingleWidget(widget),
+		gcontainer: (*C.GtkContainer)(unsafe.Pointer(widget)),
+		frame:      (*C.GtkFrame)(unsafe.Pointer(widget)),
+		child:	control,
+	}
+
+	// with GTK+, groupboxes by default have frames and slightly x-offset regular text
+	// they should have no frame and fully left-justified, bold text
+	var yalign C.gfloat
+
+	// preserve default y-alignment
+	C.gtk_frame_get_label_align(g.frame, nil, &yalign)
+	C.gtk_frame_set_label_align(g.frame, 0, yalign)
+	C.gtk_frame_set_shadow_type(g.frame, C.GTK_SHADOW_NONE)
+	label := (*C.GtkLabel)(unsafe.Pointer(C.gtk_frame_get_label_widget(g.frame)))
+	// this is the boldness level used by GtkPrintUnixDialog
+	// (it technically uses "bold" but see pango's pango-enum-types.c for the name conversion; GType is weird)
+	bold := C.pango_attr_weight_new(C.PANGO_WEIGHT_BOLD)
+	boldlist := C.pango_attr_list_new()
+	C.pango_attr_list_insert(boldlist, bold)
+	C.gtk_label_set_attributes(label, boldlist)
+	C.pango_attr_list_unref(boldlist) // thanks baedert in irc.gimp.net/#gtk+
+
+	g.container = newContainer(control)
+	g.child.setParent(g.container.parent())
+	g.container.setParent(&controlParent{g.gcontainer})
+
+	g.fresize = g.resize
+
+	return g
+}
+
+func (g *group) Text() string {
+	return fromgstr(C.gtk_frame_get_label(g.frame))
+}
+
+func (g *group) SetText(text string) {
+	ctext := togstr(text)
+	defer freegstr(ctext)
+	C.gtk_frame_set_label(g.frame, ctext)
+}
+
+func (g *group) Margined() bool {
+	return g.margined
+}
+
+func (g *group) SetMargined(margined bool) {
+	g.margined = margined
+}
+
+func (g *group) resize(x int, y int, width int, height int, d *sizing) {
+	// first, chain up to change the GtkFrame and its child container
+	// TODO use a variable for this
+	g.containerSingleWidget.resize(x, y, width, height, d)
+
+	// now that the container has the correct size, we can resize the child
+	a := g.container.allocation(g.margined)
+	g.child.resize(int(a.x), int(a.y), int(a.width), int(a.height), d)
+}