Quiq::MediaWiki::Client - Clientseitiger Zugriff auf ein MediaWiki
Quiq::Hash
Diese Klasse implementiert Methoden zur Kommunikation mit einem MediaWiki über die sogenannte MediaWiki-API.
Die MediaWiki-API wird über api.php (statt index.php) angesprochen. Die Doku der API wird angezeigt, wenn api.php ohne Parameter oder mit "action=help&recursivesubmodules=1" (alles auf einer Seite) aufgerufen wird.
Die MediaWiki-API empfängt und liefert alle Daten in UTF-8.
Insbesondere implementiert die Klasse die Methode $mw->load(), mit welcher sowohl Seiten als auch Mediendateien (z.B. Bilder) "intelligent" geladen werden können.
Bei Angabe der Option -debug => 1 bei Aufruf des Konstruktors wird die gesamte Kommunikation auf STDERR protokolliert.
API Dokumentation (www.mediawiki.org)
API Lowlevel-Dokumentation (www.mediawiki.org)
Client-Implementierung: quik-mediawiki
Beispiele für MediaWiki URLs:
https://www.mediawiki.org/w/api.php
http://localhost/mediawiki/api.php (nicht allgemein aufrufbar)
http://lxv0103.ruv.de:8080/api.php (nicht allgemein aufrufbar)
$mw = $class->new($url,@opt); $mw = $class->new($url,$user,$password,@opt);
API-URL des MediaWiki, z.B. https://en.wikipedia.org/w/api.php.
Benutzername (für automatisches Login statt explizites Login).
Passwort (für automatisches Login statt explizites Login).
Gib die Laufzeitinformation (wird mit -debug=>1 eingeschaltet) in Farbe aus.
Gib Laufzeit-Information wie den Kommunikationsverlauf auf STDERR aus.
Client-Objekt (Referenz)
Instantiiere einen Client für die MediaWiki-API $url und liefere eine Referenz auf dieses Objekt zurück.
Der Konstruktor-Aufruf löst keinen Server-Request aus. Sind $user und $password angegeben, wird der Benutzer erst mit dem ersten Token-Request eingeloggt. Er wird also nur eingeloggt, wenn es nötig ist. Vorteil: Ein Client, bei dem sich erst im Laufe der Ausführung herausstellt, ob er Requests ausführt, muss nicht vorab einen - ggf. unnötigen - Login-Request ausführen. (De facto besteht ein Login-Request aus zwei Requests, da mit dem ersten Aufruf lediglich der Login-Token geliefert wird.) Solange der Client Requests ausführt, die kein Login benötigen, werden diese beiden Requests ebenfalls gespart.
$res = $mw->login($user,$password);
Name des Nutzers
Passwort des Nutzers
Response (Hash-Referenz)
Melde den Benutzer $user mit Passwort $password auf dem MediaWiki-Server an. Alternativ ist ein automatisches Login möglich, was eleganter ist. Siehe Konstruktor.
$ perl -MQuiq::MediaWiki::Client -E 'Quiq::MediaWiki::Client->new("http://lxv0103.ruv.de:8080/api.php",-debug=>1)->login("XV882JS","<PASSWORD>")'
$token = $mw->getToken($action);
Operation, für die das Token benötigt wird.
Token (String)
Besorge vom Server ein Token zum Ausführen von Operation $action und liefere dieses zurück. Da das Token je Session für alle Seiten identisch ist, cachen wir die Tokens, so dass nur eine Serveranfrage nötig ist.
$res = $mw->editPage($pageId,$text); # [1] $res = $mw->editPage($title,$text); # [2]
Page-Id der Seite.
Titel der Seite.
Text der Seite
Dies ist die Lowlevel-Methode zum Speichern einer Seite oder des Contents einer Seite. Eine weitergehende Logik, die auch Titelnderungen erlaubt, implementiert die Methode $mw->load().
In Fassung [1] wird der Content der Seite mit der Page-Id $pageId auf Text $text gesetzt. Die Seite muss existieren.
In Fassung [2] muss die Seite nicht existieren. Der MediaWiki-Server implementiert folgende Logik:
Existiert die Seite nicht, wird sie angelegt.
Existiert die Seite und ist der Text verschieden, wird der bestehende Text ersetzt.
Existiert die Seite und ist der Text identisch, wird der Aufruf vom Wiki-Server ignoriert.
$pag = $mw->getPage($pageId,@opt); $pag = $mw->getPage($title,@opt);
Wirf keine Exception, wenn die Seite nicht gefunden wird, sondern liefere undef.
Page-Objekt (Hash-Referenz)
Ermittele die Seite mit der Page-Id $pageId bzw. dem Titel $title und liefere diese zurück. Die Methode erkennt eine Page-Id daran, dass der Wert ausschließlich aus Ziffern besteht. Alles andere wird als Seitentitel interpretiert.
Der geliefere Hash besitzt folgende Komponenten, die auch per Accessor-Methode abgefragt werden können:
(= Inhalt der Seite)
comment
contentformat
contentmodel
ns
pageid
parentid
revid
size
timestamp
title
user
$res = $mw->movePage($pageId,$newTitle,@opt); $res = $mw->movePage($oldTitle,$newTitle,@opt);
Zukünftiger Titel der Seite.
Grund für die Umbenennung.
Erzeuge ein Redirekt von der alten zur neuen Seite. Wird -redirect => 0 gesetzt, unterbleibt dies.
Benenne die Seite mit Page-Id $pageId oder dem Titel $oldTitle in $newTitle um. Die alte Seite existiert weiterhin. Das Wiki richtet automatisch eine Umleitung von der alten zur neuen Seite ein, sofern beim Aufruf nicht -redirect => 0 angegeben wird.
$res = $mw->siteInfo; $res = $mw->siteInfo(@properties);
Liste der Sysinfo-Properties, die abgefragt werden sollen.
Ermittele die Server-Eigenschaften (genauer: Eigenschaften-Gruppen) @properties und liefere das Resultat zurück. Sind keine Properties angegeben, werden alle (zur Zeit der Implementierung bekannten) Properties abgefragt.
$ quiq-mediawiki ruv statistics --debug
$res = $mw->uploadFile($file);
Pfad der Datei.
Lade die Datei auch im Falle von Warnungen hoch, z.B. dass die Datei im Wiki bereits existiert.
Response
Lade die lokale Mediendatei $file über die Upload-Schnittstelle ins MediaWiki hoch. Dies ist typischerweise eine Bilddatei.
API:Upload
File Upload per LWP
# Datei hochladen (wir lesen $file selbst) my $p = Quiq::Path->new; my $data = $p->read($file); # Datei hochladen my $filename = $p->filename($file); return $self->send('POST','upload', token => $token, filename => $filename, file => [undef,$filename,Content=>$data], );
$version = $mw->version;
Ermittele die Versionsnummer des MediaWiki-Servers und liefere diese zurück. Die Information wird im Objekt gecached.
$mw->load($cacheDir,$file,@opt);
Pfad zum Spiegel-Verzeichnis. Der Inhalt des Spiegel-Verzeichnisses wird von der Methode verwaltet. Es enthält Kopien der geladenen Dateien.
Pfad der Datei, die geladen werden soll. Dies kann eine Seitendatei (*.mw) oder eine sonstige Datei sein (*.png, *.jpg, *.gif, ...), die über die Upload-Schnittstelle des MediaWiki geladen werden kann.
Lade die Datei ins Wiki, auch wenn sie sich nicht geändert hat (gegenüber dem Cache).
nichts
Lade Seite oder Mediendatei $file ins Wiki. Hierbei wird ein "intelligentes" Verfahren angewendet, das verschiedene Sonderfälle berücksichtigt (siehe unten). Eine Kopie der hochgeladenen Datei wird im Cache-Verzeichnis $cacheDir abgelegt. Ist die Cache-Version eines früheren Aufrufs identisch zu zur aktuellen Version $file, kehrt der Aufruf sofort zurück (außer bei Option -force => 1). Den Schlüssel stellt der Dateiname dar. Dieser muss über allen Dateien eindeutig sein und darf sich extern nicht ändern.
Die Datei einer Seite muss die Endung *.mw besitzen und sowohl den Titel als auch den Inhalt der Seite als Record (siehe Quiq::Record) enthalten. Eine Mediendatei (*.png, *.jpg, ...) wird wie sie ist an die Methode übergeben.
In der Cache-Datei einer Seite speichert die Methode die Page-Id der Seite. Dadurch kann die Methode auch bei Titeländerungen die Seite im Wiki ermitteln und vor dem Speichern eine move-Operation ausführen. Die Fälle im Einzelnen:
Die Datei existiert im Cache und ist identisch zu dieser und -force ist nicht gesetzt.
Die Datei existiert nicht im Cache
Die Datei existiert im Cache und ist gegenüber der externen Datei verschieden
Option -force ist gesetzt
Die Datei ist eine Seite und soll gespeichert werden, wobei ein Unterschied zwischen Cache- und Wiki-Datei festgestellt wird. Das bedeutet, im Wiki wurde die Datei seit dem letzten Speichern geändert. Der Aufruf ist nur durch Setzen der Option -force möglich, denn die Änderung muss händisch in die externe Datei eingepflegt werden.
Die Datei ist eine Seite und der Titel der Seite ist zwischen Cachedatei und externer Datei unterschiedlich. Die Seite wird automatisch im Wiki umbenannt.
$res = $mw->send($method,$action,@keyVal);
Die HTTP Request-Methode: 'GET' oder 'POST'.
Die Aktion, die ausgeführt werden soll, z.B. 'query'.
Die Liste der Schlüssel/Wert-Paare, die an den Server übermittelt werden, entweder als URL-Parameter im Falle von GET oder im Body des Requests im Falle von POST.
Dekodiertes JSON in UTF-8 als Perl-Hash
Grundlegende Methode, über die sämtliche Interaktion mit dem MediaWiki-Server läuft. Die Interaktion besteht in einem Austausch von Schlüssel/Wert-Paaren via HTTP mittels GET oder POST. Der Client sendet mit einem Request eine Menge von Schlüssel/Wert-Paaren und erhält vom Server in der Response eine Menge von Schlüssel/Wert-Paaren zurück. In beide Richtungen wird UTF-8 Encoding vorausgesetzt. D.h. die @keyVal-Elemente müssen UTF-8 kodiert sein, die Elemente in der Response $res sind es ebenfalls.
$pag = $mw->reduceToPage($res); $pag = $mw->reduceToPage($res,$sloppy);
Response vom Server mit Seitenliste.
Wirf keine Exception, wenn keine Seite existiert.
Reduzierte Response
Reduziere die Server-Response $res mit einer einelementigen Seitenliste der Art
{ query => { pages => { $pageId => { @keyVal }, ... }, } }
auf
{ @keyVal }
also auf ein Element und liefere dieses zurück.
Enthält die Seitenliste mehr als ein Element, oder handelt es sich um ein ungültiges (als "missing" gekennzeichnetes) Element, wird eine Exception geworfen.
$mw->log($title,$text);
Schreibe den Text $text unter der Überschrift $title nach STDERR.
1.191
Frank Seitz, http://fseitz.de/
Copyright (C) 2020 Frank Seitz
This code is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install Quiq, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Quiq
CPAN shell
perl -MCPAN -e shell install Quiq
For more information on module installation, please visit the detailed CPAN module installation guide.