xref: /openbmc/linux/scripts/tags.sh (revision cc8bbe1a) 
1#!/bin/bash
2# Generate tags or cscope files
3# Usage tags.sh <mode>
4#
5# mode may be any of: tags, TAGS, cscope
6#
7# Uses the following environment variables:
8# ARCH, SUBARCH, SRCARCH, srctree, src, obj
9
10if [ "$KBUILD_VERBOSE" = "1" ]; then
11	set -x
12fi
13
14# RCS_FIND_IGNORE has escaped ()s -- remove them.
15ignore="$(echo "$RCS_FIND_IGNORE" | sed 's|\\||g' )"
16# tags and cscope files should also ignore MODVERSION *.mod.c files
17ignore="$ignore ( -name *.mod.c ) -prune -o"
18
19# Do not use full path if we do not use O=.. builds
20# Use make O=. {tags|cscope}
21# to force full paths for a non-O= build
22if [ "${KBUILD_SRC}" = "" ]; then
23	tree=
24else
25	tree=${srctree}/
26fi
27
28# ignore userspace tools
29ignore="$ignore ( -path ${tree}tools ) -prune -o"
30
31# Find all available archs
32find_all_archs()
33{
34	ALLSOURCE_ARCHS=""
35	for arch in `ls ${tree}arch`; do
36		ALLSOURCE_ARCHS="${ALLSOURCE_ARCHS} "${arch##\/}
37	done
38}
39
40# Detect if ALLSOURCE_ARCHS is set. If not, we assume SRCARCH
41if [ "${ALLSOURCE_ARCHS}" = "" ]; then
42	ALLSOURCE_ARCHS=${SRCARCH}
43elif [ "${ALLSOURCE_ARCHS}" = "all" ]; then
44	find_all_archs
45fi
46
47# find sources in arch/$ARCH
48find_arch_sources()
49{
50	for i in $archincludedir; do
51		prune="$prune -wholename $i -prune -o"
52	done
53	find ${tree}arch/$1 $ignore $subarchprune $prune -name "$2" \
54		-not -type l -print;
55}
56
57# find sources in arch/$1/include
58find_arch_include_sources()
59{
60	include=$(find ${tree}arch/$1/ $subarchprune \
61					-name include -type d -print);
62	if [ -n "$include" ]; then
63		archincludedir="$archincludedir $include"
64		find $include $ignore -name "$2" -not -type l -print;
65	fi
66}
67
68# find sources in include/
69find_include_sources()
70{
71	find ${tree}include $ignore -name config -prune -o -name "$1" \
72		-not -type l -print;
73}
74
75# find sources in rest of tree
76# we could benefit from a list of dirs to search in here
77find_other_sources()
78{
79	find ${tree}* $ignore \
80	     \( -name include -o -name arch -o -name '.tmp_*' \) -prune -o \
81	       -name "$1" -not -type l -print;
82}
83
84find_sources()
85{
86	find_arch_sources $1 "$2"
87}
88
89all_sources()
90{
91	find_arch_include_sources ${SRCARCH} '*.[chS]'
92	if [ ! -z "$archinclude" ]; then
93		find_arch_include_sources $archinclude '*.[chS]'
94	fi
95	find_include_sources '*.[chS]'
96	for arch in $ALLSOURCE_ARCHS
97	do
98		find_sources $arch '*.[chS]'
99	done
100	find_other_sources '*.[chS]'
101}
102
103all_compiled_sources()
104{
105	for i in $(all_sources); do
106		case "$i" in
107			*.[cS])
108				j=${i/\.[cS]/\.o}
109				if [ -e $j ]; then
110					echo $i
111				fi
112				;;
113			*)
114				echo $i
115				;;
116		esac
117	done
118}
119
120all_target_sources()
121{
122	if [ -n "$COMPILED_SOURCE" ]; then
123		all_compiled_sources
124	else
125		all_sources
126	fi
127}
128
129all_kconfigs()
130{
131	for arch in $ALLSOURCE_ARCHS; do
132		find_sources $arch 'Kconfig*'
133	done
134	find_other_sources 'Kconfig*'
135}
136
137docscope()
138{
139	(echo \-k; echo \-q; all_target_sources) > cscope.files
140	cscope -b -f cscope.out
141}
142
143dogtags()
144{
145	all_target_sources | gtags -i -f -
146}
147
148# Basic regular expressions with an optional /kind-spec/ for ctags and
149# the following limitations:
150# - No regex modifiers
151# - Use \{0,1\} instead of \?, because etags expects an unescaped ?
152# - \s is not working with etags, use a space or [ \t]
153# - \w works, but does not match underscores in etags
154# - etags regular expressions have to match at the start of a line;
155#   a ^[^#] is prepended by setup_regex unless an anchor is already present
156regex_asm=(
157	'/^\(ENTRY\|_GLOBAL\)(\([[:alnum:]_\\]*\)).*/\2/'
158)
159regex_c=(
160	'/^SYSCALL_DEFINE[0-9](\([[:alnum:]_]*\).*/sys_\1/'
161	'/^COMPAT_SYSCALL_DEFINE[0-9](\([[:alnum:]_]*\).*/compat_sys_\1/'
162	'/^TRACE_EVENT(\([[:alnum:]_]*\).*/trace_\1/'
163	'/^TRACE_EVENT(\([[:alnum:]_]*\).*/trace_\1_rcuidle/'
164	'/^DEFINE_EVENT([^,)]*, *\([[:alnum:]_]*\).*/trace_\1/'
165	'/^DEFINE_EVENT([^,)]*, *\([[:alnum:]_]*\).*/trace_\1_rcuidle/'
166	'/^PAGEFLAG(\([[:alnum:]_]*\).*/Page\1/'
167	'/^PAGEFLAG(\([[:alnum:]_]*\).*/SetPage\1/'
168	'/^PAGEFLAG(\([[:alnum:]_]*\).*/ClearPage\1/'
169	'/^TESTSETFLAG(\([[:alnum:]_]*\).*/TestSetPage\1/'
170	'/^TESTPAGEFLAG(\([[:alnum:]_]*\).*/Page\1/'
171	'/^SETPAGEFLAG(\([[:alnum:]_]*\).*/SetPage\1/'
172	'/\<__SETPAGEFLAG(\([[:alnum:]_]*\).*/__SetPage\1/'
173	'/\<TESTCLEARFLAG(\([[:alnum:]_]*\).*/TestClearPage\1/'
174	'/\<__TESTCLEARFLAG(\([[:alnum:]_]*\).*/TestClearPage\1/'
175	'/\<CLEARPAGEFLAG(\([[:alnum:]_]*\).*/ClearPage\1/'
176	'/\<__CLEARPAGEFLAG(\([[:alnum:]_]*\).*/__ClearPage\1/'
177	'/^__PAGEFLAG(\([[:alnum:]_]*\).*/__SetPage\1/'
178	'/^__PAGEFLAG(\([[:alnum:]_]*\).*/__ClearPage\1/'
179	'/^PAGEFLAG_FALSE(\([[:alnum:]_]*\).*/Page\1/'
180	'/\<TESTSCFLAG(\([[:alnum:]_]*\).*/TestSetPage\1/'
181	'/\<TESTSCFLAG(\([[:alnum:]_]*\).*/TestClearPage\1/'
182	'/\<SETPAGEFLAG_NOOP(\([[:alnum:]_]*\).*/SetPage\1/'
183	'/\<CLEARPAGEFLAG_NOOP(\([[:alnum:]_]*\).*/ClearPage\1/'
184	'/\<__CLEARPAGEFLAG_NOOP(\([[:alnum:]_]*\).*/__ClearPage\1/'
185	'/\<TESTCLEARFLAG_FALSE(\([[:alnum:]_]*\).*/TestClearPage\1/'
186	'/^TASK_PFA_TEST([^,]*, *\([[:alnum:]_]*\))/task_\1/'
187	'/^TASK_PFA_SET([^,]*, *\([[:alnum:]_]*\))/task_set_\1/'
188	'/^TASK_PFA_CLEAR([^,]*, *\([[:alnum:]_]*\))/task_clear_\1/'
189	'/^DEF_MMIO_\(IN\|OUT\)_[XD](\([[:alnum:]_]*\),[^)]*)/\2/'
190	'/^DEBUGGER_BOILERPLATE(\([[:alnum:]_]*\))/\1/'
191	'/^DEF_PCI_AC_\(\|NO\)RET(\([[:alnum:]_]*\).*/\2/'
192	'/^PCI_OP_READ(\(\w*\).*[1-4])/pci_bus_read_config_\1/'
193	'/^PCI_OP_WRITE(\(\w*\).*[1-4])/pci_bus_write_config_\1/'
194	'/\<DEFINE_\(MUTEX\|SEMAPHORE\|SPINLOCK\)(\([[:alnum:]_]*\)/\2/v/'
195	'/\<DEFINE_\(RAW_SPINLOCK\|RWLOCK\|SEQLOCK\)(\([[:alnum:]_]*\)/\2/v/'
196	'/\<DECLARE_\(RWSEM\|COMPLETION\)(\([[:alnum:]_]\+\)/\2/v/'
197	'/\<DECLARE_BITMAP(\([[:alnum:]_]*\)/\1/v/'
198	'/\(^\|\s\)\(\|L\|H\)LIST_HEAD(\([[:alnum:]_]*\)/\3/v/'
199	'/\(^\|\s\)RADIX_TREE(\([[:alnum:]_]*\)/\2/v/'
200	'/\<DEFINE_PER_CPU([^,]*, *\([[:alnum:]_]*\)/\1/v/'
201	'/\<DEFINE_PER_CPU_SHARED_ALIGNED([^,]*, *\([[:alnum:]_]*\)/\1/v/'
202	'/\<DECLARE_WAIT_QUEUE_HEAD(\([[:alnum:]_]*\)/\1/v/'
203	'/\<DECLARE_\(TASKLET\|WORK\|DELAYED_WORK\)(\([[:alnum:]_]*\)/\2/v/'
204	'/\<DEFINE_PCI_DEVICE_TABLE(\([[:alnum:]_]*\)/\1/v/'
205	'/\(^\s\)OFFSET(\([[:alnum:]_]*\)/\2/v/'
206	'/\(^\s\)DEFINE(\([[:alnum:]_]*\)/\2/v/'
207	'/\<DEFINE_HASHTABLE(\([[:alnum:]_]*\)/\1/v/'
208)
209regex_kconfig=(
210	'/^[[:blank:]]*\(menu\|\)config[[:blank:]]\+\([[:alnum:]_]\+\)/\2/'
211	'/^[[:blank:]]*\(menu\|\)config[[:blank:]]\+\([[:alnum:]_]\+\)/CONFIG_\2/'
212)
213setup_regex()
214{
215	local mode=$1 lang tmp=() r
216	shift
217
218	regex=()
219	for lang; do
220		case "$lang" in
221		asm)       tmp=("${regex_asm[@]}") ;;
222		c)         tmp=("${regex_c[@]}") ;;
223		kconfig)   tmp=("${regex_kconfig[@]}") ;;
224		esac
225		for r in "${tmp[@]}"; do
226			if test "$mode" = "exuberant"; then
227				regex[${#regex[@]}]="--regex-$lang=${r}b"
228			else
229				# Remove ctags /kind-spec/
230				case "$r" in
231				/*/*/?/)
232					r=${r%?/}
233				esac
234				# Prepend ^[^#] unless already anchored
235				case "$r" in
236				/^*) ;;
237				*)
238					r="/^[^#]*${r#/}"
239				esac
240				regex[${#regex[@]}]="--regex=$r"
241			fi
242		done
243	done
244}
245
246exuberant()
247{
248	setup_regex exuberant asm c
249	all_target_sources | xargs $1 -a                        \
250	-I __initdata,__exitdata,__initconst,			\
251	-I __initdata_memblock					\
252	-I __refdata,__attribute,__maybe_unused,__always_unused \
253	-I __acquires,__releases,__deprecated			\
254	-I __read_mostly,__aligned,____cacheline_aligned        \
255	-I ____cacheline_aligned_in_smp                         \
256	-I __cacheline_aligned,__cacheline_aligned_in_smp	\
257	-I ____cacheline_internodealigned_in_smp                \
258	-I __used,__packed,__packed2__,__must_check,__must_hold	\
259	-I EXPORT_SYMBOL,EXPORT_SYMBOL_GPL,ACPI_EXPORT_SYMBOL   \
260	-I DEFINE_TRACE,EXPORT_TRACEPOINT_SYMBOL,EXPORT_TRACEPOINT_SYMBOL_GPL \
261	-I static,const						\
262	--extra=+f --c-kinds=+px --langmap=c:+.h "${regex[@]}"
263
264	setup_regex exuberant kconfig
265	all_kconfigs | xargs $1 -a                              \
266	--langdef=kconfig --language-force=kconfig "${regex[@]}"
267
268}
269
270emacs()
271{
272	setup_regex emacs asm c
273	all_target_sources | xargs $1 -a "${regex[@]}"
274
275	setup_regex emacs kconfig
276	all_kconfigs | xargs $1 -a "${regex[@]}"
277}
278
279xtags()
280{
281	if $1 --version 2>&1 | grep -iq exuberant; then
282		exuberant $1
283	elif $1 --version 2>&1 | grep -iq emacs; then
284		emacs $1
285	else
286		all_target_sources | xargs $1 -a
287	fi
288}
289
290# Support um (which uses SUBARCH)
291if [ "${ARCH}" = "um" ]; then
292	if [ "$SUBARCH" = "i386" ]; then
293		archinclude=x86
294	elif [ "$SUBARCH" = "x86_64" ]; then
295		archinclude=x86
296	else
297		archinclude=${SUBARCH}
298	fi
299elif [ "${SRCARCH}" = "arm" -a "${SUBARCH}" != "" ]; then
300	subarchdir=$(find ${tree}arch/$SRCARCH/ -name "mach-*" -type d -o \
301							-name "plat-*" -type d);
302	for i in $subarchdir; do
303		case "$i" in
304			*"mach-"${SUBARCH})
305				;;
306			*"plat-"${SUBARCH})
307				;;
308			*)
309				subarchprune="$subarchprune \
310						-wholename $i -prune -o"
311				;;
312		esac
313	done
314fi
315
316remove_structs=
317case "$1" in
318	"cscope")
319		docscope
320		;;
321
322	"gtags")
323		dogtags
324		;;
325
326	"tags")
327		rm -f tags
328		xtags ctags
329		remove_structs=y
330		;;
331
332	"TAGS")
333		rm -f TAGS
334		xtags etags
335		remove_structs=y
336		;;
337esac
338
339# Remove structure forward declarations.
340if [ -n "$remove_structs" ]; then
341    LANG=C sed -i -e '/^\([a-zA-Z_][a-zA-Z0-9_]*\)\t.*\t\/\^struct \1;.*\$\/;"\tx$/d' $1
342fi
343