WebSVN – HelenOS – Diff – //branches/dynload/kernel/generic/src/printf/printf_core.c

 } qualifier_t;
 static char nullstr[] = "(NULL)";
 static char digits_small[] = "0123456789abcdef";
 static char digits_big[] = "0123456789ABCDEF";
+static char invalch = U_SPECIAL;
-/** Print one or more UTF-8 characters without adding newline.
+/** Print one or more characters without adding newline.
+ *
- * @param buf  Buffer holding UTF-8 characters with size of
+ * @param buf  Buffer holding characters with size of
  *             at least size bytes. NULL is not allowed!
  * @param size Size of the buffer in bytes.
  * @param ps   Output method and its data.
+ *
- * @return Number of UTF-8 characters printed.
+ * @return Number of characters printed.
+ *
  */
-static int printf_putnchars_utf8(const char *buf, size_t size,
+static int printf_putnchars(const char *buf, size_t size,
     printf_spec_t *ps)
+{
-    return ps->write_utf8((void *) buf, size, ps->data);
+    return ps->str_write((void *) buf, size, ps->data);
+}
-/** Print one or more UTF-32 characters without adding newline.
+/** Print one or more wide characters without adding newline.
+ *
- * @param buf  Buffer holding UTF-32 characters with size of
+ * @param buf  Buffer holding wide characters with size of
  *             at least size bytes. NULL is not allowed!
  * @param size Size of the buffer in bytes.
  * @param ps   Output method and its data.
+ *
- * @return Number of UTF-32 characters printed.
+ * @return Number of wide characters printed.
+ *
  */
-static int printf_putnchars_utf32(const wchar_t *buf, size_t size,
+static int printf_wputnchars(const wchar_t *buf, size_t size,
     printf_spec_t *ps)
+{
-    return ps->write_utf32((void *) buf, size, ps->data);
+    return ps->wstr_write((void *) buf, size, ps->data);
+}
-/** Print UTF-8 string without adding a newline.
+/** Print string without adding a newline.
+ *
- * @param str UTF-8 string to print.
+ * @param str String to print.
  * @param ps  Write function specification and support data.
+ *
- * @return Number of UTF-8 characters printed.
+ * @return Number of characters printed.
+ *
  */
 static int printf_putstr(const char *str, printf_spec_t *ps)
+{
     if (str == NULL)
-        return printf_putnchars_utf8(nullstr, strlen(nullstr), ps);
+        return printf_putnchars(nullstr, str_size(nullstr), ps);
-    return ps->write_utf8((void *) str, strlen(str), ps->data);
+    return ps->str_write((void *) str, str_size(str), ps->data);
+}
 /** Print one ASCII character.
+ *
  * @param c  ASCII character to be printed.
+ *
  */
 static int printf_putchar(const char ch, printf_spec_t *ps)
+{
     if (!ascii_check(ch))
-        return ps->write_utf8((void *) &invalch, 1, ps->data);
+        return ps->str_write((void *) &invalch, 1, ps->data);
-    return ps->write_utf8(&ch, 1, ps->data);
+    return ps->str_write(&ch, 1, ps->data);
+}
-/** Print one UTF-32 character.
+/** Print one wide character.
+ *
- * @param c  UTF-32 character to be printed.
+ * @param c  Wide character to be printed.
  * @param ps Output method.
+ *
  * @return Number of characters printed.
+ *
  */
 static int printf_putwchar(const wchar_t ch, printf_spec_t *ps)
+{
-    if (!unicode_check(ch))
+    if (!chr_check(ch))
-        return ps->write_utf8((void *) &invalch, 1, ps->data);
+        return ps->str_write((void *) &invalch, 1, ps->data);
-    return ps->write_utf32(&ch, sizeof(wchar_t), ps->data);
+    return ps->wstr_write(&ch, sizeof(wchar_t), ps->data);
+}
 /** Print one formatted ASCII character.
+ *
  * @param ch    Character to print.
+    }
     return (int) (counter + 1);
+}
-/** Print one formatted UTF-32 character.
+/** Print one formatted wide character.
+ *
  * @param ch    Character to print.
  * @param width Width modifier.
  * @param flags Flags that change the way the character is printed.
+ *
+    }
     return (int) (counter + 1);
+}
-/** Print UTF-8 string.
+/** Print string.
+ *
- * @param str       UTF-8 string to be printed.
+ * @param str       String to be printed.
  * @param width     Width modifier.
  * @param precision Precision modifier.
  * @param flags     Flags that modify the way the string is printed.
+ *
- * @return Number of UTF-8 characters printed, negative value on failure.
+ * @return Number of characters printed, negative value on failure.
  */
-static int print_utf8(char *str, int width, unsigned int precision,
+static int print_str(char *str, int width, unsigned int precision,
     uint32_t flags, printf_spec_t *ps)
+{
     if (str == NULL)
         return printf_putstr(nullstr, ps);
-    /* Print leading spaces */
+    /* Print leading spaces. */
-    size_t size = strlen_utf8(str);
+    count_t strw = str_length(str);
     if (precision == 0)
-        precision = size;
+        precision = strw;
+    /* Left padding */
     count_t counter = 0;
     width -= precision;
     if (!(flags & __PRINTF_FLAG_LEFTALIGNED)) {
         while (width-- > 0) {
             if (printf_putchar(' ', ps) == 1)
                 counter++;
+        }
+    }
+    /* Part of @a str fitting into the alloted space. */
     int retval;
-    size_t bytes = utf8_count_bytes(str, min(size, precision));
+    size_t size = str_lsize(str, precision);
-    if ((retval = printf_putnchars_utf8(str, bytes, ps)) < 0)
+    if ((retval = printf_putnchars(str, size, ps)) < 0)
         return -counter;
     counter += retval;
+    /* Right padding */
     while (width-- > 0) {
         if (printf_putchar(' ', ps) == 1)
             counter++;
+    }
     return ((int) counter);
+}
-/** Print UTF-32 string.
+/** Print wide string.
+ *
- * @param str       UTF-32 string to be printed.
+ * @param str       Wide string to be printed.
  * @param width     Width modifier.
  * @param precision Precision modifier.
  * @param flags     Flags that modify the way the string is printed.
+ *
- * @return Number of UTF-32 characters printed, negative value on failure.
+ * @return Number of wide characters printed, negative value on failure.
  */
-static int print_utf32(wchar_t *str, int width, unsigned int precision,
+static int print_wstr(wchar_t *str, int width, unsigned int precision,
     uint32_t flags, printf_spec_t *ps)
+{
     if (str == NULL)
         return printf_putstr(nullstr, ps);
+    if (*str == U_BOM)
+        str++;
-    /* Print leading spaces */
+    /* Print leading spaces. */
-    size_t size = strlen_utf32(str);
+    size_t strw = wstr_length(str);
     if (precision == 0)
-        precision = size;
+        precision = strw;
+    /* Left padding */
     count_t counter = 0;
     width -= precision;
     if (!(flags & __PRINTF_FLAG_LEFTALIGNED)) {
         while (width-- > 0) {
             if (printf_putchar(' ', ps) == 1)
                 counter++;
+        }
+    }
+    /* Part of @a wstr fitting into the alloted space. */
     int retval;
-    size_t bytes = min(size, precision) * sizeof(wchar_t);
+    size_t size = wstr_lsize(str, precision);
-    if ((retval = printf_putnchars_utf32(str, bytes, ps)) < 0)
+    if ((retval = printf_wputnchars(str, size, ps)) < 0)
         return -counter;
     counter += retval;
+    /* Right padding */
     while (width-- > 0) {
         if (printf_putchar(' ', ps) == 1)
             counter++;
+    }
     return ((int) counter);
+}
 /** Print a number in a given base.
+ *
  * TYPE:@n
  *  - "hh" Signed or unsigned char.@n
  *  - "h"  Signed or unsigned short.@n
  *  - ""   Signed or unsigned int (default value).@n
  *  - "l"  Signed or unsigned long int.@n
- *         If conversion is "c", the character is wchar_t (UTF-32).@n
+ *         If conversion is "c", the character is wchar_t (wide character).@n
- *         If conversion is "s", the string is wchar_t * (UTF-32).@n
+ *         If conversion is "s", the string is wchar_t * (wide string).@n
  *  - "ll" Signed or unsigned long long int.@n
+ *
  * CONVERSION:@n
  *  - % Print percentile character itself.
+ *
  *  - c Print single character. The character is expected to be plain
  *      ASCII (e.g. only values 0 .. 127 are valid).@n
- *      If type is "l", then the character is expected to be UTF-32
+ *      If type is "l", then the character is expected to be wide character
  *      (e.g. values 0 .. 0x10ffff are valid).
+ *
  *  - s Print zero terminated string. If a NULL value is passed as
  *      value, "(NULL)" is printed instead.@n
- *      The string is expected to be correctly encoded UTF-8 (or plain
- *      ASCII, which is a subset of UTF-8).@n
- *      If type is "l", then the string is expected to be correctly
+ *      If type is "l", then the string is expected to be wide string.
- *      encoded UTF-32.
+ *
  *  - P, p Print value of a pointer. Void * value is expected and it is
  *         printed in hexadecimal notation with prefix (as with \%#X / \%#x
  *         for 32-bit or \%#X / \%#x for 64-bit long pointers).
+ *
  *  - u Print unsigned decimal number.
+ *
  *  - X, x Print hexadecimal number with upper- or lower-case. Prefix is
  *         not printed by default.
+ *
- * All other characters from fmt except the formatting directives are printed in
+ * All other characters from fmt except the formatting directives are printed
  * verbatim.
+ *
- * @param fmt Formatting NULL terminated string (UTF-8 or plain ASCII).
+ * @param fmt Format NULL-terminated string.
+ *
- * @return Number of UTF-8 characters printed, negative value on failure.
+ * @return Number of characters printed, negative value on failure.
+ *
  */
 int printf_core(const char *fmt, printf_spec_t *ps, va_list ap)
+{
-    index_t i = 0;  /* Index of the currently processed character from fmt */
+    size_t i;        /* Index of the currently processed character from fmt */
+    size_t nxt = 0;  /* Index of the next character from fmt */
-    index_t j = 0;  /* Index to the first not printed nonformating character */
+    size_t j = 0;    /* Index to the first not printed nonformating character */
-    wchar_t uc;           /* Current UTF-32 character decoded from fmt */
-    count_t counter = 0;  /* Number of UTF-8 characters printed */
+    count_t counter = 0;  /* Number of characters printed */
     int retval;           /* Return values from nested functions */
+    while (true) {
+        i = nxt;
-    while ((uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT)) != 0) {
+        wchar_t uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
+        if (uc == 0)
+            break;
         /* Control character */
         if (uc == '%') {
             /* Print common characters if any processed */
             if (i > j) {
-                if ((retval = printf_putnchars_utf8(&fmt[j], i - j, ps)) < 0) {
+                if ((retval = printf_putnchars(&fmt[j], i - j, ps)) < 0) {
                     /* Error */
                     counter = -counter;
                     goto out;
+                }
                 counter += retval;
             /* Parse modifiers */
             uint32_t flags = 0;
             bool end = false;
             do {
-                i++;
+                i = nxt;
-                uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT);
+                uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
                 switch (uc) {
                 case '#':
                     flags |= __PRINTF_FLAG_PREFIX;
                     break;
                 case '-':
             } while (!end);
             /* Width & '*' operator */
             int width = 0;
             if (isdigit(uc)) {
-                while ((uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT)) != 0) {
-                    if (!isdigit(uc))
+                while (true) {
-                        break;
                     width *= 10;
                     width += uc - '0';
-                    i++;
+                    i = nxt;
+                    uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
+                    if (uc == 0)
+                        break;
+                    if (!isdigit(uc))
+                        break;
+                }
             } else if (uc == '*') {
                 /* Get width value from argument list */
-                i++;
+                i = nxt;
-                uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT);
+                uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
                 width = (int) va_arg(ap, int);
                 if (width < 0) {
                     /* Negative width sets '-' flag */
                     width *= -1;
                     flags |= __PRINTF_FLAG_LEFTALIGNED;
+            }
             /* Precision and '*' operator */
             int precision = 0;
             if (uc == '.') {
-                i++;
+                i = nxt;
-                uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT);
+                uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
                 if (isdigit(uc)) {
-                    while ((uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT)) != 0) {
-                        if (!isdigit(uc))
+                    while (true) {
-                            break;
                         precision *= 10;
                         precision += uc - '0';
-                        i++;
+                        i = nxt;
+                        uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
+                        if (uc == 0)
+                            break;
+                        if (!isdigit(uc))
+                            break;
+                    }
-                } else if (fmt[i] == '*') {
+                } else if (uc == '*') {
                     /* Get precision value from the argument list */
-                    i++;
+                    i = nxt;
-                    uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT);
+                    uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
                     precision = (int) va_arg(ap, int);
                     if (precision < 0) {
                         /* Ignore negative precision */
                         precision = 0;
+                    }
              *        t ptrdiff_t - ISO C 99
              */
             case 'h':
                 /* Char or short */
                 qualifier = PrintfQualifierShort;
-                i++;
+                i = nxt;
-                uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT);
+                uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
                 if (uc == 'h') {
-                    i++;
+                    i = nxt;
-                    uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT);
+                    uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
                     qualifier = PrintfQualifierByte;
+                }
                 break;
             case 'l':
                 /* Long or long long */
                 qualifier = PrintfQualifierLong;
-                i++;
+                i = nxt;
-                uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT);
+                uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
                 if (uc == 'l') {
-                    i++;
+                    i = nxt;
-                    uc = utf8_decode(fmt, &i, UTF8_NO_LIMIT);
+                    uc = str_decode(fmt, &nxt, STR_NO_LIMIT);
                     qualifier = PrintfQualifierLongLong;
+                }
                 break;
             default:
                 /* Default type */
             /*
              * String and character conversions.
              */
             case 's':
                 if (qualifier == PrintfQualifierLong)
-                    retval = print_utf32(va_arg(ap, wchar_t *), width, precision, flags, ps);
+                    retval = print_wstr(va_arg(ap, wchar_t *), width, precision, flags, ps);
                 else
-                    retval = print_utf8(va_arg(ap, char *), width, precision, flags, ps);
+                    retval = print_str(va_arg(ap, char *), width, precision, flags, ps);
                 if (retval < 0) {
                     counter = -counter;
                     goto out;
+                }
                 counter += retval;
-                j = i + 1;
+                j = nxt;
                 goto next_char;
             case 'c':
                 if (qualifier == PrintfQualifierLong)
                     retval = print_wchar(va_arg(ap, wchar_t), width, flags, ps);
                 else
                     counter = -counter;
                     goto out;
                 };
                 counter += retval;
-                j = i + 1;
+                j = nxt;
                 goto next_char;
             /*
              * Integer values
              */
                 counter = -counter;
                 goto out;
+            }
             counter += retval;
-            j = i + 1;
+            j = nxt;
+        }
 next_char:
+        ;
-        i++;
+    }
     if (i > j) {
-        if ((retval = printf_putnchars_utf8(&fmt[j], i - j, ps)) < 0) {
+        if ((retval = printf_putnchars(&fmt[j], i - j, ps)) < 0) {
             /* Error */
             counter = -counter;
             goto out;
+        }
         counter += retval;

Subversion Repositories HelenOS

(root)//branches/dynload/kernel/generic/src/printf/printf_core.c – Rev 4347 → 4348