internal package
Foswiki internal package
Foswiki Foswiki operates by creating a singleton object (known as the Session object) that acts as a point of reference for all the different modules in the system. This package is the class for this singleton, and also contains the vast bulk of the basic constants and the per- site configuration mechanisms.
Global variables are avoided wherever possible to avoid problems with CGI accelerators such as mod_perl.
request
Pointer to the Foswiki::Request
response
Pointer to the Foswiki::Response
context
Hash of context ids
plugins
Foswiki::Plugins singleton
prefs
Foswiki::Prefs singleton
remoteUser
Login ID when using ApacheLogin. Maintained for compatibility only, do not use.
requestedWebName
Name of web found in URL path or web
URL parameter
scriptUrlPath
URL path to the current script. May be dynamically extracted from the URL path if {GetScriptUrlFromCgi}. Only required to support {GetScriptUrlFromCgi} and not consistently used. Avoid.
access
Foswiki::Access singleton
store
Foswiki::Store singleton
topicName
Name of topic found in URL path or topic
URL parameter
urlHost
Host part of the URL (including the protocol) determined during intialisation and defaulting to {DefaultUrlHost}
user
Unique user ID of logged-in user
users
Foswiki::Users singleton
webName
Name of web found in URL path, or web
URL parameter, or {UsersWebName}
StaticMethod
decode_utf8($octets) → $unicode Decode a binary string of octets known to be encoded using UTF-8 into perl characters (unicode).
StaticMethod
encode_utf8($unicode) → $octets Encode a perl character string into a binary string of octets encoded using UTF-8.
ObjectMethod
writeCompletePage( $text, $pageType, $contentType ) $text
is the text of the page script (<html> to </html> if it's HTML)
$pageType
- May be "edit", which will cause headers to be generated that force caching for 24 hours, to prevent BackFromPreviewLosesText bug, which caused data loss with IE5 and IE6.
$contentType
- page content type | text/html
This method removes noautolink and nop tags before outputting the page unless $contentType is text/plain.
ObjectMethod
satisfiedByCache( $action, $web, $topic ) → $boolean Try and satisfy the current request for the given web.topic from the cache, given the current action (view, edit, rest etc).
If the action is satisfied, the cache content is written to the output and true is returned. Otherwise ntohing is written, and false is returned.
Designed for calling from Foswiki::UI::*ObjectMethod
setCacheControl( $pageType, \%hopts ) Set the cache control headers in a response
$pageType
- page type - 'view', ;edit' etc
ObjectMethod
setETags( $cachedPage, \%hopts ) → $boolean Set etags (and modify status) depending on what the cached page specifies. Return 1 if the page has been modified since it was last retrieved, 0 otherwise.
$cachedPage
- page cache to use
ObjectMethod
generateHTTPHeaders( \%hopts ) ObjectMethod
redirectto($url) → $url If the CGI parameter 'redirectto' is present on the query, then will validate that it is a legal redirection target (url or topic name). If 'redirectto' is not present on the query, performs the same steps on $url.
Returns undef if the target is not valid, and the target URL otherwise.
StaticMethod
splitAnchorFromUrl( $url ) → ( $url, $anchor ) Takes a full url (including possible query string) and splits off the anchor. The anchor includes the # sign. Returns an empty string if not found in the url.
ObjectMethod
redirect( $url, $passthrough, $status ) $url
, unless redirectCgiQueryHandler
(a dangerous, deprecated handler!)
$session→{request}
is undef
Normally this method will ignore parameters to the current query. Sometimes, for example when redirecting to a login page during authentication (and then again from the login page to the original requested URL), you want to make sure all parameters are passed on, and for this $passthrough should be set to true. In this case it will pass all parameters that were passed to the current query on to the redirect target. If the request_method for the current query was GET, then all parameters will be passed by encoding them in the URL (after ?). If the request_method was POST, then there is a risk the URL would be too big for the receiver, so it caches the form data and passes over a cache reference in the redirect GET.
NOTE: Passthrough is only meaningful if the redirect target is on the same server.
ObjectMethod
cacheQuery() → $queryString Caches the current query in the params cache, and returns a rewritten query string for the cache to be picked up again on the other side of a redirect.
We can't encode post params into a redirect, because they may exceed the size of the GET request. So we cache the params, and reload them when the redirect target is reached.
ObjectMethod
getCGISession() → $cgisession Get the CGI::Session object associated with this session, if there is one. May return undef.
ObjectMethod
getLoginManager() → $loginManager StaticMethod
isValidWikiWord( $name ) → $boolean StaticMethod
isValidTopicName( $name [, $nonww] ) → $boolean $name
. If $nonww
, then accept non wiki-words
(though they must still be composed of only valid, unfiltered characters)
StaticMethod
isValidWebName( $name, $system ) → $boolean STATIC Check for a valid web name. If $system is true, then system web names are considered valid (names starting with _) otherwise only user web names are valid
If $Foswiki::cfg{EnableHierarchicalWebs} is off, it will also return false when a nested web name is passed to it.
StaticMethod
isValidEmailAddress( $name ) → $boolean STATIC Check for a valid email address name.
ObjectMethod
getSkin () → $string Get the currently requested skin path
ObjectMethod
getScriptUrl( $absolute, $script, $web, $topic, … ) → $scriptURL ...
- an arbitrary number of name,value parameter pairs that will
getScriptUrl('x','y','view','#'=>'XXX',a=>1,b=>2)
will give
.../view/x/y?a=1&b=2#XXX
If $absolute is set, generates an absolute URL. $absolute is advisory only; Foswiki can decide to generate absolute URLs (for example when run from the command-line) even when relative URLs have been requested.
The default script url is taken from {ScriptUrlPath}, unless there is an exception defined for the given script in {ScriptUrlPaths}. Both {ScriptUrlPath} and {ScriptUrlPaths} may be absolute or relative URIs. If they are absolute, then they will always generate absolute URLs. if they are relative, then they will be converted to absolute when required (e.g. when running from the command line, or when generating rss). If $script is not given, absolute URLs will always be generated.
If either the web or the topic is defined, will generate a full url (including web and topic). Otherwise will generate only up to the script name. An undefined web will default to the main web name.
As required by RFC3986, the returned URL will only contain the allowed characters -A-Za-z0-9_.~!*\'();:@&=+$,/?%#[]
StaticMethod
make_params(...) ObjectMethod
getPubURL($web, $topic, $attachment, %options) → $url $web
- name of the web for the URL, defaults to $session→{webName}
$topic
- name of the topic, defaults to $session→{topicName}
$attachment
- name of the attachment, defaults to no attachment
topic_version
- version of topic to retrieve attachment from
attachment_version
- version of attachment to retrieve
absolute
- requests an absolute URL (rather than a relative path)
$web
is not given, $topic
and $attachment
are ignored.
If $topic
is not given, $attachment
is ignored.
If topic_version
is not given, the most recent revision of the topic
will be linked. Similarly if attachment_version= is not given, the most recent
revision of the attachment will be assumed. If topic_version
is specified
but attachment_version
is not (or the specified attachment_version
is not
present), then the most recent version of the attachment in that topic version
will be linked.
If Foswiki is running in an absolute URL context (e.g. the skin requires
absolute URLs, such as print or rss, or Foswiki is running from the
command-line) then absolute
will automatically be set.
Note: for compatibility with older plugins, which use %PUBURL*% with
a constructed URL path, do not use *
unless web
, topic
, and
attachment
are all specified.
As required by RFC3986, the returned URL will only contain the allowed characters -A-Za-z0-9_.~!*\'();:@&=+$,/?%#[]
ObjectMethod
deepWebList($filter, $web) → @list Webs are returned as absolute web pathnames.
ObjectMethod
normalizeWebTopicName( $web, $topic ) → ( $web, $topic ) Normalize a Web.TopicName
SeeFoswiki::Func
for a full specification of the expansion (not duplicated
here)
WARNING if there is no web specification (in the web or topic parameters)
the web defaults to $Foswiki::cfg{UsersWebName}. If there is no topic
specification, or the topic is '0', the topic defaults to the web home topic
name.
WARNING if the input topic name is tainted, then the output web and
topic names will be tainted.
StaticMethod
load_package( $full_package_name ) Will cleanly load the package or fail. This is better than 'eval "require $package"'.
It is not perfect for Perl < 5.10. For Perl 5.8, if somewhere else 'eval "require $package"' was used earlier for a module that fails to load, then not only is the failure not detected then. Neither will it be detected here.The recommendation is to replace all dynamic require calls in Foswiki to be replaced with this call.
This functionality used to be done via module Class::Load, but that had painful dependencies.
See http://blog.fox.geek.nz/2010/11/searching-design-spec-for-ultimate.html for the gory details.Parses the Web/Topic path parameters to safely establish a valid web and topic, or assign safe defaults.
Note if $webtopic ends with a trailing slash, it provides a hint that the last component should be considered web. This allows disambiguation between a topic and subweb with the same name. Trailing slash forces it to be recognized as a webname, otherwise the topic is shown. Note. If the web doesn't exist, the force will be ignored. It's not possible to create a missing web by referencing it in a URL.
This routine sets two variables when encountering invalid input:The topic name will always have the first character converted to upper case, to prevent creation of or access to invalid topics.
ClassMethod
new( $defaultUser, $query, \%initialContext ) Constructs a new Foswiki session object. A unique session object exists for every transaction with Foswiki, for example every browser request, or every script run. Session objects do not persist between mod_perl runs.
$defaultUser
is the username (not the wikiname) of the default user you want to be logged-in, if none is available from a session or browser. Used mainly for unit tests and debugging, it is typically undef, in which case the default user is taken from $Foswiki::cfg{DefaultUserName}.
$query
the Foswiki::Request query (may be undef, in which case an empty query is used)
\%initialContext
- reference to a hash containing context name=value pairs to be pre-installed in the context hash. May be undef.
ObjectMethod
renderer() ObjectMethod
renderer() ObjectMethod
attach() ObjectMethod
templates() ObjectMethod
i18n() ObjectMethod
reset_i18n() ObjectMethod
logger() ObjectMethod
search() ObjectMethod
net() ObjectMethod
access() ObjectMethod
DESTROY() called by Perl when the Foswiki object goes out of scope (maybe should be used kist to ASSERT that finish() was called..
ObjectMethod
finish() $action
- what happened, e.g. view, save, rename
$webTopic
- what it happened to
$extra
- extra info, such as minor flag
$user
- login name of user - default current user, or failing that the user agent
Write the log for an event to the logfile
The method is deprecated, Call logger→log directly.
StaticMethod
validatePattern( $pattern ) → $pattern Validate a pattern provided in a parameter to $pattern so that dangerous chars (interpolation and execution) are disabled.
ObjectMethod
inlineAlert($template, $def, … ) → $string Format an error for inline inclusion in rendered output. The message string is obtained from the template 'oops'.$template, and the DEF $def is selected. The parameters (...) are used to populate %PARAM1%..%PARAMn%
StaticMethod
parseSections($text) → ($string,$sectionlistref) Generic parser for sections within a topic. Sections are delimited by STARTSECTION and ENDSECTION, which may be nested, overlapped or otherwise abused. The parser builds an array of sections, which is ordered by the order of the STARTSECTION within the topic. It also removes all the SECTION tags from the text, and returns the text and the array of sections.
Each section is aFoswiki::Attrs
object, which contains the attributes
{type, name, start, end}
where start and end are character offsets in the
string after all section tags have been removed. All sections
are required to be uniquely named; if a section is unnamed, it
will be given a generated name. Sections may overlap or nest.
See test/unit/Fn_SECTION.pm for detailed testcases that round out the spec.
ObjectMethod
expandMacrosOnTopicCreation ( $topicObject ) $topicObject
- the topic
Expand only that subset of Foswiki variables that are expanded during topic creation, in the body text and PREFERENCE meta only. The expansion is in-place inside the topic object.
# SMELL: no plugin handler
StaticMethod
entityEncode( $text [, $extras] ) → $encodedText Other entities exist for special characters that cannot easily be entered with some keyboards..."
This method encodes:%ENCODE
macro,
or the %URLPARAM
macro, specifying type="entities"
or type="entity"
.
StaticMethod
entityDecode ( $encodedText ) → $text StaticMethod
urlEncode( $perlstring ) → $bytestring ...Only alphanumerics [0-9a-zA-Z], the special characters $-_.+!*'(), and reserved characters used for their reserved purposes may be used unencoded within a URL.However this function is tuned for use with Foswiki. As such, it encodes all characters except 0-9a-zA-Z-_.:~!*/ This internal function is available for use by expanding the
%ENCODE
macro,
specifying type="url"
. It is also the default encoding used by the %URLPARAM
macro.
StaticMethod
urlDecode( $bytestring ) → $perlstring Reverses the encoding done in urlEncode.
StaticMethod
isTrue( $value, $default ) → $boolean $value
is true, and 0 otherwise. "true" means set to
something with a Perl true value, with the special cases that "off",
"false" and "no" (case insensitive) are forced to false. Leading and
trailing spaces in $value
are ignored.
If the value is undef, then $default
is returned. If $default
is
not specified it is taken as 0.
StaticMethod
spaceOutWikiWord( $word, $sep ) → $string Spaces out a wiki word by inserting a string (default: one space) between each word component. With parameter $sep any string may be used as separator between the word components; if $sep is undefined it defaults to a space.
ObjectMethod
innerExpandMacros(\$text, $topicObject) StaticMethod
takeOutBlocks( \$text, $tag, \%map ) → $text $text
- Text to process
$tag
- XML-style tag.
\%map
- Reference to a hash to contain the removed blocks
Return value: $text with blocks removed
Searches through $text and extracts blocks delimited by an XML-style tag, storing the extracted block, and replacing with a token string which is not affected by TML rendering. The text after these substitutions is returned.
StaticMethod
putBackBlocks( \$text, \%map, $tag, $newtag, $callBack ) → $text \$text
- reference to text to process
\%map
- map placeholders to blocks removed by takeOutBlocks
$tag
- Tag name processed by takeOutBlocks
$newtag
- Tag name to use in output, in place of $tag. If undefined, uses $tag.
$callback
- Reference to function to call on each block being inserted (optional)
Reverses the actions of takeOutBlocks.
Each replaced block is processed by the callback (if there is one) before re-insertion.
Parameters to the outermost cut block are replaced into the open tag, even if that tag is changed. This allows things like<verbatim class=''>
to be changed to <pre class=''>
If you set $newtag to ”, replaces the taken-out block with the contents of the block, not including the open/close. This is used for <literal>, for example.
ObjectMethod
enterContext( $id, $val ) Add the context id $id into the set of active contexts. The $val can be anything you like, but should always evaluate to boolean TRUE.
An example of the use of contexts is in the use of tag expansion. The commonTagsHandler in plugins is called every time tags need to be expanded, and the context of that expansion is signalled by the expanding module using a context id. So the forms module adds the context id "form" before invoking common tags expansion.
Contexts are not just useful for tag expansion; they are also relevant when rendering.
Contexts are intended for use mainly by plugins. Core modules can use $session→inContext( $id ) to determine if a context is active.
ObjectMethod
leaveContext( $id ) enterContext
for more information on contexts)
ObjectMethod
inContext( $id ) enterContext
for more information on contexts)
StaticMethod
registerTagHandler( $tag, $fnref, $syntax ) $tag
name of the tag e.g. MYTAG
$fnref
Function to execute. Will be passed ($session, \%params, $web, $topic )
$syntax
somewhat legacy - 'classic' or 'context-free' (context-free may be removed in future)
$syntax parameter: Way back in prehistory, back when the dinosaur still roamed the earth, Crawford tried to extend the tag syntax of macros such that they could be processed by a context-free parser (hence the "context-free") and bring them into line with HTML. This work was banjaxed by one particular tyrranosaur, who felt that the existing syntax was perfect. However by that time Crawford had used it in a couple of places - most notable in the action tracker.
The syntax isn't vastly different from what's there; the differences are:ObjectMethod
expandMacros( $text, $topicObject ) → $text Processes %VARIABLE%, and %TOC% syntax; also includes 'commonTagsHandler' plugin hook.
Returns the text of the topic, after file inclusion, variable substitution, table-of-contents generation, and any plugin changes from commonTagsHandler.
$topicObject may be undef when, for example, expanding templates, or one-off strings at a time when meta isn't available.
DO NOT CALL THIS DIRECTLY; use $topicObject→expandMacros instead.
StaticMethod
readFile( $filename ) → $text Returns the entire contents of the given file, which can be specified in any format acceptable to the Perl open() function. Fast, but inherently unsafe.
WARNING: Never, ever use this for accessing topics or attachments! Use the Store API for that. This is for global control files only, and should be used only if there is absolutely no alternative.StaticMethod
expandStandardEscapes($str) → $unescapedStr ObjectMethod
webExists( $web ) → $boolean $web
- Web name, required, e.g. 'Sandbox'
ObjectMethod
topicExists( $web, $topic ) → $boolean $web
- Web name, optional, e.g. 'Main'
$topic
- Topic name, required, e.g. 'TokyoOffice'
, or "Main.TokyoOffice"
ObjectMethod
getWorkArea( $key ) → $directorypath Gets a private directory uniquely identified by $key. The directory is intended as a work area for plugins etc. The directory will exist.
ObjectMethod
getApproxRevTime ( $web, $topic ) → $epochSecs Get an approximate rev time for the latest rev of the topic. This method is used to optimise searching. Needs to be as fast as possible.
SMELL: is there a reason this is in Foswiki.pm, and not in Search?