CFLib.org – Common Function Library Project

FileNamesLowerCase(directory[, recurseDirectory][, excludeList])

Last updated October 15, 2002

author

Nathan Dintenfass

Version: 1 | Requires: CF6 | Library: FileSysLib

Description:
This UDF is a quick way to make all the files in a particular directory (or directory tree, optionally) lower case. It was originally built for a project that needed to move from Windows to *nix and needed to make all custom tags lower cased. You can also put in a list of files to exclude.

Return Values:
Returns nothing.

Example:

<cfscript>
//fileNamesLowerCase(expandPath("./"),TRUE,"Application.cfm,OnRequestEnd.cfm");
</cfscript>

Parameters:

Name Description Required
directory Directory to begin renaming files in. Yes
recurseDirectory If true, UDF will recurse into subdirectories. Defaults to false. No
excludeList List of files to ignore. Defaults to nothing. No

Full UDF Source:

<!---
 Makes all files in a directory lower case.
 
 @param directory      Directory to begin renaming files in. (Required)
 @param recurseDirectory      If true, UDF will recurse into subdirectories. Defaults to false. (Optional)
 @param excludeList      List of files to ignore. Defaults to nothing. (Optional)
 @return Returns nothing. 
 @author Nathan Dintenfass (nathan@changemedia.com) 
 @version 1, October 15, 2002 
--->
<cffunction name="fileNamesLowerCase" output="no" returnType="void">
    <!--- the directory to lower case the files in --->
    <cfargument name="directory" required="yes" type="string">
    <!--- shall we recurse down the directory tree?  By default, no. --->
    <cfargument name="recurseDirectories" required="no" default="FALSE" type="boolean">
    <!--- list of files to exclude --->
    <cfargument name="excludeList" required="no" type="string" default="">
    <!--- a variable to hold the directoryList --->
    <cfset var directoryList = "">
    <!--- by default, use a Windows style slash --->
    <cfset var slash = "\">
    <!--- make sure this directory exists --->
    <cfif NOT directoryExists(arguments.directory)>
        <cfthrow message="Directory does not exist" detail="The directory path #arguments.directory# does not exist">
    </cfif>
    <!--- if this not windows, use a *nix style slash --->
    <cfif server.os.name DOES NOT CONTAIN "Windows">
        <cfset slash = "/">
    </cfif>
    <!--- now make sure the directory path ends in a slash --->
    <cfif right(arguments.directory,1) IS NOT slash>
        <cfset arguments.directory = arguments.directory & slash>
    </cfif>
    <!--- read the contents of this directory --->
    <cfdirectory action="list" directory="#arguments.directory#" name="directoryList">
    <!--- loop through the contents of this directory, making it lower case --->
    <cfloop query="directoryList">
        <!--- if this is a file, rename it to whatever it is, lower-cased --->
        <cfif NOT compare(type,"File") AND NOT listFindNoCase(arguments.excludeList,name)>
            <cffile action="rename" source="#arguments.directory##name#" destination="#arguments.directory##lcase(name)#">
        <!--- if this a directory, and we are recursing, call this function again --->
        <cfelseif NOT compare(type,"Dir") AND arguments.recurseDirectories>
            <cfset fileNamesLowerCase(arguments.directory & name,1,arguments.excludeList)>
        </cfif>
    </cfloop>
</cffunction>

Search CFLib.org


Latest Additions

Raymond Camden added
QueryDeleteRows
November 04, 2017

Leigh added
nullPad
May 11, 2016

Raymond Camden added
stripHTML
May 10, 2016

Kevin Cotton added
date2ExcelDate
May 05, 2016

Raymond Camden added
CapFirst
April 25, 2016

Created by Raymond Camden / Design by Justin Johnson