Copyright | (c) 2013 Diagrams team (see LICENSE) |
---|---|
License | BSD-style (see LICENSE) |
Maintainer | diagrams-discuss@googlegroups.com |
Safe Haskell | None |
Language | Haskell2010 |
Convenient creation of command-line-driven executables for rendering diagrams. This module provides a general framework and default behaviors for parsing command-line arguments, records for diagram creation options in various forms, and classes and instances for a unified entry point to command-line-driven diagram creation executables.
For a tutorial on command-line diagram creation see http://projects.haskell.org/diagrams/doc/cmdline.html.
Synopsis
- data DiagramOpts = DiagramOpts {}
- diagramOpts :: Parser DiagramOpts
- width :: Lens' DiagramOpts (Maybe Int)
- height :: Lens' DiagramOpts (Maybe Int)
- output :: Lens' DiagramOpts FilePath
- data DiagramMultiOpts = DiagramMultiOpts {
- _selection :: Maybe String
- _list :: Bool
- diagramMultiOpts :: Parser DiagramMultiOpts
- selection :: Lens' DiagramMultiOpts (Maybe String)
- list :: Lens' DiagramMultiOpts Bool
- data DiagramAnimOpts = DiagramAnimOpts {}
- diagramAnimOpts :: Parser DiagramAnimOpts
- fpu :: Iso' DiagramAnimOpts Double
- data DiagramLoopOpts = DiagramLoopOpts {}
- diagramLoopOpts :: Parser DiagramLoopOpts
- loop :: Lens' DiagramLoopOpts Bool
- src :: Lens' DiagramLoopOpts (Maybe FilePath)
- interval :: Lens' DiagramLoopOpts Int
- class Parseable a where
- readHexColor :: (Applicative m, MonadFail m) => String -> m (AlphaColour Double)
- class Mainable d where
- class ToResult d where
- defaultAnimMainRender :: (opts -> QDiagram b v n Any -> IO ()) -> Lens' opts FilePath -> (opts, DiagramAnimOpts) -> Animation b v n -> IO ()
- defaultMultiMainRender :: Mainable d => (MainOpts d, DiagramMultiOpts) -> [(String, d)] -> IO ()
- defaultLoopRender :: DiagramLoopOpts -> IO ()
Options
Standard options
data DiagramOpts Source #
Standard options most diagrams are likely to have.
Instances
Data DiagramOpts Source # | |
Defined in Diagrams.Backend.CmdLine gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> DiagramOpts -> c DiagramOpts # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c DiagramOpts # toConstr :: DiagramOpts -> Constr # dataTypeOf :: DiagramOpts -> DataType # dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c DiagramOpts) # dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c DiagramOpts) # gmapT :: (forall b. Data b => b -> b) -> DiagramOpts -> DiagramOpts # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> DiagramOpts -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> DiagramOpts -> r # gmapQ :: (forall d. Data d => d -> u) -> DiagramOpts -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> DiagramOpts -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> DiagramOpts -> m DiagramOpts # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> DiagramOpts -> m DiagramOpts # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> DiagramOpts -> m DiagramOpts # | |
Show DiagramOpts Source # | |
Defined in Diagrams.Backend.CmdLine showsPrec :: Int -> DiagramOpts -> ShowS # show :: DiagramOpts -> String # showList :: [DiagramOpts] -> ShowS # | |
Parseable DiagramOpts Source # | Parse |
Defined in Diagrams.Backend.CmdLine |
diagramOpts :: Parser DiagramOpts Source #
Command line parser for DiagramOpts
.
Width is option --width
or -w
.
Height is option --height
or -h
(note we change help to be -?
due to this).
Output is option --output
or -o
.
Multi-diagram options
data DiagramMultiOpts Source #
Extra options for a program that can offer a choice between multiple diagrams.
DiagramMultiOpts | |
|
Instances
diagramMultiOpts :: Parser DiagramMultiOpts Source #
Command line parser for DiagramMultiOpts
.
Selection is option --selection
or -S
.
List is --list
or -L
.
Animation options
data DiagramAnimOpts Source #
Extra options for animations.
Instances
diagramAnimOpts :: Parser DiagramAnimOpts Source #
Command line parser for DiagramAnimOpts
Frames per unit is --fpu
or -f
.
Loop options
data DiagramLoopOpts Source #
Extra options for command-line looping.
Instances
Parseable DiagramLoopOpts Source # | Parse |
Defined in Diagrams.Backend.CmdLine |
diagramLoopOpts :: Parser DiagramLoopOpts Source #
CommandLine parser for DiagramLoopOpts
Loop is --loop
or -l
.
Source is --src
or -s
.
Interval is -i
defaulting to one second.
Parsing
class Parseable a where Source #
Parseable instances give a command line parser for a type. If a custom
parser for a common type is wanted a newtype wrapper could be used to make
a new Parseable
instance. Notice that we do not want as many
instances as Read
because we want to limit ourselves to things that make
sense to parse from the command line.
Instances
readHexColor :: (Applicative m, MonadFail m) => String -> m (AlphaColour Double) Source #
Parses a hexadecimal color. The string can start with "0x"
or "#"
or just be a string of hexadecimal values. If four or three digits are
given each digit is repeated to form a full 24 or 32 bit color. For
example, "0xfc4"
is the same as "0xffcc44"
. When eight or six
digits are given each pair of digits is a color or alpha channel with the
order being red, green, blue, alpha.
Command-line programs (Mainable
)
Arguments, rendering, and entry point
class Mainable d where Source #
This class represents the various ways we want to support diagram creation
from the command line. It has the right instances to select between creating
single static diagrams, multiple static diagrams, static animations, and
functions that produce diagrams as long as the arguments are Parseable
.
Backends are expected to create Mainable
instances for the types that are
suitable for generating output in the backend's format. For instance,
Postscript can handle single diagrams, pages of diagrams, animations as
separate files, and association lists. This implies instances for
Diagram Postscript R2
, [Diagram Postscript R2]
, Animation Postscript R2
,
and [(String,Diagram Postscript R2)]
. We can consider these as the base
cases for the function instance.
The associated type MainOpts
describes the options which need to be parsed
from the command-line and passed to mainRender
.
Associated type that describes the options which need to be parsed
from the command-line and passed to mainRender
.
mainArgs :: Parseable (MainOpts d) => proxy d -> IO (MainOpts d) Source #
This method invokes the command-line parser resulting in an options value or ending the program with an error or help message. Typically the default instance will work. If a different help message or parsing behavior is desired a new implementation is appropriate.
mainRender :: MainOpts d -> d -> IO () Source #
Backend specific work of rendering with the given options and mainable value is done here. All backend instances should implement this method.
mainWith :: Parseable (MainOpts d) => d -> IO () Source #
Main entry point for command-line diagram creation. This is the method
that users will call from their program main
. For instance an expected
user program would take the following form.
import Diagrams.Prelude import Diagrams.Backend.TheBestBackend.CmdLine d :: Diagram B R2 d = ... main = mainWith d
Most backends should be able to use the default implementation. A different implementation should be used to handle more complex interactions with the user.
Instances
Mainable d => Mainable (IO d) Source # | With this instance we can perform IO to produce something
|
(ToResult d, Mainable (ResultOf d)) => Mainable (a -> d) Source # | This instance allows functions resulting in something that is |
General currying
class ToResult d where Source #
This class allows us to abstract over functions that take some arguments
and produce a final value. When some d
is an instance of
ToResult
we get a type
that is a type of all the arguments
at once, and a type Args
d
that is the type of the final result from
some base case instance.ResultOf
d
Instances
ToResult [(String, QDiagram b v n Any)] Source # | A list of named diagrams can give the multi-diagram interface. |
ToResult [QDiagram b v n Any] Source # | A list of diagrams can produce pages. |
ToResult d => ToResult (IO d) Source # | Diagrams that require IO to build are a base case. |
ToResult d => ToResult (a -> d) Source # | An instance for a function that, given some |
ToResult (Animation b v n) Source # | An animation is another suitable base case. |
ToResult (QDiagram b v n Any) Source # | A diagram can always produce a diagram when given |
helper functions for implementing mainRender
defaultAnimMainRender Source #
:: (opts -> QDiagram b v n Any -> IO ()) | |
-> Lens' opts FilePath | A lens into the output path. |
-> (opts, DiagramAnimOpts) | |
-> Animation b v n | |
-> IO () |
defaultAnimMainRender
is an implementation of mainRender
which renders
an animation as numbered frames, named by extending the given output file
name by consecutive integers. For example if the given output file name is
foo/blah.ext
, the frames will be saved in foo/blah001.ext
,
foo/blah002.ext
, and so on (the number of padding digits used depends on
the total number of frames). It is up to the user to take these images and
stitch them together into an actual animation format (using, e.g.
ffmpeg
).
Of course, this is a rather crude method of rendering animations; more sophisticated methods will likely be added in the future.
The fpu
option from DiagramAnimOpts
can be used to control how many frames will
be output for each second (unit time) of animation.
This function requires a lens into the structure that the particular backend
uses for it's diagram base case. If MainOpts (QDiagram b v n Any) ~ DiagramOpts
then this lens will simply be output
. For a backend supporting looping
it will most likely be _1 . output
. This lens is required because the
implementation works by modifying the output field and running the base mainRender
.
Typically a backend can write its Animation B V
instance as
instance Mainable (Animation B V) where type MainOpts (Animation B V) = (DiagramOpts, DiagramAnimOpts) mainRender = defaultAnimMainRender output
We do not provide this instance in general so that backends can choose to opt-in to this form or provide a different instance that makes more sense.
defaultMultiMainRender :: Mainable d => (MainOpts d, DiagramMultiOpts) -> [(String, d)] -> IO () Source #
defaultMultiMainRender
is an implementation of mainRender
where
instead of a single diagram it takes a list of diagrams paired with names
as input. The generated executable then takes a --selection
option
specifying the name of the diagram that should be rendered. The list of
available diagrams may also be printed by passing the option --list
.
Typically a backend can write its [(String,QDiagram b v n Any)]
instance as
instance Mainable [(String,QDiagram b v n Any)] where type MainOpts [(String,QDiagram b v n Any)] = (DiagramOpts, DiagramMultiOpts) mainRender = defaultMultiMainRender
We do not provide this instance in general so that backends can choose to opt-in to this form or provide a different instance that makes more sense.
defaultLoopRender :: DiagramLoopOpts -> IO () Source #