Skip to content

henryykt/MojoX-JSON-RPC

Folders and files

NameName
Last commit message
Last commit date

Latest commit

 

History

23 Commits
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Repository files navigation

NAME

MojoX::JSON::RPC - Perl implementation of JSON-RPC 2.0 protocol for Mojolicious

SYNOPSIS

Server as plugin (Mojolicious::Plugin::JsonRpcDispatcher):

#!/usr/bin/env perl
use Mojolicious::Lite;
use MojoX::JSON::RPC::Service;

plugin 'json_rpc_dispatcher' => {
    services => {
        '/jsonrpc' => MojoX::JSON::RPC::Service->new->register(
            'sum',
            sub {
                my @params = @_;
                my $sum    = 0;
                $sum += $_ for @params;
                return $sum;
            }
        )
    }
};

app->start;

Client (MojoX::JSON::RPC::Client):

#!/usr/bin/env perl
use MojoX::JSON::RPC::Client;

my $client = MojoX::JSON::RPC::Client->new;
my $url    = 'http://www.example.com/jsonrpc';
my $callobj = {
    id      => 1,
    method  => 'sum',
    params  => [ 17, 25 ]
};

my $res = $client->call($url, $callobj);

if($res) {
    if ($res->is_error) { # RPC ERROR
        print 'Error : ', $res->error_message;
    }
    else {
        print $res->result;
    }
}
else {
    my $tx_res = $client->tx->res; # Mojo::Message::Response object
    print 'HTTP response '.$tx_res->code.' '.$tx_res->message;
}

Non-blocking client:

#!/usr/bin/env perl
use MojoX::JSON::RPC::Client;

my $client = MojoX::JSON::RPC::Client->new;
my $url    = 'http://www.example.com/jsonrpc';
my $callobj = {
    id      => 1,
    method  => 'sum',
    params  => [ 17, 25 ]
};

$client->call($url, $callobj, sub {
    # With callback
    my $res = pop;

    if($res) {
        if ($res->is_error) { # RPC ERROR
            print 'Error : ', $res->error_message;
        }
        else {
            print $res->result;
        }
    }
    else {
       my $tx_res = $client->tx->res; # Mojo::Message::Response object
       print 'HTTP response '.$tx_res->code.' '.$tx_res->message;
    }

    Mojo::IOLoop->stop;
});

Mojo::IOLoop->start;

DESCRIPTION

This module implments a client and a server plugin for JSON-RPC 2.0 for use with Mojolicious.

This module follows the draft specficiation for JSON-RPC 2.0. More information can be found at http://groups.google.com/group/json-rpc/web/json-rpc-2-0.

SEE ALSO

Mojolicious::Plugin::JsonRpcDispatcher, MojoX::JSON::RPC::Dispatcher, MojoX::JSON::RPC::Client

AUTHOR

Henry Tang

CREDITS

COPYRIGHT & LICENSE

Copyright (C) 2011-2015, Henry Tang.

MojoX::JSON::RPC is provided "as is" and without any express or implied warranties, including, without limitation, the implied warranties of merchantibility and fitness for a particular purpose.

This program is free software, you can redistribute it and/or modify it under the terms of the Artistic License version 2.0.

About

Perl implementation of JSON-RPC 2.0 protocol for Mojolicious

Resources

License

Stars

Watchers

Forks

Packages

No packages published

Contributors 3

  •  
  •  
  •  

Languages