Packages

myriad

1.0.13
1.0.15 1.0.14 1.0.13 1.0.12 1.0.11 1.0.10 1.0.9 1.0.8 1.0.7 1.0.6 1.0.5 1.0.4 1.0.3 1.0.2 1.0.1 1.0.0

Ceylan-Myriad, a generic-purpose Erlang toolbox, as an OTP application library here (see http://myriad.esperide.org)

Current section

Files

Jump to
Readme
16 Versions
0 Dependencies
Dependants
Files
Activity
myriad src scripts find-record-definition.sh
Raw

src/scripts/find-record-definition.sh 

#!/bin/sh





USAGE="  Usage: $(basename $0) A_RECORD_NAME [A_DIR]\nAttempts to find the definition of the specified Erlang record from specified directory (if any), otherwise from current one."



base_dir=$(pwd)



record_name="$1"



if [ $# -eq 2 ] ; then



	base_dir="$2"



	if [ ! -d "${base_dir}" ] ; then



		echo "  Error, specified base search directory (${base_dir}) does not exist." 1>&2

		exit 10



	fi



	shift



fi



if [ ! $# -eq 1 ] ; then



	echo "$USAGE" 1>&2

	exit 5



fi





echo "Looking for the definition of the '${record_name}' Erlang record from '${base_dir}'..."

echo





# Finally better with no context (file will probably have to be opened anyway):

#context_opt="--after-context=15"

context_opt=""



# DUMMY to force the display of the corresponding file.

#

cd ${base_dir} && find . -name '*.?rl' -exec /bin/grep --after-context=50 --color ${context_opt} -e "[[:space:]]\?-record([[:space:]]\+${record_name}" DUMMY '{}' ';' 2>/dev/null