Something went wrong. Try again.
Reactos
Something went wrong. Try again.
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368/* * TYPE.C - type internal command. * * History: * * 07/08/1998 (John P. Price) * started. * * 07/12/98 (Rob Lake) * Changed error messages * * 27-Jul-1998 (John P Price <linux-guru@gcfl.net>) * added config.h include * * 07-Jan-1999 (Eric Kohl) * Added support for quoted arguments (type "test file.dat"). * Cleaned up. * * 19-Jan-1999 (Eric Kohl) * Unicode and redirection ready! * * 19-Jan-1999 (Paolo Pantaleo <paolopan@freemail.it>) * Added multiple file support (copied from y.c) * * 30-Apr-2005 (Magnus Olsen <magnus@greatlord.com>) * Remove all hardcoded strings in En.rc */
#include "precomp.h"
#ifdef INCLUDE_CMD_TYPE
static BOOLFileGetString( IN HANDLE hFile, OUT LPTSTR lpBuffer, IN LONG nBufferLength){ PCHAR pString; DWORD dwRead; LONG len = 0;
#ifdef _UNICODE pString = cmd_alloc(nBufferLength);#else pString = lpBuffer;#endif
if (ReadFile(hFile, pString, nBufferLength - 1, &dwRead, NULL)) { /* Break at new line*/ PCHAR end = memchr(pString, '\n', dwRead); len = dwRead; if (end) { len = (LONG)(end - pString) + 1; SetFilePointer(hFile, len - dwRead, NULL, FILE_CURRENT); } }
if (!len) {#ifdef _UNICODE cmd_free(pString);#endif return FALSE; }
pString[len++] = '\0';#ifdef _UNICODE MultiByteToWideChar(OutputCodePage, 0, pString, -1, lpBuffer, len); cmd_free(pString);#endif return TRUE;}
static BOOLDoTypeFile( IN LPTSTR FileName, IN HANDLE hConsoleOut, IN BOOL bNoFileName, IN BOOL bPaging){ HANDLE hFile; BOOL bIsFile; DWORD dwFileSize; DWORD dwFilePos; DWORD dwRet; LPTSTR errmsg; TCHAR buff[256];
hFile = CreateFile(FileName, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
if (hFile == INVALID_HANDLE_VALUE) { // FIXME: Use ErrorMessage() ? FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_IGNORE_INSERTS | FORMAT_MESSAGE_FROM_SYSTEM, NULL, GetLastError(), MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPTSTR)&errmsg, 0, NULL); ConErrPrintf(_T("%s - %s"), FileName, errmsg); LocalFree(errmsg); nErrorLevel = 1; return TRUE; }
/* * When reading from a file, retrieve its original size, so that * we can stop reading it once we are beyond its original ending. * This allows avoiding an infinite read loop in case the output * of the file is redirected back to it. * If we read from somewhere else (device, ...) don't do anything; * we will stop when ReadFile() fails (e.g. when Ctrl-Z is seen...). */ bIsFile = ((GetFileType(hFile) & ~FILE_TYPE_REMOTE) == FILE_TYPE_DISK); if (bIsFile) { dwFileSize = GetFileSize(hFile, NULL); if ((dwFileSize == INVALID_FILE_SIZE) && (GetLastError() != ERROR_SUCCESS)) { WARN("Error when retrieving file size, or size too large (%d)\n", dwFileSize); dwFileSize = 0; } dwFilePos = SetFilePointer(hFile, 0, NULL, FILE_BEGIN); if ((dwFilePos == INVALID_SET_FILE_POINTER) && (GetLastError() != ERROR_SUCCESS)) { WARN("Error when setting file pointer\n"); dwFilePos = 0; } } else { dwFileSize = dwFilePos = 0; }
/* * Display the file name on StdErr if required, so that if StdOut * alone is redirected, we can obtain the file contents only. */ if (!bNoFileName) ConErrPrintf(_T("\n%s\n\n\n"), FileName);
if (bPaging) { while (FileGetString(hFile, buff, ARRAYSIZE(buff))) { if (!ConOutPrintfPaging(FALSE, _T("%s"), buff)) { bCtrlBreak = FALSE; CloseHandle(hFile); nErrorLevel = 1; return FALSE; }
/* * If we read from a file, check where we are and stop * once we are beyond the original end of the file. */ if (bIsFile) { dwFilePos = SetFilePointer(hFile, 0, NULL, FILE_CURRENT); if ((dwFilePos == INVALID_SET_FILE_POINTER) && (GetLastError() != ERROR_SUCCESS)) { WARN("Error when getting file pointer\n"); break; } if (dwFilePos >= dwFileSize) break; } } } else { while (ReadFile(hFile, buff, sizeof(buff), &dwRet, NULL) && dwRet > 0) { WriteFile(hConsoleOut, buff, dwRet, &dwRet, NULL); if (bCtrlBreak) { bCtrlBreak = FALSE; CloseHandle(hFile); nErrorLevel = 1; return FALSE; }
/* * If we read from a file, check where we are and stop * once we are beyond the original end of the file. */ if (bIsFile) { dwFilePos = SetFilePointer(hFile, 0, NULL, FILE_CURRENT); if ((dwFilePos == INVALID_SET_FILE_POINTER) && (GetLastError() != ERROR_SUCCESS)) { WARN("Error when getting file pointer\n"); break; } if (dwFilePos >= dwFileSize) break; } } }
CloseHandle(hFile); return TRUE;}
INT cmd_type(LPTSTR param){ INT argc, i; LPTSTR* argv; LPTSTR errmsg; HANDLE hConsoleOut; BOOL bNoFileName = FALSE; BOOL bPaging = FALSE; BOOL bFileFound; DWORD dwLastError; UINT nFileSpecs = 0; HANDLE hFind; WIN32_FIND_DATA FindData;
if (!_tcsncmp(param, _T("/?"), 2)) { ConOutResPaging(TRUE, STRING_TYPE_HELP1); return 0; }
if (!*param) { error_req_param_missing(); return 1; }
/* Parse the command line. We will manually expand any file specification present. */ argv = split(param, &argc, FALSE, FALSE);
/* Loop through the options, count also the specified number of file specifications */ for (i = 0; i < argc; ++i) { if (argv[i][0] == _T('/')) { if (_tcslen(argv[i]) == 2) { switch (_totupper(argv[i][1])) { case _T('N'): bNoFileName = TRUE; continue;
case _T('P'): bPaging = TRUE; continue; } }
// error_invalid_switch(argv[i] + 1); ConErrResPrintf(STRING_TYPE_ERROR, argv[i] + 1); nErrorLevel = 1; goto Quit; }
/* This should be a file specification */ ++nFileSpecs; }
nErrorLevel = 0;
hConsoleOut = GetStdHandle(STD_OUTPUT_HANDLE);
/* Reset paging state */ if (bPaging) ConOutPrintfPaging(TRUE, _T(""));
/* Now loop through the files */ for (i = 0; i < argc; ++i) { /* Skip the options */ if (argv[i][0] == _T('/')) continue;
/* If wildcards are present in this file specification, perform a file enumeration */ if (_tcschr(argv[i], _T('*')) || _tcschr(argv[i], _T('?'))) { dwLastError = ERROR_SUCCESS; bFileFound = FALSE;
hFind = FindFirstFile(argv[i], &FindData);
if (hFind != INVALID_HANDLE_VALUE) { /* Loop through all the files */ do { /* Ignore any directory silently */ if (!_tcscmp(FindData.cFileName, _T(".")) || !_tcscmp(FindData.cFileName, _T("..")) || (FindData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)) { continue; }
bFileFound = TRUE; if (!DoTypeFile(FindData.cFileName, hConsoleOut, bNoFileName, bPaging)) { FindClose(hFind); goto Quit; }
} while (FindNextFile(hFind, &FindData));
FindClose(hFind); }
/* * Return an error if the file specification could not be resolved, * or no actual files were encountered (but only directories). */ if (hFind == INVALID_HANDLE_VALUE) dwLastError = GetLastError(); else if (!bFileFound) dwLastError = ERROR_FILE_NOT_FOUND;
if (dwLastError != ERROR_SUCCESS) { // FIXME: Use ErrorMessage() ? FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_IGNORE_INSERTS | FORMAT_MESSAGE_FROM_SYSTEM, NULL, dwLastError, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPTSTR)&errmsg, 0, NULL); ConErrPrintf(_T("%s - %s"), argv[i], errmsg); LocalFree(errmsg); nErrorLevel = 1; } } else { if (!DoTypeFile(argv[i], hConsoleOut, (bNoFileName || (nFileSpecs <= 1)), bPaging)) goto Quit; }
/* Continue with the next file specification */ }
Quit: freep(argv); return nErrorLevel;}
#endif