package main

import (
	"fmt"
	"os"

	"github.com/goplus/llgo/c"
	"github.com/goplus/llgo/c/clang"
)

func visit(cursor, parent clang.Cursor, clientData c.Pointer) clang.ChildVisitResult {
	depth := *(*c.Uint)(clientData)
	printAST(cursor, depth+1)
	return clang.ChildVisit_Continue
}

func printAST(cursor clang.Cursor, depth c.Uint) {
	cursorKind := cursor.Kind.String()
	println("cursor.Kind.String done")
	c.Printf(c.Str("cursorKind = %s\n"), cursorKind.CStr())

	cursorSpelling := clang.GetCursorSpelling(cursor) // cursor.String()
	println("clang.GetCursorSpelling done")

	for i := c.Uint(0); i < depth; i++ {
		println("c.Fputs start")
		c.Fputs(c.Str("  "), c.Stdout)
		println("c.Fputs end")
	}

	println("c.Printf start")
	c.Printf(c.Str("%s: %s\n"), cursorKind.CStr(), cursorSpelling.CStr())
	println("c.Printf end")

	cursorKind.Dispose()
	cursorSpelling.Dispose()

	clang.VisitChildren(cursor, visit, c.Pointer(&depth))
}

func main() {
	if c.Argc != 2 {
		fmt.Fprintln(os.Stderr, "Usage: castdump <headerFile>")
		return
	}
	sourceFile := *c.Advance(c.Argv, 1)

	index := clang.CreateIndex(0, 0)
	println("clang.CreateIndex done")

	unit := index.ParseTranslationUnit(
		sourceFile,
		nil, 0,
		nil, 0,
		clang.TranslationUnit_None,
	)
	println("index.ParseTranslationUnit done")

	if unit == nil {
		println("Unable to parse translation unit. Quitting.")
		c.Exit(1)
	}

	cursor := unit.Cursor()
	println("unit.Cursor done")

	printAST(cursor, 0)

	unit.Dispose()
	index.Dispose()
}