mirror of https://github.com/RPCS3/rpcs3.git
641 lines
11 KiB
C++
641 lines
11 KiB
C++
#pragma once
|
|
|
|
#include "types.h"
|
|
#include "asm.h"
|
|
#include <climits>
|
|
#include <string>
|
|
#include <vector>
|
|
#include <algorithm>
|
|
|
|
static const size_t size_dropped = std::numeric_limits<size_t>::max();
|
|
|
|
/*
|
|
C-style format parser. Appends formatted string to `out`, returns number of characters written.
|
|
`out`: mutable reference to std::string, std::vector<char> or other compatible container
|
|
`fmt`: null-terminated string of `Char` type (char or constructible from char)
|
|
`src`: rvalue reference to argument provider.
|
|
*/
|
|
template<typename Dst, typename Char, typename Src>
|
|
std::size_t cfmt_append(Dst& out, const Char* fmt, Src&& src)
|
|
{
|
|
const std::size_t start_pos = out.size();
|
|
|
|
struct cfmt_context
|
|
{
|
|
std::size_t size; // Size of current format sequence
|
|
|
|
u8 args; // Number of extra args used
|
|
u8 type; // Integral type bytesize
|
|
bool dot; // Precision enabled
|
|
bool left;
|
|
bool sign;
|
|
bool space;
|
|
bool alter;
|
|
bool zeros;
|
|
|
|
uint width;
|
|
uint prec;
|
|
};
|
|
|
|
cfmt_context ctx{0};
|
|
|
|
// Error handling: print untouched sequence, stop further formatting
|
|
const auto drop_sequence = [&]
|
|
{
|
|
out.insert(out.end(), fmt - ctx.size, fmt);
|
|
ctx.size = size_dropped;
|
|
};
|
|
|
|
const auto read_decimal = [&](uint result) -> uint
|
|
{
|
|
while (fmt[0] >= '0' && fmt[0] <= '9' && result <= (UINT_MAX / 10))
|
|
{
|
|
result = result * 10 + (fmt[0] - '0');
|
|
fmt++, ctx.size++;
|
|
}
|
|
|
|
return result;
|
|
};
|
|
|
|
const auto write_octal = [&](u64 value, u64 min_num)
|
|
{
|
|
out.resize(out.size() + std::max<u64>(min_num, 66 / 3 - (utils::cntlz64(value | 1, true) + 2) / 3), '0');
|
|
|
|
// Write in reversed order
|
|
for (auto i = out.rbegin(); value; i++, value /= 8)
|
|
{
|
|
*i = value % 8 + '0';
|
|
}
|
|
};
|
|
|
|
const auto write_hex = [&](u64 value, bool upper, u64 min_num)
|
|
{
|
|
out.resize(out.size() + std::max<u64>(min_num, 64 / 4 - utils::cntlz64(value | 1, true) / 4), '0');
|
|
|
|
// Write in reversed order
|
|
for (auto i = out.rbegin(); value; i++, value /= 16)
|
|
{
|
|
*i = (upper ? "0123456789ABCDEF" : "0123456789abcdef")[value % 16];
|
|
}
|
|
};
|
|
|
|
const auto write_decimal = [&](u64 value, s64 min_size)
|
|
{
|
|
const std::size_t start = out.size();
|
|
|
|
do
|
|
{
|
|
out.push_back(value % 10 + '0');
|
|
value /= 10;
|
|
}
|
|
while (0 < --min_size || value);
|
|
|
|
// Revert written characters
|
|
for (std::size_t i = start, j = out.size() - 1; i < j; i++, j--)
|
|
{
|
|
std::swap(out[i], out[j]);
|
|
}
|
|
};
|
|
|
|
// Single pass over fmt string (null-terminated), TODO: check correct order
|
|
while (const Char ch = *fmt++) if (ctx.size == 0)
|
|
{
|
|
if (ch == '%')
|
|
{
|
|
ctx.size = 1;
|
|
}
|
|
else
|
|
{
|
|
out.push_back(ch);
|
|
}
|
|
}
|
|
else if (ctx.size == 1 && ch == '%')
|
|
{
|
|
ctx = {0};
|
|
out.push_back(ch);
|
|
}
|
|
else if (ctx.size == size_dropped)
|
|
{
|
|
out.push_back(ch);
|
|
}
|
|
else switch (ctx.size++, ch)
|
|
{
|
|
case '-': ctx.left = true; break;
|
|
case '+': ctx.sign = true; break;
|
|
case ' ': ctx.space = true; break;
|
|
case '#': ctx.alter = true; break;
|
|
case '0': ctx.zeros = true; break;
|
|
|
|
case '1':
|
|
case '2':
|
|
case '3':
|
|
case '4':
|
|
case '5':
|
|
case '6':
|
|
case '7':
|
|
case '8':
|
|
case '9':
|
|
{
|
|
if (UNLIKELY(ctx.width))
|
|
{
|
|
drop_sequence();
|
|
}
|
|
else
|
|
{
|
|
ctx.width = read_decimal(ch - '0');
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case '*':
|
|
{
|
|
if (UNLIKELY(ctx.width || !src.test(ctx.args)))
|
|
{
|
|
drop_sequence();
|
|
}
|
|
else
|
|
{
|
|
const int warg = src.template get<int>(ctx.args++);
|
|
ctx.width = std::abs(warg);
|
|
ctx.left |= warg < 0;
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case '.':
|
|
{
|
|
if (UNLIKELY(ctx.dot || ctx.prec))
|
|
{
|
|
drop_sequence();
|
|
}
|
|
else if (*fmt >= '0' && *fmt <= '9') // TODO: does it allow '0'?
|
|
{
|
|
ctx.prec = read_decimal(0);
|
|
ctx.dot = true;
|
|
}
|
|
else if (*fmt == '*')
|
|
{
|
|
if (UNLIKELY(!src.test(ctx.args)))
|
|
{
|
|
drop_sequence();
|
|
}
|
|
else
|
|
{
|
|
fmt++, ctx.size++;
|
|
const int parg = src.template get<int>(ctx.args++);
|
|
ctx.prec = std::max(parg, 0);
|
|
ctx.dot = parg >= 0;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
ctx.prec = 0;
|
|
ctx.dot = true;
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case 'h':
|
|
{
|
|
if (UNLIKELY(ctx.type))
|
|
{
|
|
drop_sequence();
|
|
}
|
|
else if (fmt[0] == 'h')
|
|
{
|
|
fmt++, ctx.size++;
|
|
ctx.type = src.size_char;
|
|
}
|
|
else
|
|
{
|
|
ctx.type = src.size_short;
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case 'l':
|
|
{
|
|
if (UNLIKELY(ctx.type))
|
|
{
|
|
drop_sequence();
|
|
}
|
|
else if (fmt[0] == 'l')
|
|
{
|
|
fmt++, ctx.size++;
|
|
ctx.type = src.size_llong;
|
|
}
|
|
else
|
|
{
|
|
ctx.type = src.size_long;
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case 'z':
|
|
{
|
|
if (UNLIKELY(ctx.type))
|
|
{
|
|
drop_sequence();
|
|
}
|
|
else
|
|
{
|
|
ctx.type = src.size_size;
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case 'j':
|
|
{
|
|
if (UNLIKELY(ctx.type))
|
|
{
|
|
drop_sequence();
|
|
}
|
|
else
|
|
{
|
|
ctx.type = src.size_max;
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case 't':
|
|
{
|
|
if (UNLIKELY(ctx.type))
|
|
{
|
|
drop_sequence();
|
|
}
|
|
else
|
|
{
|
|
ctx.type = src.size_diff;
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case 'c':
|
|
{
|
|
if (UNLIKELY(ctx.type || !src.test(ctx.args)))
|
|
{
|
|
drop_sequence();
|
|
break;
|
|
}
|
|
|
|
const std::size_t start = out.size();
|
|
out.push_back(src.template get<Char>(ctx.args));
|
|
|
|
if (1 < ctx.width)
|
|
{
|
|
// Add spaces if necessary
|
|
out.insert(out.begin() + start + ctx.left, ctx.width - 1, ' ');
|
|
}
|
|
|
|
src.skip(ctx.args);
|
|
ctx = {0};
|
|
break;
|
|
}
|
|
|
|
case 's':
|
|
{
|
|
if (UNLIKELY(ctx.type || !src.test(ctx.args)))
|
|
{
|
|
drop_sequence();
|
|
break;
|
|
}
|
|
|
|
const std::size_t start = out.size();
|
|
const std::size_t size1 = src.fmt_string(out, ctx.args);
|
|
|
|
if (ctx.dot && size1 > ctx.prec)
|
|
{
|
|
// Shrink if necessary
|
|
out.resize(start + ctx.prec);
|
|
}
|
|
|
|
const std::size_t size2 = out.size() - start;
|
|
|
|
if (size2 < ctx.width)
|
|
{
|
|
// Add spaces if necessary
|
|
out.insert(ctx.left ? out.end() : out.begin() + start, ctx.width - size2, ' ');
|
|
}
|
|
|
|
src.skip(ctx.args);
|
|
ctx = {0};
|
|
break;
|
|
}
|
|
|
|
case 'd':
|
|
case 'i':
|
|
{
|
|
if (UNLIKELY(!src.test(ctx.args)))
|
|
{
|
|
drop_sequence();
|
|
break;
|
|
}
|
|
|
|
if (!ctx.type)
|
|
{
|
|
ctx.type = (u8)src.type(ctx.args);
|
|
|
|
if (!ctx.type)
|
|
{
|
|
ctx.type = src.size_int;
|
|
}
|
|
}
|
|
|
|
// Sign-extended argument expected
|
|
const u64 val = src.template get<u64>(ctx.args);
|
|
const bool negative = ctx.type && static_cast<s64>(val) < 0;
|
|
|
|
const std::size_t start = out.size();
|
|
|
|
if (!ctx.dot || ctx.prec)
|
|
{
|
|
if (negative)
|
|
{
|
|
out.push_back('-');
|
|
}
|
|
else if (ctx.sign)
|
|
{
|
|
out.push_back('+');
|
|
}
|
|
else if (ctx.space)
|
|
{
|
|
out.push_back(' ');
|
|
}
|
|
|
|
write_decimal(negative ? 0 - val : val, ctx.prec);
|
|
}
|
|
|
|
const std::size_t size2 = out.size() - start;
|
|
|
|
if (size2 < ctx.width)
|
|
{
|
|
// Add padding if necessary
|
|
if (ctx.zeros && !ctx.left && !ctx.dot)
|
|
{
|
|
out.insert(out.begin() + start + (negative || ctx.sign || ctx.space), ctx.width - size2, '0');
|
|
}
|
|
else
|
|
{
|
|
out.insert(ctx.left ? out.end() : out.begin() + start, ctx.width - size2, ' ');
|
|
}
|
|
}
|
|
|
|
src.skip(ctx.args);
|
|
ctx = {0};
|
|
break;
|
|
}
|
|
|
|
case 'o':
|
|
{
|
|
if (UNLIKELY(!src.test(ctx.args)))
|
|
{
|
|
drop_sequence();
|
|
break;
|
|
}
|
|
|
|
if (!ctx.type)
|
|
{
|
|
ctx.type = (u8)src.type(ctx.args);
|
|
|
|
if (!ctx.type)
|
|
{
|
|
ctx.type = src.size_int;
|
|
}
|
|
}
|
|
|
|
const u64 mask =
|
|
ctx.type == 1 ? 0xff :
|
|
ctx.type == 2 ? 0xffff :
|
|
ctx.type == 4 ? 0xffff'ffffu :
|
|
0xffff'ffff'ffff'ffffu;
|
|
|
|
// Trunc sign-extended signed types
|
|
const u64 val = src.template get<u64>(ctx.args) & mask;
|
|
|
|
const std::size_t start = out.size();
|
|
|
|
if (ctx.alter)
|
|
{
|
|
out.push_back('0');
|
|
|
|
if (val)
|
|
{
|
|
write_octal(val, ctx.prec ? ctx.prec - 1 : 0);
|
|
}
|
|
}
|
|
else if (!ctx.dot || ctx.prec)
|
|
{
|
|
write_octal(val, ctx.prec);
|
|
}
|
|
|
|
const std::size_t size2 = out.size() - start;
|
|
|
|
if (size2 < ctx.width)
|
|
{
|
|
// Add padding if necessary
|
|
out.insert(ctx.left ? out.end() : out.begin() + start, ctx.width - size2, ctx.zeros && !ctx.left && !ctx.dot ? '0' : ' ');
|
|
}
|
|
|
|
src.skip(ctx.args);
|
|
ctx = {0};
|
|
break;
|
|
}
|
|
|
|
case 'x':
|
|
case 'X':
|
|
{
|
|
if (UNLIKELY(!src.test(ctx.args)))
|
|
{
|
|
drop_sequence();
|
|
break;
|
|
}
|
|
|
|
if (!ctx.type)
|
|
{
|
|
ctx.type = (u8)src.type(ctx.args);
|
|
|
|
if (!ctx.type)
|
|
{
|
|
ctx.type = src.size_int;
|
|
}
|
|
}
|
|
|
|
const u64 mask =
|
|
ctx.type == 1 ? 0xff :
|
|
ctx.type == 2 ? 0xffff :
|
|
ctx.type == 4 ? 0xffff'ffffu :
|
|
0xffff'ffff'ffff'ffffu;
|
|
|
|
// Trunc sign-extended signed types
|
|
const u64 val = src.template get<u64>(ctx.args) & mask;
|
|
|
|
const std::size_t start = out.size();
|
|
|
|
if (ctx.alter)
|
|
{
|
|
out.push_back('0');
|
|
|
|
if (val)
|
|
{
|
|
out.push_back(ch); // Prepend 0x or 0X
|
|
write_hex(val, ch == 'X', ctx.prec);
|
|
}
|
|
}
|
|
else if (!ctx.dot || ctx.prec)
|
|
{
|
|
write_hex(val, ch == 'X', ctx.prec);
|
|
}
|
|
|
|
const std::size_t size2 = out.size() - start;
|
|
|
|
if (size2 < ctx.width)
|
|
{
|
|
// Add padding if necessary
|
|
if (ctx.zeros && !ctx.left && !ctx.dot)
|
|
{
|
|
out.insert(out.begin() + start + (ctx.alter && val ? 2 : 0), ctx.width - size2, '0');
|
|
}
|
|
else
|
|
{
|
|
out.insert(ctx.left ? out.end() : out.begin() + start, ctx.width - size2, ' ');
|
|
}
|
|
}
|
|
|
|
src.skip(ctx.args);
|
|
ctx = {0};
|
|
break;
|
|
}
|
|
|
|
case 'u':
|
|
{
|
|
if (UNLIKELY(!src.test(ctx.args)))
|
|
{
|
|
drop_sequence();
|
|
break;
|
|
}
|
|
|
|
if (!ctx.type)
|
|
{
|
|
ctx.type = (u8)src.type(ctx.args);
|
|
|
|
if (!ctx.type)
|
|
{
|
|
ctx.type = src.size_int;
|
|
}
|
|
}
|
|
|
|
const u64 mask =
|
|
ctx.type == 1 ? 0xff :
|
|
ctx.type == 2 ? 0xffff :
|
|
ctx.type == 4 ? 0xffff'ffffu :
|
|
0xffff'ffff'ffff'ffffu;
|
|
|
|
// Trunc sign-extended signed types
|
|
const u64 val = src.template get<u64>(ctx.args) & mask;
|
|
|
|
const std::size_t start = out.size();
|
|
|
|
if (!ctx.dot || ctx.prec)
|
|
{
|
|
write_decimal(val, ctx.prec);
|
|
}
|
|
|
|
const std::size_t size2 = out.size() - start;
|
|
|
|
if (size2 < ctx.width)
|
|
{
|
|
// Add padding if necessary
|
|
out.insert(ctx.left ? out.end() : out.begin() + start, ctx.width - size2, ctx.zeros && !ctx.left && !ctx.dot ? '0' : ' ');
|
|
}
|
|
|
|
src.skip(ctx.args);
|
|
ctx = {0};
|
|
break;
|
|
}
|
|
|
|
case 'p':
|
|
{
|
|
if (UNLIKELY(!src.test(ctx.args) || ctx.type))
|
|
{
|
|
drop_sequence();
|
|
break;
|
|
}
|
|
|
|
const u64 val = src.template get<u64>(ctx.args);
|
|
|
|
const std::size_t start = out.size();
|
|
|
|
write_hex(val, false, sizeof(void*) * 2);
|
|
|
|
const std::size_t size2 = out.size() - start;
|
|
|
|
if (size2 < ctx.width)
|
|
{
|
|
// Add padding if necessary
|
|
out.insert(ctx.left ? out.end() : out.begin() + start, ctx.width - size2, ' ');
|
|
}
|
|
|
|
src.skip(ctx.args);
|
|
ctx = {0};
|
|
break;
|
|
}
|
|
|
|
case 'f':
|
|
case 'F':
|
|
case 'e':
|
|
case 'E':
|
|
case 'a':
|
|
case 'A':
|
|
case 'g':
|
|
case 'G':
|
|
{
|
|
if (UNLIKELY(!src.test(ctx.args) || ctx.type))
|
|
{
|
|
drop_sequence();
|
|
break;
|
|
}
|
|
|
|
// Fallback (TODO)
|
|
|
|
const std::string _fmt(fmt - ctx.size, fmt);
|
|
|
|
const f64 arg0 = src.template get<f64>(0);
|
|
const u64 arg1 = ctx.args >= 1 ? src.template get<u64>(1) : 0;
|
|
const u64 arg2 = ctx.args >= 2 ? src.template get<u64>(2) : 0;
|
|
|
|
if (const std::size_t _size = std::snprintf(0, 0, _fmt.c_str(), arg0, arg1, arg2))
|
|
{
|
|
out.resize(out.size() + _size);
|
|
std::snprintf(&out.front() + out.size() - _size, _size + 1, _fmt.c_str(), arg0, arg1, arg2);
|
|
}
|
|
|
|
src.skip(ctx.args);
|
|
ctx = {0};
|
|
break;
|
|
}
|
|
|
|
case 'L': // long double, not supported
|
|
case 'n': // writeback, not supported
|
|
default:
|
|
{
|
|
drop_sequence();
|
|
}
|
|
}
|
|
|
|
// Handle unfinished sequence
|
|
if (ctx.size && ctx.size != size_dropped)
|
|
{
|
|
fmt--, drop_sequence();
|
|
}
|
|
|
|
return out.size() - start_pos;
|
|
}
|