Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2024-12-28 01:55:19 +00:00
Code Issues Projects Releases Packages Wiki Activity

fix one bug with cmd goto so WBAT will work bit more now. thx gasmann to report it.

Browse source 
svn path=/trunk/; revision=16668
This commit is contained in:
Magnus Olsen 2005-07-20 17:06:53 +00:00
parent 8e5b438930
commit 4365851492
1 changed files with 21 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

27
reactos/subsys/system/cmd/goto.c
View file

@ -71,6 +71,7 @@ INT cmd_goto (LPTSTR cmd, LPTSTR param)
while (*tmp && !_istspace (*tmp)) while (*tmp && !_istspace (*tmp))
tmp++; tmp++;
*tmp = _T('\0'); *tmp = _T('\0');
/* set file pointer to the beginning of the batch file */ /* set file pointer to the beginning of the batch file */
lNewPosHigh = 0; lNewPosHigh = 0;
@ -78,26 +79,40 @@ INT cmd_goto (LPTSTR cmd, LPTSTR param)
while (FileGetString (bc->hBatchFile, textline, sizeof(textline))) while (FileGetString (bc->hBatchFile, textline, sizeof(textline)))
{ {
int pos;
int size;
/* Strip out any trailing spaces or control chars */ /* Strip out any trailing spaces or control chars */
tmp = textline + _tcslen (textline) - 1; tmp = textline + _tcslen (textline) - 1;
while (_istcntrl (*tmp) || _istspace (*tmp))
while (_istcntrl (*tmp) || _istspace (*tmp))
tmp--; tmp--;
*(tmp + 1) = _T('\0'); *(tmp + 1) = _T('\0');
/* Then leading spaces... */ /* Then leading spaces... */
tmp = textline; tmp = textline;
while (_istspace (*tmp)) while (_istspace (*tmp))
tmp++; tmp++;
/* use only 1st 8 chars of label */ /* All space after leading space terminate the string */
if ((*tmp == _T(':')) && (_tcsncmp (++tmp, param, 8) == 0)) size = _tcslen(tmp) -1;
pos=0;
while (tmp+pos < tmp+size)
{
if (_istspace(tmp[pos]))
tmp[pos]=_T('\0');
pos++;
}
/* use whole label name */
if ((*tmp == _T(':')) && (_tcsicmp (++tmp, param) == 0))
return 0; return 0;
} }
LoadString(CMD_ModuleHandle, STRING_GOTO_ERROR2, szMsg, RC_STRING_MAX_SIZE); LoadString(CMD_ModuleHandle, STRING_GOTO_ERROR2, szMsg, RC_STRING_MAX_SIZE);
ConErrPrintf(szMsg, param); ConErrPrintf(szMsg, param);
ExitBatch(NULL); ExitBatch(NULL);
return 1; return 1;
} }