v4k-git-backup/engine/split/v4k_string.h

93 lines
4.6 KiB
C

// string framework
// - rlyeh, public domain
// string: temporary api (stack)
API char* tempvl(const char *fmt, va_list);
API char* tempva(const char *fmt, ...);
#define va(...) (((&printf) || printf(__VA_ARGS__), tempva(__VA_ARGS__))) // vs2015 check trick
#define vac (const char*)va
// string: allocated api (heap). FREE() after use
API char* strcatf(char **s, const char *buf);
#define strcatf(s,fmt,...) strcatf((s), va(fmt, __VA_ARGS__))
#define stringf(fmt,...) STRDUP(va(fmt, __VA_ARGS__)) // (strcatf)(0, va(fmt, __VA_ARGS__))
#if is(cl) || (is(tcc) && is(win32))
#if!is(cl)
char* strtok_s(char* str,const char* delimiters,char** context); // tcc misses this in <string.h>
#endif
#define strtok_r strtok_s
#endif
#if 1
#define each_substring(str, delims, keyname) \
( char *str_ = (char*)(str); str_; str_ = 0 ) \
for( int len_ = strlen(str_) + 1, heap_ = len_ < 1024; len_ > 1; len_ = 0 ) \
for( char *ptr_ = (heap_ ? REALLOC(0, len_) : ALLOCA(len_)), *cpy_ = (snprintf(ptr_, len_, "%s", str_), ptr_); ptr_; (heap_ ? REALLOC(ptr_, 0) : 0), ptr_ = 0 ) \
for( char *next_token = 0, *keyname = strtok_r(cpy_, delims, &next_token); keyname; keyname = strtok_r(NULL, delims, &next_token) )
#else
#define each_substring(str, delims, keyname) \
( char** tokens_ = strsplit((str), (delims)), *keyname = 0; tokens_; tokens_ = 0) \
for( int i_ = 0, end_ = array_count(tokens_); i_ < (keyname = tokens_[i_], end_); ++i_ )
#endif
// utils
API int strmatch(const char *s, const char *wildcard);
API int strmatchi(const char *s, const char *wildcard);
API int strcmp_qsort(const void *a, const void *b);
API int strcmpi_qsort(const void *a, const void *b);
API bool strbeg(const char *src, const char *sub); // returns true if both strings match at beginning. case sensitive
API bool strend(const char *src, const char *sub); // returns true if both strings match at end. case sensitive
API bool strbegi(const char *src, const char *sub); // returns true if both strings match at beginning. case insensitive
API bool strendi(const char *src, const char *sub); // returns true if both strings match at end. case insensitive
API const char * strstri(const char *src, const char *sub); // returns find first substring in string. case insensitive.
#define strcmpi ifdef(cl, _stricmp, strcasecmp)
API char * strupper(const char *str);
API char * strlower(const char *str);
API char * strrepl(char **copy, const char *target, const char *replace); // replace any 'target' as 'repl' in 'copy'. 'copy' may change (heap). returns 'copy'
API char * strswap(char *copy, const char *target, const char *replace); // replaced inline only if repl is shorter than target. no allocations.
API char * strcut(char *copy, const char *target); // remove any 'target' in 'copy'. returns 'copy'
API const char * strlerp(unsigned numpairs, const char **pairs, const char *str); // using key-value pairs, null-terminated
#ifndef __APPLE__ // BSD provides these
API size_t strlcat(char *dst, const char *src, size_t dstcap); // concat 2 strings safely. always NUL terminates. may truncate.
API size_t strlcpy(char *dst, const char *src, size_t dstcap); // copy 2 strings safely. always NUL terminates. truncates if retval>=dstcap
#endif
/// split `string` after any of `delimiters` character is found.
/// returns temporary array of split strings. see: strjoin
/// > array(char*) tokens = strsplit("hello! world!", " !"); // [0]="hello",[1]="world",
API array(char*) strsplit(const char *string, const char *delimiters);
/// concatenate all elements within `list`, with `separator` string in between.
/// returns: temporary joint string. see: strsplit
/// > array(char*) tokens = strsplit("hello! world!", " !"); // [0]="hello",[1]="world",
/// > char *joint = strjoin(tokens, "+"); // joint="hello+world"
API char* strjoin(array(char*) list, const char *separator);
API char * string8(const wchar_t *str); /// convert from wchar16(win) to utf8/ascii
API array(uint32_t) string32( const char *utf8 ); /// convert from utf8 to utf32
// -----------------------------------------------------------------------------
// ## string interning (quarks)
// - rlyeh, public domain.
API unsigned intern( const char *string );
API const char *quark( unsigned key );
typedef struct quarks_db {
array(char) blob;
array(vec2i) entries;
} quarks_db;
API unsigned quark_intern( quarks_db*, const char *string );
API const char *quark_string( quarks_db*, unsigned key );