[freeside-commits] branch FREESIDE_2_3_BRANCH updated. 83153d0d334defaf1fe909a244baec175986fa40

[Ivan]

The branch, FREESIDE_2_3_BRANCH has been updated
       via  83153d0d334defaf1fe909a244baec175986fa40 (commit)
      from  de4810fdef6ce3df5571b0e2b76facd936398868 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 83153d0d334defaf1fe909a244baec175986fa40
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Wed Mar 5 16:14:15 2014 -0800

    add back-office xmlrpc api and daemon, RT#27958

diff --git a/FS/FS/XMLRPC_Lite.pm b/FS/FS/XMLRPC_Lite.pm
new file mode 100644
index 0000000..9d3059d
--- /dev/null
+++ b/FS/FS/XMLRPC_Lite.pm
@@ -0,0 +1,17 @@
+package FS::XMLRPC_Lite;
+
+use XMLRPC::Lite;
+
+use XMLRPC::Transport::HTTP;
+
+#XXX submit patch to SOAP::Lite
+
+package XMLRPC::Transport::HTTP::Server;
+
+ at XMLRPC::Transport::HTTP::Server::ISA = qw(SOAP::Transport::HTTP::Server);
+
+sub initialize; *initialize = \&XMLRPC::Server::initialize;
+sub make_fault; *make_fault = \&XMLRPC::Transport::HTTP::CGI::make_fault;
+sub make_response; *make_response = \&XMLRPC::Transport::HTTP::CGI::make_response;
+
+1;
diff --git a/bin/xmlrpc-customer_info b/bin/xmlrpc-customer_info
new file mode 100755
index 0000000..8086a8d
--- /dev/null
+++ b/bin/xmlrpc-customer_info
@@ -0,0 +1,21 @@
+#!/usr/bin/perl
+
+use strict;
+use Frontier::Client;
+use Data::Dumper;
+
+my $uri = new URI 'http://localhost:8008/';
+
+my $server = new Frontier::Client ( 'url' => $uri );
+
+my $result = $server->call(
+  'FS.API.customer_info',
+    'secret'  => 'sharingiscaring',
+    'custnum' => 181318,
+);
+
+#die $result->{'error'} if $result->{'error'};
+
+print Dumper($result);
+
+1;

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/XMLRPC_Lite.pm     |   17 +++++++++++++++++
 bin/xmlrpc-customer_info |   21 +++++++++++++++++++++
 2 files changed, 38 insertions(+), 0 deletions(-)
 create mode 100644 FS/FS/XMLRPC_Lite.pm
 create mode 100755 bin/xmlrpc-customer_info