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 '/^DEFINE_INSN_CACHE_OPS(\([[:alnum:]_]*\).*/get_\1_slot/' 167 '/^DEFINE_INSN_CACHE_OPS(\([[:alnum:]_]*\).*/free_\1_slot/' 168 '/^PAGEFLAG(\([[:alnum:]_]*\).*/Page\1/' 169 '/^PAGEFLAG(\([[:alnum:]_]*\).*/SetPage\1/' 170 '/^PAGEFLAG(\([[:alnum:]_]*\).*/ClearPage\1/' 171 '/^TESTSETFLAG(\([[:alnum:]_]*\).*/TestSetPage\1/' 172 '/^TESTPAGEFLAG(\([[:alnum:]_]*\).*/Page\1/' 173 '/^SETPAGEFLAG(\([[:alnum:]_]*\).*/SetPage\1/' 174 '/\<__SETPAGEFLAG(\([[:alnum:]_]*\).*/__SetPage\1/' 175 '/\<TESTCLEARFLAG(\([[:alnum:]_]*\).*/TestClearPage\1/' 176 '/\<__TESTCLEARFLAG(\([[:alnum:]_]*\).*/TestClearPage\1/' 177 '/\<CLEARPAGEFLAG(\([[:alnum:]_]*\).*/ClearPage\1/' 178 '/\<__CLEARPAGEFLAG(\([[:alnum:]_]*\).*/__ClearPage\1/' 179 '/^__PAGEFLAG(\([[:alnum:]_]*\).*/__SetPage\1/' 180 '/^__PAGEFLAG(\([[:alnum:]_]*\).*/__ClearPage\1/' 181 '/^PAGEFLAG_FALSE(\([[:alnum:]_]*\).*/Page\1/' 182 '/\<TESTSCFLAG(\([[:alnum:]_]*\).*/TestSetPage\1/' 183 '/\<TESTSCFLAG(\([[:alnum:]_]*\).*/TestClearPage\1/' 184 '/\<SETPAGEFLAG_NOOP(\([[:alnum:]_]*\).*/SetPage\1/' 185 '/\<CLEARPAGEFLAG_NOOP(\([[:alnum:]_]*\).*/ClearPage\1/' 186 '/\<__CLEARPAGEFLAG_NOOP(\([[:alnum:]_]*\).*/__ClearPage\1/' 187 '/\<TESTCLEARFLAG_FALSE(\([[:alnum:]_]*\).*/TestClearPage\1/' 188 '/^PAGE_MAPCOUNT_OPS(\([[:alnum:]_]*\).*/Page\1/' 189 '/^PAGE_MAPCOUNT_OPS(\([[:alnum:]_]*\).*/__SetPage\1/' 190 '/^PAGE_MAPCOUNT_OPS(\([[:alnum:]_]*\).*/__ClearPage\1/' 191 '/^TASK_PFA_TEST([^,]*, *\([[:alnum:]_]*\))/task_\1/' 192 '/^TASK_PFA_SET([^,]*, *\([[:alnum:]_]*\))/task_set_\1/' 193 '/^TASK_PFA_CLEAR([^,]*, *\([[:alnum:]_]*\))/task_clear_\1/' 194 '/^DEF_MMIO_\(IN\|OUT\)_[XD](\([[:alnum:]_]*\),[^)]*)/\2/' 195 '/^DEBUGGER_BOILERPLATE(\([[:alnum:]_]*\))/\1/' 196 '/^DEF_PCI_AC_\(\|NO\)RET(\([[:alnum:]_]*\).*/\2/' 197 '/^PCI_OP_READ(\(\w*\).*[1-4])/pci_bus_read_config_\1/' 198 '/^PCI_OP_WRITE(\(\w*\).*[1-4])/pci_bus_write_config_\1/' 199 '/\<DEFINE_\(MUTEX\|SEMAPHORE\|SPINLOCK\)(\([[:alnum:]_]*\)/\2/v/' 200 '/\<DEFINE_\(RAW_SPINLOCK\|RWLOCK\|SEQLOCK\)(\([[:alnum:]_]*\)/\2/v/' 201 '/\<DECLARE_\(RWSEM\|COMPLETION\)(\([[:alnum:]_]\+\)/\2/v/' 202 '/\<DECLARE_BITMAP(\([[:alnum:]_]*\)/\1/v/' 203 '/\(^\|\s\)\(\|L\|H\)LIST_HEAD(\([[:alnum:]_]*\)/\3/v/' 204 '/\(^\|\s\)RADIX_TREE(\([[:alnum:]_]*\)/\2/v/' 205 '/\<DEFINE_PER_CPU([^,]*, *\([[:alnum:]_]*\)/\1/v/' 206 '/\<DEFINE_PER_CPU_SHARED_ALIGNED([^,]*, *\([[:alnum:]_]*\)/\1/v/' 207 '/\<DECLARE_WAIT_QUEUE_HEAD(\([[:alnum:]_]*\)/\1/v/' 208 '/\<DECLARE_\(TASKLET\|WORK\|DELAYED_WORK\)(\([[:alnum:]_]*\)/\2/v/' 209 '/\(^\s\)OFFSET(\([[:alnum:]_]*\)/\2/v/' 210 '/\(^\s\)DEFINE(\([[:alnum:]_]*\)/\2/v/' 211 '/\<DEFINE_HASHTABLE(\([[:alnum:]_]*\)/\1/v/' 212) 213regex_kconfig=( 214 '/^[[:blank:]]*\(menu\|\)config[[:blank:]]\+\([[:alnum:]_]\+\)/\2/' 215 '/^[[:blank:]]*\(menu\|\)config[[:blank:]]\+\([[:alnum:]_]\+\)/CONFIG_\2/' 216) 217setup_regex() 218{ 219 local mode=$1 lang tmp=() r 220 shift 221 222 regex=() 223 for lang; do 224 case "$lang" in 225 asm) tmp=("${regex_asm[@]}") ;; 226 c) tmp=("${regex_c[@]}") ;; 227 kconfig) tmp=("${regex_kconfig[@]}") ;; 228 esac 229 for r in "${tmp[@]}"; do 230 if test "$mode" = "exuberant"; then 231 regex[${#regex[@]}]="--regex-$lang=${r}b" 232 else 233 # Remove ctags /kind-spec/ 234 case "$r" in 235 /*/*/?/) 236 r=${r%?/} 237 esac 238 # Prepend ^[^#] unless already anchored 239 case "$r" in 240 /^*) ;; 241 *) 242 r="/^[^#]*${r#/}" 243 esac 244 regex[${#regex[@]}]="--regex=$r" 245 fi 246 done 247 done 248} 249 250exuberant() 251{ 252 setup_regex exuberant asm c 253 all_target_sources | xargs $1 -a \ 254 -I __initdata,__exitdata,__initconst, \ 255 -I __initdata_memblock \ 256 -I __refdata,__attribute,__maybe_unused,__always_unused \ 257 -I __acquires,__releases,__deprecated \ 258 -I __read_mostly,__aligned,____cacheline_aligned \ 259 -I ____cacheline_aligned_in_smp \ 260 -I __cacheline_aligned,__cacheline_aligned_in_smp \ 261 -I ____cacheline_internodealigned_in_smp \ 262 -I __used,__packed,__packed2__,__must_check,__must_hold \ 263 -I EXPORT_SYMBOL,EXPORT_SYMBOL_GPL,ACPI_EXPORT_SYMBOL \ 264 -I DEFINE_TRACE,EXPORT_TRACEPOINT_SYMBOL,EXPORT_TRACEPOINT_SYMBOL_GPL \ 265 -I static,const \ 266 --extra=+fq --c-kinds=+px --fields=+iaS --langmap=c:+.h \ 267 "${regex[@]}" 268 269 setup_regex exuberant kconfig 270 all_kconfigs | xargs $1 -a \ 271 --langdef=kconfig --language-force=kconfig "${regex[@]}" 272 273} 274 275emacs() 276{ 277 setup_regex emacs asm c 278 all_target_sources | xargs $1 -a "${regex[@]}" 279 280 setup_regex emacs kconfig 281 all_kconfigs | xargs $1 -a "${regex[@]}" 282} 283 284xtags() 285{ 286 if $1 --version 2>&1 | grep -iq exuberant; then 287 exuberant $1 288 elif $1 --version 2>&1 | grep -iq emacs; then 289 emacs $1 290 else 291 all_target_sources | xargs $1 -a 292 fi 293} 294 295# Support um (which uses SUBARCH) 296if [ "${ARCH}" = "um" ]; then 297 if [ "$SUBARCH" = "i386" ]; then 298 archinclude=x86 299 elif [ "$SUBARCH" = "x86_64" ]; then 300 archinclude=x86 301 else 302 archinclude=${SUBARCH} 303 fi 304elif [ "${SRCARCH}" = "arm" -a "${SUBARCH}" != "" ]; then 305 subarchdir=$(find ${tree}arch/$SRCARCH/ -name "mach-*" -type d -o \ 306 -name "plat-*" -type d); 307 mach_suffix=$SUBARCH 308 plat_suffix=$SUBARCH 309 310 # Special cases when $plat_suffix != $mach_suffix 311 case $mach_suffix in 312 "omap1" | "omap2") 313 plat_suffix="omap" 314 ;; 315 esac 316 317 if [ ! -d ${tree}arch/$SRCARCH/mach-$mach_suffix ]; then 318 echo "Warning: arch/arm/mach-$mach_suffix/ not found." >&2 319 echo " Fix your \$SUBARCH appropriately" >&2 320 fi 321 322 for i in $subarchdir; do 323 case "$i" in 324 *"mach-"${mach_suffix}) 325 ;; 326 *"plat-"${plat_suffix}) 327 ;; 328 *) 329 subarchprune="$subarchprune \ 330 -wholename $i -prune -o" 331 ;; 332 esac 333 done 334fi 335 336remove_structs= 337case "$1" in 338 "cscope") 339 docscope 340 ;; 341 342 "gtags") 343 dogtags 344 ;; 345 346 "tags") 347 rm -f tags 348 xtags ctags 349 remove_structs=y 350 ;; 351 352 "TAGS") 353 rm -f TAGS 354 xtags etags 355 remove_structs=y 356 ;; 357esac 358 359# Remove structure forward declarations. 360if [ -n "$remove_structs" ]; then 361 LANG=C sed -i -e '/^\([a-zA-Z_][a-zA-Z0-9_]*\)\t.*\t\/\^struct \1;.*\$\/;"\tx$/d' $1 362fi 363