1 /* __gmp_sscanf_funs -- support for formatted input from a string. 2 3 THE FUNCTIONS IN THIS FILE ARE FOR INTERNAL USE ONLY. THEY'RE ALMOST 4 CERTAIN TO BE SUBJECT TO INCOMPATIBLE CHANGES OR DISAPPEAR COMPLETELY IN 5 FUTURE GNU MP RELEASES. 6 7 Copyright 2001-2003, 2009 Free Software Foundation, Inc. 8 9 This file is part of the GNU MP Library. 10 11 The GNU MP Library is free software; you can redistribute it and/or modify 12 it under the terms of either: 13 14 * the GNU Lesser General Public License as published by the Free 15 Software Foundation; either version 3 of the License, or (at your 16 option) any later version. 17 18 or 19 20 * the GNU General Public License as published by the Free Software 21 Foundation; either version 2 of the License, or (at your option) any 22 later version. 23 24 or both in parallel, as here. 25 26 The GNU MP Library is distributed in the hope that it will be useful, but 27 WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY 28 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 29 for more details. 30 31 You should have received copies of the GNU General Public License and the 32 GNU Lesser General Public License along with the GNU MP Library. If not, 33 see https://www.gnu.org/licenses/. */ 34 35 #include <stdio.h> 36 #include <stdarg.h> 37 #include "gmp-impl.h" 38 39 40 #if 0 41 static int 42 scan (const char **sp, const char *fmt, ...) 43 { 44 va_list ap; 45 int ret; 46 47 va_start(ap, fmt); 48 ret = vsscanf(*sp, fmt, ap); 49 va_end(ap); 50 51 return ret; 52 } 53 #else 54 static int 55 scan (const char **sp, const char *fmt, ...) 56 { 57 va_list ap; 58 void *p1, *p2; 59 int ret; 60 61 va_start (ap, fmt); 62 p1 = va_arg (ap, void *); 63 p2 = va_arg (ap, void *); 64 65 ret = sscanf (*sp, fmt, p1, p2); 66 67 va_end (ap); 68 69 return ret; 70 } 71 #endif 72 73 static void 74 step (const char **sp, int n) 75 { 76 ASSERT (n >= 0); 77 78 /* shouldn't push us past the end of the string */ 79 #if WANT_ASSERT 80 { 81 int i; 82 for (i = 0; i < n; i++) 83 ASSERT ((*sp)[i] != '\0'); 84 } 85 #endif 86 87 (*sp) += n; 88 } 89 90 static int 91 get (const char **sp) 92 { 93 const char *s; 94 int c; 95 s = *sp; 96 c = (unsigned char) *s++; 97 if (c == '\0') 98 return EOF; 99 *sp = s; 100 return c; 101 } 102 103 static void 104 unget (int c, const char **sp) 105 { 106 const char *s; 107 s = *sp; 108 if (c == EOF) 109 { 110 ASSERT (*s == '\0'); 111 return; 112 } 113 s--; 114 ASSERT ((unsigned char) *s == c); 115 *sp = s; 116 } 117 118 const struct gmp_doscan_funs_t __gmp_sscanf_funs = { 119 (gmp_doscan_scan_t) scan, 120 (gmp_doscan_step_t) step, 121 (gmp_doscan_get_t) get, 122 (gmp_doscan_unget_t) unget, 123 }; 124