Differential D25 Diff 90 tools/wikidata-blame.php

Changeset View

Standalone View

tools/wikidata-blame.php

This file was added.

Property	Old Value	New Value
File Mode	null	100755

				#!/usr/bin/php
				<?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';

				// load configuration or create it
				ConfigWizard::requireOrCreate( __DIR__ . '/config.php' );

				use \cli\Log;
				use \cli\Input;
				use \cli\Opts;
				use \mw\API\PageMatcher;

				// 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 );
				}

				// try to open the file
				$file = fopen( $filename, 'w' );
				if( !$file ) {
				Log::error( "Can't open file '$filename'" );
				exit( 1 );
				}

				$wikidata = \wm\Wikidata::instance();
				$wikidata->login();

				https://www.wikidata.org/w/api.php?action=help&modules=query%2Busercontribs

				$requests = $wikidata->createQuery( [
				'action' => 'query',
				'titles' => $page_titles,
				'prop' => 'revisions',
				'rvprop' => [
				'ids',
				'flags',
				'timestamp',
				'user',
				'userid',
				'size',
				'slotsize',
				'sha1',
				'comment',
				'content',
				],
				'rvslots' => 'main',
				'rvlimit' => $limit,
				] );