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
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
|
#!/bin/bash -e
type="$1"
objname="$2"
parentname="$3"
print_usage()
{
echo "Usage: $(basename $0) <type> <object-name> [<parent-name>]"
echo
echo "Create a new goodvibes object in './src',"
echo "that's to say a .c and a .h skeleton file."
echo
echo "Parameters:"
echo "<type> might be 'core', 'base', 'ui', 'feat'."
echo "<object-name> should contain only lowercase, digits and dashes, and start with 'gv-'."
echo "<parent-name> should contain only lowercase, digits and dashes."
echo
echo "Example:"
echo " $0 ui gv-about-dialog gtk-about-dialog"
}
name_get_invalid_chars()
{
# Keep only invalid chars
tr -d 'a-z0-9-' <<< "$1"
}
name_to_lower()
{
# To lowercase, '-' to '_'
sed -e 's/-/_/g' <<< "$1"
}
name_to_upper()
{
# To uppercase, '-' to '_'
sed -e 's/-/_/g' -e 's/\([a-z]\)/\U\1/g' <<< "$1"
}
name_to_camel()
{
# To camelcase, '-' removed
sed -e 's/-\([a-z]\)/\U\1/g' -e 's/^\([a-z]\)/\U\1/' <<< "$1"
}
# -------------------------------------------------------- #
# Check and make everything ready #
# -------------------------------------------------------- #
# Check for help arguments
[ "$1" == "-h" -o "$1" == "--help" ] && \
{ print_usage; exit 0; }
# Ensure we're in the right directory
[ -d "src" ] || \
{ echo >&2 "Please run from project root directory"; exit 1; }
# Sanity check on <objname>
[ -z "$objname" ] && \
{ print_usage; exit 1; }
grep -q '^gv-' <<< "$objname" || \
{ echo >&2 "'$objname' should start with 'gv-' prefix"; exit 1; }
[ -z "$(name_get_invalid_chars "$objname")" ] || \
{ echo >&2 "'$objname' contains invalid characters"; exit 1; }
# Notice that <objname> has no 'gv-' prefix from now on.
# We explicitely add it when needed.
objname="$(sed 's/^gv-//' <<< $objname)"
# -------------------------------------------------------- #
# Copy skeleton files to source directory #
# -------------------------------------------------------- #
# Select source depending on the type
srcdir="scripts/code/gv-object-templates"
srcfile=""
case "$type" in
core|base|ui)
srcfile=gv-dummy;;
feat)
srcfile=gv-feature-dummy;;
esac
[ -z "$srcfile" ] && \
{ print_usage; exit 1; }
# Ensure that destination files don't exist
dstdir=""
case "$type" in
core)
dstdir="src/core";;
base)
dstdir="src/base";;
ui)
dstdir="src/ui";;
feat)
dstdir="src/feat";;
esac
[ -z "$dstdir" ] && \
{ print_usage; exit 1; }
dstfile=gv-$objname
[ -e $dstdir/$dstfile.c ] && { echo >&2 "$dstdir/$dstfile.c already exists"; exit 1; }
[ -e $dstdir/$dstfile.h ] && { echo >&2 "$dstdir/$dstfile.h already exists"; exit 1; }
# Copy files
cp "$srcdir/$srcfile.c" "$dstdir/$dstfile.c"
cp "$srcdir/$srcfile.h" "$dstdir/$dstfile.h"
# -------------------------------------------------------- #
# String substitutions #
# -------------------------------------------------------- #
# Customization for ui files
if [ "$type" == "ui" ]; then
# Replace 'core' by 'ui' in the include path
sed -i \
-e "s|core/gv-dummy|ui/gv-dummy|" \
$dstdir/$dstfile.c
fi
# Customization for base files
if [ "$type" == "base" ]; then
# Replace 'core' by 'base' in the include path
sed -i \
-e "s|core/gv-dummy|base/gv-dummy|" \
$dstdir/$dstfile.c
fi
# Special customization for ui files
if [ "$type" == "ui" ]; then
# Add gtk include
sed -i \
-e "/<glib.h>/a #include <gtk/gtk.h>" \
$dstdir/$dstfile.c $dstdir/$dstfile.h
# Return a GtkWidget
sed -i \
-e "s/^GvDummy \*/GtkWidget */"\
$dstdir/$dstfile.c $dstdir/$dstfile.h
fi
# Replace 'gobject' and variants by another parent
if [ -n "$parentname" ]; then
upper="$(name_to_upper $parentname)"
upper_pfx="$(cut -d_ -f1 <<< $upper)"
upper_end="$(cut -d_ -f2- <<< $upper)"
camel="$(name_to_camel $parentname)"
sed -i \
-e "s/GObject parent_instance/$camel parent_instance/" \
-e "/^G_DEFINE/s/G_TYPE_OBJECT/${upper_pfx}_TYPE_${upper_end}/" \
$dstdir/$dstfile.c
sed -i \
-e "/^G_DECLARE/s/GObject/$camel/" \
$dstdir/$dstfile.h
fi
# Replace 'dummy' and variants by <objname>
lower="$(name_to_lower $objname)"
upper="$(name_to_upper $objname)"
camel="$(name_to_camel $objname)"
sed -i \
-e "s/gv-dummy/$dstfile/g" \
-e "s/gv_dummy/gv_$lower/g" \
-e "s/DUMMY/$upper/g" \
-e "s/Dummy/$camel/g" \
-e "s/dummy/$lower/g" \
$dstdir/$dstfile.c $dstdir/$dstfile.h
# Fix things
./scripts/code/standard-header.sh add $dstdir/$dstfile.c $dstdir/$dstfile.h
# Done!
echo "Skeleton files '$dstdir/$dstfile.[ch]' created."
echo "Don't forget to add these new files to the meson build file'."
|
