Page Menu
Home
GitPull.it
Search
Configure Global Search
Log In
Files
F13283020
D25.1777708648.diff
No One
Temporary
Actions
View File
Edit File
Delete File
View Transforms
Subscribe
Award Token
Flag For Later
Size
4 KB
Referenced Files
None
Subscribers
None
D25.1777708648.diff
View Options
Index: wikidatablame.php
===================================================================
--- /dev/null
+++ wikidatablame.php
@@ -0,0 +1,155 @@
+<?php
+# Copyright (C) 2020 Valerio Bozzolan
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+// exit if not CLI
+$argv or exit( 1 );
+
+// load the framework
+require __DIR__ . '/../autoload.php';
+use \cli\Log;
+use \cli\Input;
+use \cli\Opts;
+use \mw\API\PageMatcher;
+use \cli\ConfigWizard;
+use \cli\ParamFlag;
+
+// load configuration or create it
+ConfigWizard::requireOrCreate( __DIR__ . '/config.php' );
+
+// register all CLI parameters
+$opts = new Opts( [
+ new ParamFlag( 'help', 'h', "Show this help and quit" ),
+] );
+
+// error messages to be displayed
+$messages = [];
+
+// command line arguments
+$arguments = Opts::unnamedArguments();
+if( count( $arguments ) < 2 ) {
+ $messages[] = "Please specify both the SPARQL file and the user name to blame";
+}
+// take the SPARQL file pathname
+$sparql_file = array_shift( $arguments );
+if( !file_exists( $sparql_file ) ) {
+ $messages[] = sprintf(
+ "The file %s does not exist",
+ $sparql_file
+ );
+}
+
+// read the SPARQL query
+$sparql_query = file_get_contents( $sparql_file );
+if( !$sparql_query ) {
+ $messages[] = sprintf(
+ "Cannot read a non-empty SPARQL query from the file %s",
+ $sparql_file
+ );
+}
+
+// user names to blame
+$user_names = $arguments;
+
+// show the help
+$show_help = $opts->getArg( 'help' );
+if( $show_help ) {
+ $messages = [];
+} else {
+ $show_help = $messages;
+}
+
+// eventually show the help message
+if( $show_help ) {
+ echo "Usage:\n {$argv[ 0 ]} FILE.sparql USER_NAME\n";
+ echo "Allowed OPTIONS:\n";
+ foreach( $opts->getParams() as $param ) {
+ $commands = [];
+ if( $param->hasLongName() ) {
+ $commands[] = '--' . $param->getLongName();
+ }
+ if( $param->hasShortName() ) {
+ $commands[] = '-' . $param->getShortName();
+ }
+ $command = implode( '|', $commands );
+ if( $command && ! $param->isFlag() ) {
+ $command .= $param->isValueOptional()
+ ? '=[VALUE]'
+ : '=VALUE';
+ }
+ printf( ' % -20s ', $command );
+ if( $param->hasDescription() ) {
+ echo ' ' . $param->getDescription();
+ }
+ echo "\n";
+ }
+ foreach( $messages as $msg ) {
+ echo "\nError: $msg";
+ }
+ echo "\n";
+ exit( $opts->getArg( 'help' ) ? 0 : 1 );
+}
+
+// activate Wikidata power and login
+$wikidata = \wm\Wikidata::instance();
+$wikidata->login();
+// an array of ids
+$ids = [];
+
+
+// execs the query
+$rows = $wikidata->querySPARQL( $sparql_query );
+$results = 0;
+$contribs = 0;
+
+foreach ($rows as $row) {
+ // add id to array;
+ $ids[] = basename($row->item->value);
+}
+echo "Starting looking for contributions...\n";
+// and now the magic begins - looks for usercontribs
+// https://www.wikidata.org/w/api.php?action=help&modules=query%2Busercontribs
+ $requests = $wikidata->createQuery( [
+ 'action' => 'query',
+ 'list' => 'usercontribs',
+ 'ucuser' => $user_names,
+ 'ucprop' => ['ids', 'title', 'timestamp'],
+ 'ucdir' => 'newer',
+ 'uclimit' => 'max',
+ ] );
+ foreach ($requests as $request) {
+ $items = $request->query->usercontribs;
+ foreach($items as $item) {
+ if(in_array($item->title, $ids, true)) {
+ echo("\n \n \033[1m" . $item->timestamp . ' - https://www.wikidata.org/w/index.php?diff='. $item->revid . "\033[0m \n \n");
+ $results++;
+ }
+ $contribs++;
+ $lastcontrib = $item->timestamp;
+
+ }
+ echo '- Read contributions: ' . $contribs . "\n";
+ echo '- Last contributions read: ' . $lastcontrib . "\n";
+}
+
+echo "\033[1m - Total RESULTS: " . $results . "\033[0m \n";
+echo '- Read contributions: ' . $contribs . "\n";
+echo '- Last contributions read: ' . $lastcontrib . "\n";
+
+
+if ($results === 0) {
+ echo "Sorry, no results found!\n";
+}
+
File Metadata
Details
Attached
Mime Type
text/plain
Expires
Sat, May 2, 09:57 (13 h, 10 m)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
1885000
Default Alt Text
D25.1777708648.diff (4 KB)
Attached To
Mode
D25: Create Wikidata blame tool
Attached
Detach File
Event Timeline
Log In to Comment