精简版sprintf适合嵌入式使用

支持格式化duxXcspo,并支持控制符+-.0,有测试代码
人狠话不多,直接上完整代码。

#include <stdint.h>
#include <stdarg.h>

#define FORMAT_ALIGN_RIGHT      0       //默认右对齐
#define FORMAT_ALIGN_LEFT       1       //左对齐 '-'
#define FORMAT_SIGN_FLAG        2       //强制正负数符号 '+'
#define FORMAT_PADDING_ZERO     4       //填充0代替空格 '0'

static int print(char **out, int ch)
{
    int count = 1;

    if (ch == '\n')
        count += print(out, '\r');

    if (out)
        *(*out)++ = ch;
    else
        putchar(ch);

    return count;
}

static int prints(char **out, const char *str, int flags, int minW, int maxW)
{
    int pad = flags & FORMAT_PADDING_ZERO ? '0' : ' ';
    int len = 0, padLen = 0;
    const char *ptr;
    int ret = 0;

    //字符串长度
    for (ptr = str; *ptr; ++ptr)
        len++;

    //max修正
    if (maxW < minW)
        maxW = minW;

    if (len < minW)
    {
        //需要填充
        padLen = minW - len;
    }

    //需要填充 pad 字符
    if (!(flags & FORMAT_ALIGN_LEFT))
    {
        //不是左对齐,先填充
        for (; padLen > 0; padLen--)
        {
            ret += print(out, pad);
        }
    }

    //输出字符串
    while (*str)
    {
        if (maxW && ret == maxW)
        {
            //字符串已达规定最大长度
            break;
        }
        ret += print(out, *str++);
    }

    //如果是左对齐,那么 padLen 应该是非0
    for (; padLen > 0; padLen--)
    {
        ret += print(out, pad);
    }

    return ret;
}


static int printi(char **out, int val, int sign, int base, int alphaBase, int flags, int minW, int maxW)
{
    unsigned int uval = (unsigned int)val;
    char buf[32], *ptr;
    int neg = 0, len = 0;
    int forceSign = flags & FORMAT_SIGN_FLAG;
    int padZero = flags & FORMAT_PADDING_ZERO;

    if (sign)
    {
        if (val < 0)
        {
            neg = 1;
            uval = (unsigned int)-val;
        }
    }

    ptr = buf + sizeof(buf) - 1;
    *ptr = '\0';

    while (uval)
    {
        int t = uval % base;

        if (t >= 10)
            t += alphaBase - '0' - 10;
        *--ptr = t + '0';
        uval /= base;
        len++;
    }

    if (forceSign || neg)
        len++;

    if (padZero && len < minW)
    {
        int padLen = minW - len;
        int padMax = sizeof(buf) - len - 1;

        if (padLen > padMax)
            padLen = padMax;

        while (padLen--)
            *--ptr = '0';
    }

    if (neg)
        *--ptr = '-';
    else if (forceSign)
        *--ptr = '+';

    return prints(out, ptr, flags, minW, maxW);
}

static int vprintf_internal(char *buf, const char *fmt, va_list va)
{
    char *dst = buf;
    char **out = buf ? &dst : NULL;
    int count = 0;

    while (*fmt)
    {
        if (*fmt == '%')
        {
            int flags = 0, minW = 0, maxW = 0;
            int type, waitMin = 0, waitMax = 0;
            char *str, tmp[2];

            fmt++;

            while (1)
            {
                type = *fmt++;

                if (!type)
                    break;

                switch (type)
                {
                case '%':
                    goto _out;

                case '-':
                    flags |= FORMAT_ALIGN_LEFT;
                    break;

                case '+':
                    flags |= FORMAT_SIGN_FLAG;
                    break;
                    
                case '.':
                    waitMax = 1;
                    break;

                case '0':
                    if (!waitMin && !waitMax)
                    {
                        flags |= FORMAT_PADDING_ZERO;
                        waitMin = 1;
                    }
                    else
                    {
                        goto _num;
                    }
                    break;

                case '1': case '2': case '3': case '4': case '5':
                case '6': case '7': case '8': case '9':
_num:
                    if (!waitMin && !waitMax)
                    {
                        waitMin = 1;
                    }

                    if (waitMin)
                    {
                        minW = minW * 10 + type - '0';
                    }
                    else if(waitMax)
                    {
                        maxW = maxW * 10 + type - '0';
                    }
                    break;

                case 'd': case 'u': case 'x': case 'X':
                case 'c': case 's': case 'p': case 'o':
                    goto _format;

                default:
                    goto _out;
                }
            }

_format:
            switch (type)
            {
            case 'o':
                count += printi(out, va_arg(va, int), 0, 8, 'A', flags, minW, maxW);
                break;

            case 'd':
                count += printi(out, va_arg(va, int), 1, 10, 'A', flags, minW, maxW);
                break;

            case 'u':
                count += printi(out, va_arg(va, int), 0, 10, 'A', flags, minW, maxW);
                break;

            case 'x':
                count += printi(out, va_arg(va, int), 0, 16, 'a', flags, minW, maxW);
                break;

            case 'X':
                count += printi(out, va_arg(va, int), 0, 16, 'A', flags, minW, maxW);
                break;

            case 'c':
                tmp[0] = (char)va_arg(va, int);
                tmp[1] = 0;
                count += prints(out, tmp, flags, minW, maxW);
                break;

            case 's':
                str = va_arg(va, char *);
                str = str ? str : "(null)";
                count += prints(out, str, flags, minW, maxW);
                break;

            case 'p':
                count += prints(out, "0x", 0, 0, 0);
                count += printi(out, va_arg(va, int), 0, 16, 'A', FORMAT_PADDING_ZERO, 8, 0);
                break;

            }
            continue;
        }
        else
        {
_out:
            count += print(out, *fmt);
        }

        fmt++;
    }

    if (out)
        **out = '\0';

    va_end(va);
    return count;
}

int printf(const char *fmt, ...)
{
    va_list va;

    va_start(va, fmt);
    return vprintf_internal(0, fmt, va);
}

int vsprintf(char *buf, const char *fmt, va_list va)
{
    return vprintf_internal(buf, fmt, va);
}

int sprintf(char *buf, const char *fmt, ...)
{
    va_list va;

    va_start(va, fmt);
    return vprintf_internal(buf, fmt, va);
}

void ShowBinary(void *buf, int len)
{
    int i = 0;
    unsigned char *p = (unsigned char *)buf;

    while (len)
    {
        i++;

        printf("%02X ", (int)p[0]);
        if ((i % 16) == 0)
            printf("\n");

        p++;
        len--;
    }
    printf("\n");
}

int main(int argc, char *argv[])
{
    printf("a=[%s]\n", "0123456789");
    printf("a=[%12s]\n", "0123456789");
    printf("a=[%-12s]\n", "0123456789");
    printf("a=[%.12s]\n\n", "01234567890123456789");
    
    printf("a=[%d]\n", 0xFFFFFFFF);
    printf("a=[%u]\n", 0xFFFFFFFF);
    printf("a=[%+u]\n\n", 0xFFFFFFFF);
    
    printf("a=[%15d]\n", 0xFFFFFFFF);
    printf("a=[%-15d]\n", 0xFFFFFFFF);
    printf("a=[%+-15d]\n", 0xFFFFFFFF);
    printf("a=[%015d]\n", 0xFFFFFFFF);
    printf("a=[%-015d]\n", 0xFFFFFFFF);
    printf("a=[%+-015d]\n\n", 0xFFFFFFFF);

    printf("a=[%15u]\n", 0xFFFFFFFF);
    printf("a=[%-15u]\n", 0xFFFFFFFF);
    printf("a=[%+-15u]\n", 0xFFFFFFFF);
    printf("a=[%015u]\n", 0xFFFFFFFF);
    printf("a=[%-015u]\n", 0xFFFFFFFF);
    printf("a=[%+-015u]\n\n", 0xFFFFFFFF);

    printf("a=[%15x]\n", 0xFFFFFFFF);
    printf("a=[%-15x]\n", 0xFFFFFFFF);
    printf("a=[%+-15x]\n", 0xFFFFFFFF);
    printf("a=[%015x]\n", 0xFFFFFFFF);
    printf("a=[%-015x]\n", 0xFFFFFFFF);
    printf("a=[%+-015x]\n\n", 0xFFFFFFFF);

    printf("a=[%15X]\n", 0xFFFFFFFF);
    printf("a=[%-15X]\n", 0xFFFFFFFF);
    printf("a=[%+-15X]\n", 0xFFFFFFFF);
    printf("a=[%015X]\n", 0xFFFFFFFF);
    printf("a=[%-015X]\n", 0xFFFFFFFF);
    printf("a=[%+-015X]\n\n", 0xFFFFFFFF);


    printf("a=[%15o]\n", 0xFFFFFFFF);
    printf("a=[%-15o]\n", 0xFFFFFFFF);
    printf("a=[%+-15o]\n", 0xFFFFFFFF);
    printf("a=[%015o]\n", 0xFFFFFFFF);
    printf("a=[%-015o]\n", 0xFFFFFFFF);
    printf("a=[%+-015o]\n\n", 0xFFFFFFFF);

    getch();
    return 0;
}
最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 214,658评论 6 496
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 91,482评论 3 389
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 160,213评论 0 350
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 57,395评论 1 288
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 66,487评论 6 386
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 50,523评论 1 293
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 39,525评论 3 414
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 38,300评论 0 270
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 44,753评论 1 307
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 37,048评论 2 330
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 39,223评论 1 343
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 34,905评论 5 338
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 40,541评论 3 322
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 31,168评论 0 21
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 32,417评论 1 268
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 47,094评论 2 365
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 44,088评论 2 352

推荐阅读更多精彩内容