linux下使用fscanf实现scanf
首先,我们知道,linux下的scanf标准库函数是一个可变参的函数,那么,我们自己要实现一个scanf也必须是一个可变参的.
其实,在liunx的库中就提供了这样的的宏,来方便我们自己来实现变参函数.这个宏在stdarg.h头文件中.
这几个宏如下:
void va_start( va_list arg_ptr, prev_param ); //va_start宏初始化变量arg_ptr,这个宏的第二个参数是第 一个可变参数的前一个参数,是一个固定的参数.
type va_arg( va_list arg_ptr, type ); //a_arg返回可变的参数, va_arg的第二个 参数是你要返回的参数的类型,
void va_end( va_list arg_ptr ); //va_end宏结束可变参数的获取,
va在这里是variable-argument(可变参数)的意思.
这几个宏的具体使用方法,百度上也有很多,不过为了方便这也给出了一个介绍其使用的博客:点击打开链接
好了,下面就是我写的用fscanf来实现scanf的程序,如有不对之处,敬请指出...
/************************************************************************* > File Name: scanf.c > Author: yexingkong > Mail: abqyexingkong@gmail.com > Created Time: Wed 04 Sep 2013 16:23:17 CST > Description:用fscanf() 模拟scanf,此函数的不足之处在于对于flaot类型数的精确度不够,还未想到更好的解决方法. ************************************************************************/#include <stdio.h>#include <stdarg.h>#include <stdlib.h>#include <ctype.h>#include <stdint.h>//检测所输入的字符串str是否全为空格,若是,则重新输入,这也是scanf是I/O阻塞型的原因.static uint8_t scan_skip(char *str, uint8_t i){ FILE *fp; fp = fdopen(0,"r"); if (fp == NULL) { perror("error\n"); exit(EXIT_FAILURE); } loop: //isspace检测所输入的字符是否为空格,返回空格数. while(isspace(str[i])) { i++; } //如果一直到字符串结束都是空格,则重新输入 if (str[i] == 0) { i = 0; fscanf(fp,"%[^'\n']",str); goto loop; } //返回第一个非空格字符的下标 return i;}//如果以%d/%u格式读取数,则对其字符串str中的数字字符转成base进制的数.//参数base 是进行进制转换的基数,*nb用来保存所转换后的结果.(eg: base= 8则为八//进制数)static uint8_t scan_int(char *str,uint8_t i, uint8_t base,int8_t *nb){ int8_t n = 0; uint8_t j,sign = 0; //检测此十进制数的正,负性 switch(str[i]) { case '-': sign = 1; case '+': i++; break; } while(1) { if (isdigit(str[i])) //判断是否为数字'0' ~ '9' { j = str[i] - '0'; }else if (isalpha(str[i])) //判断是否为字母 { j = toupper(str[i]) - 'A' + 10; //用来计算16进制数 } else break; if (j >= base) break; n = base * n + j; //将字符转换成base进制的数 i++; } *nb = (sign == 0 ? n: -n); //正负数的判读 //返回当前已读到的最后一个字符的下标 return i;}//以长整型格式输入,则对其字符串str中的数字字符转成base进制的数,//i为当前所要读取的字符的下标,*nb用来保存所转换后的结果.static uint8_t scan_long(char *str,uint8_t i,uint8_t base,int16_t *nb){ int16_t n = 0; uint8_t j,sign = 0; //对所读取的正负性判断 switch (str[i]) { case '-': sign = 1; case '+': i++; break; } while (1) { if (isdigit(str[i])) //判断是否为数字 { j = str[i] - '0'; }else if (isalpha(str[i])) //判断是否为字母 { j = toupper(str[i]) - 'A' + 10; //用来计算16进制的数 }else break; if (j >= base) break; n = n * base + j; i++; } *nb = (sign == 0? n: -n); //对正负数的判读 //返回当前已读到的最后一个字符的下标 return i;}static uint8_t scan_float(char *str,uint8_t i,uint8_t base,float *nb){ float n = 0.0, j, m = 0; uint8_t sign = 0; int flag = 0 , k =0; switch (str[i]) { case '-': sign = 1; case '+': i++; break; } while (1) { //计算整数部分 if (isdigit(str[i]) && flag == 0) { j = str[i] - '0'; n = base * n + j; } else if (str[i] == '.') { flag = 1; //作为标记符 i++; continue; }else if (isdigit(str[i]) && flag == 1) //计算小数部分 { j = str[i] - '0'; m = base * m + j; k++; //计算小数点位数 if (k > 5) break; }else break; i++; } //将小数点六位后的数字忽略掉 while(1) { if (isdigit(str[i])) { i++; continue; }else break; }switch (k){ case 1: n = n + m * 1e-1; break; case 2: n = n + m * 1e-2; break; case 3: n = n + m * 1e-3; break; case 4: n = n + m * 1e-4; break; case 5: n = n + m * 1e-5; break; default: n = n + m * 1e-6; break;} *nb = (sign == 0? n : -n); return i;}int8_t myscanf(const char *format , ...){ //定义一个指向形参列表的指针pArg va_list pArg; char str[64]; uint8_t i = 0; int8_t nb = 0; //记录参数个数 FILE *fp; fp = fdopen(0,"r"); if (NULL == fp) { perror("error\n"); exit(EXIT_FAILURE); } fscanf(fp,"%[^'\n']",str); printf("iput=%s\n",str); va_start(pArg,format);//让pArg指向函数参数列表中的最后一个明确的参数,这里就是format参数. for(;*format != 0; format++) { if (isspace(*format)) continue; //找到所输入的字符串中第一个非空格字符的下标,或I/O阻塞,从新输入 i = scan_skip(str,i); if (*format == '%') { switch(*(++format)) { case 'c': /* char */ *va_arg(pArg,char *) = str[i++]; //给pArg所指向的地址空间单元赋值 break; case 'd': /* decimal int */ case 'u': /* unsigned int */ i = scan_int(str,i,10,va_arg(pArg,int8_t *)); //va_arg()用来返回pArg所指向的地址单元中的值 break; case 'f': i = scan_float(str,i,10,va_arg(pArg,float *)); break; case 'o': i = scan_int(str,i,8,va_arg(pArg,int8_t *)); break; case 'x': i = scan_int(str,i,16,va_arg(pArg,int8_t *)); break; case 's': { int8_t j = 0; char *d = va_arg(pArg,char *); while ((d[j++] = str[i++]) != 0) ; } break; /* long */ case 'l': switch (*(++format)) { case 'd': /*decimal long */ case 'u': i = scan_long(str,i,10,va_arg(pArg,int16_t *)); break; case 'o': i = scan_long(str,i,8,va_arg(pArg,int16_t *)); break; case 'x': i = scan_long(str,i,16,va_arg(pArg,int16_t *)); break; } break; default: if (str[i] != *format) return -1; break; } nb++; }else if (str[i] != *format) return -1; }//使pArg不再指向堆栈,结束对形参的取值 va_end(pArg);//返回参数个数 return nb;}int main(int argc,char *argv[]){ int d = 0; char c ='\0'; float f = 0.0; char str[10]; int se; printf("输入char float char[]型的数\n"); myscanf("%c %f %s",&c,&f,str); printf("%c\t%f\t%s\n",c,f,str); return 0;}
转载请注明出处:http://write.blog.csdn.net/postedit/12451273