2005-02-09 Ralf Corsepius <ralf.corsepius@rtems.org>

* libmisc/untar/untar.c (_rtems_octal2ulong): Replace.
This commit is contained in:
Ralf Corsepius
2005-02-09 03:24:29 +00:00
parent ad0b1f5c6a
commit f3ad98f483
2 changed files with 6 additions and 5 deletions

View File

@@ -1,3 +1,7 @@
2005-02-09 Ralf Corsepius <ralf.corsepius@rtems.org>
* libmisc/untar/untar.c (_rtems_octal2ulong): Replace.
2005-02-08 Ralf Corsepius <ralf.corsepius@rtems.org>
* ftpd/Makefile.am: Split preinstallation rules in to separate

View File

@@ -70,18 +70,15 @@ _rtems_octal2ulong(const char *octascii, size_t len)
{
size_t i;
unsigned long num;
unsigned long mult;
num = 0;
mult = 1;
for (i=len-1; i>=0; i--)
for (i=0; i < len; i++)
{
if ((octascii[i] < '0') || (octascii[i] > '9'))
{
continue;
}
num += mult*((unsigned long)(octascii[i] - '0'));
mult *= 8;
num = num * 8 + ((unsigned long)(octascii[i] - '0'));
}
return(num);
}