//----------------------------------------------------------------// bool USFileSys::DeleteDirectory ( cc8* path, bool force, bool recursive ) { if ( USFileSys::CheckPathExists ( path ) == false ) return true; int result = zl_rmdir ( path ); if ( result == 0 ) return true; if ( !( force || recursive )) return false; STLString currentDir = USFileSys::GetCurrentPath (); USFileSys::SetCurrentPath ( path ); USDirectoryItr dirItr; if ( force ) { dirItr.Start (); while ( dirItr.NextFile ()) { USFileSys::DeleteFile ( dirItr.Current ()); } } if ( recursive ) { dirItr.Start (); while ( dirItr.NextDirectory ()) { if( strcmp ( dirItr.Current (), ".." ) == 0 || strcmp ( dirItr.Current (), "." ) == 0 ) { continue; } USFileSys::DeleteDirectory ( dirItr.Current (), force, recursive ); } } USFileSys::SetCurrentPath ( currentDir ); return ( zl_rmdir ( path ) == 0 ); }
/** @name listFiles @text Lists the files contained in a directory @opt string path Path to search. Default is current directory. @out table files A table of filenames (or nil if the path is invalid) */ int MOAIFileSystem::_listFiles ( lua_State* L ) { UNUSED ( L ); STLString oldPath = USFileSys::GetCurrentPath (); cc8* dir = NULL; if ( lua_type ( L, 1 ) == LUA_TSTRING ) { dir = lua_tostring ( L, 1 ); if( !USFileSys::SetCurrentPath ( dir )) { return 0; } } USDirectoryItr dirItr; lua_newtable ( L ); int n = 0; dirItr.Start (); while ( dirItr.NextFile ()) { if ( dir ) { lua_pushstring ( L, dir ); lua_pushstring ( L, "/" ); lua_pushstring ( L, dirItr.Current ()); lua_concat ( L, 3 ); } else { lua_pushstring ( L, dirItr.Current ()); } n++; luaL_setn ( L, -2, n ); // new size lua_rawseti ( L, -2, n ); // t[pos] = v } USFileSys::SetCurrentPath ( oldPath ); return 1; }