一. 何谓可变参数
int printf( const char* format, ...);
这是使用过C语言的人所再熟悉不过的printf函数原型,它的参数中就有固定参数format和可变参数(用”…”表示). 而我们又可以用各种方式来调用printf,如:
printf( "%d ",value);
printf( "%s ",str);
printf( "the number is %d ,string is:%s ", value, str);
二.实现原理
C语言用宏来处理这些可变参数。这些宏看起来很复杂,其实原理挺简单,就是根据参数入栈的特点从最靠近第一个可变参数的固定参数开始,依次获取每个可变参数的地址。下面我们来分析这些宏。在VC中的stdarg.h头文件中,针对不同平台有不同的宏定义,我们选取X86平台下的宏定义:
typedef char *va_list;
/*把va_list被定义成char*,这是因为在我们目前所用的PC机上,字符指针类型可以用来存储内存单元地址。而在有的机器上va_list是被定义成void*的*/
#define _INTSIZEOF(n) ( (sizeof(n) + sizeof(int) - 1) & ~(sizeof(int) - 1) )
/*_INTSIZEOF(n)宏是为了考虑那些内存地址需要对齐的系统,从宏的名字来应该是跟sizeof(int)对齐。一般的sizeof(int)=4,也就是参数在内存中的地址都为4的倍数。比如,如果sizeof(n)在1-4之间,那么_INTSIZEOF(n)=4;如果sizeof(n)在5-8之间,那么_INTSIZEOF(n)=8。*/
#define va_start(ap,v)( ap = (va_list)&v + _INTSIZEOF(v) )
/*va_start的定义为 &v+_INTSIZEOF(v) ,这里&v是最后一个固定参数的起始地址,再加上其实际占用大小后,就得到了第一个可变参数的起始内存地址。所以我们运行va_start(ap, v)以后,ap指向第一个可变参数在的内存地址*/
#define va_arg(ap,t) ( *(t *)((ap += _INTSIZEOF(t)) - _INTSIZEOF(t)) )
/*这个宏做了两个事情,
①用用户输入的类型名对参数地址进行强制类型转换,得到用户所需要的值
②计算出本参数的实际大小,将指针调到本参数的结尾,也就是下一个参数的首地址,以便后续处理。*/
#define va_end(ap) ( ap = (va_list)0 )
/*x86平台定义为ap=(char*)0;使ap不再 指向堆栈,而是跟NULL一样.有些直接定义为((void*)0),这样编译器不会为va_end产生代码,例如gcc在linux的x86平台就是这样定义的. 在这里大家要注意一个问题:由于参数的地址用于va_start宏,所以参数不能声明为寄存器变量或作为函数或数组类型. */
以下再用图来表示:
在VC等绝大多数C编译器中,默认情况下,参数进栈的顺序是由右向左的,因此,参数进栈以后的内存模型如下图所示:最后一个固定参数的地址位于第一个可变参数之下,并且是连续存储的。
|——————————————————————————|
|最后一个可变参数 | -> 高内存地址处
|——————————————————————————|
...................
|——————————————————————————|
|第N个可变参数 | -> va_arg(arg_ptr,int)后arg_ptr所指的地方,
| | 即第N个可变参数的地址。
|——————————————— |
………………………….
|——————————————————————————|
|第一个可变参数 | -> va_start(arg_ptr,start)后arg_ptr所指的地方
| | 即第一个可变参数的地址
|——————————————— |
|———————————————————————— ——|
| |
|最后一个固定参数 | -> start的起始地址
|—————————————— —| .................
|—————————————————————————— |
| |
|——————————————— |-> 低内存地址处
一个简化了的printf代码, 只支持 %d %f %x 三种输出格式, 其他的输出格式可以自己根据需要添加。 代码可以运行
#include <stddef.h>
#include <stdarg.h>
#include <stdio.h>
void print_0nx(char ch2, long l)
{
unsigned char ch;
int i;
ch2 = ch2 - '0';
for (i = ch2 - 1; i >= 0; i--) {
ch = (l >> (i * 4)) & 0x0f;
if (ch < 10)
putch(ch + '0');
else
putch(ch - 10 + 'a');
}
}
/* 整数转化为十六进值字符串 */
void print_x(long l)
{
unsigned long t;
signed long i, k ;
signed char buf[8];
if (l == 0)
{
putch('0');
return;
}
memset(buf,'0',8);
t = l;
k = 7;
for (;;)
{
if (t > 15)
{
i = t % 16;
}else
i = t;
if (i < 10){
buf[k--] = i + '0';
}
else
if (i < 16)
{
buf[k--] = i -10 +'a';
}
if (t < 15)
break;
t >>= 4;
}
for (i =0 ;i < 8 ; i ++)
putch(buf[i]);
}
/* 浮点数转化为字符串 */
void print_f(double d)
{
char buf[100];
sprintf(buf, "%.3lf", d);
puts(buf);
}
/* 整数转化为字符串 */
void print_d(long l)
{
unsigned long t;
int i, j, k ;
char buf[20];
if (l == 0)
{
putch('0');
return;
}
memset(buf,'0',8);
t = l;
k = 7;
for (;;)
{
if (t > 9)
{
i = t % 10;
}else
i = t;
if (i < 10){
buf[k--] = i + '0';
}
if (t < 9)
break;
t /= 10;
}
j = 0;
for (i =0 ;i < 8 ; i ++)
{
if (buf[i] != '0')
j = 1;
if (j)
putch(buf[i]);
}
}
int print_u(char *s, ...)
{
va_list ap;
unsigned long arg;
char *str;
char ch1, ch2, ch3;
va_start(ap, s);
while (*s != 0) {
if (*s == '%') {
s++;
ch1 = *s++;
if (ch1 == 's') {
str = va_arg(ap, char *);
puts(str);
}else if (ch1 == 'd') {
arg = va_arg(ap, long);
print_d(arg);
}
else if (ch1 == 'x') {
arg = va_arg(ap, long);
print_x(arg);
}
else {
ch2 = *s++;
ch3 = *s++;
arg = va_arg(ap, long);
print_0nx(ch2, arg);
}
} else
putch(*s++);
}
va_end(ap);
return 0;
}
int uart_printf(char *s, ...)
{
va_list ap;
unsigned long arg;
double arg_f;
char *str;
char ch1, ch2, ch3;
va_start(ap, s);
while (*s != 0) {
if (*s == '%') {
s++;
ch1 = *s++;
if (ch1 == 's') {
str = va_arg(ap, char *);
print_u(str);
}else if (ch1 == 'd') {
arg = va_arg(ap, long);
print_d(arg);
}
else if (ch1 == 'x') {
arg = va_arg(ap, long);
print_x(arg);
}else if (ch1 == 'f'){
arg_f = va_arg(ap, double);
print_f(arg_f);
}
else {
ch2 = *s++;
ch3 = *s++;
arg = va_arg(ap, long);
print_0nx(ch2, arg);
}
} else
putch(*s++);
}
va_end(ap);
return 0;
}
int main()
{
int i = 9;
double f = 0.0236;
float ff = 223.364;
uart_printf("asdf\n");
uart_printf("i=%d\n", i);
uart_printf("f=%f\n", f);
uart_printf("ff=%f\n", ff);
return 0;
}
下面是一个一个功能超级强的哈哈:
#include <stdarg.h>
#include <stdio.h>
/*
* Conver int to string based on radix (usually 2, 8, 10, and 16)
*/
char *itoa(int num, char *str, int radix)
{
char string[] = "0123456789abcdefghijklmnopqrstuvwxyz";
char* ptr = str;
int i;
int j;
while (num)
{
*ptr++ = string[num % radix];
num /= radix;
if (num < radix)
{
*ptr++ = string[num];
*ptr = '\0';
break;
}
}
j = ptr - str - 1;
for (i = 0; i < (ptr - str) / 2; i++)
{
int temp = str[i];
str[i] = str[j];
str[j--] = temp;
}
return str;
}
/*
* A simple printf function. Only support the following format:
* Code Format
* %c character
* %d signed integers
* %i signed integers
* %s a string of characters
* %o octal
* %x unsigned hexadecimal
*/
int vprintf( const char* format, ...)
{
va_list arg;
int done = 0;
va_start (arg, format);
//done = vfprintf (stdout, format, arg);
while( *format != '\0')
{
if( *format == '%')
{
if( *(format+1) == 'c' )
{
char c = (char)va_arg(arg, int);
putc(c, stdout);
} else if( *(format+1) == 'd' || *(format+1) == 'i')
{
char store[20];
int i = va_arg(arg, int);
char* str = store;
itoa(i, store, 10);
while( *str != '\0') putc(*str++, stdout);
} else if( *(format+1) == 'o')
{
char store[20];
int i = va_arg(arg, int);
char* str = store;
itoa(i, store, 8);
while( *str != '\0') putc(*str++, stdout);
} else if( *(format+1) == 'x')
{
char store[20];
int i = va_arg(arg, int);
char* str = store;
itoa(i, store, 16);
while( *str != '\0') putc(*str++, stdout);
} else if( *(format+1) == 's' )
{
char* str = va_arg(arg, char*);
while( *str != '\0') putc(*str++, stdout);
}
// Skip this two characters.
format += 2;
} else {
putc(*format++, stdout);
}
}
va_end (arg);
return done;
}
int main(int argc, char* argv[])
{
int n = 255;
char str[] = "hello, world!";
printf("n = %d\n", n);
printf("n = %i\n", n);
printf("n = %o\n", n);
printf("n = %x\n", n);
printf("first char = %c\n", str[0]);
printf("str = %s\n", str);
printf("%s\tn = %d\n", str, n);
// Test vprintf function
printf("---------------vprintf--------------\n");
vprintf("n = %d\n", n);
vprintf("n = %i\n", n);
vprintf("n = %o\n", n);
vprintf("n = %x\n", n);
vprintf("first char = %c\n", str[0]);
vprintf("str = %s\n", str);
vprintf("%s\tn = %d\n", str, n);
return 0;
}
---------------------------result:
n = 255
n = 255
n = 377
n = ff
first char = h
str = hello,
hello, n = 255
---------------my_printf--------------
n = 255
n = 255
n = 377
n = ff
first char = h
str = hello,
hello, n = 255