summaryrefslogtreecommitdiff
path: root/gcr/gcr-mkoids
blob: b0eb5c46a2d246351f8919daed0ff86c66adef93 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
#!/bin/sh

set -euf

generate_header ()
{
	echo "/* WARNING: file is autogenerated */"
	echo ""
	echo "#include <glib.h>"
	echo ""
	echo "#ifndef ${UPPER}_OIDS_"
	echo "#define ${UPPER}_OIDS_"
	echo ""

	while read name oid; do
		if [ -n "$name" ]; then
			lname=$(echo "$name" | tr '[:upper:]' '[:lower:]')
			echo "GQuark _${LOWER}_oid_${lname}_get_quark (void) G_GNUC_CONST;"
			echo "#define ${UPPER}_OID_${name} _${LOWER}_oid_${lname}_get_quark ()"
			echo ""
		fi
	done

	echo ""
	echo "#endif /* ${UPPER}_OIDS_ */"
}

generate_source ()
{
	echo "/* WARNING: file is autogenerated */"
	echo ""
	echo "#include \"$HEADER\""
	echo ""

	while read name oid; do
		if [ -n "$name" ]; then
			lname=$(echo "$name" | tr '[:upper:]' '[:lower:]')
			echo "GQuark"
			echo "_${LOWER}_oid_${lname}_get_quark (void)"
			echo "{"
			echo "	static volatile gsize inited = 0;"
			echo "	static GQuark quark = 0;"
			echo "	if (g_once_init_enter (&inited)) {"
			echo "		quark = g_quark_from_static_string (\"${oid}\");"
			echo "		g_once_init_leave (&inited, 1);"
			echo "	}"
			echo "	return quark;"
			echo "}"
			echo ""
		fi
	done
}

UPPER="PREFIX"
LOWER="prefix"

while getopts 'c:h:p:' arg; do
	case $arg in
	p)
		UPPER=$(echo "$OPTARG" | tr '[:lower:]' '[:upper:]')
		LOWER=$(echo "$OPTARG" | tr '[:upper:]' '[:lower:]')
		;;
	c)
		SOURCE="$OPTARG"
		;;
	h)
		HEADER="$OPTARG"
		;;
	*)
		echo "gcr-mkoids: invalid argument: $arg" >&2
		exit 2
		;;
	esac
done

shift $(expr $OPTIND - 1)
if [ $# -ne 1 ]; then
	echo "gcr-mkoids: specify input file on command line"
	exit 2
fi

INPUT="$1"

if [ -n "$HEADER" ]; then
	generate_header < $INPUT > $HEADER
fi
if [ -n "$SOURCE" ]; then
	generate_source  < $INPUT > $SOURCE
fi