_mfs_error MFS_Remove_subdir ( MFS_DRIVE_STRUCT_PTR drive_ptr, char *pathname /*[IN] pathname of the directory to be removed */ ) { _mfs_error error_code, saved_error = 0; uint32_t dir_cluster, parent_cluster, dir_index; MFS_DIR_ENTRY_PTR dir_entry_ptr; uint32_t prev_cluster= CLUSTER_INVALID; uint32_t parent_prev_cluster= CLUSTER_INVALID; if ( (pathname == NULL) || (*pathname == '\0') ) { return MFS_INVALID_PARAMETER; } error_code = MFS_lock_dos_disk( drive_ptr ); if ( error_code != MFS_NO_ERROR ) { return error_code; } dir_entry_ptr = MFS_Find_entry_on_disk (drive_ptr, pathname, &error_code, &parent_cluster, &dir_index, &parent_prev_cluster); if ( dir_entry_ptr ) { if ( mqx_dtohc(dir_entry_ptr->ATTRIBUTE) & MFS_ATTR_DIR_NAME ) { dir_cluster = clustoh(dir_entry_ptr->HFIRST_CLUSTER, dir_entry_ptr->LFIRST_CLUSTER); if ( dir_cluster != drive_ptr->CUR_DIR_CLUSTER ) { dir_index = 2; /* Skip over '.' and '..' */ dir_entry_ptr = MFS_Find_directory_entry (drive_ptr, NULL, &dir_cluster, &dir_index, &prev_cluster, MFS_ATTR_ANY, &error_code); if ( dir_entry_ptr == NULL && !error_code ) { dir_index = 0; dir_entry_ptr = MFS_Find_entry_on_disk (drive_ptr, pathname, &error_code, &parent_cluster, &dir_index, &parent_prev_cluster); if ( dir_entry_ptr ) { *dir_entry_ptr->NAME = MFS_DEL_FILE; drive_ptr->DIR_SECTOR_DIRTY = TRUE; error_code = MFS_remove_lfn_entries(drive_ptr, parent_cluster, dir_index, parent_prev_cluster); if ( !error_code ) { saved_error = MFS_Release_chain(drive_ptr, dir_cluster); } } } else if ( dir_entry_ptr != NULL && !error_code ) { error_code = MFS_FILE_EXISTS; } } else { error_code = MFS_ATTEMPT_TO_REMOVE_CURRENT_DIR; } } else { error_code = MFS_WRITE_FAULT; } } else { error_code = MFS_PATH_NOT_FOUND; } MFS_unlock(drive_ptr,TRUE); if ( saved_error == MFS_LOST_CHAIN && error_code == MFS_NO_ERROR ) { error_code = saved_error; } return(error_code); }
_mfs_error MFS_Delete_file ( MQX_FILE_PTR mfs_fd_ptr, /*[IN] the MFS device on which to operate */ char_ptr pathname /*[IN] directory and file name of the file to delete */ ) { MFS_DRIVE_STRUCT_PTR drive_ptr; MFS_DIR_ENTRY_PTR dir_entry_ptr; _mfs_error error_code, saved_code = 0; uint_32 dir_cluster, dir_index; uint_32 first_cluster; uint_32 prev_cluster= CLUSTER_INVALID; if ( (pathname == NULL) || (*pathname == '\0') ) { return MFS_INVALID_PARAMETER; } #if MFSCFG_READ_ONLY_CHECK if (MFS_is_read_only (mfs_fd_ptr, NULL)) { return MFS_DISK_IS_WRITE_PROTECTED; } #endif error_code = MFS_lock_dos_disk( mfs_fd_ptr, &drive_ptr ); if ( error_code != MFS_NO_ERROR ) { return error_code; } dir_entry_ptr = MFS_Find_entry_on_disk(drive_ptr, pathname, &error_code, &dir_cluster, &dir_index, &prev_cluster); if ( dir_entry_ptr != NULL ) { if ( dtohc(dir_entry_ptr->ATTRIBUTE) & (MFS_ATTR_DIR_NAME | MFS_ATTR_VOLUME_NAME | MFS_ATTR_READ_ONLY) ) { error_code = MFS_ACCESS_DENIED; } else { first_cluster = clustoh(dir_entry_ptr->HFIRST_CLUSTER, dir_entry_ptr->LFIRST_CLUSTER); if ( first_cluster ) { saved_code = MFS_Release_chain(drive_ptr, first_cluster); if ( saved_code != MFS_LOST_CHAIN && saved_code != MFS_NO_ERROR ) { MFS_unlock(drive_ptr,TRUE); return(saved_code); } } /* ** Mark all open files with the same name as erased */ MFS_Delete_handles(drive_ptr, dir_entry_ptr->NAME, first_cluster); *dir_entry_ptr->NAME = MFS_DEL_FILE; drive_ptr->DIR_SECTOR_DIRTY = TRUE; error_code = MFS_remove_lfn_entries(drive_ptr,dir_cluster,dir_index, prev_cluster); } } MFS_unlock(drive_ptr,TRUE); if ( saved_code == MFS_LOST_CHAIN && error_code == MFS_NO_ERROR ) { error_code = saved_code; } return(error_code); }