[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);