[royce] 17927: fix if command to work more like expected. seta_test.cmd gets much further now.

fix if command to work more like expected. seta_test.cmd gets much
further now.
fixed some msvc6 warnings while I was in here
Modified: trunk/reactos/subsys/system/cmd/if.c
  _____  

Modified: trunk/reactos/subsys/system/cmd/if.c
--- trunk/reactos/subsys/system/cmd/if.c	2005-09-19 05:29:17 UTC
(rev 17926)
+++ trunk/reactos/subsys/system/cmd/if.c	2005-09-19 05:42:01 UTC
(rev 17927)
@@ -52,9 +52,16 @@

 		return 0;
 	}
 
-	/* First check if param string begins with word 'not' */
-	if (!_tcsnicmp (param, _T("not"), 3) && _istspace (*(param +
3)))
+	/* First check if param string begins with '!' or 'not' */
+	if ( param[0] == _T('!') )
 	{
+		x_flag = X_EXEC;            /* Remember '!' */
+		++param;                    /* Step over '!' */
+		while (_istspace (*param))  /* And subsequent spaces */
+			param++;
+	}
+	else if (!_tcsnicmp (param, _T("not"), 3) && _istspace (*(param
+ 3)))
+	{
 		x_flag = X_EXEC;            /* Remember 'NOT' */
 		param += 3;                 /* Step over 'NOT' */
 		while (_istspace (*param))  /* And subsequent spaces */
@@ -64,14 +71,15 @@
 	/* Check for 'exist' form */
 	if (!_tcsnicmp (param, _T("exist"), 5) && _istspace (*(param +
5)))
 	{
+		UINT i;
+		BOOL bInside = FALSE;
+
 		param += 5;
 		while (_istspace (*param))
 			param++;
 
 		pp = param;
 
-		INT i;
-		BOOL bInside = FALSE;
 		/* find the whole path to the file */
 		for(i = 0; i < _tcslen(param); i++)
 		{
@@ -155,38 +163,34 @@
 
 		x_flag |= X_EMPTY;          /* Syntax error if comd
empty */
 	}
-	else if (NULL == (pp = _tcsstr (param, _T("=="))))
-	{
-		/* Check that '==' is present, syntax error if not */
-		error_syntax (NULL);
-		return 1;
-	}
 	else
 	{
-		/* Change first '='to space to terminate comparison loop
*/
-
-		*pp = _T(' ');   /* Need a space to terminate comparison
loop */
-		pp += 2;                /* over '==' */
+		BOOL bInQuote = FALSE;
+		INT p1len;
+		pp = param;
+		while ( *pp && ( bInQuote || *pp != _T('=') ) )
+		{
+			if ( *pp == _T('\"') )
+				bInQuote = !bInQuote;
+			++pp;
+		}
+		p1len = pp-param;
+		/* check for "==" */
+		if ( *pp++ != _T('=') || *pp++ != _T('=') )
+		{
+			error_syntax ( NULL );
+			return 1;
+		}
 		while (_istspace (*pp)) /* Skip subsequent spaces */
 			pp++;
 
-		_tcscat (pp, _T(" "));  /* Add one space to ensure
comparison ends */
+		/* are the two sides equal, and does the second end in
the same place? */
+		if ( !_tcsncmp(param,pp,p1len) && _tcschr(_T("
("),pp[p1len]) )
+			x_flag ^= X_EXEC;
+		pp += p1len;
 
-		while (*param == *pp)       /* Comparison loop */
-		{
-			if (_istspace (*param))      /* Terminates on
space */
-				break;
-
-			param++, pp++;
-		}
-
-		if (x_flag ^= (*param != *pp) ? 0 : X_EXEC)
-		{
-			while (*pp && !_istspace (*pp))  /* Find first
space, */
-				pp++;
-
+		if ( x_flag )
 			x_flag |= X_EMPTY;
-		}
 	}
 
 	if (x_flag & X_EMPTY)