| 1 | /*
|
|---|
| 2 | * TOPPERS Software
|
|---|
| 3 | * Toyohashi Open Platform for Embedded Real-Time Systems
|
|---|
| 4 | *
|
|---|
| 5 | * Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
|
|---|
| 6 | * Toyohashi Univ. of Technology, JAPAN
|
|---|
| 7 | * Copyright (C) 2004-2011 by Embedded and Real-Time Systems Laboratory
|
|---|
| 8 | * Graduate School of Information Science, Nagoya Univ., JAPAN
|
|---|
| 9 | * Copyright (C) 2015 Cores Co., Ltd. Japan
|
|---|
| 10 | *
|
|---|
| 11 | * ãLì ÒÍCȺÌ(1)`(4)Ìðð½·êÉÀèC{\tgEF
|
|---|
| 12 | * Ai{\tgEFAðüϵ½àÌðÜÞDȺ¯¶jðgpE¡»Eü
|
|---|
| 13 | * ÏEÄzziȺCpÆÄÔj·é±Æð³Åø·éD
|
|---|
| 14 | * (1) {\tgEFAð\[XR[hÌ`Åp·éêÉÍCãLÌì
|
|---|
| 15 | * \¦C±Ìpð¨æѺL̳ÛØKèªC»ÌÜÜÌ`Å\[
|
|---|
| 16 | * XR[hÉÜÜêÄ¢é±ÆD
|
|---|
| 17 | * (2) {\tgEFAðCCu`®ÈÇC¼Ì\tgEFAJÉg
|
|---|
| 18 | * pÅ«é`ÅÄzz·éêÉÍCÄzzɺ¤hL
|
|---|
| 19 | gip
|
|---|
| 20 | * Ò}j
|
|---|
| 21 | AÈÇjÉCãLÌì \¦C±Ìpð¨æѺL
|
|---|
| 22 | * ̳ÛØKèðfÚ·é±ÆD
|
|---|
| 23 | * (3) {\tgEFAðC@íÉgÝÞÈÇC¼Ì\tgEFAJÉg
|
|---|
| 24 | * pÅ«È¢`ÅÄzz·éêÉÍCÌ¢¸ê©Ìðð½·±
|
|---|
| 25 | * ÆD
|
|---|
| 26 | * (a) Äzzɺ¤hL
|
|---|
| 27 | gipÒ}j
|
|---|
| 28 | AÈÇjÉCãLÌ
|
|---|
| 29 | * ì \¦C±Ìpð¨æѺL̳ÛØKèðfÚ·é±ÆD
|
|---|
| 30 | * (b) ÄzzÌ`ÔðCÊÉèßéû@ÉæÁÄCTOPPERSvWFNgÉ
|
|---|
| 31 | * ñ·é±ÆD
|
|---|
| 32 | * (4) {\tgEFAÌpÉæè¼ÚIܽÍÔÚIɶ¶é¢©Èé¹
|
|---|
| 33 | * Q©çàCãLì Ò¨æÑTOPPERSvWFNgðÆÓ·é±ÆD
|
|---|
| 34 | * ܽC{\tgEFAÌ[UܽÍGh[U©çÌ¢©Èé
|
|---|
| 35 | * RÉîÿ©çàCãLì Ò¨æÑTOPPERSvWFNgð
|
|---|
| 36 | * ÆÓ·é±ÆD
|
|---|
| 37 | *
|
|---|
| 38 | * {\tgEFAÍC³ÛØÅñ³êÄ¢éàÌÅ éDãLì Ò¨
|
|---|
| 39 | * æÑTOPPERSvWFNgÍC{\tgEFAÉÖµÄCÁèÌgpÚI
|
|---|
| 40 | * ÉηéK«àÜßÄC¢©ÈéÛØàsíÈ¢DܽC{\tgEF
|
|---|
| 41 | * AÌpÉæè¼ÚIܽÍÔÚIɶ¶½¢©Èé¹QÉÖµÄàC»
|
|---|
| 42 | * ÌÓCðíÈ¢D
|
|---|
| 43 | *
|
|---|
| 44 | * @(#) $Id: fbs_string.c 101 2015-06-02 15:37:23Z coas-nagasima $
|
|---|
| 45 | */
|
|---|
| 46 |
|
|---|
| 47 | #include <stdint.h>
|
|---|
| 48 | #include <limits.h>
|
|---|
| 49 | #include <stdarg.h>
|
|---|
| 50 | #include "fbs_string.h"
|
|---|
| 51 |
|
|---|
| 52 | /*
|
|---|
| 53 | * lð¶ñÉÏ·
|
|---|
| 54 | */
|
|---|
| 55 | #define CONVERT_BUFLEN ((sizeof(uintptr_t) * CHAR_BIT + 2) / 3)
|
|---|
| 56 | /* uintptr_t^ÌlÌÅå¶ */
|
|---|
| 57 | static ER
|
|---|
| 58 | convert(ECN_FBS_ID fbs, ECN_FBS_SSIZE_T *pos, uintptr_t val, uint_t radix, const char *radchar,
|
|---|
| 59 | uint_t width, bool_t minus, bool_t padzero)
|
|---|
| 60 | {
|
|---|
| 61 | char buf[CONVERT_BUFLEN];
|
|---|
| 62 | uint_t i, j;
|
|---|
| 63 | ER ret;
|
|---|
| 64 |
|
|---|
| 65 | i = 0U;
|
|---|
| 66 | do {
|
|---|
| 67 | buf[i++] = radchar[val % radix];
|
|---|
| 68 | val /= radix;
|
|---|
| 69 | } while (i < CONVERT_BUFLEN && val != 0);
|
|---|
| 70 |
|
|---|
| 71 | if (minus && width > 0) {
|
|---|
| 72 | width -= 1;
|
|---|
| 73 | }
|
|---|
| 74 | if (minus && padzero) {
|
|---|
| 75 | ret = _ecn_fbs_poke(fbs, *pos, '-');
|
|---|
| 76 | if(ret != E_OK)
|
|---|
| 77 | return ret;
|
|---|
| 78 | (*pos)++;
|
|---|
| 79 | }
|
|---|
| 80 | for (j = i; j < width; j++) {
|
|---|
| 81 | ret = _ecn_fbs_poke(fbs, *pos, padzero ? '0' : ' ');
|
|---|
| 82 | if(ret != E_OK)
|
|---|
| 83 | return ret;
|
|---|
| 84 | (*pos)++;
|
|---|
| 85 | }
|
|---|
| 86 | if (minus && !padzero) {
|
|---|
| 87 | ret = _ecn_fbs_poke(fbs, *pos, '-');
|
|---|
| 88 | if(ret != E_OK)
|
|---|
| 89 | return ret;
|
|---|
| 90 | (*pos)++;
|
|---|
| 91 | }
|
|---|
| 92 | while (i > 0U) {
|
|---|
| 93 | ret = _ecn_fbs_poke(fbs, *pos, buf[--i]);
|
|---|
| 94 | if(ret != E_OK)
|
|---|
| 95 | return ret;
|
|---|
| 96 | (*pos)++;
|
|---|
| 97 | }
|
|---|
| 98 | return E_OK;
|
|---|
| 99 | }
|
|---|
| 100 |
|
|---|
| 101 | /*
|
|---|
| 102 | * ¶ñ®`oÍ
|
|---|
| 103 | */
|
|---|
| 104 | static const char raddec[] = "0123456789";
|
|---|
| 105 | static const char radhex[] = "0123456789abcdef";
|
|---|
| 106 | static const char radHEX[] = "0123456789ABCDEF";
|
|---|
| 107 |
|
|---|
| 108 | ECN_FBS_SSIZE_T
|
|---|
| 109 | fbs_printf(ECN_FBS_ID fbs, ECN_FBS_SSIZE_T *pos, const char *format, ...)
|
|---|
| 110 | {
|
|---|
| 111 | char c;
|
|---|
| 112 | bool_t lflag;
|
|---|
| 113 | uint_t width;
|
|---|
| 114 | bool_t padzero;
|
|---|
| 115 | intptr_t val;
|
|---|
| 116 | const char *str, *head;
|
|---|
| 117 | va_list ap;
|
|---|
| 118 | ER ret;
|
|---|
| 119 |
|
|---|
| 120 | va_start(ap, format);
|
|---|
| 121 |
|
|---|
| 122 | while ((c = *format++) != '\0') {
|
|---|
| 123 | if (c != '%') {
|
|---|
| 124 | ret = _ecn_fbs_poke(fbs, *pos, c);
|
|---|
| 125 | if (ret != E_OK)
|
|---|
| 126 | return ret;
|
|---|
| 127 | (*pos)++;
|
|---|
| 128 | continue;
|
|---|
| 129 | }
|
|---|
| 130 |
|
|---|
| 131 | lflag = false;
|
|---|
| 132 | width = 0U;
|
|---|
| 133 | padzero = false;
|
|---|
| 134 | if ((c = *format++) == '0') {
|
|---|
| 135 | padzero = true;
|
|---|
| 136 | c = *format++;
|
|---|
| 137 | }
|
|---|
| 138 | while ('0' <= c && c <= '9') {
|
|---|
| 139 | width = width * 10U + c - '0';
|
|---|
| 140 | c = *format++;
|
|---|
| 141 | }
|
|---|
| 142 | if (c == 'l') {
|
|---|
| 143 | lflag = true;
|
|---|
| 144 | c = *format++;
|
|---|
| 145 | }
|
|---|
| 146 | switch (c) {
|
|---|
| 147 | case 'd':
|
|---|
| 148 | val = lflag ? (intptr_t) va_arg(ap, long_t)
|
|---|
| 149 | : (intptr_t) va_arg(ap, int_t);
|
|---|
| 150 | if (val >= 0) {
|
|---|
| 151 | ret = convert(fbs, pos, (uintptr_t) val, 10U, raddec,
|
|---|
| 152 | width, false, padzero);
|
|---|
| 153 | if (ret != E_OK)
|
|---|
| 154 | return ret;
|
|---|
| 155 | }
|
|---|
| 156 | else {
|
|---|
| 157 | ret = convert(fbs, pos, (uintptr_t)(-val), 10U, raddec,
|
|---|
| 158 | width, true, padzero);
|
|---|
| 159 | if (ret != E_OK)
|
|---|
| 160 | return ret;
|
|---|
| 161 | }
|
|---|
| 162 | break;
|
|---|
| 163 | case 'u':
|
|---|
| 164 | val = lflag ? (intptr_t) va_arg(ap, ulong_t)
|
|---|
| 165 | : (intptr_t) va_arg(ap, uint_t);
|
|---|
| 166 | ret = convert(fbs, pos, (uintptr_t) val, 10U, raddec, width, false, padzero);
|
|---|
| 167 | if (ret != E_OK)
|
|---|
| 168 | return ret;
|
|---|
| 169 | break;
|
|---|
| 170 | case 'x':
|
|---|
| 171 | case 'p':
|
|---|
| 172 | val = lflag ? (intptr_t) va_arg(ap, ulong_t)
|
|---|
| 173 | : (intptr_t) va_arg(ap, uint_t);
|
|---|
| 174 | ret = convert(fbs, pos, (uintptr_t) val, 16U, radhex, width, false, padzero);
|
|---|
| 175 | if (ret != E_OK)
|
|---|
| 176 | return ret;
|
|---|
| 177 | break;
|
|---|
| 178 | case 'X':
|
|---|
| 179 | val = (intptr_t)va_arg(ap, void *);
|
|---|
| 180 | ret = convert(fbs, pos, (uintptr_t) val, 16U, radHEX, width, false, padzero);
|
|---|
| 181 | if (ret != E_OK)
|
|---|
| 182 | return ret;
|
|---|
| 183 | break;
|
|---|
| 184 | case 'c':
|
|---|
| 185 | ret = _ecn_fbs_poke(fbs, *pos, (char)(intptr_t)va_arg(ap, int));
|
|---|
| 186 | if (ret != E_OK)
|
|---|
| 187 | return ret;
|
|---|
| 188 | (*pos)++;
|
|---|
| 189 | break;
|
|---|
| 190 | case 's':
|
|---|
| 191 | str = head = (const char *)va_arg(ap, const char *);
|
|---|
| 192 | while ((c = *str++) != '\0') {
|
|---|
| 193 | ret = _ecn_fbs_poke(fbs, *pos, c);
|
|---|
| 194 | if (ret != E_OK)
|
|---|
| 195 | return ret;
|
|---|
| 196 | (*pos)++;
|
|---|
| 197 | }
|
|---|
| 198 | break;
|
|---|
| 199 | case '%':
|
|---|
| 200 | ret = _ecn_fbs_poke(fbs, *pos, '%');
|
|---|
| 201 | if (ret != E_OK)
|
|---|
| 202 | return ret;
|
|---|
| 203 | (*pos)++;
|
|---|
| 204 | break;
|
|---|
| 205 | case '\0':
|
|---|
| 206 | format--;
|
|---|
| 207 | break;
|
|---|
| 208 | default:
|
|---|
| 209 | break;
|
|---|
| 210 | }
|
|---|
| 211 | }
|
|---|
| 212 | va_end(ap);
|
|---|
| 213 |
|
|---|
| 214 | return E_OK;
|
|---|
| 215 | }
|
|---|
![(please configure the [header_logo] section in trac.ini)](/trac_user/contrib/chrome/site/your_project_logo.png){kind=logo}
