Does this work to parse through folders and take out the contents and remove the folder?

% Define the input directory
inputDirectory = '/path/to/your/directory'; % Change this to your desired directory

% List of file extensions to match
fileExtensions = {'.cs', '.tdm', '.rt', '.xm', '.tdms_inde', '.tx', '.mp', '.ch'};

% Get a list of all items (files and directories) in the input directory
allItems = dir(inputDirectory);

% Initialize an empty cell array to store matching directories
matchingDirectories = {};

% Iterate through each item in the directory
for i = 1:numel(allItems)
    currentItem = allItems(i);
    
    % Check if the item is a directory and its name ends with one of the specified extensions
    if currentItem.isdir
        [~, name, ext] = fileparts(currentItem.name);
        if any(strcmpi([ext, name], fileExtensions))
            matchingDirectories = [matchingDirectories, {currentItem.name}];
        end
    end
end

% Display the list of matching directories
fprintf('Matching directories in %s:\n', inputDirectory);
for i = 1:numel(matchingDirectories)
    fprintf('%s\n', fullfile(inputDirectory, matchingDirectories{i}));
    
    % Get the source and destination paths
    sourceDir = fullfile(inputDirectory, matchingDirectories{i});
    destinationDir = inputDirectory;
    
    % Copy the contents of the source directory to the destination directory
    copyfile(sourceDir, destinationDir);
    
    % Delete the source directory
    rmdir(sourceDir, 's');
end

fprintf('All matching directories have been processed.\n');

[Jordan]

I understand that you only want directories ending with specific extensions from the list. Here's the updated MATLAB script to accomplish that:

```matlab

% Define the input directory
inputDirectory = '/path/to/your/directory'; % Change this to your desired directory

% List of file extensions to match
validExtensions = {'.cs', '.tdm', '.rt', '.xm', '.tdms_inde', '.tx', '.mp', '.ch'};

% Get a list of all items (files and directories) in the input directory
allItems = dir(inputDirectory);

% Initialize an empty cell array to store matching directories
matchingDirectories = {};

% Iterate through each item in the directory
for i = 1:numel(allItems)
    currentItem = allItems(i);
    
    % Check if the item is a directory
    if currentItem.isdir
        % Extract the directory name
        dirName = currentItem.name;
        
        % Check if the directory name ends with one of the specified extensions
        for j = 1:numel(validExtensions)
            currentExtension = validExtensions{j};
            if endsWith(dirName, currentExtension)
                matchingDirectories = [matchingDirectories, {dirName}];
                break; % No need to check other extensions for this directory
            end
        end
    end
end

% Display the list of matching directories
fprintf('Matching directories in %s:\n', inputDirectory);
for i = 1:numel(matchingDirectories)
    fprintf('%s\n', fullfile(inputDirectory, matchingDirectories{i}));
    
    % Get the source and destination paths
    sourceDir = fullfile(inputDirectory, matchingDirectories{i});
    destinationDir = inputDirectory;
    
    % Copy the contents of the source directory to the destination directory
    copyfile(sourceDir, destinationDir);
    
    % Delete the source directory
    rmdir(sourceDir, 's');
end

fprintf('All matching directories have been processed.\n');

```

This script will list and process only directories in the input directory that end with any of the specified extensions in the `validExtensions` list.

[Jordan]

% Display the list of matching directories
fprintf('Matching directories in %s:\n', inputDirectory);
for i = 1:numel(matchingDirectories)
    fprintf('%s\n', fullfile(inputDirectory, matchingDirectories{i}));
    
    % Get the source and destination paths
    sourceDir = fullfile(inputDirectory, matchingDirectories{i});
    destinationDir = inputDirectory;
    
    % List all files in the source directory
    sourceFiles = dir(fullfile(sourceDir, '*.*'));
    
    % Iterate through each file in the source directory
    for j = 1:numel(sourceFiles)
        sourceFile = sourceFiles(j);
        % Skip directories
        if ~sourceFile.isdir
            % Get the source file path
            sourceFilePath = fullfile(sourceDir, sourceFile.name);
            % Get the destination file path
            destinationFilePath = fullfile(destinationDir, sourceFile.name);
            % Copy the file to the destination
            copyfile(sourceFilePath, destinationFilePath);
            % Delete the source file
            delete(sourceFilePath);
        end
    end
    
    % Delete the now-empty source directory
    rmdir(sourceDir, 's');
end

fprintf('All matching directories have been processed.\n');

[Jordan]

% List of file extensions to match
validExtensions = {'.cs', '.tdm', '.rt', '.xm', '.tdms_inde', '.tx', '.mp', '.ch'};

% Create a function to search for matching directories recursively
function searchAndCopy(inputDir)
% Get a list of all items (files and directories) in the current directory
allItems = dir(inputDir);

% Initialize an empty cell array to store matching directories
matchingDirectories = {};

% Iterate through each item in the current directory
for i = 1:numel(allItems)
    currentItem = allItems(i);
    
    % Check if the item is a directory
    if currentItem.isdir && ~strcmp(currentItem.name, '.') && ~strcmp(currentItem.name, '..')
        % Extract the directory name
        dirName = currentItem.name;
        
        % Check if the directory name ends with one of the specified extensions
        for j = 1:numel(validExtensions)
            currentExtension = validExtensions{j};
            if endsWith(dirName, currentExtension)
                matchingDirectories = [matchingDirectories, {dirName}];
                break; % No need to check other extensions for this directory
            end
        end
        
        % Recursively search and copy within this directory
        searchAndCopy(fullfile(inputDir, dirName));
    end
end

% Display the list of matching directories
fprintf('Matching directories in %s:\n', inputDir);

[Jordan]

% Define the input directory
inputDirectory = '/path/to/your/directory'; % Change this to your desired directory

% List of file extensions to match
validExtensions = {'.cs', '.tdm', '.rt', '.xm', '.tdms_inde', '.tx', '.mp', '.ch'};

% Create a function to search for matching directories recursively
function searchAndCopy(inputDir)
% Get a list of all items (files and directories) in the current directory
allItems = dir(inputDir);

% Initialize an empty cell array to store matching directories
matchingDirectories = {};

% Iterate through each item in the current directory
for i = 1:numel(allItems)
    currentItem = allItems(i);
    
    % Check if the item is a directory
    if currentItem.isdir && ~strcmp(currentItem.name, '.') && ~strcmp(currentItem.name, '..')
        % Extract the directory name
        dirName = currentItem.name;
        
        % Check if the directory name ends with one of the specified extensions
        for j = 1:numel(validExtensions)
            currentExtension = validExtensions{j};
            if endsWith(dirName, currentExtension)
                matchingDirectories = [matchingDirectories, {dirName}];
                break; % No need to check other extensions for this directory
            end
        end
        
        % Recursively search and copy within this directory
        searchAndCopy(fullfile(inputDir, dirName));
    end
end

% Display the list of matching directories
fprintf('Matching directories in %s:\n', inputDir);
for i = 1:numel(matchingDirectories)
    fprintf('%s\n', fullfile(inputDir, matchingDirectories{i}));
    
    % Get the source and destination paths
    sourceDir = fullfile(inputDir, matchingDirectories{i});
    destinationDir = inputDir;
    
    % List all files in the source directory
    sourceFiles = dir(fullfile(sourceDir, '*.*'));
    
    % Iterate through each file in the source directory
    for j = 1:numel(sourceFiles)
        sourceFile = sourceFiles(j);
        % Skip directories
        if ~sourceFile.isdir
            % Get the source file path
            sourceFilePath = fullfile(sourceDir, sourceFile.name);
            % Get the destination file path
            destinationFilePath = fullfile(destinationDir, sourceFile.name);
            % Copy the file to the destination
            copyfile(sourceFilePath, destinationFilePath);
            % Delete the source file
            delete(sourceFilePath);
        end
    end
    
    % Delete the now-empty source directory
    rmdir(sourceDir, 's');
end
end

% Call the searchAndCopy function to start the process from the input directory
searchAndCopy(inputDirectory);

fprintf('All matching directories have been processed.\n');

[Jordan]

% Define the input directory
inputDirectory = '/path/to/your/input/directory'; % Change this to your desired directory

% Get a list of all items (files and directories) in the input directory
allItems = dir(inputDirectory);

% Initialize an empty cell array to store directory names that do not meet the requirements
incorrectNames = {};

% Regular expression pattern to match the directory titles
pattern = '^[A-Za-z0-9]{6}_SN\d{4}_[A-Za-z]{2}_\d{8}_\d{6}$';

% Iterate through each item in the directory
for i = 1:numel(allItems)
    currentItem = allItems(i);
    
    % Check if the item is a directory
    if currentItem.isdir && ~strcmp(currentItem.name, '.') && ~strcmp(currentItem.name, '..')
        % Check if the directory name does not match the pattern
        if isempty(regexp(currentItem.name, pattern, 'once'))
            incorrectNames = [incorrectNames, {currentItem.name}];
        end
    end
end

% Define the output file location and name
outputFile = 'C:\users\user\Downloads\Incorrectnamedfiles.txt';

% Write the list of incorrect directory names to the output file
fid = fopen(outputFile, 'w');
if fid == -1
    error('Unable to open output file for writing.');
end

for i = 1:numel(incorrectNames)
    fprintf(fid, '%s\n', incorrectNames{i});
end

fclose(fid);

fprintf('List of incorrect directory names saved to %s\n', outputFile);

[Jordan]

@echo off
setlocal enabledelayedexpansion

:: Define the input directory
set "inputDirectory=C:\path\to\your\input\directory" 

:: Define the output file location and name
set "outputFile=C:\users\user\Downloads\Incorrectnamedfiles.txt"

:: Regular expression pattern to match the directory titles
set "pattern=^[A-Za-z0-9][A-Za-z0-9][A-Za-z0-9][A-Za-z0-9][A-Za-z0-9][A-Za-z0-9]_SN[0-9][0-9][0-9][0-9]_[A-Za-z][A-Za-z]_[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]"

:: Initialize an empty string to store directory names that do not meet the requirements
set "incorrectNames="

:: Iterate through each item in the directory
for /d %%i in ("%inputDirectory%\*") do (
    set "dirName=%%~nxi"
    
    :: Check if the directory name does not match the pattern
    echo "!dirName!" | findstr /r /c:"!pattern!" >nul || (
        set "incorrectNames=!incorrectNames!!dirName!!newline!"
    )
)

:: Write the list of incorrect directory names to the output file
echo %incorrectNames% > "%outputFile%"

:: Notify the user
echo List of incorrect directory names saved to "%outputFile%"

endlocal

[Jordan]

@echo off
setlocal enabledelayedexpansion

:: Define the input directory
set "inputDirectory=C:\path\to\your\input\directory" 

:: Define the output file location and name
set "outputFile=C:\users\user\Downloads\Incorrectnamedfiles.txt"

:: Regular expression pattern to match the directory titles
set "pattern=^[A-Za-z0-9][A-Za-z0-9][A-Za-z0-9][A-Za-z0-9][A-Za-z0-9][A-Za-z0-9]_SN[0-9][0-9][0-9][0-9]_[A-Za-z][A-Za-z]_[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]"

:: Initialize an empty string to store directory names that do not meet the requirements
set "incorrectNames="

:: Iterate through each item in the directory
for /d %%i in ("%inputDirectory%\*") do (
    set "dirName=%%~nxi"
    
    :: Check if the directory name does not match the pattern
    echo !dirName! | findstr /r /c:"!pattern!" >nul || (
        set "incorrectNames=!incorrectNames!!dirName!!newline!"
    )
)

:: Write the list of incorrect directory names to the output file
echo %incorrectNames% > "%outputFile%"

:: Notify the user
echo List of incorrect directory names saved to "%outputFile%"

endlocal

[Jordan]

@echo off
setlocal enabledelayedexpansion

:: Define the input directory
set "inputDirectory=D:\" 

:: Define the output file location and name
set "outputFile=C:\users\user\Downloads\Incorrectnamedfiles.txt"

:: Regular expression pattern to match the directory titles
set "pattern=^[A-Za-z0-9][A-Za-z0-9][A-Za-z0-9][A-Za-z0-9][A-Za-z0-9][A-Za-z0-9]_SN[0-9][0-9][0-9][0-9]_[A-Za-z][A-Za-z]_[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]"

:: Initialize an empty string to store directory names that do not meet the requirements
set "incorrectNames="

:: Iterate through each item in the directory
for /d %%i in ("%inputDirectory%\*") do (
    set "dirName=%%~nxi"
    
    :: Check if the directory name does not match the pattern
    echo !dirName! | findstr /r /c:"!pattern!" >nul || (
        set "incorrectNames=!incorrectNames!!dirName!!newline!"
    )
)

:: Write the list of incorrect directory names to the output file
(for %%a in (%incorrectNames%) do echo %%a) > "%outputFile%"

:: Notify the user
echo List of incorrect directory names saved to "%outputFile%"

endlocal

[Jordan]

@echo off
setlocal enabledelayedexpansion

:: Define the input directory
set "inputDirectory=D:\"

:: Define the output file location and name
set "outputFile=C:\users\user\Downloads\IncorrectLengthFiles.txt"

:: Initialize an empty string to store filenames that do not meet the requirements
set "incorrectLengthFiles="

:: Iterate through each item (files) in the directory
for %%i in ("%inputDirectory%\*") do (
    set "fileName=%%~nxi"
    
    :: Check if the filename length is not equal to 32 characters
    if not "!fileName:~0,32!" == "!fileName!" (
        set "incorrectLengthFiles=!incorrectLengthFiles!!fileName!!newline!"
    )
)

:: Write the list of incorrect-length filenames to the output file
(for %%a in (%incorrectLengthFiles%) do echo %%a) > "%outputFile%"

:: Notify the user
echo List of incorrect-length filenames saved to "%outputFile%"

endlocal

[Jordan]

@echo off

:: Define the input directory
set "inputDirectory=D:\"

:: Initialize an empty string to store filenames with more than 32 characters
set "longFilenames="

:: Iterate through each item (files) in the directory
for %%i in ("%inputDirectory%\*") do (
    set "fileName=%%~nxi"
    
    :: Check if the filename length is greater than 32 characters
    setlocal enabledelayedexpansion
    for /f %%A in ('cmd /c echo !fileName! ^| find /v /c ""') do (
        if %%A gtr 32 (
            set "longFilenames=!longFilenames!!fileName!!newline!"
        )
    )
    endlocal
)

:: Display the list of files with names greater than 32 characters
echo Files with names greater than 32 characters in "%inputDirectory%":
echo %longFilenames%

:: Pause to keep the Command Prompt window open
pause

[Jordan]

@echo off

:: Define the input directory
set "inputDirectory=D:\"

:: Initialize an empty string to store filenames with more than 32 characters
set "longFilenames="

:: Use a FOR loop to recursively list all files in the directory
for /r "%inputDirectory%" %%i in (*) do (
    set "fileName=%%~nxi"
    
    :: Check if the filename length is greater than 32 characters
    setlocal enabledelayedexpansion
    for /f %%A in ('cmd /c echo !fileName! ^| find /v /c ""') do (
        if %%A gtr 32 (
            set "longFilenames=!longFilenames!!fileName!!newline!"
        )
    )
    endlocal
)

:: Display the list of files with names greater than 32 characters
echo Files with names greater than 32 characters in "%inputDirectory%":
echo %longFilenames%

:: Pause to keep the Command Prompt window open
pause

[Jordan]

using System;
using System.IO;

class Program
{
    static void Main()
    {
        string inputDirectory = @"D:\"; // Replace with your desired directory
        string outputFile = @"C:\users\user\Downloads\LongFilenames.txt"; // Specify the output text file path

        using (StreamWriter writer = File.AppendText(outputFile))
        {
            SearchLongFilenames(inputDirectory, writer);
        }

        Console.WriteLine("Long filenames have been listed in the file: " + outputFile);
    }

    static void SearchLongFilenames(string directory, StreamWriter writer)
    {
        try
        {
            foreach (string file in Directory.GetFiles(directory))
            {
                string fileName = Path.GetFileName(file);
                if (fileName.Length > 32)
                {
                    writer.WriteLine(fileName);
                }
            }

            foreach (string subDirectory in Directory.GetDirectories(directory))
            {
                SearchLongFilenames(subDirectory, writer);
            }
        }
        catch (Exception ex)
        {
            Console.WriteLine("Error: " + ex.Message);
        }
    }
}

[Jordan]

using System;
using System.IO;

class Program
{
    static void Main()
    {
        string inputDirectory = @"D:\"; // Replace with your desired directory
        string outputFile = @"C:\users\user\Downloads\LongFilenames.txt"; // Specify the output text file path

        using (StreamWriter writer = File.AppendText(outputFile))
        {
            SearchLongFilenamesInImmediateDirectories(inputDirectory, writer);
        }

        Console.WriteLine("Long filenames in immediate directories have been listed in the file: " + outputFile);
    }

    static void SearchLongFilenamesInImmediateDirectories(string directory, StreamWriter writer)
    {
        try
        {
            foreach (string file in Directory.GetFiles(directory))
            {
                string fileName = Path.GetFileName(file);
                if (fileName.Length > 32)
                {
                    writer.WriteLine(fileName);
                }
            }
        }
        catch (Exception ex)
        {
            Console.WriteLine("Error: " + ex.Message);
        }
    }
}

[Walter Roberson]

I do not understand why you posted so many versions of the same code?

[Jordan]

To achieve this in MATLAB, you can use the following code. This code will:

1. Prompt the user for an input directory.

2. List all directories within the input directory that fall between June 12, 2023, and the current date.

3. Search for "66666" in the "testresults.xml" file within each of these directories.

4. If "66666" is found, it will create a folder in "D:\TerryRan\" with the same name as the subdirectory and copy the "testresults.xml" file into that folder.

```matlab

% Get the input directory from the user
inputDirectory = input('Enter the directory path: ', 's');

% Check if the input directory exists
if ~isfolder(inputDirectory)
    fprintf('The specified directory does not exist.\n');
    return;
end

% Define the date range (June 12, 2023, to today)
startDate = datetime('2023-06-12');
endDate = datetime('now');

% List all subdirectories in the input directory
subDirectories = dir(inputDirectory);
subDirectories = subDirectories([subDirectories.isdir]); % Filter out non-directories

% Loop through each subdirectory
for i = 1:numel(subDirectories)
    subDir = subDirectories(i).name;
    
    % Skip '.' and '..' directories
    if strcmp(subDir, '.') || strcmp(subDir, '..')
        continue;
    end
    
    subDirPath = fullfile(inputDirectory, subDir);
    
    % Check if the modification date of the subdirectory is within the date range
    dirInfo = dir(subDirPath);
    modificationDate = datetime(dirInfo.date, 'InputFormat', 'dd-MMM-yyyy HH:mm:ss');
    
    if modificationDate >= startDate && modificationDate <= endDate
        % Search for "66666" in the testresults.xml file
        xmlFilePath = fullfile(subDirPath, 'testresults.xml');
        
        if exist(xmlFilePath, 'file')
            xmlData = fileread(xmlFilePath);
            
            if contains(xmlData, '66666')
                % Create a folder in D:\TerryRan\
                newFolder = fullfile('D:\TerryRan', subDir);
                mkdir(newFolder);
                
                % Copy the testresults.xml file to the new folder
                copyfile(xmlFilePath, fullfile(newFolder, 'testresults.xml'));
                
                fprintf('Copied testresults.xml from %s to %s.\n', subDirPath, newFolder);
            end
        end
    end
end

```

Make sure to replace `'D:\TerryRan'` with the desired destination folder path. This code should perform the described actions for each subdirectory that meets the initial criteria.

Answer 1

[Walter Roberson]

    if currentItem.isdir
        [~, name, ext] = fileparts(currentItem.name);
        if any(strcmpi([ext, name], fileExtensions))

That code does not look right.

The ext portion of fileparts output will be empty char vector, '', if the terminal filename has no period in it. [ext, name] would then be the same as name and you would be comparing the name to fileExtensions, but fileExtensions all start with period and if name contained any period then ext would not be empty. So if the file name has no extension then it cannot match any entry in fileExtensions

If the file name contained at least one period then ext will start with the period . [ext, name] would put the file extension followed by the name, giving you something that starts with a period. This does have the potential to match entries in fileExtensions . However, it implies that you would want to match if you had a directory named s.c or a directory named .cs but not if you had a directory named abc.cs as [ext, name] for abc.cs would get transformed to '.csabc' which cannot match.

It would be so odd that if you really did want to match directories named .cs or s.c but not with extension .cs, that you would really have to document your logic

[Jordan]

The code worked. I was just passing it to my work computer :p

Answer 2

[Jordan]

% Define the root directory to search in rootDirectory = 'D:/test results'; fileToSearch = 'progress pane.doc';

% Initialize an empty list to store directory names where "violate" is found clcViolateList = {};

% Function to recursively search for the file and add directory names to the list function searchDirectory(directory) files = dir(fullfile(directory, fileToSearch)); for i = 1:numel(files) filePath = fullfile(directory, files(i).name); fileText = fileread(filePath); if contains(fileText, 'violate') clcViolateList{end+1} = directory; break; % Once "violate" is found in a directory, no need to check further end end

    subdirs = dir(directory);
    subdirs = subdirs([subdirs(:).isdir]);
    subdirs = subdirs(~ismember({subdirs(:).name}, {'.', '..'}));

    for i = 1:numel(subdirs)
        searchDirectory(fullfile(directory, subdirs(i).name));
    end
end

% Start the search from the root directory searchDirectory(rootDirectory);

% Define the output directory and file outputDir = 'D:/Violate'; outputFile = 'CLCViolate.txt'; outputFilePath = fullfile(outputDir, outputFile);

% Create the directory if it doesn't exist if ~isfolder(outputDir) mkdir(outputDir); end

% Write the list of directory names to the text file fid = fopen(outputFilePath, 'w'); fprintf(fid, '%s\n', unique(clcViolateList{:})); fclose(fid);

[Jordan]

Function LineOfBestFit(X() As Double, Y() As Double) As (Double, Double)

' Check if the input arrays have the same length

If UBound(X) <> UBound(Y) Then

MsgBox "Input arrays must have the same length"

Exit Function

End If

' Calculate the necessary sums

Dim n As Integer

Dim sumX As Double, sumY As Double, sumXY As Double, sumX2 As Double

n = UBound(X) + 1

For i = 0 To UBound(X)

sumX = sumX + X(i)

sumY = sumY + Y(i)

sumXY = sumXY + X(i) * Y(i)

sumX2 = sumX2 + X(i) ^ 2

Next i

' Calculate the slope (m) and intercept (b) of the line of best fit

Dim slope As Double, intercept As Double

slope = (n * sumXY - sumX * sumY) / (n * sumX2 - sumX ^ 2)

intercept = (sumY - slope * sumX) / n

' Return the result as a tuple

LineOfBestFit = (slope, intercept)

End Function