mirror of https://github.com/sipwise/sems.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
183 lines
4.2 KiB
183 lines
4.2 KiB
/*
|
|
* $Id$
|
|
*
|
|
* Copyright (C) 2007 Raphael Coeffic
|
|
*
|
|
* This file is part of sems, a free SIP media server.
|
|
*
|
|
* sems is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version
|
|
*
|
|
* For a license to use the ser software under conditions
|
|
* other than those described here, or to purchase support for this
|
|
* software, please contact iptel.org by e-mail at the following addresses:
|
|
* info@iptel.org
|
|
*
|
|
* sems is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include "sip_trans.h"
|
|
#include "sip_parser.h"
|
|
#include "wheeltimer.h"
|
|
#include "hash_table.h"
|
|
#include "trans_layer.h"
|
|
|
|
#include "log.h"
|
|
|
|
#include <assert.h>
|
|
|
|
int _timer_type_lookup[] = { -1, 0,1,2, 0,1,2, 0,1,2, 0 };
|
|
|
|
inline timer** fetch_timer(unsigned int timer_type, timer** base)
|
|
{
|
|
timer_type &= 0xFFFF;
|
|
|
|
assert(timer_type < sizeof(_timer_type_lookup));
|
|
|
|
int tl = _timer_type_lookup[timer_type];
|
|
if(tl != -1){
|
|
return &base[tl];
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
sip_trans::sip_trans()
|
|
: msg(0),
|
|
retr_buf(0),
|
|
retr_len(0)
|
|
{
|
|
memset(timers,0,SIP_TRANS_TIMERS*sizeof(void*));
|
|
}
|
|
|
|
sip_trans::~sip_trans()
|
|
{
|
|
reset_all_timers();
|
|
delete msg;
|
|
delete [] retr_buf;
|
|
if((type == TT_UAC) && to_tag.s){
|
|
delete [] to_tag.s;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Tells if a specific timer is set
|
|
*
|
|
* @param timer_type @see sip_timer_type
|
|
*/
|
|
bool sip_trans::is_timer_set(unsigned int timer_type)
|
|
{
|
|
return (*fetch_timer(timer_type,timers) != NULL);
|
|
}
|
|
|
|
/**
|
|
* Fetches a specific timer
|
|
*
|
|
* @param timer_type @see sip_timer_type
|
|
*/
|
|
timer* sip_trans::get_timer(unsigned int timer_type)
|
|
{
|
|
return *fetch_timer(timer_type,timers);
|
|
}
|
|
|
|
/**
|
|
* Resets a specific timer
|
|
*
|
|
* @param t the new timer
|
|
* @param timer_type @see sip_timer_type
|
|
*/
|
|
void sip_trans::reset_timer(timer* t, unsigned int timer_type)
|
|
{
|
|
timer** tp = fetch_timer(timer_type,timers);
|
|
|
|
if(*tp != NULL){
|
|
|
|
DBG("Clearing old timer of type %c\n",
|
|
(*tp)->type?'A'+(*tp)->type-1:'0');
|
|
wheeltimer::instance()->remove_timer(*tp);
|
|
}
|
|
|
|
*tp = t;
|
|
|
|
if(t)
|
|
wheeltimer::instance()->insert_timer(t);
|
|
}
|
|
|
|
void trans_timer_cb(timer* t, unsigned int bucket_id, sip_trans* tr)
|
|
{
|
|
trans_bucket* bucket = get_trans_bucket(bucket_id);
|
|
if(bucket){
|
|
bucket->lock();
|
|
if(bucket->exist(tr)){
|
|
DBG("Transaction timer expired: type=0x%x, trans=%p, eta=%i, t=%i\n",
|
|
t->type,tr,t->expires,wheeltimer::instance()->wall_clock);
|
|
trans_layer::instance()->timer_expired(t,bucket,tr);
|
|
}
|
|
else {
|
|
WARN("Transaction %p does not exist anymore\n",tr);
|
|
WARN("Timer type=0x%x will be deleted without further processing\n",t->type);
|
|
}
|
|
bucket->unlock();
|
|
}
|
|
else {
|
|
ERROR("Invalid bucket id\n");
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Resets a specific timer with a delay value
|
|
*
|
|
* @param timer_type @see sip_timer_type
|
|
* @param expires_delay delay before expiration in millisecond
|
|
*/
|
|
void sip_trans::reset_timer(unsigned int timer_type, unsigned int expire_delay /* ms */,
|
|
unsigned int bucket_id)
|
|
{
|
|
wheeltimer* wt = wheeltimer::instance();
|
|
|
|
unsigned int expires = expire_delay / (TIMER_RESOLUTION/1000);
|
|
expires += wt->wall_clock;
|
|
|
|
DBG("New timer of type %c at time=%i\n",
|
|
timer_type?'A'+timer_type-1:'0',expires);
|
|
|
|
timer* t = new timer(timer_type,expires,
|
|
(timer_cb)trans_timer_cb,
|
|
bucket_id,this);
|
|
|
|
reset_timer(t,timer_type);
|
|
}
|
|
|
|
void sip_trans::clear_timer(unsigned int timer_type)
|
|
{
|
|
reset_timer((timer*)NULL,timer_type);
|
|
}
|
|
|
|
void sip_trans::reset_all_timers()
|
|
{
|
|
for(int i=0; i<SIP_TRANS_TIMERS; i++){
|
|
|
|
if(timers[i]){
|
|
DBG("remove_timer(%p)\n",timers[i]);
|
|
wheeltimer::instance()->remove_timer(timers[i]);
|
|
timers[i] = NULL;
|
|
}
|
|
}
|
|
}
|
|
|
|
/** EMACS **
|
|
* Local variables:
|
|
* mode: c++
|
|
* c-basic-offset: 4
|
|
* End:
|
|
*/
|