filecomp.c File Reference

#include "precomp.h"

Include dependency graph for filecomp.c:

Go to the source code of this file.

Classes
struct	_FileName

Typedefs
typedef struct _FileName	FileName

Functions
VOID	FindPrefixAndSuffix (LPTSTR strIN, LPTSTR szPrefix, LPTSTR szSuffix)
int __cdecl	compare (const void *arg1, const void *arg2)
BOOL	FileNameContainsSpecialCharacters (LPTSTR pszFileName)
VOID	CompleteFilename (LPTSTR strIN, BOOL bNext, LPTSTR strOut, UINT cusor)

Typedef Documentation

FileName

IN PVCB IN USHORT IN POEM_STRING FileName

Definition at line 893 of file fatprocs.h.

Function Documentation

compare()

int __cdecl compare	(	const void *	arg1,
		const void *	arg2
	)

Definition at line 482 of file filecomp.c.

{
    FileName * File1;
    FileName * File2;
    INT ret;

    File1 = cmd_alloc(sizeof(FileName));
    if (!File1)
        return 0;

    File2 = cmd_alloc(sizeof(FileName));
    if (!File2)
    {
        cmd_free(File1);
        return 0;
    }

    memcpy(File1,arg1,sizeof(FileName));
    memcpy(File2,arg2,sizeof(FileName));

     /* ret = _tcsicmp(File1->Name, File2->Name); */
     ret = lstrcmpi(File1->Name, File2->Name);

    cmd_free(File1);
    cmd_free(File2);
    return ret;
}

CompleteFilename()

VOID CompleteFilename	(	LPTSTR	strIN,
		BOOL	bNext,
		LPTSTR	strOut,
		UINT	cusor
	)

Definition at line 545 of file filecomp.c.

{
    /* Length of string before we complete it */
    INT_PTR StartLength;
    /* Length of string after completed */
    //INT EndLength;
    /* The number of chars added too it */
    //static INT DiffLength = 0;
    /* Used to find and assemble the string that is returned */
    TCHAR szBaseWord[MAX_PATH];
    TCHAR szPrefix[MAX_PATH];
    TCHAR szOriginal[MAX_PATH];
    TCHAR szSearchPath[MAX_PATH];
    /* Save the strings used last time, so if they hit tab again */
    static TCHAR LastReturned[MAX_PATH];
    static TCHAR LastSearch[MAX_PATH];
    static TCHAR LastPrefix[MAX_PATH];
    /* Used to search for files */
    HANDLE hFile;
    WIN32_FIND_DATA file;
    /* List of all the files */
    FileName * FileList = NULL;
    /* Number of files */
    INT FileListSize = 0;
    /* Used for loops */
    UINT i;
    /* Editable string of what was passed in */
    TCHAR str[MAX_PATH];
    /* Keeps track of what element was last selected */
    static INT Sel;
    BOOL NeededQuote = FALSE;
    BOOL ShowAll = TRUE;
    TCHAR * line = strIN;

    strOut[0] = _T('\0');

    while (_istspace (*line))
        line++;
    if (!_tcsnicmp (line, _T("rd "), 3) || !_tcsnicmp (line, _T("cd "), 3))
        ShowAll = FALSE;

    /* Copy the string, str can be edited and original should not be */
    _tcscpy(str,strIN);
    _tcscpy(szOriginal,strIN);

    /* Look to see if the cusor is not at the end of the string */
    if ((cusor + 1) < _tcslen(str))
        str[cusor] = _T('\0');

    /* Look to see if they hit tab again, if so cut off the diff length */
    if (_tcscmp(str,LastReturned) || !_tcslen(str))
    {
        /* We need to know how many chars we added from the start */
        StartLength = _tcslen(str);

        /* no string, we need all files in that directory */
        if (!StartLength)
        {
            _tcscat(str,_T("*"));
        }

        /* Zero it out first */
        szBaseWord[0] = _T('\0');
        szPrefix[0] = _T('\0');

        /*What comes out of this needs to be:
            szBaseWord =  path no quotes to the object
            szPrefix = what leads up to the filename
            no quote at the END of the full name */
        FindPrefixAndSuffix(str,szPrefix,szBaseWord);
        /* Strip quotes */
        for(i = 0; i < _tcslen(szBaseWord); )
        {
            if (szBaseWord[i] == _T('\"'))
                memmove(&szBaseWord[i],&szBaseWord[i + 1], _tcslen(&szBaseWord[i]) * sizeof(TCHAR));
            else
                i++;
        }

        /* clear it out */
        memset(szSearchPath, 0, sizeof(szSearchPath));

        /* Start the search for all the files */
        GetFullPathName(szBaseWord, MAX_PATH, szSearchPath, NULL);

        /* Got a device path? Fallback to the the current dir plus the short path */
        if (szSearchPath[0] == _T('\\') && szSearchPath[1] == _T('\\') &&
            szSearchPath[2] == _T('.') && szSearchPath[3] == _T('\\'))
        {
            GetCurrentDirectory(MAX_PATH, szSearchPath);
            _tcscat(szSearchPath, _T("\\"));
            _tcscat(szSearchPath, szBaseWord);
        }

        if (StartLength > 0)
        {
            _tcscat(szSearchPath,_T("*"));
        }
        _tcscpy(LastSearch,szSearchPath);
        _tcscpy(LastPrefix,szPrefix);
    }
    else
    {
        _tcscpy(szSearchPath, LastSearch);
        _tcscpy(szPrefix, LastPrefix);
        StartLength = 0;
    }
    /* search for the files it might be */
    hFile = FindFirstFile (szSearchPath, &file);
    if (hFile == INVALID_HANDLE_VALUE)
    {
        /* Assemble the original string and return */
        _tcscpy(strOut,szOriginal);
        return;
    }

    /* assemble a list of all files names */
    do
    {
        FileName * oldFileList = FileList;

        if (!_tcscmp (file.cFileName, _T(".")) ||
            !_tcscmp (file.cFileName, _T("..")))
            continue;

        /* Don't show files when they are doing 'cd' or 'rd' */
        if (!ShowAll &&
            file.dwFileAttributes != INVALID_FILE_ATTRIBUTES &&
            !(file.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY))
        {
                continue;
        }

        /* Add the file to the list of files */
        FileList = cmd_realloc(FileList, ++FileListSize * sizeof(FileName));

        if (FileList == NULL)
        {
            /* Don't leak old buffer */
            cmd_free(oldFileList);
            /* Assemble the original string and return */
            _tcscpy(strOut,szOriginal);
            FindClose(hFile);
            ConOutFormatMessage (GetLastError());
            return;
        }
        /* Copies the file name into the struct */
        _tcscpy(FileList[FileListSize-1].Name,file.cFileName);

    } while(FindNextFile(hFile,&file));

    FindClose(hFile);

    /* Check the size of the list to see if we found any matches */
    if (FileListSize == 0)
    {
        _tcscpy(strOut,szOriginal);
        if (FileList != NULL)
            cmd_free(FileList);
        return;

    }
    /* Sort the files */
    qsort(FileList,FileListSize,sizeof(FileName), compare);

    /* Find the next/previous */
    if (_tcslen(szOriginal) && !_tcscmp(szOriginal,LastReturned))
    {
        if (bNext)
        {
            if (FileListSize - 1 == Sel)
                Sel = 0;
            else
                Sel++;
        }
        else
        {
            if (!Sel)
                Sel = FileListSize - 1;
            else
                Sel--;
        }
    }
    else
    {
        Sel = 0;
    }

    /* nothing found that matched last time so return the first thing in the list */
    strOut[0] = _T('\0');

    /* Special character in the name */
    if (FileNameContainsSpecialCharacters(FileList[Sel].Name))
    {
        INT LastSpace;
        BOOL bInside;
        /* It needs a " at the end */
        NeededQuote = TRUE;
        LastSpace = -1;
        bInside = FALSE;
        /* Find the place to put the " at the start */
        for(i = 0; i < _tcslen(szPrefix); i++)
        {
            if (szPrefix[i] == _T('\"'))
                bInside = !bInside;
            if (szPrefix[i] == _T(' ') && !bInside)
                LastSpace = i;
        }

        /* insert the quotation and move things around */
        if (szPrefix[LastSpace + 1] != _T('\"') && LastSpace != -1)
        {
            memmove ( &szPrefix[LastSpace+1], &szPrefix[LastSpace], (_tcslen(szPrefix)-LastSpace+1) * sizeof(TCHAR) );

            if ((UINT)(LastSpace + 1) == _tcslen(szPrefix))
            {
                _tcscat(szPrefix,_T("\""));
            }
            szPrefix[LastSpace + 1] = _T('\"');
        }
        else if (LastSpace == -1)
        {
            /* Add quotation only if none exists already */
            if (szPrefix[0] != _T('\"'))
            {
                _tcscpy(szBaseWord,_T("\""));
                _tcscat(szBaseWord,szPrefix);
                _tcscpy(szPrefix,szBaseWord);
            }
        }
    }

    _tcscpy(strOut,szPrefix);
    _tcscat(strOut,FileList[Sel].Name);

    /* check for odd number of quotes means we need to close them */
    if (!NeededQuote)
    {
        for(i = 0; i < _tcslen(strOut); i++)
        {
            if (strOut[i] == _T('\"'))
                NeededQuote = !NeededQuote;
        }
    }

    if (NeededQuote || (_tcslen(szPrefix) && szPrefix[_tcslen(szPrefix) - 1] == _T('\"')))
        _tcscat(strOut,_T("\""));

    _tcscpy(LastReturned,strOut);
    //EndLength = _tcslen(strOut);
    //DiffLength = EndLength - StartLength;
    if (FileList != NULL)
        cmd_free(FileList);
}

Referenced by ReadCommand().

FileNameContainsSpecialCharacters()

BOOL FileNameContainsSpecialCharacters

(

LPTSTR

pszFileName

)

Definition at line 511 of file filecomp.c.

{
    TCHAR chr;

    while ((chr = *pszFileName++) != _T('\0'))
    {
        if ((chr == _T(' ')) ||
            (chr == _T('!')) ||
            (chr == _T('%')) ||
            (chr == _T('&')) ||
            (chr == _T('(')) ||
            (chr == _T(')')) ||
            (chr == _T('{')) ||
            (chr == _T('}')) ||
            (chr == _T('[')) ||
            (chr == _T(']')) ||
            (chr == _T('=')) ||
            (chr == _T('\'')) ||
            (chr == _T('`')) ||
            (chr == _T(',')) ||
            (chr == _T(';')) ||
            (chr == _T('^')) ||
            (chr == _T('~')) ||
            (chr == _T('+')) ||
            (chr == 0xB4)) // '´'
        {
            return TRUE;
        }
    }

    return FALSE;
}

Referenced by CompleteFilename().

FindPrefixAndSuffix()

VOID FindPrefixAndSuffix	(	LPTSTR	strIN,
		LPTSTR	szPrefix,
		LPTSTR	szSuffix
	)

Definition at line 352 of file filecomp.c.

{
    /* String that is to be examined */
    TCHAR str[MAX_PATH];
    /* temp pointers to used to find needed parts */
    TCHAR * szSearch;
    TCHAR * szSearch1;
    TCHAR * szSearch2;
    TCHAR * szSearch3;
    /* number of quotes in the string */
    INT nQuotes = 0;
    /* used in for loops */
    UINT i;
    /* Char number to break the string at */
    INT PBreak = 0;
    INT SBreak = 0;
    /* when phrasing a string, this tells weather
       you are inside quotes ot not. */
    BOOL bInside = FALSE;

    szPrefix[0] = _T('\0');
    szSuffix[0] = _T('\0');

    /* Copy over the string to later be edited */
    _tcscpy(str,strIN);

    /* Count number of " */
    for(i = 0; i < _tcslen(str); i++)
    {
        if (str[i] == _T('\"'))
            nQuotes++;
    }

    /* Find the prefix and suffix */
    if (nQuotes % 2 && nQuotes >= 1)
    {
        /* Odd number of quotes.  Just start from the last " */
        /* THis is the way MS does it, and is an easy way out */
        szSearch = _tcsrchr(str, _T('\"'));
        /* Move to the next char past the " */
        szSearch++;
        _tcscpy(szSuffix,szSearch);
        /* Find the one closest to end */
        szSearch1 = _tcsrchr(str, _T('\"'));
        szSearch2 = _tcsrchr(str, _T('\\'));
        szSearch3 = _tcsrchr(str, _T('.'));
        if (szSearch2 != NULL && _tcslen(szSearch1) > _tcslen(szSearch2))
            szSearch = szSearch2;
        else if (szSearch3 != NULL && _tcslen(szSearch1) > _tcslen(szSearch3))
            szSearch = szSearch3;
        else
            szSearch = szSearch1;
        /* Move one char past */
        szSearch++;
        szSearch[0] = _T('\0');
        _tcscpy(szPrefix,str);
        return;

    }

    if (!_tcschr(str, _T(' ')))
    {
        /* No spaces, everything goes to Suffix */
        _tcscpy(szSuffix,str);
        /* look for a slash just in case */
        szSearch = _tcsrchr(str, _T('\\'));
        if (szSearch)
        {
            szSearch++;
            szSearch[0] = _T('\0');
            _tcscpy(szPrefix,str);
        }
        else
        {
            szPrefix[0] = _T('\0');
        }
        return;
    }

    if (!nQuotes)
    {
        /* No quotes, and there is a space*/
        /* Take it after the last space */
        szSearch = _tcsrchr(str, _T(' '));
        szSearch++;
        _tcscpy(szSuffix,szSearch);
        /* Find the closest to the end space or \ */
        _tcscpy(str,strIN);
        szSearch1 = _tcsrchr(str, _T(' '));
        szSearch2 = _tcsrchr(str, _T('\\'));
        szSearch3 = _tcsrchr(str, _T('/'));
        if (szSearch2 != NULL && _tcslen(szSearch1) > _tcslen(szSearch2))
            szSearch = szSearch2;
        else if (szSearch3 != NULL && _tcslen(szSearch1) > _tcslen(szSearch3))
            szSearch = szSearch3;
        else
            szSearch = szSearch1;
        szSearch++;
        szSearch[0] = _T('\0');
        _tcscpy(szPrefix,str);
        return;
    }

    /* All else fails and there is a lot of quotes, spaces and |
       Then we search through and find the last space or \ that is
        not inside a quotes */
    for(i = 0; i < _tcslen(str); i++)
    {
        if (str[i] == _T('\"'))
            bInside = !bInside;
        if (str[i] == _T(' ') && !bInside)
            SBreak = i;
        if ((str[i] == _T(' ') || str[i] == _T('\\')) && !bInside)
            PBreak = i;
    }
    SBreak++;
    PBreak++;
    _tcscpy(szSuffix,&strIN[SBreak]);
    strIN[PBreak] = _T('\0');
    _tcscpy(szPrefix,strIN);
    if (szPrefix[_tcslen(szPrefix) - 2] == _T('\"') &&
        szPrefix[_tcslen(szPrefix) - 1] != _T(' '))
    {
        /* need to remove the " right before a \ at the end to
           allow the next stuff to stay inside one set of quotes
            otherwise you would have multiple sets of quotes*/
        _tcscpy(&szPrefix[_tcslen(szPrefix) - 2],_T("\\"));
    }
}

Referenced by CompleteFilename().