HStringTemplate-0.8.6: StringTemplate implementation in Haskell.

Copyright(c) Sterling Clover 2008
LicenseBSD 3 Clause
Maintainers.clover@gmail.com
Stabilityexperimental
Portabilityportable
Safe HaskellNone
LanguageHaskell98

Text.StringTemplate

Contents

Description

A StringTemplate is a String with "holes" in it. This is a port of the Java StringTemplate library written by Terrence Parr. (http://www.stringtemplate.org). User-contributed documentation available at http://www.haskell.org/haskellwiki/HStringTemplate.

This library implements the basic 3.1 grammar, lacking group files (though not groups themselves), Regions, and Interfaces. The goal is not to blindly copy the StringTemplate API, but rather to take its central ideas and implement them in a Haskellish manner. Indentation and wrapping, for example, are implemented through the HughesPJ Pretty Printing library. Calling toPPDoc on a StringTemplate yields a Doc with appropriate paragraph-fill wrapping that can be rendered in the usual fashion.

Basic instances are provided of the StringTemplateShows and ToSElem class. Any type deriving ToSElem can be passed automatically as a StringTemplate attribute. This package can be installed with syb-with-class bindings that provide a ToSElem instance for anything deriving Data. When defining an instance of ToSElem that can take a format parameter, you should first define an instance of StringTemplateShows, and then define an instance of ToSElem where toSElem = stShowsToSE.

Synopsis

Types

data StringTemplate a Source #

A String with "holes" in it. StringTemplates may be composed of any Stringable type, which at the moment includes Strings, ByteStrings, PrettyPrinter Docs, and Endo Strings, which are actually of type ShowS. When a StringTemplate is composed of a type, its internals are as well, so it is, so to speak "turtles all the way down."

type STGroup a = String -> StFirst (StringTemplate a) Source #

A function that generates StringTemplates. This is conceptually a query function into a "group" of StringTemplates.

Classes

class ToSElem a where Source #

The ToSElem class should be instantiated for all types that can be inserted as attributes into a StringTemplate.

Minimal complete definition

toSElem

Methods

toSElem :: Stringable b => a -> SElem b Source #

toSElemList :: Stringable b => [a] -> SElem b Source #

class Show a => StringTemplateShows a where Source #

The StringTemplateShows class should be instantiated for all types that are directly displayed in a StringTemplate, but take an optional format string. Each such type must have an appropriate ToSElem method defined as well.

Methods

stringTemplateShow :: a -> String Source #

Defaults to show.

stringTemplateFormattedShow :: String -> a -> String Source #

Defaults to _ a -> stringTemplateShow a

stShowsToSE :: (StringTemplateShows a, Stringable b) => a -> SElem b Source #

This method should be used to create ToSElem instances for types defining a custom formatted show function.

class Monoid a => Stringable a where Source #

The Stringable class should be instantiated with care. Generally, the provided instances should be enough for anything.

Minimal complete definition

stFromString, stToString

Methods

stFromString :: String -> a Source #

stFromByteString :: ByteString -> a Source #

stFromText :: Text -> a Source #

stToString :: a -> String Source #

mconcatMap :: [b] -> (b -> a) -> a Source #

Defaults to mconcatMap m k = foldr (mappend . k) mempty m

mintercalate :: a -> [a] -> a Source #

Defaults to (mconcat .) . intersperse

mlabel :: a -> a -> a Source #

Defaults to mlabel x y = mconcat [x, stFromString "[", y, stFromString "]"]

Instances

Stringable String Source # 
Stringable ByteString Source # 
Stringable ByteString Source # 
Stringable Builder Source # 
Stringable Text Source # 
Stringable Text Source # 
Stringable Doc Source # 
Stringable Builder Source # 
Stringable (Endo String) Source # 

class Stringable b => SEType b a where Source #

Minimal complete definition

renderf

Methods

renderf :: StringTemplate b -> a Source #

Instances

Stringable a => SEType a a Source # 

Methods

renderf :: StringTemplate a -> a Source #

Stringable a => SEType a (StringTemplate a) Source # 
(ToSElem a, SEType b r) => SEType b ((String, a) -> r) Source # 

Methods

renderf :: StringTemplate b -> (String, a) -> r Source #

Creation

newSTMP :: Stringable a => String -> StringTemplate a Source #

Parses a String to produce a StringTemplate, with '$'s as delimiters. It is constructed with a stub group that cannot look up other templates.

newAngleSTMP :: Stringable a => String -> StringTemplate a Source #

Parses a String to produce a StringTemplate, delimited by angle brackets. It is constructed with a stub group that cannot look up other templates.

getStringTemplate :: Stringable a => String -> STGroup a -> Maybe (StringTemplate a) Source #

Queries an String Template Group and returns Just the appropriate StringTemplate if it exists, otherwise, Nothing.

getStringTemplate' :: Stringable a => String -> STGroup a -> Maybe (StringTemplate a) Source #

As with getStringTemplate but never inlined, so appropriate for use with volatile template groups.

Display

toString :: StringTemplate String -> String Source #

Renders a StringTemplate to a String.

toPPDoc :: StringTemplate Doc -> Doc Source #

Renders a StringTemplate to a Doc.

render :: Stringable a => StringTemplate a -> a Source #

Generic render function for a StringTemplate of any type.

dumpAttribs :: Stringable a => StringTemplate a Source #

A special template that simply dumps the values of all the attributes set in it. This may be made available to any template as a function by adding it to its group. I.e. myNewGroup = addSuperGroup myGroup $ groupStringTemplates [("dumpAttribs", dumpAttribs)]

checkTemplate :: Stringable a => StringTemplate a -> (Maybe String, Maybe [String], Maybe [String]) Source #

Returns a tuple of three Maybes. The first is set if there is a parse error in the template. The next is set to a list of attributes that have not been set, or Nothing if all attributes are set. The last is set to a list of invoked templates that cannot be looked up, or Nothing if all invoked templates can be found. Note that this check is shallow -- i.e. missing attributes and templates are only caught in the top level template, not any invoked subtemplate.

checkTemplateDeep :: (Stringable a, NFData a) => StringTemplate a -> ([(String, String)], [String], [String]) Source #

Returns a tuple of three lists. The first is of templates with parse errors, and their errors. The next is of missing attributes, and the last is of missing templates. If there are no errors, then all lists will be empty. This check is performed recursively.

Modification

setAttribute :: (ToSElem a, Stringable b) => String -> a -> StringTemplate b -> StringTemplate b Source #

Yields a StringTemplate with the appropriate attribute set. If the attribute already exists, it is appended to a list.

(|=) :: Monad m => a -> m a1 -> m (a, a1) infixl 5 Source #

setManyAttrib :: (ToSElem a, Stringable b) => [(String, a)] -> StringTemplate b -> StringTemplate b Source #

Yields a StringTemplate with the appropriate attributes set. If any attribute already exists, it is appended to a list.

setNativeAttribute :: Stringable b => String -> b -> StringTemplate b -> StringTemplate b Source #

Yields a StringTemplate with the appropriate attribute set. If the attribute already exists, it is appended to a list. This will not translate the attribute through any intermediate representation, so is more efficient when, e.g. setting attributes that are large bytestrings in a bytestring template.

setManyNativeAttrib :: Stringable b => [(String, b)] -> StringTemplate b -> StringTemplate b Source #

Yields a StringTemplate with the appropriate attributes set. If any attribute already exists, it is appended to a list. Attributes are added natively, which may provide efficiency gains.

withContext :: (ToSElem a, Stringable b) => StringTemplate b -> a -> StringTemplate b Source #

Replaces the attributes of a StringTemplate with those described in the second argument. If the argument does not yield a set of named attributes but only a single one, that attribute is named, as a default, "it".

optInsertTmpl :: [(String, String)] -> StringTemplate a -> StringTemplate a Source #

Adds a set of global options to a single template

optInsertGroup :: [(String, String)] -> STGroup a -> STGroup a Source #

Adds a set of global options to a group

setEncoder :: Stringable a => (a -> a) -> StringTemplate a -> StringTemplate a Source #

Sets an encoding function of a template that all values are rendered with. For example one useful encoder would be stringToHtmlString. All attributes will be encoded once and only once.

setEncoderGroup :: Stringable a => (a -> a) -> STGroup a -> STGroup a Source #

Sets an encoding function of a group that all values are rendered with in each enclosed template

Groups

groupStringTemplates :: [(String, StringTemplate a)] -> STGroup a Source #

Given a list of named of StringTemplates, returns a group which generates them such that they can call one another.

addSuperGroup :: STGroup a -> STGroup a -> STGroup a Source #

Adds a supergroup to any StringTemplate group such that templates from the original group are now able to call ones from the supergroup as well.

addSubGroup :: STGroup a -> STGroup a -> STGroup a Source #

Adds a "subgroup" to any StringTemplate group such that templates from the original group now have template calls "shadowed" by the subgroup.

mergeSTGroups :: STGroup a -> STGroup a -> STGroup a Source #

Merges two groups into a single group. This function is left-biased, prefering bindings from the first group when there is a conflict.

directoryGroup :: Stringable a => FilePath -> IO (STGroup a) Source #

Given a path, returns a group which generates all files in said directory which have the proper "st" extension. This function is strict, with all files read once. As it performs file IO, expect it to throw the usual exceptions.

directoryGroupExt :: Stringable a => FilePath -> FilePath -> IO (STGroup a) Source #

Given a path, returns a group which generates all files in said directory which have the supplied extension.

unsafeVolatileDirectoryGroup :: Stringable a => FilePath -> Int -> IO (STGroup a) Source #

Given an integral amount of seconds and a path, returns a group generating all files in said directory and subdirectories with the proper "st" extension, cached for that amount of seconds. IO errors are "swallowed" by this so that exceptions don't arise in unexpected places. This violates referential transparency, but can be very useful in developing templates for any sort of server application. It should be swapped out for production purposes. The dumpAttribs template is added to the returned group by default, as it should prove useful for debugging and developing templates.

directoryGroupRecursive :: Stringable a => FilePath -> IO (STGroup a) Source #

As with directoryGroup, but traverses subdirectories as well. A template named "foo/bar.st" may be referenced by "foo/bar" in the returned group.

directoryGroupRecursiveExt :: Stringable a => FilePath -> FilePath -> IO (STGroup a) Source #

As with directoryGroupRecursive, but a template extension is supplied.

directoryGroupRecursiveLazyExt :: Stringable a => FilePath -> FilePath -> IO (STGroup a) Source #

As with directoryGroupRecursiveLazy, but a template extension is supplied.

directoryGroupLazy :: Stringable a => FilePath -> IO (STGroup a) Source #

Given a path, returns a group which generates all files in said directory which have the proper "st" extension. This function is lazy in the same way that readFile is lazy, with all files read on demand, but no more than once. The list of files, however, is generated at the time the function is called. As this performs file IO, expect it to throw the usual exceptions. And, as it is lazy, expect these exceptions in unexpected places.

directoryGroupLazyExt :: Stringable a => FilePath -> FilePath -> IO (STGroup a) Source #

Given a path, returns a group which generates all files in said directory which have the supplied extension.

nullGroup :: Stringable a => STGroup a Source #

For any requested template, returns a message that the template was unable to be found. Useful to add as a super group for a set of templates under development, to aid in debugging.