Merge branch 'rocker-worlds'
[linux/fpc-iii.git] / scripts / tags.sh
blob23ba1c6a0a5936f5d3ca1194e92934a05b423644
1 #!/bin/bash
2 # Generate tags or cscope files
3 # Usage tags.sh <mode>
5 # mode may be any of: tags, TAGS, cscope
7 # Uses the following environment variables:
8 # ARCH, SUBARCH, SRCARCH, srctree, src, obj
10 if [ "$KBUILD_VERBOSE" = "1" ]; then
11 set -x
14 # RCS_FIND_IGNORE has escaped ()s -- remove them.
15 ignore="$(echo "$RCS_FIND_IGNORE" | sed 's|\\||g' )"
16 # tags and cscope files should also ignore MODVERSION *.mod.c files
17 ignore="$ignore ( -name *.mod.c ) -prune -o"
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
22 if [ "${KBUILD_SRC}" = "" ]; then
23 tree=
24 else
25 tree=${srctree}/
28 # ignore userspace tools
29 ignore="$ignore ( -path ${tree}tools ) -prune -o"
31 # Find all available archs
32 find_all_archs()
34 ALLSOURCE_ARCHS=""
35 for arch in `ls ${tree}arch`; do
36 ALLSOURCE_ARCHS="${ALLSOURCE_ARCHS} "${arch##\/}
37 done
40 # Detect if ALLSOURCE_ARCHS is set. If not, we assume SRCARCH
41 if [ "${ALLSOURCE_ARCHS}" = "" ]; then
42 ALLSOURCE_ARCHS=${SRCARCH}
43 elif [ "${ALLSOURCE_ARCHS}" = "all" ]; then
44 find_all_archs
47 # find sources in arch/$ARCH
48 find_arch_sources()
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;
57 # find sources in arch/$1/include
58 find_arch_include_sources()
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;
68 # find sources in include/
69 find_include_sources()
71 find ${tree}include $ignore -name config -prune -o -name "$1" \
72 -not -type l -print;
75 # find sources in rest of tree
76 # we could benefit from a list of dirs to search in here
77 find_other_sources()
79 find ${tree}* $ignore \
80 \( -name include -o -name arch -o -name '.tmp_*' \) -prune -o \
81 -name "$1" -not -type l -print;
84 find_sources()
86 find_arch_sources $1 "$2"
89 all_sources()
91 find_arch_include_sources ${SRCARCH} '*.[chS]'
92 if [ ! -z "$archinclude" ]; then
93 find_arch_include_sources $archinclude '*.[chS]'
95 find_include_sources '*.[chS]'
96 for arch in $ALLSOURCE_ARCHS
98 find_sources $arch '*.[chS]'
99 done
100 find_other_sources '*.[chS]'
103 all_compiled_sources()
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
114 echo $i
116 esac
117 done
120 all_target_sources()
122 if [ -n "$COMPILED_SOURCE" ]; then
123 all_compiled_sources
124 else
125 all_sources
129 all_kconfigs()
131 for arch in $ALLSOURCE_ARCHS; do
132 find_sources $arch 'Kconfig*'
133 done
134 find_other_sources 'Kconfig*'
137 docscope()
139 (echo \-k; echo \-q; all_target_sources) > cscope.files
140 cscope -b -f cscope.out
143 dogtags()
145 all_target_sources | gtags -i -f -
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
156 regex_asm=(
157 '/^\(ENTRY\|_GLOBAL\)(\([[:alnum:]_\\]*\)).*/\2/'
159 regex_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/'
209 regex_kconfig=(
210 '/^[[:blank:]]*\(menu\|\)config[[:blank:]]\+\([[:alnum:]_]\+\)/\2/'
211 '/^[[:blank:]]*\(menu\|\)config[[:blank:]]\+\([[:alnum:]_]\+\)/CONFIG_\2/'
213 setup_regex()
215 local mode=$1 lang tmp=() r
216 shift
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 /^*) ;;
238 r="/^[^#]*${r#/}"
239 esac
240 regex[${#regex[@]}]="--regex=$r"
242 done
243 done
246 exuberant()
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[@]}"
264 setup_regex exuberant kconfig
265 all_kconfigs | xargs $1 -a \
266 --langdef=kconfig --language-force=kconfig "${regex[@]}"
270 emacs()
272 setup_regex emacs asm c
273 all_target_sources | xargs $1 -a "${regex[@]}"
275 setup_regex emacs kconfig
276 all_kconfigs | xargs $1 -a "${regex[@]}"
279 xtags()
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
290 # Support um (which uses SUBARCH)
291 if [ "${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}
299 elif [ "${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})
306 *"plat-"${SUBARCH})
309 subarchprune="$subarchprune \
310 -wholename $i -prune -o"
312 esac
313 done
316 remove_structs=
317 case "$1" in
318 "cscope")
319 docscope
322 "gtags")
323 dogtags
326 "tags")
327 rm -f tags
328 xtags ctags
329 remove_structs=y
332 "TAGS")
333 rm -f TAGS
334 xtags etags
335 remove_structs=y
337 esac
339 # Remove structure forward declarations.
340 if [ -n "$remove_structs" ]; then
341 LANG=C sed -i -e '/^\([a-zA-Z_][a-zA-Z0-9_]*\)\t.*\t\/\^struct \1;.*\$\/;"\tx$/d' $1