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.
151 lines
3.0 KiB
151 lines
3.0 KiB
|
|
#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;
|
|
}
|
|
|
|
/**
|
|
* 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 %p\n",(void*)(*tp)->type);
|
|
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\n",t->type,tr);
|
|
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 0x%x at time=%i\n",timer_type,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:
|
|
*/
|