diff options
| author | Giovanni Di Sirio <gdisirio@gmail.com> | 2017-09-17 13:28:22 +0000 |
|---|---|---|
| committer | Giovanni Di Sirio <gdisirio@gmail.com> | 2017-09-17 13:28:22 +0000 |
| commit | fb355909fa1e96f24087c1380daef19cc0eb0532 (patch) | |
| tree | 5977799efb0b08fa87384c56de96982dce98e277 /tools/ftl/libs/libutils.ftl | |
| parent | 7209ce9df2badcbc29e4af9e9f231382cdc5c095 (diff) | |
| download | ChibiOS-fb355909fa1e96f24087c1380daef19cc0eb0532.tar.gz ChibiOS-fb355909fa1e96f24087c1380daef19cc0eb0532.tar.bz2 ChibiOS-fb355909fa1e96f24087c1380daef19cc0eb0532.zip | |
Added an FTL unit-test generator tool independent from SPC5Studio, it uses the same configuration.xml file so SPC5Studio can still be used but it is not in the critical path.
git-svn-id: svn://svn.code.sf.net/p/chibios/svn/trunk@10612 35acf78f-673a-0410-8e92-d51de3d6d3f4
Diffstat (limited to 'tools/ftl/libs/libutils.ftl')
| -rwxr-xr-x | tools/ftl/libs/libutils.ftl | 126 |
1 files changed, 126 insertions, 0 deletions
diff --git a/tools/ftl/libs/libutils.ftl b/tools/ftl/libs/libutils.ftl new file mode 100755 index 000000000..3fc825a00 --- /dev/null +++ b/tools/ftl/libs/libutils.ftl @@ -0,0 +1,126 @@ +[#ftl]
+[#--
+ ChibiOS/RT - Copyright (C) 2006-2017 Giovanni Di Sirio
+
+ Licensed under the Apache License, Version 2.0 (the "License");
+ you may not use this file except in compliance with the License.
+ You may obtain a copy of the License at
+
+ http://www.apache.org/licenses/LICENSE-2.0
+
+ Unless required by applicable law or agreed to in writing, software
+ distributed under the License is distributed on an "AS IS" BASIS,
+ WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ See the License for the specific language governing permissions and
+ limitations under the License.
+ --]
+
+[#--
+ -- Returns the trimmed text "s" making sure it is terminated by a dot.
+ -- The empty string is always returned as an empty string, the dot is not
+ -- added.
+ --]
+[#function WithDot s]
+ [#local s = s?trim /]
+ [#if s == ""]
+ [#return s /]
+ [/#if]
+ [#if s?ends_with(".")]
+ [#return s /]
+ [/#if]
+ [#return s + "." /]
+[/#function]
+
+[#--
+ -- Returns the trimmed text "s" making sure it is not terminated by a dot.
+ --]
+[#function WithoutDot s]
+ [#local s = s?trim /]
+ [#if s?ends_with(".")]
+ [#return s?substring(0, s?length - 1) /]
+ [/#if]
+ [#return s /]
+[/#function]
+
+[#--
+ -- Returns the trimmed text "s" making sure it is terminated by a dot if the
+ -- text is composed of multiple phrases, if the text is composed of a single
+ -- phrase then makes sure it is *not* terminated by a dot.
+ -- A phrase is recognized by the pattern ". " into the text.
+ -- The empty string is always returned as an empty string, the dot is never
+ -- added.
+ --]
+[#function IntelligentDot s]
+ [#local s = s?trim /]
+ [#if s?contains(". ")]
+ [#return WithDot(s) /]
+ [/#if]
+ [#return WithoutDot(s) /]
+[/#function]
+
+[#--
+ -- Formats a text string in a sequence of strings no longer than "len" (first
+ -- line) or "lenn" (subsequent lines).
+ -- White spaces are normalized between words, sequences of white spaces become
+ -- a single space.
+ --]
+[#function StringToText len1 lenn s]
+ [#local words=s?word_list /]
+ [#local line="" /]
+ [#local lines=[] /]
+ [#list words as word]
+ [#if lines?size == 0]
+ [#local len = len1 /]
+ [#else]
+ [#local len = lenn /]
+ [/#if]
+ [#if (line?length + word?length + 1 > len)]
+ [#local lines = lines + [line?trim] /]
+ [#local line = word + " " /]
+ [#else]
+ [#local line = line + word + " " /]
+ [/#if]
+ [/#list]
+ [#if line != ""]
+ [#local lines = lines + [line?trim] /]
+ [/#if]
+ [#return lines /]
+[/#function]
+
+[#--
+ -- Emits a string "s" as a formatted text, the first line is prefixed by the
+ -- "p1" parameter, subsequent lines are prefixed by the "pn" paramenter.
+ -- Emitted lines are no longer than the "len" parameter.
+ -- White spaces are normalized between words.
+ --]
+[#macro FormatStringAsText p1 pn s len]
+ [#local lines = StringToText(len - p1?length, len - pn?length, s) /]
+ [#list lines as line]
+ [#if line_index == 0]
+${p1}${line}
+ [#else]
+${pn}${line}
+ [/#if]
+ [/#list]
+[/#macro]
+
+[#--
+ -- Emits a C function body code reformatting the indentation using the
+ -- specified tab size and line prefix.
+ --]
+[#macro EmitIndentedCCode start tab ccode]
+ [#assign lines = ccode?string?split("^", "rm") /]
+ [#list lines as line]
+ [#if (line_index > 0) || (line?trim?length > 0)]
+ [#if line?trim?length > 0]
+ [#if line[0] == "#"]
+${line?chop_linebreak}
+ [#else]
+${start + line?chop_linebreak}
+ [/#if]
+ [#else]
+
+ [/#if]
+ [/#if]
+ [/#list]
+[/#macro]
|