1 files changed, 70 insertions, 0 deletions
diff --git a/tab_unix.go b/tab_unix.go
new file mode 100644
index 0000000..c73796f
--- /dev/null
+++ b/tab_unix.go
@@ -0,0 +1,70 @@
+// +build !windows,!darwin
+
+// 25 july 2014
+
+package ui
+
+import (
+	"unsafe"
+)
+
+// #include "gtk_unix.h"
+import "C"
+
+type tab struct {
+	_widget		*C.GtkWidget
+	container		*C.GtkContainer
+	notebook		*C.GtkNotebook
+
+	tabs			[]*container
+}
+
+func newTab() Tab {
+	widget := C.gtk_notebook_new()
+	t := &tab{
+		_widget:		widget,
+		container:		(*C.GtkContainer)(unsafe.Pointer(widget)),
+		notebook:		(*C.GtkNotebook)(unsafe.Pointer(widget)),
+	}
+	// there are no scrolling arrows by default; add them in case there are too many tabs
+	C.gtk_notebook_set_scrollable(t.notebook, C.TRUE)
+	return t
+}
+
+func (t *tab) Append(name string, control Control) {
+	c := newContainer(control)
+	t.tabs = append(t.tabs, c)
+	// this calls gtk_container_add(), which, according to gregier in irc.gimp.net/#gtk+, acts just like gtk_notebook_append_page()
+	c.setParent(&controlParent{t.container})
+	cname := togstr(name)
+	defer freegstr(cname)
+	C.gtk_notebook_set_tab_label_text(t.notebook,
+		// unfortunately there does not seem to be a gtk_notebook_set_nth_tab_label_text()
+		C.gtk_notebook_get_nth_page(t.notebook, C.gint(len(t.tabs) - 1)),
+		cname)
+}
+
+func (t *tab) widget() *C.GtkWidget {
+	return t._widget
+}
+
+func (t *tab) setParent(p *controlParent) {
+	basesetParent(t, p)
+}
+
+func (t *tab) allocate(x int, y int, width int, height int, d *sizing) []*allocation {
+	return baseallocate(t, x, y, width, height, d)
+}
+
+func (t *tab) preferredSize(d *sizing) (width, height int) {
+	return basepreferredSize(t, d)
+}
+
+// no need to override Control.commitResize() as only prepared the tabbed control; its children will be reallocated when that one is resized
+func (t *tab) commitResize(a *allocation, d *sizing) {
+	basecommitResize(t, a, d)
+}
+
+func (t *tab) getAuxResizeInfo(d *sizing) {
+	basegetAuxResizeInfo(t, d)
+}