2 * general implementation of scanf used by scanf, sscanf, fscanf,
3 * _cscanf, wscanf, swscanf and fwscanf
5 * Copyright 1996,1998 Marcus Meissner
6 * Copyright 1996 Jukka Iivonen
7 * Copyright 1997,2000 Uwe Bonnes
8 * Copyright 2000 Jon Griffiths
9 * Copyright 2002 Daniel Gudbjartsson
11 * This library is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU Lesser General Public
13 * License as published by the Free Software Foundation; either
14 * version 2.1 of the License, or (at your option) any later version.
16 * This library is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 * Lesser General Public License for more details.
21 * You should have received a copy of the GNU Lesser General Public
22 * License along with this library; if not, write to the Free Software
23 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
33 #include "msvcrt/conio.h"
34 #include "msvcrt/io.h"
35 #include "msvcrt/stdio.h"
36 #include "msvcrt/wctype.h"
37 #include "wine/debug.h"
39 WINE_DEFAULT_DEBUG_CHANNEL(msvcrt
);
41 extern MSVCRT_FILE MSVCRT__iob
[];
43 /* helper function for *scanf. Returns the value of character c in the
44 * given base, or -1 if the given character is not a digit of the base.
46 static int char2digit(char c
, int base
) {
47 if ((c
>='0') && (c
<='9') && (c
<='0'+base
-1)) return (c
-'0');
48 if (base
<=10) return -1;
49 if ((c
>='A') && (c
<='Z') && (c
<='A'+base
-11)) return (c
-'A'+10);
50 if ((c
>='a') && (c
<='z') && (c
<='a'+base
-11)) return (c
-'a'+10);
54 /* helper function for *wscanf. Returns the value of character c in the
55 * given base, or -1 if the given character is not a digit of the base.
57 static int wchar2digit(MSVCRT_wchar_t c
, int base
) {
58 if ((c
>=L
'0') && (c
<=L
'9') && (c
<=L
'0'+base
-1)) return (c
-L
'0');
59 if (base
<=10) return -1;
60 if ((c
>=L
'A') && (c
<=L
'Z') && (c
<=L
'A'+base
-11)) return (c
-L
'A'+10);
61 if ((c
>=L
'a') && (c
<=L
'z') && (c
<=L
'a'+base
-11)) return (c
-L
'a'+10);
96 /*********************************************************************
99 int MSVCRT_fscanf(MSVCRT_FILE
*file
, const char *format
, ...)
104 va_start(valist
, format
);
105 res
= MSVCRT_vfscanf(file
, format
, valist
);
110 /*********************************************************************
113 int MSVCRT_scanf(const char *format
, ...)
118 va_start(valist
, format
);
119 res
= MSVCRT_vfscanf(MSVCRT_stdin
, format
, valist
);
124 /*********************************************************************
127 int MSVCRT_fwscanf(MSVCRT_FILE
*file
, const MSVCRT_wchar_t
*format
, ...)
132 va_start(valist
, format
);
133 res
= MSVCRT_vfwscanf(file
, format
, valist
);
139 /*********************************************************************
142 int MSVCRT_wscanf(const MSVCRT_wchar_t
*format
, ...)
147 va_start(valist
, format
);
148 res
= MSVCRT_vfwscanf(MSVCRT_stdin
, format
, valist
);
154 /*********************************************************************
157 int MSVCRT_sscanf(const char *str
, const char *format
, ...)
162 va_start(valist
, format
);
163 res
= MSVCRT_vsscanf(str
, format
, valist
);
169 /*********************************************************************
172 int MSVCRT_swscanf(const MSVCRT_wchar_t
*str
, const MSVCRT_wchar_t
*format
, ...)
177 va_start(valist
, format
);
178 res
= MSVCRT_vswscanf(str
, format
, valist
);
184 /*********************************************************************
187 int _cscanf(const char *format
, ...)
192 va_start(valist
, format
);
193 res
= MSVCRT_vcscanf(format
, valist
);