mirror of
https://github.com/trezor/trezor-firmware.git
synced 2024-12-27 00:28:10 +00:00
ebbd7f9d35
[no changelog]
202 lines
5.0 KiB
C
202 lines
5.0 KiB
C
// clang-format off
|
|
|
|
/*
|
|
* The Minimal snprintf() implementation
|
|
*
|
|
* Copyright (c) 2013,2014 Michal Ludvig <michal@logix.cz>
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions are met:
|
|
* * Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* * Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* * Neither the name of the auhor nor the names of its contributors
|
|
* may be used to endorse or promote products derived from this software
|
|
* without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
|
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
|
* DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
|
|
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
|
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
|
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
|
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
|
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
* ----
|
|
*
|
|
* This is a minimal snprintf() implementation optimised
|
|
* for embedded systems with a very limited program memory.
|
|
* mini_snprintf() doesn't support _all_ the formatting
|
|
* the glibc does but on the other hand is a lot smaller.
|
|
* Here are some numbers from my STM32 project (.bin file size):
|
|
* no snprintf(): 10768 bytes
|
|
* mini snprintf(): 11420 bytes (+ 652 bytes)
|
|
* glibc snprintf(): 34860 bytes (+24092 bytes)
|
|
* Wasting nearly 24kB of memory just for snprintf() on
|
|
* a chip with 32kB flash is crazy. Use mini_snprintf() instead.
|
|
*
|
|
*/
|
|
|
|
#include <string.h>
|
|
#include <stdarg.h>
|
|
#include "mini_printf.h"
|
|
|
|
static unsigned int
|
|
mini_strlen(const char *s)
|
|
{
|
|
unsigned int len = 0;
|
|
while (s[len] != '\0') len++;
|
|
return len;
|
|
}
|
|
|
|
static unsigned int
|
|
mini_itoa(int value, unsigned int radix, unsigned int uppercase, unsigned int unsig,
|
|
char *buffer, unsigned int zero_pad)
|
|
{
|
|
char *pbuffer = buffer;
|
|
int negative = 0;
|
|
unsigned int i, len;
|
|
|
|
/* No support for unusual radixes. */
|
|
if (radix > 16)
|
|
return 0;
|
|
|
|
if (value < 0 && !unsig) {
|
|
negative = 1;
|
|
value = -value;
|
|
}
|
|
|
|
/* This builds the string back to front ... */
|
|
do {
|
|
int digit = value % radix;
|
|
*(pbuffer++) = (digit < 10 ? '0' + digit : (uppercase ? 'A' : 'a') + digit - 10);
|
|
value /= radix;
|
|
} while (value > 0);
|
|
|
|
for (i = (pbuffer - buffer); i < zero_pad; i++)
|
|
*(pbuffer++) = '0';
|
|
|
|
if (negative)
|
|
*(pbuffer++) = '-';
|
|
|
|
*(pbuffer) = '\0';
|
|
|
|
/* ... now we reverse it (could do it recursively but will
|
|
* conserve the stack space) */
|
|
len = (pbuffer - buffer);
|
|
for (i = 0; i < len / 2; i++) {
|
|
char j = buffer[i];
|
|
buffer[i] = buffer[len-i-1];
|
|
buffer[len-i-1] = j;
|
|
}
|
|
|
|
return len;
|
|
}
|
|
|
|
int
|
|
mini_vsnprintf(char *buffer, unsigned int buffer_len, const char *fmt, va_list va)
|
|
{
|
|
char *pbuffer = buffer;
|
|
char bf[24];
|
|
char ch;
|
|
|
|
int _putc(char ch)
|
|
{
|
|
if ((unsigned int)((pbuffer - buffer) + 1) >= buffer_len)
|
|
return 0;
|
|
*(pbuffer++) = ch;
|
|
*(pbuffer) = '\0';
|
|
return 1;
|
|
}
|
|
|
|
int _puts(char *s, unsigned int len)
|
|
{
|
|
unsigned int i;
|
|
|
|
if (buffer_len - (pbuffer - buffer) - 1 < len)
|
|
len = buffer_len - (pbuffer - buffer) - 1;
|
|
|
|
/* Copy to buffer */
|
|
for (i = 0; i < len; i++)
|
|
*(pbuffer++) = s[i];
|
|
*(pbuffer) = '\0';
|
|
|
|
return len;
|
|
}
|
|
|
|
while ((ch=*(fmt++))) {
|
|
if ((unsigned int)((pbuffer - buffer) + 1) >= buffer_len)
|
|
break;
|
|
if (ch!='%')
|
|
_putc(ch);
|
|
else {
|
|
char zero_pad = 0;
|
|
char *ptr;
|
|
unsigned int len;
|
|
|
|
ch=*(fmt++);
|
|
|
|
/* Zero padding requested */
|
|
if (ch=='0') {
|
|
ch=*(fmt++);
|
|
if (ch == '\0')
|
|
goto end;
|
|
if (ch >= '0' && ch <= '9')
|
|
zero_pad = ch - '0';
|
|
ch=*(fmt++);
|
|
}
|
|
|
|
switch (ch) {
|
|
case 0:
|
|
goto end;
|
|
|
|
case 'u':
|
|
case 'd':
|
|
len = mini_itoa(va_arg(va, unsigned int), 10, 0, (ch=='u'), bf, zero_pad);
|
|
_puts(bf, len);
|
|
break;
|
|
|
|
case 'x':
|
|
case 'X':
|
|
len = mini_itoa(va_arg(va, unsigned int), 16, (ch=='X'), 1, bf, zero_pad);
|
|
_puts(bf, len);
|
|
break;
|
|
|
|
case 'c' :
|
|
_putc((char)(va_arg(va, int)));
|
|
break;
|
|
|
|
case 's' :
|
|
ptr = va_arg(va, char*);
|
|
_puts(ptr, mini_strlen(ptr));
|
|
break;
|
|
|
|
default:
|
|
_putc(ch);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
end:
|
|
return pbuffer - buffer;
|
|
}
|
|
|
|
|
|
int
|
|
mini_snprintf(char* buffer, unsigned int buffer_len, const char *fmt, ...)
|
|
{
|
|
int ret;
|
|
va_list va;
|
|
va_start(va, fmt);
|
|
ret = mini_vsnprintf(buffer, buffer_len, fmt, va);
|
|
va_end(va);
|
|
|
|
return ret;
|
|
}
|