mirror of https://github.com/tailix/libkernaux.git
120 lines
2.9 KiB
C
120 lines
2.9 KiB
C
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include "assert.h"
|
|
|
|
#include <kernaux/ntoa.h>
|
|
|
|
#include <stddef.h>
|
|
|
|
char *kernaux_utoa(uint64_t value, char *buffer, int base, const char *prefix)
|
|
{
|
|
KERNAUX_NOTNULL(buffer);
|
|
|
|
// Protect caller from invalid state in case of future assertions
|
|
// cppcheck-suppress ctunullpointer
|
|
*buffer = '\0';
|
|
|
|
switch (base) {
|
|
case 'b': case 'B': base = 2; break;
|
|
case 'o': case 'O': base = 8; break;
|
|
case 'd': case 'D': base = 10; break;
|
|
case 'h': case 'x': base = 16; break;
|
|
case 'H': case 'X': base = -16; break;
|
|
}
|
|
|
|
// Uppercase
|
|
char alpha = 'a';
|
|
if (base < 0) {
|
|
alpha = 'A';
|
|
base = -base;
|
|
}
|
|
|
|
KERNAUX_ASSERT(base >= 2 && base <= 36);
|
|
|
|
// Write prefix
|
|
if (prefix) {
|
|
for (size_t prefix_len = 1; *prefix; ++prefix_len) {
|
|
if (prefix_len > KERNAUX_NTOA_MAX_PREFIX_LEN) {
|
|
// Protect caller from invalid state
|
|
*buffer = '\0';
|
|
KERNAUX_PANIC("prefix is too long");
|
|
}
|
|
*(buffer++) = *(prefix++);
|
|
}
|
|
}
|
|
|
|
// Write number
|
|
char *pos = buffer;
|
|
if (value == 0) *(pos++) = '0';
|
|
while (value > 0) {
|
|
// cppcheck-suppress zerodivcond
|
|
const char mod = value % base;
|
|
*(pos++) = mod < 10 ? mod + '0' : mod - 10 + alpha;
|
|
// cppcheck-suppress zerodivcond
|
|
value /= base;
|
|
}
|
|
char *const result = pos;
|
|
*(pos--) = '\0';
|
|
|
|
// Reverse number
|
|
while (buffer < pos) {
|
|
const char tmp = *buffer;
|
|
*(buffer++) = *pos;
|
|
*(pos--) = tmp;
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
char *kernaux_itoa(int64_t value, char *buffer, int base, const char *const prefix)
|
|
{
|
|
if (value >= 0) {
|
|
return kernaux_utoa(value, buffer, base, prefix);
|
|
} else {
|
|
*(buffer++) = '-';
|
|
return kernaux_utoa(-value, buffer, base, prefix);
|
|
}
|
|
}
|
|
|
|
char *kernaux_utoa2(uint64_t value, char *buffer)
|
|
{
|
|
return kernaux_utoa(value, buffer, 'b', KERNAUX_NTOA_DEFAULT_PREFIX_2);
|
|
}
|
|
|
|
char *kernaux_itoa2(int64_t value, char *buffer)
|
|
{
|
|
return kernaux_itoa(value, buffer, 'b', KERNAUX_NTOA_DEFAULT_PREFIX_2);
|
|
}
|
|
|
|
char *kernaux_utoa8(uint64_t value, char *buffer)
|
|
{
|
|
return kernaux_utoa(value, buffer, 'o', KERNAUX_NTOA_DEFAULT_PREFIX_8);
|
|
}
|
|
|
|
char *kernaux_itoa8(int64_t value, char *buffer)
|
|
{
|
|
return kernaux_itoa(value, buffer, 'o', KERNAUX_NTOA_DEFAULT_PREFIX_8);
|
|
}
|
|
|
|
char *kernaux_utoa10(uint64_t value, char *buffer)
|
|
{
|
|
return kernaux_utoa(value, buffer, 'd', NULL);
|
|
}
|
|
|
|
char *kernaux_itoa10(int64_t value, char *buffer)
|
|
{
|
|
return kernaux_itoa(value, buffer, 'd', NULL);
|
|
}
|
|
|
|
char *kernaux_utoa16(uint64_t value, char *buffer)
|
|
{
|
|
return kernaux_utoa(value, buffer, 'x', KERNAUX_NTOA_DEFAULT_PREFIX_16);
|
|
}
|
|
|
|
char *kernaux_itoa16(int64_t value, char *buffer)
|
|
{
|
|
return kernaux_itoa(value, buffer, 'x', KERNAUX_NTOA_DEFAULT_PREFIX_16);
|
|
}
|