 |
 |
| View previous topic :: View next topic |
| Author |
Message |
Mark
Joined: 07 Sep 2003
Posts: 2838
Location: Atlanta, GA
|
| sscanf() for CCS |
 Posted: Fri Aug 13, 2004 10:05 am |
 |
|
Okay, here is a sscanf() function for you CCS guys. I sort of cheated how I handled the variable arguments but I will include a test program so you can see how to use it. Enjoy
sscanf.c
| Code: |
/*$F*************************************************************************
*
* Copyright (C)pa 2004 Mark Norton
*
* Permission is hereby granted, free of charge, to any person obtaining
* a copy of this software and associated documentation files (the
* "Software"), to deal in the Software without restriction, including
* without limitation the rights to use, copy, modify, merge, publish,
* distribute, sublicense, and/or sell copies of the Software, and to
* permit persons to whom the Software is furnished to do so, subject to
* the following conditions:
*
* The above copyright notice and this permission notice shall be included
* in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
*
* Functional
* Description: Implementation of sscanf() function for the CCS compiler
*
*****************************************************************************/
#include <string.h>
#include <stdlib.h>
int8 sscanf(
char *buf, /* pointer to the buffer that we are scanning */
char *fmt, /* pointer to the format string */
char *pArgs) /* pointer to array of arguments */
{
int8 count = 0;
char *p;
int1 size_long;
char *endptr;
while (1)
{
/* Look to see if we are out of arguments */
if ( !pArgs )
return( count );
/* Gobble up the fmt string */
while (*buf == *fmt)
{
if ((*buf == 0) || (*fmt == 0))
return (count);
buf++;
fmt++;
}
/* Check for the % */
if (*fmt != '%')
break;
/* fmt should be '%' go to the next character */
fmt++;
/* get the size modifier */
switch (*fmt)
{
case 'l':
case 'L':
fmt++;
size_long = TRUE;
break;
default:
size_long = FALSE;
break;
}
/* fmt should point to our first conversion letter at this point */
switch (*fmt)
{
case 'f':
case 'F':
/* Get a pointer to this argument */
p = (float *)(*pArgs);
/* convert to a number */
*(float *)p = (float)strtod(buf, &endptr);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
case 'd':
case 'D':
/* Get a pointer to this argument */
p = (signed int8 *)(*pArgs);
/* convert to a number */
if ( size_long )
*(signed int16 *)p = (signed int16)strtol(buf, &endptr, 10);
else
*(signed int8 *)p = (signed int8)strtol(buf, &endptr, 10);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
case 'u':
case 'U':
/* Get a pointer to this argument */
p = (int8 *)(*pArgs);
/* convert to a number */
if ( size_long )
*(int16 *)p = (int16) strtoul(buf, &endptr, 10);
else
*(int8 *)p = (int8) strtoul(buf, &endptr, 10);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
case 's':
/* Get a pointer to this argument */
p = (char *)(*pArgs);
/* copy the chars */
while (1)
{
if ((isspace(*buf)) || (!*buf))
{
*p = 0;
break;
}
else
{
*p = *buf;
p++;
buf++;
}
}
/* count this one */
count++;
break;
case 'x':
case 'X':
/* Get a pointer to this argument */
p = (int8 *)(*pArgs);
/* convert to a number */
if ( size_long )
*(int16 *)p = (int16) strtoul(buf, &endptr, 16);
else
*(int8 *)p = (int8) strtoul(buf, &endptr, 16);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
/* unhandled format specifier */
default:
return (count);
}
/* Technically this is incorrect but since the size of all pointers
are the same, who cares ;)
point to the next argument
*/
pArgs += sizeof(char *);
/* Move to the next format char */
fmt++;
}
return (count);
}
|
|
|
 |
Mark
Joined: 07 Sep 2003
Posts: 2838
Location: Atlanta, GA
|
| And a test file |
| Posted: Fri Aug 13, 2004 10:05 am |
|
|
And here is a test file
test.c
| Code: |
#include <18F452.h>
#device *=16
#fuses HS,NOWDT,NOPROTECT,NOLVP
#use delay(clock=10000000)
#use rs232(baud=9600, xmit=PIN_C6, rcv=PIN_C7) // Jumpers: 8 to 11, 7 to 12
#include <input.c>
#include "sscanf.c"
void main(void) {
int i=0;
char string[80];
char fmt[40];
float vfloat;
int8 vint8;
int16 vint16;
char vstring[10];
signed int8 vsint8;
signed int16 vsint16;
int8 vhex;
int16 vhexlong;
int8* arglist[9];
while(TRUE)
{
strcpy(fmt, "sscanf test %f %u %lu %s %d %ld %x %lx\r\n");
arglist[0] = &vfloat;
arglist[1] = &vint8;
arglist[2] = &vint16;
arglist[3] = &vstring[0];
arglist[4] = &vsint8;
arglist[5] = &vsint16;
arglist[6] = &vhex;
arglist[7] = &vhexlong;
/* It is a good idea to terminate the list but not necessary if the format is correct */
arglist[8] = NULL;
printf("\r\nType sscanf test f u lu s d ld x lx\r\n");
get_string(string, sizeof(string));
i = sscanf(string, fmt, arglist);
if ( i != 8 )
{
printf("\r\nFailed - %u parameters read",i);
continue;
}
else
{
printf("\r\nVar Float = %f", vfloat);
printf("\r\nVar Int = %u", vint8);
printf("\r\nVar Long = %lu", vint16);
printf("\r\nVar String = %s", vstring);
printf("\r\nVar Signed Int = %d", vsint8);
printf("\r\nVar Signed Long = %ld", vsint16);
printf("\r\nVar Hex = %x", vhex);
printf("\r\nVar Hex Long = %lx", vhexlong);
}
strcpy(fmt, "%f\r\n");
arglist[0] = &vfloat;
arglist[1] = NULL;
while (1)
{
printf("\r\nType in a float (enter to skip)\r\n");
get_string(string, sizeof(string));
if ( !string[0] )
break;
i = sscanf(string, fmt, arglist);
if ( i != 1 )
{
printf("\r\nFailed - %u parameters read",i);
continue;
}
else
{
printf("\r\nVar Float = %f", vfloat);
printf("\r\nVar Int = %u", vint8);
printf("\r\nVar Long = %lu", vint16);
printf("\r\nVar String = %s", vstring);
printf("\r\nVar Signed Int = %d", vsint8);
printf("\r\nVar Signed Long = %ld", vsint16);
printf("\r\nVar Hex = %x", vhex);
printf("\r\nVar Hex Long = %lx", vhexlong);
}
}
strcpy(fmt, "%u\r\n");
arglist[0] = &vint8;
arglist[1] = NULL;
while (1)
{
printf("\r\nType in a int (enter to skip)\r\n");
get_string(string, sizeof(string));
if ( !string[0] )
break;
i = sscanf(string, fmt, arglist);
if ( i != 1 )
{
printf("\r\nFailed - %u parameters read",i);
continue;
}
else
{
printf("\r\nVar Float = %f", vfloat);
printf("\r\nVar Int = %u", vint8);
printf("\r\nVar Long = %lu", vint16);
printf("\r\nVar String = %s", vstring);
printf("\r\nVar Signed Int = %d", vsint8);
printf("\r\nVar Signed Long = %ld", vsint16);
printf("\r\nVar Hex = %x", vhex);
printf("\r\nVar Hex Long = %lx", vhexlong);
}
}
strcpy(fmt, "%lu\r\n");
arglist[0] = &vint16;
arglist[1] = NULL;
while (1)
{
printf("\r\nType in a long (enter to skip)\r\n");
get_string(string, sizeof(string));
if ( !string[0] )
break;
i = sscanf(string, fmt, arglist);
if ( i != 1 )
{
printf("\r\nFailed - %u parameters read",i);
continue;
}
else
{
printf("\r\nVar Float = %f", vfloat);
printf("\r\nVar Int = %u", vint8);
printf("\r\nVar Long = %lu", vint16);
printf("\r\nVar String = %s", vstring);
printf("\r\nVar Signed Int = %d", vsint8);
printf("\r\nVar Signed Long = %ld", vsint16);
printf("\r\nVar Hex = %x", vhex);
printf("\r\nVar Hex Long = %lx", vhexlong);
}
}
strcpy(fmt, "%s\r\n");
arglist[0] = &vstring[0];
arglist[1] = NULL;
while (1)
{
printf("\r\nType in a string (enter to skip)\r\n");
get_string(string, sizeof(string));
if ( !string[0] )
break;
i = sscanf(string, fmt, arglist);
if ( i != 1 )
{
printf("\r\nFailed - %u parameters read",i);
continue;
}
else
{
printf("\r\nVar Float = %f", vfloat);
printf("\r\nVar Int = %u", vint8);
printf("\r\nVar Long = %lu", vint16);
printf("\r\nVar String = %s", vstring);
printf("\r\nVar Signed Int = %d", vsint8);
printf("\r\nVar Signed Long = %ld", vsint16);
printf("\r\nVar Hex = %x", vhex);
printf("\r\nVar Hex Long = %lx", vhexlong);
}
}
strcpy(fmt, "%d\r\n");
arglist[0] = &vsint8;
arglist[1] = NULL;
while (1)
{
printf("\r\nType in a signed int (enter to skip)\r\n");
get_string(string, sizeof(string));
if ( !string[0] )
break;
i = sscanf(string, fmt, arglist);
if ( i != 1 )
{
printf("\r\nFailed - %u parameters read",i);
continue;
}
else
{
printf("\r\nVar Float = %f", vfloat);
printf("\r\nVar Int = %u", vint8);
printf("\r\nVar Long = %lu", vint16);
printf("\r\nVar String = %s", vstring);
printf("\r\nVar Signed Int = %d", vsint8);
printf("\r\nVar Signed Long = %ld", vsint16);
printf("\r\nVar Hex = %x", vhex);
printf("\r\nVar Hex Long = %lx", vhexlong);
}
}
strcpy(fmt, "%ld\r\n");
arglist[0] = &vsint16;
arglist[1] = NULL;
while (1)
{
printf("\r\nType in a signed long (enter to skip)\r\n");
get_string(string, sizeof(string));
if ( !string[0] )
break;
i = sscanf(string, fmt, arglist);
if ( i != 1 )
{
printf("\r\nFailed - %u parameters read",i);
continue;
}
else
{
printf("\r\nVar Float = %f", vfloat);
printf("\r\nVar Int = %u", vint8);
printf("\r\nVar Long = %lu", vint16);
printf("\r\nVar String = %s", vstring);
printf("\r\nVar Signed Int = %d", vsint8);
printf("\r\nVar Signed Long = %ld", vsint16);
printf("\r\nVar Hex = %x", vhex);
printf("\r\nVar Hex Long = %lx", vhexlong);
}
}
strcpy(fmt, "%x\r\n");
arglist[0] = &vhex;
arglist[1] = NULL;
while (1)
{
printf("\r\nType in a hex (enter to skip)\r\n");
get_string(string, sizeof(string));
if ( !string[0] )
break;
i = sscanf(string, fmt, arglist);
if ( i != 1 )
{
printf("\r\nFailed - %u parameters read",i);
continue;
}
else
{
printf("\r\nVar Float = %f", vfloat);
printf("\r\nVar Int = %u", vint8);
printf("\r\nVar Long = %lu", vint16);
printf("\r\nVar String = %s", vstring);
printf("\r\nVar Signed Int = %d", vsint8);
printf("\r\nVar Signed Long = %ld", vsint16);
printf("\r\nVar Hex = %x", vhex);
printf("\r\nVar Hex Long = %lx", vhexlong);
}
}
strcpy(fmt, "%lx\r\n");
arglist[0] = &vhexlong;
arglist[1] = NULL;
while (1)
{
printf("\r\nType in a long hex (enter to skip)\r\n");
get_string(string, sizeof(string));
if ( !string[0] )
break;
i = sscanf(string, fmt, arglist);
if ( i != 1 )
{
printf("\r\nFailed - %u parameters read",i);
continue;
}
else
{
printf("\r\nVar Float = %f", vfloat);
printf("\r\nVar Int = %u", vint8);
printf("\r\nVar Long = %lu", vint16);
printf("\r\nVar String = %s", vstring);
printf("\r\nVar Signed Int = %d", vsint8);
printf("\r\nVar Signed Long = %ld", vsint16);
printf("\r\nVar Hex = %x", vhex);
printf("\r\nVar Hex Long = %lx", vhexlong);
}
}
}
}
|
|
|
|
Mark
Joined: 07 Sep 2003
Posts: 2838
Location: Atlanta, GA
|
| I put her on a diet |
| Posted: Fri Aug 13, 2004 2:04 pm |
|
|
This code is smaller and allows you to disable the formats that you are not using
| Code: |
/*$F*************************************************************************
*
* Copyright (C)pa 2004 Mark Norton
*
* Permission is hereby granted, free of charge, to any person obtaining
* a copy of this software and associated documentation files (the
* "Software"), to deal in the Software without restriction, including
* without limitation the rights to use, copy, modify, merge, publish,
* distribute, sublicense, and/or sell copies of the Software, and to
* permit persons to whom the Software is furnished to do so, subject to
* the following conditions:
*
* The above copyright notice and this permission notice shall be included
* in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
*
* Functional
* Description: Implementation of sscanf() function for the CCS compiler
*
*****************************************************************************/
#include <string.h>
#include <stdlib.h>
/* Uncomment any of these to reduce the code size
Note that the HEX is a big hog
*/
// #define NO_FLOAT
// #define NO_INT
// #define NO_SIGNED_INT
// #define NO_STRING
// #define NO_HEX
/* *************************************************************************
DESCRIPTION: Converts string pointed to by s to an unsigned long (16 bit)
RETURN: result of the conversion
ALGORITHM: none
NOTES: the next position in the string is returned in endptr
*************************************************************************** */
long my_atoul(char *s, char *endptr, int base)
{
signed long result;
int index;
char c;
index = 0;
result = 0;
*endptr = s;
if (( !s ) || ( !*s ))
return ( 0 );
c = *s;
// increase index if positive sign is detected
if (c == '+')
{
c = *(++s);
}
// The number is a decimal number
if (base == 10)
{
while (c >= '0' && c <= '9')
{
result = 10*result + (c - '0');
c = *(++s);
}
}
else if (base == 16) // The number is a hexa number
{
if (c == '0' && (*(s+1) == 'x' || *(s+1) == 'X'))
{
s += 2;
c = *s;
}
c = toupper(c);
while ( 1 )
{
if (c >= '0' && c <= '9')
result = (result << 4) + (c - '0');
else if (c >= 'A' && c <='F')
result = (result << 4) + (c - 'A' + 10);
else
break;
c = toupper(*(++s));
}
}
*endptr = s;
return(result);
}
/* *************************************************************************
DESCRIPTION: Converts string pointed to by s to a float
RETURN: result of the conversion
ALGORITHM: none
NOTES: the next position in the string is returned in endptr
*************************************************************************** */
float my_atof(char * s, char *endptr)
{
float pow10 = 1.0;
float result = 0.0;
int sign = 0;
char c;
c = *s;
if(c == '-')
{
sign = 1;
c = *(++s);
}
else if(c == '+')
c = *(++s);
while((c >= '0' && c <= '9'))
{
result = 10*result + c - '0';
c = *(++s);
}
if (c == '.')
{
c = *(++s);
while((c >= '0' && c <= '9'))
{
pow10 = pow10*10;
result += (c - '0')/pow10;
c = *(++s);
}
}
if (sign == 1)
result = -1*result;
*endptr = s;
return(result);
}
/* *************************************************************************
DESCRIPTION: Implementation of scanf() using CCS C compiler
RETURN: total number of arguments read
ALGORITHM: none
NOTES: none
*************************************************************************** */
int8 sscanf(
char *buf, /* pointer to the buffer that we are scanning */
char *fmt, /* pointer to the format string */
char *pArgs) /* pointer to array of arguments */
{
int8 count = 0;
char *p;
int1 size_long;
int1 sign;
char *endptr;
while (1)
{
/* Look to see if we are out of arguments */
if ( !pArgs )
return( count );
/* Gobble up the fmt string */
while (*buf == *fmt)
{
if ((*buf == 0) || (*fmt == 0))
return (count);
buf++;
fmt++;
}
/* Check for the % */
if (*fmt != '%')
break;
/* fmt should be '%' go to the next character */
fmt++;
/* get the size modifier */
switch (*fmt)
{
case 'l':
case 'L':
fmt++;
size_long = TRUE;
break;
default:
size_long = FALSE;
break;
}
/* fmt should point to our first conversion letter at this point */
switch (*fmt)
{
#ifndef NO_FLOAT
case 'f':
case 'F':
/* Get a pointer to this argument */
p = (float *)(*pArgs);
/* convert to a number */
*(float *)p = (float)my_atof(buf, &endptr);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
#endif
#ifndef NO_SIGNED_INT
case 'd':
case 'D':
/* Get a pointer to this argument */
p = (signed int8 *)(*pArgs);
if (*buf == '-')
{
buf++;
sign = TRUE;
}
else
sign = FALSE;
/* convert to a number */
if ( size_long )
{
*(signed int16 *)p = (signed int16)my_atoul(buf, &endptr, 10);
if (sign)
*(signed int16 *)p = -(*(signed int16 *)p);
}
else
{
*(signed int8 *)p = (signed int8)my_atoul(buf, &endptr, 10);
if (sign)
*(signed int8 *)p = -(*(signed int8 *)p);
}
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
#endif
#ifndef NO_INT
case 'u':
case 'U':
/* Get a pointer to this argument */
p = (int8 *)(*pArgs);
/* convert to a number */
if ( size_long )
*(int16 *)p = (int16) my_atoul(buf, &endptr, 10);
else
*(int8 *)p = (int8) my_atoul(buf, &endptr, 10);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
#endif
#ifndef NO_STRING
case 's':
/* Get a pointer to this argument */
p = (char *)(*pArgs);
/* copy the chars */
while (1)
{
if ((isspace(*buf)) || (!*buf))
{
*p = 0;
break;
}
else
{
*p = *buf;
p++;
buf++;
}
}
/* count this one */
count++;
break;
#endif
#ifndef NO_HEX
case 'x':
case 'X':
/* Get a pointer to this argument */
p = (int8 *)(*pArgs);
/* convert to a number */
if ( size_long )
*(int16 *)p = (int16) my_atoul(buf, &endptr, 16);
else
*(int8 *)p = (int8) my_atoul(buf, &endptr, 16);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
#endif
/* unhandled format specifier */
default:
return (count);
}
/* Technically this is incorrect but since the size of all pointers
are the same, who cares ;)
point to the next argument
*/
pArgs += sizeof(char *);
/* Move to the next format char */
fmt++;
}
return (count);
}
|
|
|
|
maikelmeyers
Joined: 19 Jan 2007
Posts: 8
|
|
| Posted: Fri Jan 19, 2007 1:03 pm |
|
|
You have to do a little change, when you want to use this routines with 16bit pointers
| Code: |
long my_atoul(char *s, int16 *endptr, int base)
|
otherwise *endptr = s; results in an unpridictable address |
|
|
Mark
Joined: 07 Sep 2003
Posts: 2838
Location: Atlanta, GA
|
|
| Posted: Fri Jan 19, 2007 1:14 pm |
|
|
| I don't think so. The 18F actually uses 16 bit pointers. Changing the pointer type will cause you problems when you increment the pointer. A pointer to a char will cause the value of the pointer to increment by 1 where as a pointer to a int16 will cause the value of the pointer to increment by 2! |
|
|
maikelmeyers
Joined: 19 Jan 2007
Posts: 8
|
|
| Posted: Fri Jan 19, 2007 4:44 pm |
|
|
It's not that I think only this was a problem. I've tried it, and this routine does not work without this little correction. It took a little time ;)
The increment is not the problem, it's this assignment in the long my_atoul() routine:
long my_atoul(char *s, char *endptr, int base)
*endptr = s;
endptr is used as a pointer to a pointer (16bit), but you defined that endptr is a pointer to char (8bit). Now, when you try to load the content to which endptr points, it will load only 8 bits, but s is a address (16bit), so the upper 8 bits of the address are not copied.
Sorry for my bad english, hope you understand now.
greets |
|
|
maikelmeyers
Joined: 19 Jan 2007
Posts: 8
|
|
| Posted: Fri Jan 19, 2007 4:49 pm |
|
|
| And why don't you use the variable arguments list, like the original sscanf? |
|
|
Mark
Joined: 07 Sep 2003
Posts: 2838
Location: Atlanta, GA
|
|
| Posted: Sat Jan 20, 2007 2:51 pm |
|
|
| maikelmeyers wrote: | | And why don't you use the variable arguments list, like the original sscanf? |
CCS didn't support them in 2004! Maybe they do now, but I am not sure |
|
|
Mark
Joined: 07 Sep 2003
Posts: 2838
Location: Atlanta, GA
|
|
| Posted: Sat Jan 20, 2007 2:52 pm |
|
|
| maikelmeyers wrote: | It's not that I think only this was a problem. I've tried it, and this routine does not work without this little correction. It took a little time ;)
The increment is not the problem, it's this assignment in the long my_atoul() routine:
long my_atoul(char *s, char *endptr, int base)
*endptr = s;
endptr is used as a pointer to a pointer (16bit), but you defined that endptr is a pointer to char (8bit). Now, when you try to load the content to which endptr points, it will load only 8 bits, but s is a address (16bit), so the upper 8 bits of the address are not copied.
Sorry for my bad english, hope you understand now.
greets |
endptr should be a char** which is a pointer to a pointer. |
|
|
maikelmeyers
Joined: 19 Jan 2007
Posts: 8
|
|
| Posted: Mon Jan 22, 2007 6:51 am |
|
|
OK, now here is a version with variable arguments
| Code: |
/* *************************************************************************
DESCRIPTION: Implementation of scanf() using CCS C compiler
RETURN: total number of arguments read
ALGORITHM: none
NOTES: none
*************************************************************************** */
int8 sscanf(
char *buf, /* pointer to the buffer that we are scanning */
char *fmt, /* pointer to the format string */
...) /* variable arguments */
{
va_list pArgs;
int8 count = 0;
char *p;
int1 size_long;
int1 sign;
char *endptr;
va_start (pArgs,0);
while (TRUE)
{
/* Gobble up the fmt string */
while (*buf == *fmt)
{
if ((*buf == 0) || (*fmt == 0))
return (count);
buf++;
fmt++;
}
/* Check for the % */
if (*fmt != '%')
break;
/* fmt should be '%' go to the next character */
fmt++;
/* get the size modifier */
switch (*fmt)
{
case 'l':
case 'L':
fmt++;
size_long = TRUE;
break;
default:
size_long = FALSE;
break;
}
/* fmt should point to our first conversion letter at this point */
switch (*fmt)
{
#ifndef NO_FLOAT
case 'f':
case 'F':
/* convert to a number */
*((float *)va_arg(pArgs,float*)) = my_atof(buf, &endptr);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
#endif
#ifndef NO_SIGNED_INT
case 'd':
case 'D':
/* Get a pointer to this argument */
p = va_arg(pArgs,signed int16*);
if (*buf == '-')
{
buf++;
sign = TRUE;
}
else
sign = FALSE;
/* convert to a number */
if ( size_long )
{
*(signed int16 *)p = (signed int16)my_atoul(buf, &endptr, 10);
if (sign)
*(signed int16 *)p = -(*(signed int16 *)p);
}
else
{
*(signed int8 *)p = (signed int8)my_atoul(buf, &endptr, 10);
if (sign)
*(signed int8 *)p = -(*(signed int8 *)p);
}
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
#endif
#ifndef NO_INT
case 'u':
case 'U':
/* convert to a number */
if ( size_long )
*((int16*)va_arg(pArgs,int16*)) = (int16) my_atoul(buf, &endptr, 10);
else
*((int8 *)va_arg(pArgs,int8*)) = (int8) my_atoul(buf, &endptr, 10);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
#endif
#ifndef NO_STRING
case 's':
/* Get a pointer to this argument */
p = (char *) va_arg(pArgs,char *);
/* copy the chars */
while (TRUE)
{
if ((isspace(*buf)) || (!*buf))
{
*p = 0;
break;
}
else
{
*p = *buf;
p++;
buf++;
}
}
/* count this one */
count++;
break;
#endif
#ifndef NO_HEX
case 'x':
case 'X':
/* convert to a number */
if ( size_long )
*((int16*)va_arg(pArgs,int16*)) = (int16) my_atoul(buf, &endptr, 16);
else
*((int8 *)va_arg(pArgs,int8*)) = (int8) my_atoul(buf, &endptr, 16);
/* Make sure that we succeeded */
if ( buf == endptr )
return ( count );
buf = endptr;
/* count this one */
count++;
break;
#endif
/* unhandled format specifier */
default:
return (count);
}
/* Move to the next format char */
fmt++;
}
return (count);
} |
|
|
|
robinaspey
Joined: 01 Oct 2008
Posts: 4
Location: England (for time being)
|
| sscanf code (Mark Norton) |
| Posted: Wed Oct 01, 2008 10:07 am |
|
|
I'm having some trouble with the versions of sscanf posted, here is the
code I was using to test the function (below):
The error I get is passing the pointer to the parameter buffer which
is passed to sscanf Message is: "Attempt to create a pointer to a constant"
which I cant get past ?!
| Code: | #include <18F452.h>
#device ICD=TRUE *=16 // 16 bit pointers
#include <stdio.h>
#include <string.h>
#include "sscanf_3.c"
#fuses HS, WDT, BROWNOUT, NOPROTECT, NOPUT
#fill_rom 0xFF
#HEXCOMMENT Version 0.1 // Add comment to HEX EEPROM file
#use DELAY(CLOCK=20000000, RESTART_WDT)
#use RS232(BAUD=9600, XMIT=PIN_C6, RCV=PIN_C7, RESTART_WDT, ERRORS, STREAM=ASTID)
typedef unsigned char BOOL ;
typedef unsigned char UINT8; // 1 byte 0 to 255
typedef unsigned int16 UINT16; // 2 bytes 0 to 65535
typedef unsigned int32 UINT32; // 4 bytes 0 to 4294967295
int main(void)
{
UINT8 counter = 0 ;
UINT8 hours = 5 ;
UINT8 minutes = 0 ;
UINT8 seconds = 0 ;
UINT8 h = 0, m = 0, s = 0 ;
CHAR buffer[40] ;
CHAR *ptr2 ;
char rom *rptr ;
while(1)
{
// if (counter % 5 == 0)
// if (++seconds % 60 == 0)
// seconds = 0;
// if (++minutes % 60 == 0)
// { if (++hours > 12) hours = 0;
// minutes = 0;
// }
sprintf(buffer, "%02u:%02u:%02u", hours, minutes, seconds);
printf("\r\n Time : %s", buffer);
sscanf(buffer, "%02u:%02u:%02u", &h, &m, &s);
fprintf(ASTID, "\r\n Counting : %d %02u:02u:%02u", counter++, h,m,s);
delay_ms(200);
} return(0);
} |
_________________
Thanks in advance ... |
|
|
PCM programmer
Joined: 06 Sep 2003
Posts: 21708
|
|
| Posted: Wed Oct 01, 2008 12:10 pm |
|
|
I didn't analyze your code, but adding this statement to your program
may help. This feature is available in vs. 4.xxx of the CCS compiler.
| Code: | | #device PASS_STRINGS=IN_RAM |
See this post for an example:
http://www.ccsinfo.com/forum/viewtopic.php?t=34302&start=5 |
|
|
robinaspey
Joined: 01 Oct 2008
Posts: 4
Location: England (for time being)
|
| Sscanf code (Mark Norton) |
| Posted: Thu Oct 02, 2008 5:00 am |
|
|
Adding the directive to pass strings in RAM certainly helped the program
compile but I havent so far managed to get the variables to copy the data
using the sscanf function (version with variable argument list). I will keep picking through it - the current return values are all zero so I guess it may be the bug pointed to (if it is a bug) by the previous posters.
_________________
Thanks in advance ... |
|
|
dbotkin
Joined: 08 Sep 2003
Posts: 197
Location: Omaha NE USA
|
|
| Posted: Thu Oct 23, 2008 5:00 pm |
|
|
Yeah, me too. This:
| Code: |
sprintf(sbuffer,"cn djkfr n /S30\n\r");
x = sscanf(sbuffer, "/%C%d%", &cmd, ¶m);
printf("sscanf() sez: x=%u, cmd=%X, param=%u\n\r", x, cmd, param);
|
gives me a compile error "Expecting a close paren" after &cmd in the sscanf() call. I'm not a "real" C programmer, so it's probably just something I don't get yet. Pointers? I can read, even if it sometimes takes a while to comprehend...  |
|
|
PCM programmer
Joined: 06 Sep 2003
Posts: 21708
|
|
| Posted: Thu Oct 23, 2008 5:16 pm |
|
|
For everyone:
If you say it doesn't compile, you need to post your compiler version.
Also say if you're trying to compile the code in Mark's original post
or the shorter version that he posted later.
Tell if you're using Mark's test program or your own test program.
If it's your own, then post it. |
|
|
|
|
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
|
Powered by phpBB © 2001, 2005 phpBB Group
|
FAQ 
Search
Register
Profile 
Log in to check your private messages 
Log in
