Tcl Library Source Code

package ifneeded pt::pe        1 [list source [file join $dir pt_pexpression.tcl]]
package ifneeded pt::pe::op    1 [list source [file join $dir pt_pexpr_op.tcl]]

# Parsing Expression Grammar support.
package ifneeded pt::peg            1 [list source [file join $dir pt_pegrammar.tcl]]
package ifneeded pt::peg::container 1 [list source [file join $dir pt_peg_container.tcl]]
package ifneeded pt::peg::interp    1 [list source [file join $dir pt_peg_interp.tcl]]
package ifneeded pt::peg::op    1.0.1 [list source [file join $dir pt_peg_op.tcl]]
package ifneeded pt::parse::peg     1 [list source [file join $dir pt_parse_peg.tcl]]


# Export/import managers. Assumes an untrusted environment.
package ifneeded pt::peg::export            1 [list source [file join $dir pt_peg_export.tcl]]
package ifneeded pt::peg::import            1 [list source [file join $dir pt_peg_import.tcl]]

[comment {-*- text -*- doctools manpage}]
[manpage_begin pt_peg_op i 1.0.1]
[include include/module.inc]
[titledesc {Parser Tools PE Grammar Utility Operations}]
[require pt::peg::op 1.0.1]
[description]
[include include/ref_intro.inc]

This package provides a number of utility commands manipulating a PE
grammar (container) in various ways.

[section API]

## State / Configuration :: n/a

namespace eval ::pt::peg::op {}

# # ## ### ##### ######## ############# #####################
## Ready

package provide pt::peg::op 1.0.1
return

if {![package vsatisfies [package provide Tcl] 8.5]} {return}
package ifneeded rest 1.0.1 [list source [file join $dir rest.tcl]]

[comment {-*- tcl -*- doctools manpage}]
[manpage_begin rest n 1.0.1]
[moddesc   {A framework for RESTful web services}]
[titledesc {define REST web APIs and call them inline or asychronously}]
[require Tcl 8.5]
[require rest [opt 1.0.1]]
[description]
[para]

There are 2 types of usage this package supports: simple calls, and complete interfaces. In an interface you specify a set of rules and then the package builds commands which correspond to the REST methods. These commands can have many options such as input and output transformations and data type specific formatting. This results in a cleaner and simpler script. On the other hand, a simple call is easier and quicker to implement but less featureful. It takes the url and a few options on the command and returns the result directly. Any formatting or checking is up to rest of the script.

Simple usage
In simple usage you make calls using http method procedures and then check or process the returned data yourself

package require Tcl 8.5
package require http 2.7
package require json
package require tdom
package require base64

package provide rest 1.0.1

namespace eval ::rest {
    namespace export create_interface parameters parse_opts save \
    describe substitute
}

# simple --

namespace eval ::term::ansi::code {
    namespace export esc escb define const
}

# ### ### ### ######### ######### #########
## Ready

package provide term::ansi::code 0.2

##
# ### ### ### ######### ######### #########

}

::term::ansi::code::ctrl::INIT

# ### ### ### ######### ######### #########
## Ready

package provide term::ansi::code::ctrl 0.2

##
# ### ### ### ######### ######### #########

}

::term::ansi::send::INIT

# ### ### ### ######### ######### #########
## Ready

package provide term::ansi::send 0.2

##
# ### ### ### ######### ######### #########

[comment {-*- tcl -*- doctools manpage}]
[manpage_begin term::ansi::code::ctrl n 0.2]
[keywords ansi]
[keywords {attribute control}]
[keywords {color control}]
[keywords control]
[keywords terminal]
[copyright {2006-2008 Andreas Kupries <[email protected]>}]
[moddesc   {Terminal control}]
[titledesc {ANSI control sequences}]
[category  {Terminal control}]
[require Tcl 8.4]
[require term::ansi::code       [opt 0.2]]
[require term::ansi::code::ctrl [opt 0.2]]
[description]

This package provides symbolic names for the ANSI control
sequences. For each sequence a single command is provided which
returns the sequence as its result. None of the commands of this
package write to a channel; that is handled by higher level packages,
like [package term::ansi::send].

[comment {-*- tcl -*- doctools manpage}]
[manpage_begin term::ansi::code n 0.2]
[keywords control]
[keywords declare]
[keywords define]
[keywords terminal]
[copyright {2006 Andreas Kupries <[email protected]>}]
[moddesc   {Terminal control}]
[titledesc {Helper for control sequences}]
[category  {Terminal control}]
[require Tcl 8.4]
[require term::ansi::code [opt 0.2]]
[description]

This package provides commands enabling the definition of control
sequences in an easy manner.

[para]

[comment {-*- tcl -*- doctools manpage}]
[manpage_begin term::ansi::send n 0.2]
[keywords {character output}]
[keywords control]
[keywords terminal]
[copyright {2006 Andreas Kupries <[email protected]>}]
[moddesc   {Terminal control}]
[titledesc {Output of ANSI control sequences to terminals}]
[category  {Terminal control}]
[require Tcl 8.4]
[require term::ansi::send [opt 0.2]]
[description]

This package provides commands to send ANSI terminal control sequences to a
terminal. All commands come in two variants, one for sending to any channel,
the other for sending to [emph stdout].

[para]