#include "sort.qh"
#include "oo.qh"
+// string logic
+//
+// true: is truthy
+// == "": is equal to ""
+// is "": has the same string index as the string constant ""
+// strunzone: can be strunzoned
+//
+// | | true | == "" | is "" | strunzone |
+// | :----------: | :--: | :---: | :---: | :-------: |
+// | nil | | yes | | |
+// | strcat(nil) | yes | yes | | |
+// | strzone(nil) | yes | yes | | yes |
+// | "" | yes | yes | yes | |
+// | strcat("") | yes | yes | | |
+// | strzone("") | yes | yes | | yes |
+// | "s" | yes | | | |
+// | strcat("s") | yes | | | |
+// | strzone("s") | yes | | | yes |
+
#ifdef CSQC
float stringwidth_colors(string s, vector theSize)
{
}
#endif
+#define strcpy(this, s) MACRO_BEGIN \
+ if (this) { \
+ strunzone(this); \
+ } \
+ this = strzone(s); \
+MACRO_END
+
+#define strfree(this) MACRO_BEGIN \
+ if (this) { \
+ strunzone(this); \
+ } \
+ this = string_null; \
+MACRO_END
+
ERASEABLE
string seconds_tostring(float sec)
{
/** color code replace, place inside of sprintf and parse the string */
string CCR(string input)
{
- // See the autocvar declarations in util.qh for default values
-
// foreground/normal colors
input = strreplace("^F1", strcat("^", autocvar_hud_colorset_foreground_1), input);
input = strreplace("^F2", strcat("^", autocvar_hud_colorset_foreground_2), input);
return strcat(a, " ", b);
}
+ERASEABLE
+string cons_mid(string a, string mid, string b)
+{
+ if (a == "") return b;
+ if (b == "") return a;
+ return strcat(a, mid, b);
+}
+
ERASEABLE
string substring_range(string s, float b, float e)
{
return l;
}
-//List of Unicode spaces: https://www.cs.tut.fi/~jkorpela/chars/spaces.html
+// List of Unicode spaces: http://jkorpela.fi/chars/spaces.html
ERASEABLE
bool isInvisibleString(string s)
{
case 192: // charmap space
if (!utf8) break;
return false;
- case 0xE000 + 192: // utf8 charmap space
+ case 0xE000: // invisible char of the utf8 quake charmap
+ case 0xE00A: // invisible char of the utf8 quake charmap
+ case 0xE0A0: // invisible char of the utf8 quake charmap
+ case 0xE020: // invisible char of the utf8 quake charmap
case 0x00A0: // NO-BREAK SPACE
//case 0x1680: // OGHAM SPACE MARK
case 0x180E: // MONGOLIAN VOWEL SEPARATOR
const string DIGITS = "0123456789";
#define IS_DIGIT(d) (strstrofs(DIGITS, (d), 0) >= 0)
+
+// returns true if the caret at position pos is escaped
+ERASEABLE
+bool isCaretEscaped(string theText, float pos)
+{
+ // count all the previous carets
+ int carets = 0;
+ while(pos - carets >= 1 && substring(theText, pos - carets - 1, 1) == "^")
+ ++carets;
+ // if number of previous carets is odd then this carets is escaped
+ return (carets & 1);
+}
+
+ERASEABLE
+bool isValidColorCodeValue(string theText, int cc_len, int tag_start)
+{
+ if (cc_len == 2)
+ return IS_DIGIT(substring(theText, tag_start + 1, 1));
+ if (cc_len == 5)
+ return (IS_HEXDIGIT(substring(theText, tag_start + 2, 1))
+ && IS_HEXDIGIT(substring(theText, tag_start + 3, 1))
+ && IS_HEXDIGIT(substring(theText, tag_start + 4, 1)));
+ return false;
+}
+
+// it returns 0 if pos is NOT in the middle or at the end of a color code
+// otherwise it returns a vector with color code length as the first component
+// and the offset from '^' position to pos as the second component
+// e.g.:
+// "j^2kl" | returns 0 if pos == 0 or 1 or 4
+// ^^ | returns '2 1' or '2 2' if pos == 2 or 3
+ERASEABLE
+vector checkColorCode(string theText, int text_len, int pos, bool check_at_the_end)
+{
+ if (text_len == 0)
+ text_len = strlen(theText);
+ string tag_type = "^";
+ int cc_len = 2;
+ int tag_len = 1;
+
+ LABEL(check_color_tag)
+
+ int ofs = cc_len;
+ if (!check_at_the_end)
+ ofs--;
+ for (; ofs >= 1; ofs--)
+ {
+ if (!(pos >= ofs && text_len >= pos + (cc_len - ofs)))
+ continue;
+ if(substring(theText, pos - ofs, tag_len) == tag_type)
+ {
+ if (!isCaretEscaped(theText, pos - ofs) && isValidColorCodeValue(theText, cc_len, pos - ofs))
+ return eX * cc_len + eY * ofs;
+ }
+ }
+ if (cc_len == 2)
+ {
+ tag_type = "^x";
+ cc_len = 5;
+ tag_len = 2;
+ goto check_color_tag;
+ }
+ return '0 0 0';
+}