interesting
/
libui
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Wrote up the beginning of a system for testing object lifetimes.

This commit is contained in:
Pietro Gagliardi 2015-04-18 10:58:01 -04:00
parent 786ef2cbe4
commit 1560ef34c7
9 changed files with 163 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

149
lifetimes.go Normal file
View File

@ -0,0 +1,149 @@
// 18 april 2015
package main
import (
"fmt"
"os"
"bufio"
"strings"
"strconv"
)
func toaddr(s string) uintptr {
n, err := strconv.Itoa(s)
if err != nil {
panic(err)
}
return uintptr(n)
}
var failed = false
func report(format string, args ...interface{}) {
fmt.Fprintf(os.Stderr, format, args...)
failed = true
}
type Object struct {
Type string
Detail string
Refs int
CanDestroy bool
}
var objs = make(map[uintptr]*Object)
var singles = make(map[uintptr]*Object)
var newControls = map[string]string{
"uiNewButton()": "button",
"uiNewCheckbox()": "checkbox",
"uiNewEntry()": "entry",
"uiNewLabel()": "label",
"uiNewTab()": "tab",
}
func newControl(parts []string) {
ty := newControls[parts[0]]
addr := toaddr(parts[1])
detail := strings.Join(parts[2:], " ")
o := &Object{
Type: ty,
Detail: detail,
Refs: 1,
}
if oo := objs[addr]; oo != nil {
report("duplicate object %s %q, %s %q at 0x%X\n",
oo.Type, oo.Detail,
o.Type, o.Detail,
addr)
}
if oo := singles[addr]; oo != nil {
report("single %s %q and objecct %s %q coexist at 0x%X\n",
oo.Type, oo.Detail,
o.Type, o.Detail,
addr)
}
objs[addr] = o
}
func newSingle(parts []string) {
addrObj := toaddr(parts[1])
addrSingle := toaddr(parts[2])
o := objs[addrObj]
if o == nil {
report("single without object at 0x%X\n", addrObj)
}
o.Refs++
if oo := singles[addrSingle]; oo != nil {
report("duplicate singles %s %q, %s %q at 0x%X\n",
oo.Type, oo.Detail,
o.Type, o.Detail,
addrSingle)
}
singles[addrSingle] = o
}
func canDestroy(parts []string) {
addrObj := toaddr(parts[1])
addrSingle := toaddr(parts[2])
o := objs[addrObj]
if o == nil {
report("destroy object without object at 0x%X\n", addrObj)
}
if singles[addrSingle] != o {
report("inconsistency: single 0x%X has different object\n", addrSingle)
}
o.CanDestroy = true
}
func destroy(parts []string) {
var o *Object
var what string
ty := parts[1]
addr := toaddr(parts[2])
if ty == "single" {
o = singles[addr]
delete(singles, addr)
what = "single"
} else {
o = objs[addr]
delete(objs, addr)
what = "object"
}
if o == nil {
report("missing %s %p in destroy()\n", what, addr)
return
}
if !o.CanDestroy {
report("can't destroy %s %p yet\n", what, addr)
}
o.Refs--
if o.Refs < 0 {
report("not enough references to %p in destroy()\n", addr)
}
}
func main() {
b := bufio.NewScanner(os.Stdin)
for b.Scan() {
s := b.String()
parts := strings.Split(s, " ")
name := parts[0]
switch {
case newControls[name] != "":
newControl(parts)
case name == "newSingle":
newSingle(parts)
case name == "uiControlDestroy()":
canDestroy(parts)
case name == "OSdestroy":
destroy(parts)
default:
panic("unknown line " + name)
}
}
if err := b.Err(); err != nil {
panic(err)
}
}

2
test.c
View File

@ -196,7 +196,7 @@ int main(int argc, char *argv[])
for (i = 1; i < argc; i++)
if (strcmp(argv[i], "leaks") == 0)
o.debugLogAllocations = 1;
else if (strcmp(argv[i], "lifetime") == 0)
else if (strcmp(argv[i], "lifetimes") == 0)
o.debugLogLifetimes = 1;
else {
fprintf(stderr, "%s: unrecognized option %s\n", argv[0], argv[i]);

2
unix/button.c
View File

@ -26,7 +26,7 @@ static void onDestroy(GtkWidget *widget, gpointer data)
struct button *b = (struct button *) data;
if (options.debugLogLifetimes)
fprintf(stderr, "GtkWidget::destroy button %p\n", b);
fprintf(stderr, "OSdestroy button %p\n", b);
uiFree(b);
}

2
unix/checkbox.c
View File

@ -29,7 +29,7 @@ static void onDestroy(GtkWidget *widget, gpointer data)
struct checkbox *c = (struct checkbox *) data;
if (options.debugLogLifetimes)
fprintf(stderr, "GtkWidget::destroy checkbox %p\n", c);
fprintf(stderr, "OSdestroy checkbox %p\n", c);
uiFree(c);
}

2
unix/entry.c
View File

@ -12,7 +12,7 @@ static void onDestroy(GtkWidget *widget, gpointer data)
struct entry *e = (struct entry *) data;
if (options.debugLogLifetimes)
fprintf(stderr, "GtkWidget::destroy entry %p\n", e);
fprintf(stderr, "OSdestroy entry %p\n", e);
uiFree(e);
}

2
unix/label.c
View File

@ -12,7 +12,7 @@ static void onDestroy(GtkWidget *widget, gpointer data)
struct label *l = (struct label *) data;
if (options.debugLogLifetimes)
fprintf(stderr, "GtkWidget::destroy label %p\n", l);
fprintf(stderr, "OSdestroy label %p\n", l);
uiFree(l);
}

6
unix/newcontrol.c
View File

@ -19,7 +19,7 @@ static void singleDestroy(uiControl *c)
singleWidget *s = (singleWidget *) (c->Internal);
if (options.debugLogLifetimes)
fprintf(stderr, "uiControlDestroy() singleWidget %p %p\n", c, s);
fprintf(stderr, "uiControlDestroy() %p %p\n", c, s);
gtk_widget_destroy(s->immediate);
}
@ -164,7 +164,7 @@ static void onDestroy(GtkWidget *widget, gpointer data)
singleWidget *s = (singleWidget *) data;
if (options.debugLogLifetimes)
fprintf(stderr, "GtkWidget::destroy singleWidget %p\n", s);
fprintf(stderr, "OSdestroy single %p\n", s);
uiFree(s);
}
@ -175,7 +175,7 @@ void uiUnixNewControl(uiControl *c, GType type, gboolean inScrolledWindow, gbool
s = uiNew(singleWidget);
if (options.debugLogLifetimes)
fprintf(stderr, "uiUnixNewControl() %p %p\n", c, s);
fprintf(stderr, "newSingle %p %p\n", c, s);
va_start(ap, firstProperty);
s->widget = GTK_WIDGET(g_object_new_valist(type, firstProperty, ap));

10
unix/parent.c
View File

@ -32,7 +32,7 @@ static void uipParent_init(uipParent *p)
if (options.debugLogAllocations)
fprintf(stderr, "%p alloc uipParent\n", p);
if (options.debugLogLifetimes)
fprintf(stderr, "uipParent_init() %p\n", p);
;//TODO fprintf(stderr, "uipParent_init() %p\n", p);
p->children = g_ptr_array_new();
gtk_widget_set_has_window(GTK_WIDGET(p), FALSE);
}
@ -44,7 +44,7 @@ static void uipParent_dispose(GObject *obj)
uipParent *p = uipParent(obj);
if (options.debugLogLifetimes)
fprintf(stderr, "uipParent_dispose() %p\n", p);
;//TODO fprintf(stderr, "uipParent_dispose() %p\n", p);
if (p->children != NULL) {
g_ptr_array_unref(p->children);
p->children = NULL;
@ -59,7 +59,7 @@ static void uipParent_dispose(GObject *obj)
static void uipParent_finalize(GObject *obj)
{
if (options.debugLogLifetimes)
fprintf(stderr, "uipParent_finalize() %p\n", obj);
;//TODO fprintf(stderr, "uipParent_finalize() %p\n", obj);
G_OBJECT_CLASS(uipParent_parent_class)->finalize(obj);
if (options.debugLogAllocations)
fprintf(stderr, "%p free\n", obj);
@ -144,7 +144,7 @@ static void parentDestroy(uiParent *pp)
uipParent *p = uipParent(pp->Internal);
if (options.debugLogLifetimes)
fprintf(stderr, "uiParentDestroy() %p %p\n", pp, p);
;//TODO fprintf(stderr, "uiParentDestroy() %p %p\n", pp, p);
gtk_widget_destroy(GTK_WIDGET(p));
}
@ -190,7 +190,7 @@ uiParent *uiNewParent(uintptr_t osParent)
p = uiNew(uiParent);
p->Internal = g_object_new(uipParentType, NULL);
if (options.debugLogLifetimes)
fprintf(stderr, "uiNewParent() %p %p\n", p, p->Internal);
;//TODO fprintf(stderr, "uiNewParent() %p %p\n", p, p->Internal);
p->Destroy = parentDestroy;
p->Handle = parentHandle;
p->SetMainControl = parentSetMainControl;

2
unix/tab.c
View File

@ -16,7 +16,7 @@ static void onDestroy(GtkWidget *widget, gpointer data)
struct tab *t = (struct tab *) data;
if (options.debugLogLifetimes)
fprintf(stderr, "GtkWidget::destroy tab %p\n", t);
fprintf(stderr, "OSdestroy tab %p\n", t);
uiFree(t->pages);
uiFree(t);
}