Metadata plugins are the bread-n-butter of LRR plugins: For a given archive, they can look for tags in a remote service or a local file and return this info so it can be integrated into LRR's database.
Required subroutines
Only one subroutine needs to be implemented for the module to be recognized: get_tags, which contains your working code. You're free to implement other subroutines for cleaner code, of course.
Expected Input
The following section deals with writing the get_tags subroutine.
When executing your Plugin, LRR will call this subroutine and pass it the following variables:
subget_tags {#First lines you should have in the subroutineshift;my $lrr_info = shift; # Global info hashmy ($lang, $savetitle, $usethumbs, $enablepanda) = @_; # Plugin parameters
The variables match the parameters you've entered in the plugin_info subroutine. (Example here is for E-H. )
The $lrr_info hash contains various variables you can use in your plugin:
$lrr_info->{archive_id}: The internal ID of the archive.
$lrr_info->{archive_title}: The title of the archive, as entered by the User.
$lrr_info->{existing_tags}: The tags that are already in LRR for this archive, if there are any.
$lrr_info->{thumbnail_hash}: A SHA-1 hash of the first image of the archive.
$lrr_info->{file_path}: The filesystem path to the archive.
$lrr_info->{oneshot_param}: Value of your one-shot argument, if it's been set by the User. See below.
$lrr_info->{user_agent}: Mojo::UserAgent object you can use for web requests. If this plugin depends on a Login plugin, this UserAgent will be pre-configured with the cookies from the Login.
One-Shot Arguments
The One-Shot Argument can be set by the user every time he uses your Plugin on a specific file, through LRR's Edit Menu.
It's more meant for special overrides you'd want to use for this specific file:
For example, in E-Hentai and nHentai plugins, it can be used to set a specific Gallery URL you want to pull tags from.
If you want the user to be able to enter this override, the oneshot_arg field must be present in plugin_info, and contain a brief description of what your argument is for.
One-Shot Arguments can only be strings.
Expected Output
Once you're done and obtained your tags, all that's needed for LRR to handle them is to return a hash containg said tags.
Tags are expected to be separated by commas, like this:
return ( tags => "my:new, tags:here, look ma no namespace" );
Plugins can also modify the title or the summary of the archive:
return ( tags => "some:tags", title=>"My new epic archive title", summary=>"Phenomenal! Wheres that David Lynch clip where he says phenomenal" );
Those two parameters are completely optional. (The tags one isn't, but it can very well be empty.) If the Plugin's user has disabled "Plugins can modify archive titles" in their settings, you can still pass a new title - It'll simply do nothing.
If you couldn't obtain tags for some reason, you can tell LRR that an error occurred by returning a hash containing an "error" field:
return ( error => "my error :(" );
If you do this, no tags will be added for this archive, and the error will be logged/displayed to the user.
Plugin Template
packageLANraragi::Plugin::Metadata::MyNewPlugin;use strict;use warnings;# Plugins can freely use all Perl packages already installed on the system # Try however to restrain yourself to the ones already installed for LRR (see tools/cpanfile) to avoid extra installations by the end-user.use Mojo::UserAgent;# You can also use LRR packages when fitting.# All packages are fair game, but only functions explicitly exported by the Utils packages are supported between versions.# Everything else is considered internal API and can be broken/renamed between versions.use LANraragi::Model::Plugins;use LANraragi::Utils::Logging qw(get_logger);#Meta-information about your plugin.subplugin_info {return (#Standard metadata name =>"Plugin Boilerplate", type =>"metadata", namespace =>"dummyplug",#login_from => "dummylogin", author =>"Hackerman", version =>"0.001", description =>"This is base boilerplate for writing LRR plugins.", icon => "data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABmJLR0QAAAAAAAD5Q7t/AAAACXBI\nWXMAAAsTAAALEwEAmpwYAAAAB3RJTUUH4wYDFCYzptBwXAAAAB1pVFh0Q29tbWVudAAAAAAAQ3Jl\nYXRlZCB3aXRoIEdJTVBkLmUHAAAAjUlEQVQ4y82UwQ7AIAhDqeH/f7k7kRgmiozDPKppyisAkpTG\nM6T5vAQBCIAeQQBCUkiWRTV68KJZ1FuG5vY/oazYGdcWh7diy1Bml5We1yiMW4dmQr+W65mPjFjU\n5PMg2P9jKKvUdxWMU8neqYUW4cBpffnxi8TsXk/Qs8GkGGaWhmes1ZmNmr8kuMPwAJzzZSoHwxbF\nAAAAAElFTkSuQmCC",
#If your plugin uses/needs custom arguments, input their name here. #This name will be displayed in plugin configuration next to an input box for global arguments, and in archive edition for one-shot arguments. oneshot_arg =>"This is a one-shot argument that can be entered by the user when executing this plugin on a file", parameters => [ {type =>"bool", desc =>"Enable the DOOMSDAY DEVICE"}, {type =>"int", desc =>"Number of iterations", default_value =>"9001"} ] );}#Mandatory function to be implemented by your pluginsubget_tags {shift;my $lrr_info = shift; # Global info hash, contains various metadata provided by LRRmy ($doomsday, $iterations) = @_; # Plugin parametersif ($lrr_info->{oneshot_param}) {return ( error =>"Yaaaaaaaaa gomen gomen the oneshot argument isn't implemented -- You entered ".$lrr_info->{oneshot_param}.", right ?"); }#Use the logger to output status - they'll be passed to a specialized logfile and written to STDOUT.my $logger = get_logger("My Cool Plugin","plugins");if ($doomsday) {return ( error =>"You fools! You've messed with the natural order!"); }#Work your magic here - You can create subroutines below to organize the code better $logger->info("Gettin' tags");my $newtags = get_tags_from_somewhere($iterations); #To be implementedmy $error = 0;#Something went wrong? Return an error.if ($error) { $logger->error("Oh no");return ( error =>"Error Text Here"); }#Otherwise, return the tags you've harvested.return ( tags => $newtags );}subget_tags_from_somewhere {my $iterations = shift;my $logger = get_logger("My Cool Plugin","plugins"); $logger->info("I'm supposed to be iterating $iterations times but I don't give a damn my man");#Tags are expected to be submitted as a single string, containing tags split up by commas. Namespaces are optional.return"my:new, tags:here, look ma no namespace"; }1;