OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [tools/] [build/] [unlock-directory.in] - Rev 587

Go to most recent revision | Compare with Previous | Blame | View Log

#!@KSH@
#
# $Id: unlock-directory.in,v 1.2 2001-09-27 12:02:53 chris Exp $
#
# Unlock a directory processed by lock_directory
#

# is a particular command available on this machine?
#
cmd_avail()
{
    set -- `type $1 2>&1`
    if [ "$2" = "not" -a "$3" = "found" ] || [ "$3" = "not" -a "$4" = "found" ]
    then
        return 1
    else
        return 0
    fi
}

unlock_directory() {
    ul_dir=$1/.                 # get any symlink out of the way using '.'
    if [ -d $ul_dir ]
    then
        find $ul_dir -type d ! -perm -0222 -print | $XARGS -t chmod +w
    fi
}

# Use gnu xargs if available; faster, more reliable in general
XARGS=xargs
cmd_avail gxargs && XARGS=gxargs

for dir
do
    unlock_directory $dir
done

# Local Variables: ***
# mode:ksh ***
# End: ***

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.