<html><head><meta http-equiv="Content-Type" content="text/html; charset=us-ascii"><meta name="Generator" content="Microsoft Word 14 (filtered medium)"><style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman","serif";}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
span.EmailStyle17
{mso-style-type:personal-reply;
font-family:"Calibri","sans-serif";
color:#1F497D;}
.MsoChpDefault
{mso-style-type:export-only;
font-family:"Calibri","sans-serif";
mso-fareast-language:EN-US;}
@page WordSection1
{size:612.0pt 792.0pt;
margin:72.0pt 72.0pt 72.0pt 72.0pt;}
div.WordSection1
{page:WordSection1;}
--></style></head><body lang="EN-ZA" link="blue" vlink="purple"><div class="WordSection1"><p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1f497d">Hi, </span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1f497d"> </span></p><p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1f497d">I ended up using SOAP as that was also something more up my alley than Perl.</span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1f497d"> </span></p><p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1f497d">I only had under a thousand, so it was’t impractical via SOAP.</span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1f497d"> </span></p><p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1f497d">Regards</span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1f497d"> </span></p><div style="border:none;border-left:solid blue 1.5pt;padding:0cm 0cm 0cm 4.0pt"><div><div style="border:none;border-top:solid #b5c4df 1.0pt;padding:3.0pt 0cm 0cm 0cm">
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:"Tahoma","sans-serif"">From:</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:"Tahoma","sans-serif""> <a href="mailto:spce-user-bounces@lists.sipwise.com">spce-user-bounces@lists.sipwise.com</a> [mailto:<a href="mailto:spce-user-bounces@lists.sipwise.com">spce-user-bounces@lists.sipwise.com</a>] <b>On Behalf Of </b>Skyler<br>
<b>Sent:</b> 13 November 2012 01:08 AM<br><b>To:</b> Andreas Granig<br><b>Cc:</b> <a href="mailto:spce-user@lists.sipwise.com">spce-user@lists.sipwise.com</a><br><b>Subject:</b> Re: [Spce-user] fast way to import a few hundred peering rules</span></p>
</div></div><p class="MsoNormal"> </p><div><p class="MsoNormal">Hi Matthew,</p></div><div><p class="MsoNormal"> </p></div><div><p class="MsoNormal"> Did this example help you by chance? I am looking to import 300k or so of peering rules but Perl is not my strength. I'm thinking if this example from Andreas is used with loop reading from a CSV it could be very useful as a tool within SPCE.</p>
</div><div><p class="MsoNormal"> </p></div><div><p class="MsoNormal"> Would you mind sharing your final solution?</p></div><div><p class="MsoNormal"> </p></div><div><p class="MsoNormal" style="margin-bottom:12.0pt">Skyler</p>
</div><div><p class="MsoNormal">On Mon, Apr 16, 2012 at 2:35 PM, Andreas Granig <<a href="mailto:agranig@sipwise.com" target="_blank">agranig@sipwise.com</a>> wrote:</p><p class="MsoNormal">Ok, actually tried to run it in Perl, here's the syntactically correct<br>
version</p><div><p class="MsoNormal"><br>#!/usr/bin/perl -w<br>use strict;<br>use Sipwise::Provisioning::Voip;<br>my $prov = Sipwise::Provisioning::Voip->new();<br>my $params = {</p></div><p class="MsoNormal"> group_id => 'your peering group id here',</p>
<div><p class="MsoNormal" style="margin-bottom:12.0pt"> data => {<br> caller_prefix => 'your caller pattern',<br> callee_prefix => 'your callee prefix',<br> description => 'your rule description',<br>
},<br>};<br>eval {<br> my $res = $prov->handle_request('create_peer_rule', {<br> authentication => {<br> type=>'admin',<br> username=>'your admin panel user',<br>
password=>'your admin panel pass',<br> },<br> parameters => $params<br> });<br>};<br>if($@) {<br> if(ref $@ eq 'SOAP::Fault') {<br>
die "ossbss call failed: ". $@->faultstring;<br> } else {<br> die "ossbss call failed: $@";<br> }<br>}</p></div><p class="MsoNormal">Andreas</p><div><div>
<p class="MsoNormal"><br>On 04/16/2012 11:31 PM, Andreas Granig wrote:<br>> Hi Mattew,<br>><br>> On 04/15/2012 04:50 PM, Matthew Ogden wrote:<br>>> Where can one find the peering rules config files if you want to import<br>
>> a large number of peering rules into them?<br>><br>> There is no such thing as a config file, the data is stored in MySQL.<br>> However the intended way is to use either the SOAP interface for mass<br>> provisioning, or (even faster, but only works directly on the system),<br>
> use the ossbss libs in a perl script, like this (just out of my head,<br>> really not tested):<br>><br>> #!/usr/bin/perl -w<br>> use strict;<br>> use Sipwise::Provisioning::Voip;<br>> my $prov = Sipwise::Provisioning::Voip->new();<br>
> my $params = {<br>> group_id => your peering group id here,<br>> data => {<br>> caller_prefix => 'your caller pattern',<br>> callee_prefix => 'your callee prefix',<br>
> description => 'your rule description',<br>> },<br>> };<br>> eval {<br>> my $res = $prov->handle_request('create_peer_rule', {<br>> authentication => {<br>
> type='admin',<br>> username='your admin panel user',<br>> password='your admin panel pass',<br>> },<br>
> parameters => $params<br>> });<br>> };<br>> if($@) {<br>> if(ref $@ eq 'SOAP::Fault') {<br>> die "ossbss call failed: ". $@->faultstring;<br>
> } else {<br>> die "ossbss call failed: $@";<br>> }<br>> }<br>><br>> Adapt (and fix) as needed to work in a loop for all your rules.<br>><br>> Andreas<br>><br>
><br>><br>></p></div></div><p class="MsoNormal" style="margin-bottom:12.0pt">> _______________________________________________<br>> Spce-user mailing list<br>> <a href="mailto:Spce-user@lists.sipwise.com">Spce-user@lists.sipwise.com</a><br>
> <a href="http://lists.sipwise.com/listinfo/spce-user" target="_blank">http://lists.sipwise.com/listinfo/spce-user</a><br><br><br>_______________________________________________<br>Spce-user mailing list<br><a href="mailto:Spce-user@lists.sipwise.com">Spce-user@lists.sipwise.com</a><br>
<a href="http://lists.sipwise.com/listinfo/spce-user" target="_blank">http://lists.sipwise.com/listinfo/spce-user</a></p></div><p class="MsoNormal"> </p></div></div></body></html>