WikiLink - The Mediawiki Interface: Difference between revisions

From Knot Atlas
Jump to navigationJump to search
No edit summary
Line 32: Line 32:


<!--$$WikiLinkPath = &quot;/path/to/WikiLink/mathematica/&quot;;$$-->
<!--$$WikiLinkPath = &quot;/path/to/WikiLink/mathematica/&quot;;$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{In|
{{InOut|
n = 1 |
n = 1 |
in = <nowiki>KnotAtlasPath = &quot;c:\\scott\\math.berkeley.edu\\Work\\Mathematica\\KnotAtlas\\&quot;;</nowiki>}}
in = <nowiki>WikiLinkPath = &quot;/path/to/WikiLink/mathematica/&quot;;</nowiki> |
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->
<!--$$AppendTo[$Path, WikiLinkPath];$$-->
<!--$$AppendTo[$Path, WikiLinkPath];$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{In|
{{In|
n = 2 |
n = 2 |
in = <nowiki>AppendTo[$Path, KnotAtlasPath];</nowiki>}}
in = <nowiki>AppendTo[$Path, WikiLinkPath];</nowiki>}}
<!--END-->
<!--END-->
<!--$$<<WikiLink`$$-->
<!--$$<<WikiLink`$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{In|
{{In|
n = 4 |
n = 3 |
in = <nowiki><< &quot;WikiLink\\WikiLink.m&quot;</nowiki>}}
in = <nowiki><<WikiLink`</nowiki>}}
<!--END-->
<!--END-->


Line 67: Line 68:
The function <code>WikiUserName[]</code> checks that we're logged in
The function <code>WikiUserName[]</code> checks that we're logged in
<!--$$?WikiUserName$$-->
<!--$$?WikiUserName$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
{{HelpLine|
n = 6 |
n = 4 |
in = <nowiki>WikiUserName</nowiki> |
in = <nowiki>WikiUserName</nowiki> |
out= <nowiki>WikiUserName[] returns either the name of the user you are logged in as, your IP address if you're not logged in, or $Failed if something more complicated has happened!</nowiki>}}
out= <nowiki>WikiUserName[] returns either the name of the user you are logged in as, your IP address if you're not logged in, or $Failed if something more complicated has happened!</nowiki>}}
<!--END-->
<!--END-->
<!--$$WikiUserName[]$$-->
<!--$$WikiUserName[]$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
{{InOut|
n = 7 |
n = 5 |
in = <nowiki>WikiUserName[]</nowiki> |
in = <nowiki>WikiUserName[]</nowiki> |
out= <nowiki>ScottManualRobot</nowiki>}}
out= <nowiki>ScottManualRobot</nowiki>}}
Line 85: Line 86:


<!--$$?WikiUserName$$-->
<!--$$?WikiUserName$$-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
n = 6 |
in = <nowiki>WikiUserName</nowiki> |
out= <nowiki>WikiUserName[] returns either the name of the user you are logged in as, your IP address if you're not logged in, or $Failed if something more complicated has happened!</nowiki>}}
<!--END-->
<!--END-->


<!--$$?WikiGetPageText$$-->
<!--$$?WikiGetPageText$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
{{HelpLine|
n = 8 |
n = 7 |
in = <nowiki>WikiGetPageText</nowiki> |
in = <nowiki>WikiGetPageText</nowiki> |
out= <nowiki>WikiGetPageText[pagename] returns the raw text of the specified page.</nowiki>}}
out= <nowiki>WikiGetPageText[pagename] returns the raw text of the specified page.</nowiki>}}
<!--END-->
<!--END-->
<!--$$?WikiSetPageText$$-->
<!--$$?WikiSetPageText$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
{{HelpLine|
n = 9 |
n = 8 |
in = <nowiki>WikiSetPageText</nowiki> |
in = <nowiki>WikiSetPageText</nowiki> |
out= <nowiki>WikiSetPageText[pagename, text] overwrites the contents of the specificied page with the given text.
out= <nowiki>WikiSetPageText[pagename, text] overwrites the contents of the specificied page with the given text.
Line 103: Line 109:
<!--END-->
<!--END-->
<!--$$?WikiSetPageTexts$$-->
<!--$$?WikiSetPageTexts$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
{{HelpLine|
n = 10 |
n = 9 |
in = <nowiki>WikiSetPageTexts</nowiki> |
in = <nowiki>WikiSetPageTexts</nowiki> |
out= <nowiki>WikiSetPageText[{{pagename1, text1},{pagename2,text2},...}] efficiently sets multiple pages, by first checking which texts are already up to date.</nowiki>}}
out= <nowiki>WikiSetPageText[{{pagename1, text1},{pagename2,text2},...}] efficiently sets multiple pages, by first checking which texts are already up to date.</nowiki>}}
<!--END-->
<!--END-->
<!--$$?WikiUploadFile$$-->
<!--$$?WikiUploadFile$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
{{HelpLine|
n = 11 |
n = 10 |
in = <nowiki>WikiUploadFile</nowiki> |
in = <nowiki>WikiUploadFile</nowiki> |
out= <nowiki>WikiUploadFile[name, description] uploads the specified file to the wiki.</nowiki>}}
out= <nowiki>WikiUploadFile[name, description] uploads the specified file to the wiki.</nowiki>}}
Line 119: Line 125:
Thus for example after
Thus for example after
<!--$$WikiSetPageText[&quot;Sandbox&quot;, &quot;A robotic edit, at 19:39, 31-August-2005.&quot;]$$-->
<!--$$WikiSetPageText[&quot;Sandbox&quot;, &quot;A robotic edit, at 19:39, 31-August-2005.&quot;]$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
{{InOut|
n = 12 |
n = 11 |
in = <nowiki>WikiSetPageText[&quot;Sandbox&quot;, &quot;A robotic edit, at 19:39, 31-August-2005.&quot;]</nowiki> |
in = <nowiki>WikiSetPageText[&quot;Sandbox&quot;, &quot;A robotic edit, at 19:39, 31-August-2005.&quot;]</nowiki> |
out= <nowiki>True</nowiki>}}
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->
we get
we get
<!--$$WikiGetPageText[&quot;Sandbox&quot;]$$-->
<!--$$WikiGetPageText[&quot;Sandbox&quot;]$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
{{InOut|
n = 13 |
n = 12 |
in = <nowiki>WikiGetPageText[&quot;Sandbox&quot;]</nowiki> |
in = <nowiki>WikiGetPageText[&quot;Sandbox&quot;]</nowiki> |
out= <nowiki>A robotic edit, at 19:39, 31-August-2005.</nowiki>}}
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->


Line 137: Line 143:


<!--$$WikiSetPageTexts[{{&quot;Sandbox&quot;, &quot;A robotic edit, by --~~&quot;<>&quot;~~&quot;}, {&quot;Sandbox2&quot;, &quot;The determinant of the knot [[3_1]] is 3.&quot;}}]$$-->
<!--$$WikiSetPageTexts[{{&quot;Sandbox&quot;, &quot;A robotic edit, by --~~&quot;<>&quot;~~&quot;}, {&quot;Sandbox2&quot;, &quot;The determinant of the knot [[3_1]] is 3.&quot;}}]$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
{{InOut|
n = 14 |
n = 13 |
in = <nowiki>WikiSetPageTexts[{{&quot;Sandbox&quot;, &quot;A robotic edit, by --~~&quot;<>&quot;~~&quot;}, {&quot;Sandbox2&quot;, &quot;The determinant of the knot [[3_1]] is 3.&quot;}}]</nowiki> |
in = WikiSetPageTexts[{{&quot;Sandbox&quot;, &quot;A robotic edit, by --~~&quot;<>&quot;~~&quot;}, {&quot;Sandbox2&quot;, &quot;The determinant of the knot [[3_1]] is 3.&quot;}}] |
out= <nowiki>{}</nowiki>}}
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->
<!--$$WikiGetPageText[&quot;Sandbox2&quot;]$$-->
<!--$$WikiGetPageText[&quot;Sandbox2&quot;]$$-->
<!--Robot Land, no human edits to &quot;END&quot;-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
{{InOut|
n = 15 |
n = 14 |
in = <nowiki>WikiGetPageText[&quot;Sandbox2&quot;]</nowiki> |
in = <nowiki>WikiGetPageText[&quot;Sandbox2&quot;]</nowiki> |
out= <nowiki>The determinant of the knot [[3_1]] is 3.</nowiki>}}
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->


Line 157: Line 163:


<!--$$WikiPageMatchQ[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;determinant&quot;]$$-->
<!--$$WikiPageMatchQ[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;determinant&quot;]$$-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
n = 15 |
in = <nowiki>WikiPageMatchQ[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;determinant&quot;]</nowiki> |
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->
<!--$$WikiPageFreeQ[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;[[&quot;~~(DigitCharacter..)~~&quot;_&quot;~~(DigitCharacter..)~~&quot;]]&quot;]$$-->
<!--$$WikiPageFreeQ[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;[[&quot;~~(DigitCharacter..)~~&quot;_&quot;~~(DigitCharacter..)~~&quot;]]&quot;]$$-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
n = 16 |
in = WikiPageFreeQ[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;[[&quot;~~(DigitCharacter..)~~&quot;_&quot;~~(DigitCharacter..)~~&quot;]]&quot;] |
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->
<!--$$WikiStringCases[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;[[&quot;~~ShortestMatch[__]~~&quot;]]&quot;]$$-->
<!--$$WikiStringCases[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;[[&quot;~~ShortestMatch[__]~~&quot;]]&quot;]$$-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
n = 17 |
in = WikiStringCases[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;[[&quot;~~ShortestMatch[__]~~&quot;]]&quot;] |
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->
<!--$$WikiStringReplace[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;robotic edit&quot;->&quot;robotic edit (using WikiLink`)]$$-->
<!--$$WikiStringReplace[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;robotic edit&quot;->&quot;robotic edit (using WikiLink`)]$$-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
n = 18 |
in = <nowiki>WikiStringReplace[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}, &quot;robotic edit&quot;->&quot;robotic edit (using WikiLink`)]</nowiki> |
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->
<!--$$WikiGetPageTexts[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}]$$-->
<!--$$WikiGetPageTexts[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}]$$-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
n = 19 |
in = <nowiki>WikiGetPageTexts[{&quot;Sandbox&quot;, &quot;Sandbox2&quot;}]</nowiki> |
out= <nowiki>$Failed</nowiki>}}
<!--END-->
<!--END-->



Revision as of 12:56, 18 February 2006

WikiLink is actually two separate things; firstly, a java class for interfacing with a mediawiki server, and secondly, a Mathematica package providing a wrapper around this. This page documents the Mathematica package, while the java class, and its addition functionality, will be documented elsewhere.

License

WikiLink.nb, WikiLink.m and wikilink.jar are copyright Scott Morrison, available under your choice of the MIT, Apache or GPL licenses. The other components are copyright by other parties, all available under the Apache license.

Download

Download WikiLink.zip. Unzip this, probably in the same place you've unzipped the KnotTheory` package. This will create a subdirectory called WikiLink, containing (at least) these files:

Filename Description
mathematica/WikiLink.nb The Mathematica notebook containing wrapper function definitions.
mathematica/WikiLink.m The Mathematica package automatically generated from WikiLink.nb.
wikilink.jar The WikiLink java classes and source code.

jars/jdom.jar
jars/commons-httpclient-3.0-rc2.jar
jars/commons-codec-1.3.jar
jars/commons-lang-2.1.jar
jars/commons-logging.jar

Libraries (all available under either GPL or the Apache license) required by wikilink.jar

Importing the package in Mathematica

First, you'll need to set some paths, so WikiLink` can find the java files it needs. You need to add the "mathematica/" subdirectory of the WikiLink distribution to the Mathematica $Path.

In[1]:= WikiLinkPath = "/path/to/WikiLink/mathematica/";
Out[1]= $Failed
In[2]:= AppendTo[$Path, WikiLinkPath];
In[3]:= <<WikiLink`

We then try to connect to the wiki. Executing this line will prompt you for a username and password.

In[6]:= CreateWikiConnection[ "http://katlas.math.toronto.edu/w/index.php", InputString["Enter Your Username:"], InputString["Enter Your Password"] ]

The function WikiUserName[] checks that we're logged in

In[4]:= ?WikiUserName
WikiUserName[] returns either the name of the user you are logged in as, your IP address if you're not logged in, or $Failed if something more complicated has happened!
In[5]:= WikiUserName[]
Out[5]= ScottManualRobot

Usage

WikiLink` provides functions for checking your login status, getting and setting pages, as well as transparently extending some of Mathematica's string manipulation functions to wiki pages.

In[6]:= ?WikiUserName
WikiUserName[] returns either the name of the user you are logged in as, your IP address if you're not logged in, or $Failed if something more complicated has happened!
In[7]:= ?WikiGetPageText
WikiGetPageText[pagename] returns the raw text of the specified page.
In[8]:= ?WikiSetPageText
WikiSetPageText[pagename, text] overwrites the contents of the specificied page with the given text. WikiSetPageText[pagename, text, summary] overwrites the contents of the specificied page with the given text and notes summary in the change log.
In[9]:= ?WikiSetPageTexts
WikiSetPageText[{{pagename1, text1},{pagename2,text2},...}] efficiently sets multiple pages, by first checking which texts are already up to date.
In[10]:= ?WikiUploadFile
WikiUploadFile[name, description] uploads the specified file to the wiki.

Thus for example after

In[11]:= WikiSetPageText["Sandbox", "A robotic edit, at 19:39, 31-August-2005."]
Out[11]= $Failed

we get

In[12]:= WikiGetPageText["Sandbox"]
Out[12]= $Failed

The function WikiSetPageTexts is most useful for batch uploads, as it does considerably more error checking, and filters out edits which won't change the page text. It takes as argument a list of {"title", "text"} pairs, and returns a list of those pairs which failed.

In[13]:= WikiSetPageTexts[{{"Sandbox", "A robotic edit, by --~~"<>"~~"}, {"Sandbox2", "The determinant of the knot 3_1 is 3."}}]
Out[13]= $Failed
In[14]:= WikiGetPageText["Sandbox2"]
Out[14]= $Failed
String manipulation functions

WikiLink` provides functions WikiPageMatchQ, WikiPageFreeQ, WikiStringReplace and WikiStringCases. Each function works likes its usual Mathematica partner, StringMatchQ, StringFreeQ, StringReplace or StringCases. Instead of providing a string, or list of strings, as the first argument, you should give the name of a page, or a list of names.

You can use these to perform all sorts of editing tricks.

In[15]:= WikiPageMatchQ[{"Sandbox", "Sandbox2"}, "determinant"]
Out[15]= $Failed
In[16]:= WikiPageFreeQ[{"Sandbox", "Sandbox2"}, ""~~(DigitCharacter..)~~"_"~~(DigitCharacter..)~~""]
Out[16]= $Failed
In[17]:= WikiStringCases[{"Sandbox", "Sandbox2"}, "[["~~ShortestMatch[__]~~"]]"]
Out[17]= $Failed
In[18]:= WikiStringReplace[{"Sandbox", "Sandbox2"}, "robotic edit"->"robotic edit (using WikiLink`)]
Out[18]= $Failed
In[19]:= WikiGetPageTexts[{"Sandbox", "Sandbox2"}]
Out[19]= $Failed

Troubleshooting

The instruction ShowJavaConsole[] will bring up a window in which some debugging information is displayed.

Compatibility

WikiLink has been tested against mediawiki 1.4.5beta3 and 1.4.7.

I expect WikiGetPage text to continue working in mediawiki 1.5 and beyond, because it uses the stable interface Special:Export. Logging in and setting pages will quite likely break in the next version. If you've tried this, please let me know about your experiences. I'm hoping that soon (1.5?) Special:Import will become available, and I can switch to using this. --Scott 15:57, 31 Aug 2005 (EDT)

Todo

I'd love to create an Ant task which allows uploading a file to a wiki. We could then use this in build scripts for KnotTheory, etc. --Scott 04:07, 17 Sep 2005 (EDT)

See Also

All of the Mathematica notebooks in Category:Knot Atlas Maintenance Software rely on WikiLink, and so are good examples of how to use it.

You may also be interested in the Wikipedia page on mediawiki bots, and in particular the Python Wikipedia Robot Framework.