~ubuntu-branches/ubuntu/raring/avr-libc/raring-proposed

« back to all changes in this revision

Viewing changes to tests/simulate/scanf/sscanf-o1.c

  • Committer: Bazaar Package Importer
  • Author(s): Hakan Ardo
  • Date: 2009-10-31 11:52:10 UTC
  • mfrom: (1.1.8 upstream) (4.1.2 squeeze)
  • Revision ID: james.westby@ubuntu.com-20091031115210-x0mlijnegkce86fk
Tags: 1:1.6.7-1
* New upstream relese (closes: #544030)
* Added lintian overrides (closes: #553265)

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/* Test of scanf(): 'o' conversion directive.
2
 
   $Id: sscanf-o1.c,v 1.2.2.3 2008/03/20 21:42:34 joerg_wunsch Exp $    */
3
 
 
4
 
#include <stdio.h>
5
 
#include <stdlib.h>
6
 
#include <string.h>
7
 
#include "progmem.h"
8
 
 
9
 
#ifdef  __AVR__
10
 
# define ASSERT(expr)                   \
11
 
    do {                                \
12
 
        if (!(expr)) exit(__LINE__);    \
13
 
    } while (0)
14
 
# define EXIT(v)        exit (v)
15
 
# if defined(__AVR_ATmega128__)
16
 
  /* ATmega128 has enough RAM for sprintf(), print to 0x2000 in XRAM. */
17
 
#  define PRINTF(f...)  sprintf((char *)0x2000, f)
18
 
# else
19
 
  /* small AVR */
20
 
#  define PRINTF(f...)
21
 
# endif
22
 
#else
23
 
# include <assert.h>
24
 
# define ASSERT(expr)   assert (expr)
25
 
# define EXIT(v)        exit ((v) < 256 ? (v) : 255)
26
 
# define PRINTF(f...)   printf (f)
27
 
# define sscanf_P       sscanf
28
 
# define memcmp_P       memcmp
29
 
#endif
30
 
 
31
 
/* Next variables are useful to debug the AVR.  */
32
 
int vrslt = 1;
33
 
struct {
34
 
    unsigned int i[10];
35
 
    char s[10];
36
 
} v = { {1}, {1} };
37
 
 
38
 
void Check (int line, int expval, int rslt)
39
 
{
40
 
    vrslt = rslt;
41
 
    if (rslt != expval) {
42
 
        PRINTF ("\nLine %d:  expect= %d, rslt= %d\n", line, expval, rslt);
43
 
        EXIT (line);
44
 
    }
45
 
}
46
 
 
47
 
/* The sscanf() is called 4 times: SRAM and FLASH format, 2 values
48
 
   to fill before run.  */
49
 
#define CHECK(expval, ass_expr, str, fmt, ...)                          \
50
 
    do {                                                                \
51
 
        PROGMEM static char fmt_p[] = fmt;                              \
52
 
        char str_s[220];                                                \
53
 
        char fmt_s[40];                                                 \
54
 
        char FILL;                                                      \
55
 
        int i;                                                          \
56
 
        int (* volatile vp)(const char *, const char *, ...);           \
57
 
                                                                        \
58
 
        ASSERT (sizeof(str_s) >= sizeof(str));                          \
59
 
        ASSERT (sizeof(fmt_s) >= sizeof(fmt_p));                        \
60
 
        strcpy_P (str_s, PSTR(str));                                    \
61
 
        strcpy_P (fmt_s, fmt_p);                                        \
62
 
                                                                        \
63
 
        for (FILL = 0; FILL < 4; FILL++) {                              \
64
 
            memset (&v, FILL, sizeof(v));                               \
65
 
            vp = (FILL & 1) ? sscanf_P : sscanf;                        \
66
 
            i = vp (str_s, (FILL & 1) ? fmt_p : fmt_s, ##__VA_ARGS__);  \
67
 
            Check (__LINE__, expval, i);                                \
68
 
            ASSERT (ass_expr);                                          \
69
 
        }                                                               \
70
 
    } while (0)
71
 
 
72
 
#define PVEC(args...)   ({ static int __x[] PROGMEM = {args}; __x; })
73
 
 
74
 
int main ()
75
 
{
76
 
    /* Empty input.     */
77
 
    CHECK (-1, (*(char *)v.i == FILL), "", "%o", v.i);
78
 
    CHECK (-1, (*(char *)v.i == FILL), "", " %o", v.i);
79
 
    CHECK (-1, (*(char *)v.i == FILL), " ", " %o", v.i);
80
 
    CHECK (-1, (*(char *)v.i == FILL), " ", "  %o", v.i);
81
 
    CHECK (-1, (*(char *)v.i == FILL), "\t\n\v\f\r", " %o", v.i);
82
 
 
83
 
    /* Normal conversion.       */
84
 
    CHECK (1, (v.i[0] == 0), "0", "%o", v.i);
85
 
    CHECK (
86
 
        10,
87
 
        !memcmp_P (
88
 
            v.i,
89
 
            PVEC (0, 0, 1, 0123456, 077777, 0100000, 0177777, -1,
90
 
                  012345, -07654),
91
 
            10 * sizeof(int)),
92
 
        "+0 -0 1 123456 77777 100000 177777 -1 +12345 -7654",
93
 
        "%o %o %o %o %o %o %o %o %o %o",
94
 
        v.i + 0, v.i + 1,
95
 
        v.i + 2, v.i + 3,
96
 
        v.i + 4, v.i + 5,
97
 
        v.i + 6, v.i + 7,
98
 
        v.i + 8, v.i + 9);
99
 
 
100
 
    /* Leading spaces.  */
101
 
    CHECK (1, (v.i[0] == 012), " 12", "%o", v.i);
102
 
    CHECK (1, (v.i[0] == 0123), "\t\n\v\f\r123", "%o", v.i);
103
 
 
104
 
    /* Leading '0'.     */
105
 
    CHECK (1, (v.i[0] == 04567), "04567", "%o", v.i);
106
 
    CHECK (1, (v.i[0] == 07654), "00000000007654", "%o", v.i);
107
 
 
108
 
    /* End of number.   */
109
 
    CHECK (2, v.i[0] == 0 && v.s[0] == 'x', "0x1", "%o%c", v.i, v.s);
110
 
    CHECK (
111
 
        14,
112
 
        !memcmp_P (v.i, PVEC (1,2,3,4,5,6,7), 7 * sizeof(int))
113
 
        && !memcmp_P (v.s, PSTR(" \n.89\001\377"), 7),
114
 
        "1 2\n3.48596\0017\3776",
115
 
        "%o%c%o%c%o%c%o%c%o%c%o%c%o%c",
116
 
        v.i + 0, v.s + 0,
117
 
        v.i + 1, v.s + 1,
118
 
        v.i + 2, v.s + 2,
119
 
        v.i + 3, v.s + 3,
120
 
        v.i + 4, v.s + 4,
121
 
        v.i + 5, v.s + 5,
122
 
        v.i + 6, v.s + 6);
123
 
    CHECK (
124
 
        3,
125
 
        !memcmp_P (v.i, PVEC (1, -2, 3), 3 * sizeof(int)),
126
 
        "1-2+3", "%o%o%o", v.i, v.i + 1, v.i + 2);
127
 
 
128
 
    return 0;
129
 
}