1# 2# $Id: AccountingSIPtrace.pm 757 2007-01-05 10:56:28Z bastian $ 3# 4# Perl module for Kamailio 5# 6# Copyright (C) 2007 Collax GmbH 7# (Bastian Friedrich <bastian.friedrich@collax.com>) 8# 9# This file is part of Kamailio, a free SIP server. 10# 11# Kamailio is free software; you can redistribute it and/or modify 12# it under the terms of the GNU General Public License as published by 13# the Free Software Foundation; either version 2 of the License, or 14# (at your option) any later version 15# 16# Kamailio is distributed in the hope that it will be useful, 17# but WITHOUT ANY WARRANTY; without even the implied warranty of 18# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 19# GNU General Public License for more details. 20# 21# You should have received a copy of the GNU General Public License 22# along with this program; if not, write to the Free Software 23# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA 24# 25 26=head1 Kamailio::VDB::Adapter::AccountingSIPtrace 27 28This package is an Adapter for the acc and siptrace modules, featuring 29only an insert operation. 30 31=cut 32 33package Kamailio::VDB::Adapter::AccountingSIPtrace; 34 35use Kamailio::VDB; 36use Kamailio::VDB::VTab; 37use Kamailio; 38use Kamailio::Constants; 39use Data::Dumper; 40 41our @ISA = qw ( Kamailio::VDB ); 42 43sub insert { 44 my $self = shift; 45 my $vals = shift; 46 47 my $vtab = $self->{vtabs}->{$self->{tablename}}; 48 return $vtab->call("insert", $vals); 49} 50 511; 52