[Kamailio-Users] freeing innername from htable Re: perl module, "pv_sprintf: Memory exhausted!"

[Christian Koch]

Hi Mik,

thanks for your hint!!!
We're now trying to save the variables from $sht in AVPs and accessing 
only the AVPs from perl to avoid the memory leak. Currently we're 
running our stress test. We'll inform you about the result.

Christian


Mik Cheez schrieb:
> Christian,
>
> Not sure if this will help you, but it's a good starting point if you want
> to use Perl. I grab a good deal of information using the headers and AVP's
> in order to write data to a MSSQL database and do LCR.  Here's essentially
> how I grab the values:
>
> #Begin
> use strict;
> use OpenSER qw ( log );
> use OpenSER::Constants;
> use OpenSER::Message;
>
> Sub your_function {
> # get headers
>         my $m = shift;
>         my ($lrn, $inrpid);
>
> # Headers
>         my $ruri = $m->getHeader("To");
>
> # Pseudo Variables
>         my $source_ip = $m->pseudoVar("\$si");
>         my $in_ANI = $m->pseudoVar("\$fU");
>         my $insrc = $m->pseudoVar("\$fd");
>         my $daytim = $m->pseudoVar("\$Tf");
>         my $callid = $m->pseudoVar("\$ci");
>
> # Check if PV's are set
>         if( $m->pseudoVar("\$re") != undef ){
>                 $inrpid = $m->pseudoVar("\$re");
>         }
>
> # AVP's
>         if( OpenSER::AVP::get(60) != undef ){
>                 $lrn = OpenSER::AVP::get(60);
>         }
>
> # Write some data to the log
>         log(L_INFO, sprintf("callid: %s\n", $callid));
>
> # DO WHATEVER ELSE
>
> }
> # END
>
> You can set AVP's in your script before calling the function:
> $avp(my_AVP) = $sht(a=>$tu-translate);
>
> Mik
>
> -----Original Message-----
> From: users-bounces at lists.kamailio.org
> [mailto:users-bounces at lists.kamailio.org] On Behalf Of Christian Koch
> Sent: Tuesday, June 09, 2009 6:56 AM
> To: Daniel-Constantin Mierla
> Cc: users at lists.kamailio.org
> Subject: Re: [Kamailio-Users] freeing innername from htable Re: perl module,
> "pv_sprintf: Memory exhausted!"
>
> Hello Daniel,
>
> Daniel-Constantin Mierla schrieb:
>   
>> unfortunately you cannot use $sht in this way from perl module. The 
>> same limitation that prevent calling any function from modules apply 
>> here -- the fixup system used at startup, when string parameters are 
>> pre-compiled in different forms to speed up runtime execution.
>>     
> So there is no way to access $sht from other moduls (like perl or xlog)? 
> It seems to work, but obviously the memory isn't freed :-)
>
> What we are trying to do is the following:
> During processing of "INVITE" we need to save some call details (source 
> IP, URI, ...) and want to write them to file when the call is finished 
> (including duration, ...), while processing BYE or CANCEL, to have CDRs. 
> As there are multiple childs of kamailio we tried to save the calls 
> details from the INVITE in shared memory using htable (e.g. 
> "$sht(a=>$ci::srcip) = $si"), so we can use them while processing the 
> BYE (possibly in another child). There we wanted to use perl to be able 
> to write the saved details to a file.
> We used the shared memory module as we don´t want to save the infos to 
> DB because of performance issues we suspect when using DBs.
>
> But as you mentioned $sht is not supposed to be used in such a way. Do 
> you have any idea what else we can do to generate CDRs as mentioned?
> By using other modules for example or a complete other way you may know?
>
>   
>> It can be added as a feature request for future. For module functions 
>> I added the core support for free fixup functions, but nobody 
>> committed to continue the work in perl module.
>>
>> If you want to work on it, I can assist and guide you.
>>     
> Well, honestly we are looking for a fast way to implement it.
> How long will it take to implement it with your guidance?
>
> Thanks and regards,
> Christian
>
>
> _______________________________________________
> Kamailio (OpenSER) - Users mailing list
> Users at lists.kamailio.org
> http://lists.kamailio.org/cgi-bin/mailman/listinfo/users
> http://lists.openser-project.org/cgi-bin/mailman/listinfo/users
>
>   

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.sip-router.org/pipermail/sr-users/attachments/20090610/7ed73e3a/attachment.htm>