Extract text printing functions.

1 files changed, 327 insertions, 0 deletions

diff --git a/server/TracyPrint.cpp b/server/TracyPrint.cpp
new file mode 100644
index 00000000..c9411e45
--- /dev/null
+++ b/server/TracyPrint.cpp
@@ -0,0 +1,327 @@
+#include <assert.h>
+#include <inttypes.h>
+#include <math.h>
+#include <stdint.h>
+#include <stdio.h>
+#include <string.h>
+
+#include "TracyPrint.hpp"
+
+namespace tracy
+{
+
+static const char* IntTable100 =
+    "00010203040506070809"
+    "10111213141516171819"
+    "20212223242526272829"
+    "30313233343536373839"
+    "40414243444546474849"
+    "50515253545556575859"
+    "60616263646566676869"
+    "70717273747576777879"
+    "80818283848586878889"
+    "90919293949596979899";
+
+static inline void PrintTinyInt( char*& buf, uint64_t v )
+{
+    if( v >= 10 )
+    {
+        *buf++ = '0' + v/10;
+    }
+    *buf++ = '0' + v%10;
+}
+
+static inline void PrintTinyInt0( char*& buf, uint64_t v )
+{
+    if( v >= 10 )
+    {
+        *buf++ = '0' + v/10;
+    }
+    else
+    {
+        *buf++ = '0';
+    }
+    *buf++ = '0' + v%10;
+}
+
+static inline void PrintSmallInt( char*& buf, uint64_t v )
+{
+    if( v >= 100 )
+    {
+        memcpy( buf, IntTable100 + v/10*2, 2 );
+        buf += 2;
+    }
+    else if( v >= 10 )
+    {
+        *buf++ = '0' + v/10;
+    }
+    *buf++ = '0' + v%10;
+}
+
+static inline void PrintFrac00( char*& buf, uint64_t v )
+{
+    *buf++ = '.';
+    v += 5;
+    if( v/10%10 == 0 )
+    {
+        *buf++ = '0' + v/100;
+    }
+    else
+    {
+        memcpy( buf, IntTable100 + v/10*2, 2 );
+        buf += 2;
+    }
+}
+
+static inline void PrintFrac0( char*& buf, uint64_t v )
+{
+    *buf++ = '.';
+    *buf++ = '0' + (v+50)/100;
+}
+
+static inline void PrintSmallIntFrac( char*& buf, uint64_t v )
+{
+    uint64_t in = v / 1000;
+    uint64_t fr = v % 1000;
+    if( fr >= 995 )
+    {
+        PrintSmallInt( buf, in+1 );
+    }
+    else
+    {
+        PrintSmallInt( buf, in );
+        if( fr > 5 )
+        {
+            PrintFrac00( buf, fr );
+        }
+    }
+}
+
+static inline void PrintSecondsFrac( char*& buf, uint64_t v )
+{
+    uint64_t in = v / 1000;
+    uint64_t fr = v % 1000;
+    if( fr >= 950 )
+    {
+        PrintTinyInt0( buf, in+1 );
+    }
+    else
+    {
+        PrintTinyInt0( buf, in );
+        if( fr > 50 )
+        {
+            PrintFrac0( buf, fr );
+        }
+    }
+}
+
+const char* TimeToString( int64_t _ns )
+{
+    enum { Pool = 8 };
+    static char bufpool[Pool][64];
+    static int bufsel = 0;
+    char* buf = bufpool[bufsel];
+    char* bufstart = buf;
+    bufsel = ( bufsel + 1 ) % Pool;
+
+    uint64_t ns;
+    if( _ns < 0 )
+    {
+        *buf = '-';
+        buf++;
+        ns = -_ns;
+    }
+    else
+    {
+        ns = _ns;
+    }
+
+    if( ns < 1000 )
+    {
+        PrintSmallInt( buf, ns );
+        memcpy( buf, " ns", 4 );
+    }
+    else if( ns < 1000ll * 1000 )
+    {
+        PrintSmallIntFrac( buf, ns );
+#ifdef TRACY_EXTENDED_FONT
+        memcpy( buf, " \xce\xbcs", 5 );
+#else
+        memcpy( buf, " us", 4 );
+#endif
+    }
+    else if( ns < 1000ll * 1000 * 1000 )
+    {
+        PrintSmallIntFrac( buf, ns / 1000 );
+        memcpy( buf, " ms", 4 );
+    }
+    else if( ns < 1000ll * 1000 * 1000 * 60 )
+    {
+        PrintSmallIntFrac( buf, ns / ( 1000ll * 1000 ) );
+        memcpy( buf, " s", 3 );
+    }
+    else if( ns < 1000ll * 1000 * 1000 * 60 * 60 )
+    {
+        const auto m = int64_t( ns / ( 1000ll * 1000 * 1000 * 60 ) );
+        const auto s = int64_t( ns - m * ( 1000ll * 1000 * 1000 * 60 ) ) / ( 1000ll * 1000 );
+        PrintTinyInt( buf, m );
+        *buf++ = ':';
+        PrintSecondsFrac( buf, s );
+        *buf++ = '\0';
+    }
+    else if( ns < 1000ll * 1000 * 1000 * 60 * 60 * 24 )
+    {
+        const auto h = int64_t( ns / ( 1000ll * 1000 * 1000 * 60 * 60 ) );
+        const auto m = int64_t( ns / ( 1000ll * 1000 * 1000 * 60 ) - h * 60 );
+        const auto s = int64_t( ns / ( 1000ll * 1000 * 1000 ) - h * ( 60 * 60 ) - m * 60 );
+        PrintTinyInt( buf, h );
+        *buf++ = ':';
+        PrintTinyInt0( buf, m );
+        *buf++ = ':';
+        PrintTinyInt0( buf, s );
+        *buf++ = '\0';
+    }
+    else
+    {
+        const auto d = int64_t( ns / ( 1000ll * 1000 * 1000 * 60 * 60 * 24 ) );
+        const auto h = int64_t( ns / ( 1000ll * 1000 * 1000 * 60 * 60 ) - d * 24 );
+        const auto m = int64_t( ns / ( 1000ll * 1000 * 1000 * 60 ) - d * ( 60 * 24 ) - h * 60 );
+        const auto s = int64_t( ns / ( 1000ll * 1000 * 1000 ) - d * ( 60 * 60 * 24 ) - h * ( 60 * 60 ) - m * 60 );
+        if( d < 1000 )
+        {
+            PrintSmallInt( buf, d );
+            *buf++ = 'd';
+        }
+        else
+        {
+            buf += sprintf( buf, "%" PRIi64 "d", d );
+        }
+        PrintTinyInt0( buf, h );
+        *buf++ = ':';
+        PrintTinyInt0( buf, m );
+        *buf++ = ':';
+        PrintTinyInt0( buf, s );
+        *buf++ = '\0';
+    }
+    return bufstart;
+}
+
+const char* RealToString( double val, bool separator )
+{
+    enum { Pool = 8 };
+    static char bufpool[Pool][64];
+    static int bufsel = 0;
+    char* buf = bufpool[bufsel];
+    bufsel = ( bufsel + 1 ) % Pool;
+
+    sprintf( buf, "%f", val );
+    auto ptr = buf;
+    if( *ptr == '-' ) ptr++;
+
+    const auto vbegin = ptr;
+
+    if( separator )
+    {
+        while( *ptr != '\0' && *ptr != ',' && *ptr != '.' ) ptr++;
+        auto end = ptr;
+        while( *end != '\0' ) end++;
+        auto sz = end - ptr;
+
+        while( ptr - vbegin > 3 )
+        {
+            ptr -= 3;
+            memmove( ptr+1, ptr, sz );
+            *ptr = ',';
+            sz += 4;
+        }
+    }
+
+    while( *ptr != '\0' && *ptr != ',' && *ptr != '.' ) ptr++;
+
+    if( *ptr == '\0' ) return buf;
+    while( *ptr != '\0' ) ptr++;
+    ptr--;
+    while( *ptr == '0' ) ptr--;
+    if( *ptr != '.' && *ptr != ',' ) ptr++;
+    *ptr = '\0';
+    return buf;
+}
+
+const char* MemSizeToString( int64_t val )
+{
+    enum { Pool = 8 };
+    static char bufpool[Pool][64];
+    static int bufsel = 0;
+    char* buf = bufpool[bufsel];
+    bufsel = ( bufsel + 1 ) % Pool;
+
+    const auto aval = abs( val );
+
+    if( aval < 10000ll )
+    {
+        sprintf( buf, "%" PRIi64 " bytes", val );
+        return buf;
+    }
+
+    enum class Unit
+    {
+        Kilobyte,
+        Megabyte,
+        Gigabyte,
+        Terabyte
+    };
+    Unit unit;
+
+    if( aval < 10000ll * 1024 )
+    {
+        sprintf( buf, "%.2f", val / 1024. );
+        unit = Unit::Kilobyte;
+    }
+    else if( aval < 10000ll * 1024 * 1024 )
+    {
+        sprintf( buf, "%.2f", val / ( 1024. * 1024 ) );
+        unit = Unit::Megabyte;
+    }
+    else if( aval < 10000ll * 1024 * 1024 * 1024 )
+    {
+        sprintf( buf, "%.2f", val / ( 1024. * 1024 * 1024 ) );
+        unit = Unit::Gigabyte;
+    }
+    else
+    {
+        sprintf( buf, "%.2f", val / ( 1024. * 1024 * 1024 * 1024 ) );
+        unit = Unit::Terabyte;
+    }
+
+    auto ptr = buf;
+    while( *ptr ) ptr++;
+    ptr--;
+    while( ptr >= buf && *ptr == '0' ) ptr--;
+    if( *ptr != '.' ) ptr++;
+
+    *ptr++ = ' ';
+    switch( unit )
+    {
+    case Unit::Kilobyte:
+        *ptr++ = 'K';
+        break;
+    case Unit::Megabyte:
+        *ptr++ = 'M';
+        break;
+    case Unit::Gigabyte:
+        *ptr++ = 'G';
+        break;
+    case Unit::Terabyte:
+        *ptr++ = 'T';
+        break;
+    default:
+        assert( false );
+        break;
+    }
+    *ptr++ = 'B';
+    *ptr++ = '\0';
+
+    return buf;
+}
+
+}