4coder/custom/4coder_stringf.cpp

318 lines
11 KiB
C++
Raw Permalink Normal View History

2019-06-01 23:58:28 +00:00
/*
* Printf style operations for strings and what-not
*/
// TOP
2019-10-05 02:48:05 +00:00
#if !defined(FCODER_STRINGF_CPP)
#define FCODER_STRINGF_CPP
2019-06-01 23:58:28 +00:00
#include <stdarg.h>
#include <stdio.h>
function String_Const_u8
2019-06-18 22:56:09 +00:00
push_stringfv(Arena *arena, char *format, va_list args){
va_list args2;
va_copy(args2, args);
2019-06-01 23:58:28 +00:00
i32 size = vsnprintf(0, 0, format, args);
String_Const_u8 result = string_const_u8_push(arena, size + 1);
vsnprintf((char*)result.str, (size_t)result.size, format, args2);
2019-06-01 23:58:28 +00:00
result.size -= 1;
result.str[result.size] = 0;
return(result);
}
function String_Const_u8
2019-06-18 22:56:09 +00:00
push_stringf(Arena *arena, char *format, ...){
2019-06-01 23:58:28 +00:00
va_list args;
va_start(args, format);
String_Const_u8 result = push_stringfv(arena, format, args);
2019-06-01 23:58:28 +00:00
va_end(args);
return(result);
}
function String_Const_u8
2019-06-18 22:56:09 +00:00
push_u8_stringfv(Arena *arena, char *format, va_list args){
return(push_stringfv(arena, format, args));
2019-06-01 23:58:28 +00:00
}
function String_Const_u8
2019-06-18 22:56:09 +00:00
push_u8_stringf(Arena *arena, char *format, ...){
2019-06-01 23:58:28 +00:00
va_list args;
va_start(args, format);
String_Const_u8 result = push_stringfv(arena, format, args);
2019-06-01 23:58:28 +00:00
va_end(args);
return(result);
}
function void
2019-06-01 23:58:28 +00:00
string_list_pushfv(Arena *arena, List_String_Const_char *list, char *format, va_list args){
String_Const_u8 string = push_stringfv(arena, format, args);
if (arena->alignment < sizeof(u64)){
push_align(arena, sizeof(u64));
2019-06-01 23:58:28 +00:00
}
string_list_push(arena, list, SCchar(string));
2019-06-01 23:58:28 +00:00
}
function void
2019-06-01 23:58:28 +00:00
string_list_pushf(Arena *arena, List_String_Const_char *list, char *format, ...){
va_list args;
va_start(args, format);
string_list_pushfv(arena, list, format, args);
va_end(args);
}
function void
2019-06-01 23:58:28 +00:00
string_list_pushfv(Arena *arena, List_String_Const_u8 *list, char *format, va_list args){
2019-06-18 22:56:09 +00:00
String_Const_u8 string = push_u8_stringfv(arena, format, args);
if (arena->alignment < sizeof(u64)){
push_align(arena, sizeof(u64));
2019-06-01 23:58:28 +00:00
}
string_list_push(arena, list, string);
}
function void
2019-06-01 23:58:28 +00:00
string_list_pushf(Arena *arena, List_String_Const_u8 *list, char *format, ...){
va_list args;
va_start(args, format);
string_list_pushfv(arena, list, format, args);
va_end(args);
}
////////////////////////////////
// yyyy
function void
push_year_full(Arena *arena, List_String_Const_u8 *list, u32 year){
string_list_pushf(arena, list, "%u", year);
}
// yy
function void
push_year_abrev(Arena *arena, List_String_Const_u8 *list, u32 year){
string_list_pushf(arena, list, "%u", year % 100);
}
// m
function void
push_month_num(Arena *arena, List_String_Const_u8 *list, u8 mon){
string_list_pushf(arena, list, "%u", mon + 1);
}
// mm
function void
push_month_num_zeros(Arena *arena, List_String_Const_u8 *list, u8 mon){
string_list_pushf(arena, list, "%02u", mon + 1);
}
// month
function void
push_month_name(Arena *arena, List_String_Const_u8 *list, u8 mon){
string_list_push(arena, list, month_full_name[mon%12]);
}
// mon
function void
push_month_abrev(Arena *arena, List_String_Const_u8 *list, u8 mon){
string_list_push(arena, list, month_abrev_name[mon%12]);
}
// d
function void
push_day_num(Arena *arena, List_String_Const_u8 *list, u8 day){
string_list_pushf(arena, list, "%u", day + 1);
}
// dd
function void
push_day_num_zeroes(Arena *arena, List_String_Const_u8 *list, u8 day){
string_list_pushf(arena, list, "%02u", day + 1);
}
// day
function void
push_day_ord(Arena *arena, List_String_Const_u8 *list, u8 day){
string_list_push(arena, list, ordinal_numeric_name[day%100]);
}
// h24
function void
push_hour_24(Arena *arena, List_String_Const_u8 *list, u8 hour){
string_list_pushf(arena, list, "%u", hour);
}
// hh24
function void
push_hour_24_zeroes(Arena *arena, List_String_Const_u8 *list, u8 hour){
string_list_pushf(arena, list, "%02u", hour);
}
// h
function void
push_hour_12(Arena *arena, List_String_Const_u8 *list, u8 hour){
string_list_pushf(arena, list, "%u", hour%12);
}
// hh
function void
push_hour_12_zeroes(Arena *arena, List_String_Const_u8 *list, u8 hour){
string_list_pushf(arena, list, "%02u", hour%12);
}
// ampm
function void
push_hour_am_pm(Arena *arena, List_String_Const_u8 *list, u8 hour){
if (hour >= 12){
string_list_push(arena, list, string_u8_litexpr("pm"));
}
else{
string_list_push(arena, list, string_u8_litexpr("am"));
}
}
// mi
function void
push_minute(Arena *arena, List_String_Const_u8 *list, u8 min){
string_list_pushf(arena, list, "%u", min);
}
// mimi
function void
push_minute_zeroes(Arena *arena, List_String_Const_u8 *list, u8 min){
string_list_pushf(arena, list, "%02u", min);
}
// s
function void
push_second(Arena *arena, List_String_Const_u8 *list, u8 sec){
string_list_pushf(arena, list, "%u", sec);
}
// ss
function void
push_second_zeroes(Arena *arena, List_String_Const_u8 *list, u8 sec){
string_list_pushf(arena, list, "%02u", sec);
}
// ms
function void
push_millisecond_zeroes(Arena *arena, List_String_Const_u8 *list, u16 msec){
string_list_pushf(arena, list, "%03u", msec);
}
function void
date_time_format(Arena *arena, List_String_Const_u8 *list, String_Const_u8 format, Date_Time *date_time){
u8 *ptr = format.str;
u8 *end = format.str + format.size;
for (;ptr < end;){
if (character_is_alpha_numeric(*ptr)){
u8 *start = ptr;
for (;ptr < end; ptr += 1){
if (!character_is_alpha_numeric(*ptr)){
break;
}
}
String_Const_u8 field = SCu8(start, ptr);
for (; field.size > 0;){
if (string_match(string_prefix(field, 5), string_u8_litexpr("month"))){
field = string_skip(field, 5);
push_month_name(arena, list, date_time->mon);
}
else if (string_match(string_prefix(field, 4), string_u8_litexpr("yyyy"))){
field = string_skip(field, 4);
push_year_full(arena, list, date_time->year);
}
else if (string_match(string_prefix(field, 4), string_u8_litexpr("hh24"))){
field = string_skip(field, 4);
push_hour_24_zeroes(arena, list, date_time->hour);
}
else if (string_match(string_prefix(field, 4), string_u8_litexpr("ampm"))){
field = string_skip(field, 4);
push_hour_am_pm(arena, list, date_time->hour);
}
else if (string_match(string_prefix(field, 4), string_u8_litexpr("mimi"))){
field = string_skip(field, 4);
push_minute_zeroes(arena, list, date_time->min);
}
else if (string_match(string_prefix(field, 3), string_u8_litexpr("mon"))){
field = string_skip(field, 3);
push_month_abrev(arena, list, date_time->mon);
}
else if (string_match(string_prefix(field, 3), string_u8_litexpr("day"))){
field = string_skip(field, 3);
push_day_ord(arena, list, date_time->day);
}
else if (string_match(string_prefix(field, 3), string_u8_litexpr("h24"))){
field = string_skip(field, 3);
push_hour_24(arena, list, date_time->hour);
}
else if (string_match(string_prefix(field, 2), string_u8_litexpr("yy"))){
field = string_skip(field, 2);
push_year_abrev(arena, list, date_time->year);
}
else if (string_match(string_prefix(field, 2), string_u8_litexpr("mm"))){
field = string_skip(field, 2);
push_month_num_zeros(arena, list, date_time->mon);
}
else if (string_match(string_prefix(field, 2), string_u8_litexpr("dd"))){
field = string_skip(field, 2);
push_day_num_zeroes(arena, list, date_time->day);
}
else if (string_match(string_prefix(field, 2), string_u8_litexpr("hh"))){
field = string_skip(field, 2);
push_hour_12_zeroes(arena, list, date_time->hour);
}
else if (string_match(string_prefix(field, 2), string_u8_litexpr("mi"))){
field = string_skip(field, 2);
push_minute(arena, list, date_time->min);
}
else if (string_match(string_prefix(field, 2), string_u8_litexpr("ss"))){
field = string_skip(field, 2);
push_second_zeroes(arena, list, date_time->sec);
}
else if (string_match(string_prefix(field, 2), string_u8_litexpr("ms"))){
field = string_skip(field, 2);
push_millisecond_zeroes(arena, list, date_time->msec);
}
else if (string_match(string_prefix(field, 1), string_u8_litexpr("m"))){
field = string_skip(field, 1);
push_month_num(arena, list, date_time->mon);
}
else if (string_match(string_prefix(field, 1), string_u8_litexpr("d"))){
field = string_skip(field, 1);
push_day_num(arena, list, date_time->day);
}
else if (string_match(string_prefix(field, 1), string_u8_litexpr("h"))){
field = string_skip(field, 1);
push_hour_12(arena, list, date_time->hour);
}
else if (string_match(string_prefix(field, 1), string_u8_litexpr("s"))){
field = string_skip(field, 1);
push_second(arena, list, date_time->sec);
}
else{
string_list_push(arena, list, SCu8(start, ptr));
break;
}
}
}
else{
u8 *start = ptr;
for (;ptr < end; ptr += 1){
if (character_is_alpha_numeric(*ptr)){
break;
}
}
string_list_push(arena, list, SCu8(start, ptr));
}
}
}
function void
date_time_format(Arena *arena, List_String_Const_u8 *list, char *format, Date_Time *date_time){
date_time_format(arena, list, SCu8(format), date_time);
}
function String_Const_u8
date_time_format(Arena *arena, String_Const_u8 format, Date_Time *date_time){
List_String_Const_u8 list = {};
date_time_format(arena, &list, format, date_time);
return(string_list_flatten(arena, list));
}
function String_Const_u8
date_time_format(Arena *arena, char *format, Date_Time *date_time){
return(date_time_format(arena, SCu8(format), date_time));
}
2019-10-05 02:48:05 +00:00
#endif
2019-06-01 23:58:28 +00:00
// BOTTOM