New tag %ss() which lets you get a substring of another tag.

%ss(start, length, tag) - i.e %ss(0,1,%TL) will get the first letter of the current lines text.
use - for the length to get the rest of the tag (e.g %ss(1,-,%TL) will get everything after the first letter).

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@30500 a1c6a512-1295-4272-9138-f99709370657

1 files changed, 28 insertions, 1 deletions

diff --git a/apps/gui/skin_engine/skin_tokens.c b/apps/gui/skin_engine/skin_tokens.c
index ed72241d34..371db46017 100644
--- a/apps/gui/skin_engine/skin_tokens.c
+++ b/apps/gui/skin_engine/skin_tokens.c
@@ -868,7 +868,34 @@ const char *get_token_value(struct gui_wps *gwps,
             struct logical_if *lif = token->value.data;
             return get_lif_token_value(gwps, lif, offset, buf, buf_size);
         }
-        break;           
+        break;
+        case SKIN_TOKEN_SUBSTRING:
+        {
+            struct substring *ss = token->value.data;
+            const char *token_val = get_token_value(gwps, ss->token, offset,
+                                                    buf, buf_size, intval);
+            int ret_len = ss->length;
+            if (token_val)
+            {
+                int len = strlen(token_val);
+                if (len < ss->start)
+                    return NULL;
+                if (ret_len < 0)
+                    ret_len = strlen(token_val) - ss->start;
+                if (token_val != buf)
+                {
+                    memcpy(buf, &token_val[ss->start], ret_len);
+                }
+                else
+                {
+                    buf = &buf[ss->start];
+                }
+                buf[ret_len] = '\0';
+                return buf;
+            }
+            return NULL;
+        }
+        break;        
             
         case SKIN_TOKEN_CHARACTER:
             if (token->value.c == '\n')