windows-nt/Source/XPSP1/NT/admin/netui/shell/test/testpars.c

449 lines
18 KiB
C
Raw Permalink Normal View History

2020-09-26 03:20:57 -05:00
/**********************************************************************/
/** Microsoft LAN Manager **/
/** Copyright(c) Microsoft Corp., 1990 **/
/**********************************************************************/
/*
testpars.c
Tests the FLNParse routine in the winnet driver
FILE HISTORY:
Johnl 6-12-90 Created
*/
// This is annoying
#define NOGDICAPMASKS
#define NOVIRTUALKEYCODES
#define NOWINMESSAGES
#define NOWINSTYLES
#define NOSYSMETRICS
#define NOMENUS
#define NOICONS
#define NOKEYSTATES
#define NOSYSCOMMANDS
#define NORASTEROPS
#define NOSHOWWINDOW
#define OEMRESOURCE
#define NOATOM
#define NOCLIPBOARD
#define NOCOLOR
#define NOCTLMGR
#define NODRAWTEXT
#define NOGDI
//#define NOMB
#define NOMETAFILE
#define NOMINMAX
#define NOMSG
#define NOSCROLL
#define NOSOUND
#define NOTEXTMETRIC
#define NOWH
#define NOWINOFFSETS
#define NOCOMM
#define NOKANJI
#define NOHELP
#define NOPROFILER
#include <windows.h>
#define INCL_ERRORS
#include <uierr.h>
#define LFN
#include <winnet.h>
#define OS2_INCLUDED
#include <lmcons.h>
#undef OS2_INCLUDED
#include <uinetlib.h>
#include <netlib.h>
#include <assert.h>
#include <stdio.h>
#include <dos.h>
typedef PASCAL FAR LFNPARSEPROC(LPSTR, LPSTR, LPSTR) ;
typedef PASCAL FAR LFNVOLUMETYPEPROC( WORD, LPWORD ) ;
#ifdef LFNFIND_TEST
typedef PASCAL FAR LFNFINDFIRST( LPSTR, WORD, LPWORD, LPWORD, WORD, FILEFINDBUF2 FAR *) ;
typedef PASCAL FAR LFNFINDNEXT( WORD, LPWORD, WORD, FILEFINDBUF2 FAR * ) ;
typedef PASCAL FAR LFNFINDCLOSE( WORD ) ;
#endif
typedef PASCAL FAR LFNGETVOLLABEL(WORD, LPSTR ) ;
typedef PASCAL FAR LFNSETVOLLABEL(WORD, LPSTR ) ;
typedef PASCAL FAR LFNMKDIR( LPSTR ) ;
typedef PASCAL FAR LFNRMDIR( LPSTR );
typedef PASCAL FAR LFNGETATTRIBUTES(LPSTR, LPWORD ) ;
typedef PASCAL FAR LFNSETATTRIBUTES(LPSTR, WORD ) ;
#define DRIVE_F 6
#define DRIVE_H 8
int PASCAL WinMain( HANDLE, HANDLE, LPSTR, int ) ;
int PASCAL WinMain( HANDLE hInstance,
HANDLE hPrevInstance,
LPSTR lpCmdLine,
int nCmdShow )
{
LFNPARSEPROC far *lpLFNParse ;
LFNVOLUMETYPEPROC far *lpLFNVolumeType ;
#ifdef LFNFIND_TEST
LFNFINDFIRST far *lpLFNFindFirst ;
LFNFINDNEXT far *lpLFNFindNext ;
LFNFINDCLOSE far *lpLFNFindClose ;
#endif
LFNGETVOLLABEL far *lpLFNGetVolLabel ;
LFNSETVOLLABEL far *lpLFNSetVolLabel ;
LFNMKDIR far *lpLFNMkDir ;
LFNRMDIR far *lpLFNRmDir ;
LFNGETATTRIBUTES far *lpLFNGetAttributes ;
LFNSETATTRIBUTES far *lpLFNSetAttributes ;
HANDLE hWinnet = LoadLibrary("Lanman.drv" ) ;
MessageBox( NULL, "This test requires drive H: to be an HPFS redirected drive and drive F: to be FAT redirected drive", "LFN Test Suite", MB_OK ) ;
MessageBox( NULL, "Begin", "LFN Test Suite", MB_OK ) ;
assert( hWinnet > 32 ) ;
assert( (lpLFNParse = (LFNPARSEPROC far*) GetProcAddress( hWinnet, "LFNParse" )) != NULL ) ;
assert( (lpLFNVolumeType = (LFNVOLUMETYPEPROC far*) GetProcAddress( hWinnet, "LFNVolumeType" )) != NULL ) ;
#ifdef LFNFIND_TEST
assert( (lpLFNFindFirst = (LFNFINDFIRST far*) GetProcAddress( hWinnet, "LFNFindFirst" )) != NULL ) ;
assert( (lpLFNFindNext = (LFNFINDNEXT far*) GetProcAddress( hWinnet, "LFNFindNext" )) != NULL ) ;
assert( (lpLFNFindClose = (LFNFINDCLOSE far*) GetProcAddress( hWinnet, "LFNFindClose" )) != NULL ) ;
#endif
assert( (lpLFNGetVolLabel = (LFNGETVOLLABEL far *) GetProcAddress( hWinnet, "LFNGetVolumeLabel" )) != NULL ) ;
assert( (lpLFNSetVolLabel = (LFNSETVOLLABEL far *) GetProcAddress( hWinnet, "LFNSetVolumeLabel" )) != NULL ) ;
assert( (lpLFNMkDir = (LFNMKDIR far *) GetProcAddress( hWinnet, "LFNMkDir" )) != NULL ) ;
assert( (lpLFNRmDir = (LFNRMDIR far *) GetProcAddress( hWinnet, "LFNRmDir" )) != NULL ) ;
assert( (lpLFNGetAttributes=(LFNGETATTRIBUTES far *) GetProcAddress( hWinnet, "LFNGetAttributes" )) != NULL ) ;
assert( (lpLFNSetAttributes=(LFNSETATTRIBUTES far *) GetProcAddress( hWinnet, "LFNSetAttributes" )) != NULL ) ;
//*******************************************************************
// Test VolumeType
{
WORD wVolType, wErr ;
char buff[150] ;
// Drive H: is redirected to a drive that supports long filenames
wErr = lpLFNVolumeType( DRIVE_H, &wVolType ) ;
if ( wErr )
{
sprintf( buff, "LFNVolumeType returned error %d on drive H (wVolType = %d)", wErr, wVolType ) ;
MessageBox( NULL, buff, "LFN Test Suite", MB_OK ) ;
}
assert( wVolType == VOLUME_LONGNAMES ) ;
// Drive F: is redirected to a drive that does not support long filenames
wErr = lpLFNVolumeType( DRIVE_F, &wVolType ) ;
if ( wErr )
{
sprintf( buff, "LFNVolumeType returned error %d on drive F (wVolType = %d)", wErr, wVolType ) ;
MessageBox( NULL, buff, "LFN Test Suite", MB_OK ) ;
}
assert( wVolType == VOLUME_STANDARD ) ;
}
//*******************************************************************
// Test LFNSetVolumeLabel & LFNGetVolumeLabel
{
char *pchLabel = "VolLabel" ;
WORD wErrF, wErrH ;
static char LabelF[15], LabelH[15], Buff[128] ;
wErrF = lpLFNGetVolLabel( DRIVE_F, LabelF ) ;
if ( wErrF )
*LabelF = '\0' ;
wErrH = lpLFNGetVolLabel( DRIVE_H, LabelH ) ;
if ( wErrH )
*LabelH = '\0' ;
wsprintf(Buff, "Drive F is \"%s\", wErr = %d, Drive H is \"%s\", wErr = %d",
LabelF, wErrF, LabelH, wErrH ) ;
OutputDebugString("LFNParse:" ) ;
OutputDebugString( Buff ) ;
MessageBox( NULL, Buff, "LFN Test Suite", MB_OK ) ;
assert( lpLFNSetVolLabel( DRIVE_F, pchLabel ) == ERROR_ACCESS_DENIED ) ;
assert( lpLFNSetVolLabel( DRIVE_H, pchLabel ) == ERROR_ACCESS_DENIED ) ;
}
//*******************************************************************
// Test LFNParse combining file and mask
{
struct
{
char * pszFile ;
char * pszMask ;
char * pszCompString ;
int RetVal ;
} ParseCombTest[] =
{
"\\STUFF\\FOO", "\\BAR\\?1?23", "\\STUFF\\BAR\\F1O23", FILE_83_CI,
"\\A\\B\\C\\FILE", "1\\2\\*.*", "\\A\\B\\C\\1\\2\\FILE", FILE_83_CI,
"A:\\FOOT.BALL", "*", "A:\\FOOT.BALL", FILE_LONG,
"A:\\FOOT.BALL", "*.*", "A:\\FOOT.BALL", FILE_LONG,
"A:\\1234.567", "*.*.*", "A:\\1234.567", FILE_83_CI,
"A:\\1234.567", "*3.5*7", "A:\\123.567", FILE_83_CI,
"A:\\1234.567", "*a.5*7", "A:\\1234.567a.57", FILE_LONG,
"A:\\FOOT.BALL", "?", "A:\\F", FILE_83_CI,
"A:\\FOOT.BALL", "????????.???", "A:\\FOOT.BAL", FILE_83_CI,
"\\TEST\\FOO", "\\MOO\\?1?2?3","\\TEST\\MOO\\F1O23", FILE_83_CI,
"A:\\FOOT.BALL", "A", "A:\\A", FILE_83_CI,
"A:\\FOOT.BALL", "TST.???", "A:\\TST.BAL", FILE_83_CI,
"A:\\FOOT.BALL", "B.*", "A:\\B.BALL", FILE_LONG,
"A:\\FOOT.BALL", "B", "A:\\B", FILE_83_CI,
"A:\\E.F.G.Hey.IJK", "*.*..H.I??", "A:\\E.F..H.IJK", FILE_LONG,
NULL, NULL, NULL, 0
} ;
int i = 0 ;
while ( ParseCombTest[i].pszFile != NULL )
{
static char Result[512] ;
int iRet = lpLFNParse( ParseCombTest[i].pszFile,
ParseCombTest[i].pszMask,
Result ) ;
assert( iRet == ParseCombTest[i].RetVal ) ;
assert( !strcmpf( Result, ParseCombTest[i].pszCompString ) ) ;
i++ ;
}
}
//*******************************************************************
// Test LFNGet/SetAttributes
{
// Bogus value at the moment...
WORD wAttr = 0x00 ;
// GP Fault here?
assert( !lpLFNSetAttributes("H:\\foo.bar\\foo.bar", _A_NORMAL ) ) ;
assert( !lpLFNGetAttributes("H:\\foo.bar\\foo.bar", &wAttr ) ) ;
assert( wAttr == _A_NORMAL ) ;
assert( !lpLFNSetAttributes("F:\\foo.bar\\foo.bar", _A_NORMAL ) ) ;
assert( !lpLFNGetAttributes("F:\\foo.bar\\foo.bar", &wAttr ) ) ;
assert( wAttr == _A_NORMAL ) ;
// Test the HPFS drive
assert( !lpLFNSetAttributes("H:\\test.att", _A_NORMAL ) ) ;
assert( !lpLFNGetAttributes("H:\\test.att", &wAttr ) ) ;
assert( wAttr == _A_NORMAL ) ;
assert( !lpLFNSetAttributes("H:\\test.att", _A_RDONLY | _A_ARCH ) ) ;
assert( !lpLFNGetAttributes("H:\\test.att", &wAttr ) ) ;
assert( wAttr == _A_RDONLY | _A_ARCH ) ;
assert( !lpLFNSetAttributes("H:\\test.att", _A_HIDDEN | _A_SYSTEM ) ) ;
assert( !lpLFNGetAttributes("H:\\test.att", &wAttr ) ) ;
assert( wAttr == _A_HIDDEN | _A_SYSTEM ) ;
assert( !lpLFNSetAttributes("H:\\test.att", _A_NORMAL ) ) ;
assert( !lpLFNGetAttributes("H:\\test.att", &wAttr ) ) ;
assert( wAttr == _A_NORMAL ) ;
// Test the FAT drive
assert( !lpLFNSetAttributes("F:\\test.att", _A_NORMAL ) ) ;
assert( !lpLFNGetAttributes("F:\\test.att", &wAttr ) ) ;
assert( wAttr == _A_NORMAL ) ;
assert( !lpLFNSetAttributes("F:\\test.att", _A_RDONLY | _A_ARCH ) ) ;
assert( !lpLFNGetAttributes("F:\\test.att", &wAttr ) ) ;
assert( wAttr == _A_RDONLY | _A_ARCH ) ;
assert( !lpLFNSetAttributes("F:\\test.att", _A_HIDDEN | _A_SYSTEM ) ) ;
assert( !lpLFNGetAttributes("F:\\test.att", &wAttr ) ) ;
assert( wAttr == _A_HIDDEN | _A_SYSTEM ) ;
assert( !lpLFNSetAttributes("F:\\test.att", _A_NORMAL ) ) ;
assert( !lpLFNGetAttributes("F:\\test.att", &wAttr ) ) ;
assert( wAttr == _A_NORMAL ) ;
}
//*******************************************************************
// Test LFNParse 8.3 tests
{
char * psz83I1 = "C:\\ABC",
* psz83I2 = "C:ABC",
* psz83I3 = "\\ABC",
* psz83I4 = ".\\ABC",
* psz83I5 = "..\\ABC",
* psz83I6 = "C:\\ABC\\DEF",
* psz83I7 = "C:ABC\\DEF",
* psz83I8 = "\\ABC\\DEF",
* psz83I9 = ".\\ABC\\DEF",
* psz83IA = "..\\ABC\\DEF",
* psz83IB = "C:\\ABC\\DEF\\GHIJKLMN.OPQ",
* psz83IC = "C:ABC\\DEF\\GHI.JKL",
* psz83ID = "\\ABC\\DEF\\..",
* psz83IE = ".\\ABC\\DEF\\..\\GHIJKLMN.OPQ",
* psz83IF = "..\\ABC\\D.EF\\..\\.\\..\\GH.IJ",
* psz83IG = "ABC",
* psz83IH = "ABC\\DEFGHIJK",
* psz83II = "ABC\D",
* psz83IJ = "A\C",
* psz83IK = "A.",
* psz83IL = "A.EXE",
* psz83IM = "X:\\.\\A.EXE",
* psz83IN = "X:\\.\\A.",
* psz83C1 = "C:\\ABC\\DEF\\GHIjKLMN.OPQ",
* psz83C2 = "C:ABC\\DEF\\GHI.JKl",
* psz83C3 = "\\ABC\\DEf\\..",
* psz83C4 = ".\\ABC\\dEF\\..\\GhIJKLMN.OPQ",
* psz83C5 = "..\\aBC\\DEF\\..\\.\\..\\GH",
* pszLong1 = "C:\\ABCDEFGHI.JKL",
* pszLong2 = "C:\\ABCD.HI.JKL",
* pszLong3 = "C:\\ABCDE..JKL",
* pszLong4 = "C:\\ABCDEF\\GHI\\ JKL",
* pszLong5 = "\\ABCDE.123\\ABCDE.1234",
* pszLong6 = ".AB\\CDE",
*pszReg1 = ".\\.\\.\\.\\.\\.\\.\\.\\.\\.\\.\\.\\.\\.\\.\\.\\ABC",
*pszReg2 = ".\\ABCjjHHHiiiasdfasdfJJZZZZZZ",
*pszReg3 = ".\\aBC",
*pszReg4 = ".\\ABC" ;
assert( (*lpLFNParse)( pszReg1, NULL, NULL ) == FILE_83_CI ) ;
//assert( (*lpLFNParse)( pszReg2 NULL, NULL ) == FILE_LONG ) ;
assert( (*lpLFNParse)( pszReg3, NULL, NULL ) == FILE_83_CS ) ;
assert( (*lpLFNParse)( pszReg4, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83I1, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83I2, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83I3, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83I4, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83I5, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83I6, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83I7, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83I8, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83I9, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IA, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IB, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IC, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83ID, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IE, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IF, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IG, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IH, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83II, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IJ, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IK, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IL, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IM, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83IN, NULL, NULL ) == FILE_83_CI ) ;
assert( (*lpLFNParse)( psz83C1, NULL, NULL ) == FILE_83_CS ) ;
assert( (*lpLFNParse)( psz83C2, NULL, NULL ) == FILE_83_CS ) ;
assert( (*lpLFNParse)( psz83C3, NULL, NULL ) == FILE_83_CS ) ;
assert( (*lpLFNParse)( psz83C4, NULL, NULL ) == FILE_83_CS ) ;
assert( (*lpLFNParse)( psz83C5, NULL, NULL ) == FILE_83_CS ) ;
assert( (*lpLFNParse)( pszLong1, NULL, NULL ) == FILE_LONG ) ;
assert( (*lpLFNParse)( pszLong2, NULL, NULL ) == FILE_LONG ) ;
assert( (*lpLFNParse)( pszLong3, NULL, NULL ) == FILE_LONG ) ;
assert( (*lpLFNParse)( pszLong4, NULL, NULL ) == FILE_LONG ) ;
assert( (*lpLFNParse)( pszLong5, NULL, NULL ) == FILE_LONG ) ;
assert( (*lpLFNParse)( pszLong6, NULL, NULL ) == FILE_LONG ) ;
}
#ifdef NEVER
//*******************************************************************
// Test LFNFindFirst, LFNFindNext & LFNFindClose
{
FILEFINDBUF2 * pFind;
FILEFINDBUF2 buf ;
static char outst[256];
unsigned err, hdir, entries ;
entries = 1 ;
pFind = &buf ;
err = lpLFNFindFirst("H:\\*.*", 0, &entries, &hdir, sizeof(buf), &buf);
if ( err )
{
sprintf(outst, "Error %d from FindFirst (Ret buff = \"%s\")", err, &buf ) ;
MessageBox( NULL, outst, "LFN Test Suite", MB_OK ) ;
}
else
{
sprintf(outst, "Attr = 0x%x, Size = %lu, Name = %s",
pFind->attrFile, pFind->cbFile,
pFind->achName ) ;
MessageBox( NULL, outst, "LFN Test Suite", MB_OK ) ;
}
if ( IDOK == MessageBox( NULL, "LFNFindNext...", "LFN Test Suite", MB_OKCANCEL ) )
{
while ( !err )
{
err = lpLFNFindNext(hdir, &entries, sizeof(buf), &buf);
if ( err )
{
sprintf(outst, "Error %d from FindNext (Ret buff = \"%s\")", err, &buf ) ;
MessageBox( NULL, outst, "LFN Test Suite", MB_OK ) ;
}
else
{
sprintf(outst, "Attr = 0x%x, Size = %lu, Name = %s",
pFind->attrFile, pFind->cbFile,
pFind->achName) ;
if ( IDOK != MessageBox( NULL, outst, "LFN Test Suite", MB_OKCANCEL ) )
break ;
}
}
}
lpLFNFindClose( hdir ) ;
}
#endif //NEVER
//*******************************************************************
// Test Mkdir/Rmdir
{
// Make valid dirs on HPFS partition
assert( !lpLFNMkDir("H:\\LFNTESTDIR.LONG.NAME" ) ) ;
assert( !lpLFNMkDir("H:\\LFNTESTDIR.LONG.NAME\\LEVEL2" ) ) ;
assert( !lpLFNMkDir("H:\\LFNTESTDIR.LONG.NAME\\LEVEL2\\LONGLEVEL3.....A" ) ) ;
MessageBox(NULL, "Directories made on H:", "LFN Test Suite", MB_OK ) ;
assert( !lpLFNRmDir("H:\\LFNTESTDIR.LONG.NAME\\LEVEL2\\LONGLEVEL3.....A" ) ) ;
assert( !lpLFNRmDir("H:\\LFNTESTDIR.LONG.NAME\\LEVEL2" ) ) ;
assert( !lpLFNRmDir("H:\\LFNTESTDIR.LONG.NAME" ) ) ;
// Make invalid dirs on fat partition
assert( lpLFNMkDir("F:\\LFNTESTDIR.LONG.NAME" ) ) ;
MessageBox(NULL, "Attempted to make long Directories on F:", "LFN Test Suite", MB_OK ) ;
assert( lpLFNRmDir("F:\\LFNTESTDIR.LONG.NAME" ) ) ;
// Make valid dirs on FAT partition
assert( !lpLFNMkDir("F:\\LFNTEST.NAM" ) ) ;
assert( !lpLFNMkDir("F:\\LFNTEST.NAM\\LEVEL2" ) ) ;
MessageBox(NULL, "Directories made on F:", "LFN Test Suite", MB_OK ) ;
assert( !lpLFNRmDir("F:\\LFNTEST.NAM\\LEVEL2" ) ) ;
assert( !lpLFNRmDir("F:\\LFNTEST.NAM" ) ) ;
}
MessageBox( NULL, "Done", "LFN Test Suite", MB_OK ) ;
return 0 ;
}