X-Git-Url: http://git.madism.org/?p=apps%2Fmadmutt.git;a=blobdiff_plain;f=rcparser.y;fp=rcparser.y;h=c2f156723d4247af58b0b3a217e97446408bb745;hp=4f5c572b3e1019358ed723a14600699087c460c7;hb=2d0afa54b647f32caa7a4bf3917e50f5d3e8c1e2;hpb=3b7a8f7577e7b40d39ba510f54bde0d3ec0cc58f diff --git a/rcparser.y b/rcparser.y index 4f5c572..c2f1567 100644 --- a/rcparser.y +++ b/rcparser.y @@ -80,6 +80,23 @@ buffer_add(buf, s, len); return buf; } + + static void substvar(buffer_t *buf, const segment seg) { + const char *res; + char tmp[STRING]; + char var[STRING]; + + if (m_strncpy(var, sizeof(var), seg.s, seg.len) <= 0) + return; + + if ((res = getenv(var))) { + buffer_addstr(buf, res); + return; + } + if (mutt_option_value(var, tmp, sizeof(tmp))) { + buffer_addstr(buf, tmp); + } + } } %name rcparse @@ -111,6 +128,10 @@ to_eol ::= sp to_eol_aux . /* Our macro tokens */ /****************************************************************************/ +%type svar { segment } +svar(Z) ::= DOLLAR ATOM(B) . { Z = B; } +svar(Z) ::= DOLLAR LBRACE ATOM(B) RBRACE . { Z = B; } + /* '-quoted tokens */ %type sqtok { buffer_t* } %destructor sqtok { buffer_delete(&$$); } @@ -134,16 +155,7 @@ dqtok(Z) ::= dqtok(A) BSLASH non_nl(B) . { Z = buffer_escape(A, B.s, B.len); } dqtok(Z) ::= dqtok(A) ATOM|SPACE|SHARP|EQUAL|LBRACE|RBRACE(B) . { buffer_add(Z = A, B.s, B.len); } -dqtok(Z) ::= dqtok(A) DOLLAR ATOM(B) . { - // FIXME - B = B; - Z = A; -} -dqtok(Z) ::= dqtok(A) DOLLAR LBRACE ATOM(B) RBRACE . { - // FIXME - B = B; - Z = A; -} +dqtok(Z) ::= dqtok(A) svar(B) . { substvar(Z = A, B); } /* unquoted tokens */ %type uqtok { buffer_t* } @@ -152,6 +164,7 @@ uqtok(Z) ::= ATOM|EQUAL|LBRACE|RBRACE(A) . { buffer_add(Z = buffer_new(), A.s, A uqtok(Z) ::= BSLASH non_nl(A) . { buffer_add(Z = buffer_new(), A.s, A.len); } uqtok(Z) ::= QUOTE sqtok(A) QUOTE . { Z = A; } uqtok(Z) ::= DQUOTE dqtok(A) DQUOTE . { Z = A; } +uqtok(Z) ::= svar(B) . { substvar(Z = buffer_new(), B); } /* token accumulator */ %type token { buffer_t* } @@ -183,7 +196,12 @@ rclines ::= . rclines ::= rclines rcline . rcline ::= ALTERNATIVE_ORDER simple_list(L) to_eol . { + string_list_t *l; string_list_append(&AlternativeOrderList, string_list_rev(L)); + printf("toto\n"); + for (l = AlternativeOrderList; l; l = l->next) { + printf("%s\n", l->data); + } } rcline ::= AUTO_VIEW simple_list(L) to_eol . { string_list_append(&AutoViewList, string_list_rev(L));