[ros-diffs] [greatlrd] 16670: fix another bug in goto it is internel label :eof jump to end of the bat file

fix another bug in goto it is internel label :eof jump to end of the bat
file
Modified: trunk/reactos/subsys/system/cmd/goto.c
  _____  

Modified: trunk/reactos/subsys/system/cmd/goto.c
--- trunk/reactos/subsys/system/cmd/goto.c	2005-07-20 17:31:18 UTC
(rev 16669)
+++ trunk/reactos/subsys/system/cmd/goto.c	2005-07-20 18:43:01 UTC
(rev 16670)
@@ -75,8 +75,17 @@

 
 	/* set file pointer to the beginning of the batch file */
 	lNewPosHigh = 0;
-	SetFilePointer (bc->hBatchFile, 0, &lNewPosHigh, FILE_BEGIN);
+	   
+  /* jump to end of the file */
+  if ( _tcsicmp( param, _T(":eof"))==0)
+  {      
+    SetFilePointer (bc->hBatchFile, 0, &lNewPosHigh, FILE_END);
+    return 0;
+  } 
 
+  /* jump to begin of the file */
+  SetFilePointer (bc->hBatchFile, 0, &lNewPosHigh, FILE_BEGIN);
+
 	while (FileGetString (bc->hBatchFile, textline,
sizeof(textline)))
 	{
      int pos;
@@ -105,11 +114,12 @@
      pos++;
     }      
         
+    
 		/* use whole label name */
 		if ((*tmp == _T(':')) && (_tcsicmp (++tmp, param) == 0))
 			return 0;
 	}
-
+  
 	LoadString(CMD_ModuleHandle, STRING_GOTO_ERROR2, szMsg,
RC_STRING_MAX_SIZE);
 	ConErrPrintf(szMsg, param);
 	ExitBatch(NULL);