- fixed an error in the last commit
[sip-router] / modules_k / presence / utils_func.h
1 /*
2  * $Id$
3  *
4  * presence module - presence server implementation
5  *
6  * Copyright (C) 2006 Voice Sistem S.R.L.
7  *
8  * This file is part of openser, a free SIP server.
9  *
10  * openser is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 2 of the License, or
13  * (at your option) any later version
14  *
15  * openser is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
23  *
24  * History:
25  * --------
26  *  2006-08-15  initial version (anca)
27  */
28
29
30 #ifndef UTILS_FUNC_H
31 #define UTILS_FUNC_H
32 #include <stdio.h>
33 #include <stdlib.h>
34 #include <string.h>
35 #include "../../mem/mem.h"
36 #include "../../dprint.h"
37 #include "../../str.h"
38 #include "../../parser/msg_parser.h"
39
40 #define LCONTACT_BUF_SIZE 1024
41 #define BAD_EVENT_CODE 489
42
43 static inline int uandd_to_uri(str user,  str domain, str *out)
44 {
45         int size;
46
47         if(out==0)
48                 return -1;
49
50         size = user.len + domain.len+7;
51
52         out->s = (char*)pkg_malloc(size*sizeof(char));
53         if(out->s == NULL)
54         {
55                 LM_ERR("no more memory\n");
56                 return -1;
57         }
58         out->len = 0;
59         strcpy(out->s,"sip:");
60         out->len = 4;
61         strncpy(out->s+out->len, user.s, user.len);
62         out->len += user.len;
63         out->s[out->len] = '@';
64         out->len+= 1;
65         strncpy(out->s + out->len, domain.s, domain.len);
66         out->len += domain.len;
67
68         out->s[out->len] = 0;
69         
70         return 0;
71 }
72
73 static inline str* get_local_contact(struct sip_msg* msg)
74 {
75         str ip;
76         char* proto;
77         int port;
78         int len;
79         str* contact;
80
81         contact= (str*)pkg_malloc(sizeof(str));
82         if(contact== NULL)
83         {
84                 LM_ERR("No more memory\n");
85                 return NULL;
86         }
87         contact->s= (char*)pkg_malloc(LCONTACT_BUF_SIZE* sizeof(char));
88         if(contact->s== NULL)
89         {
90                 LM_ERR("No more memory\n");
91                 pkg_free(contact);
92                 return NULL;
93         }
94
95         memset(contact->s, 0, LCONTACT_BUF_SIZE*sizeof(char));
96         contact->len= 0;
97         
98         if(msg->rcv.proto== PROTO_NONE || msg->rcv.proto==PROTO_UDP)
99                 proto= "udp";
100         else
101         if(msg->rcv.proto== PROTO_TLS )
102                         proto= "tls";
103         else    
104         if(msg->rcv.proto== PROTO_TCP)
105                 proto= "tcp";
106         else
107         {
108                 LM_ERR("unsupported proto\n");
109                 pkg_free(contact->s);
110                 pkg_free(contact);
111                 return NULL;
112         }       
113         
114         ip.s= ip_addr2a(&msg->rcv.dst_ip);
115         if(ip.s== NULL)
116         {
117                 LM_ERR("transforming ip_addr to ascii\n");
118                 pkg_free(contact->s);
119                 pkg_free(contact);
120                 return NULL;
121         }
122         ip.len= strlen(ip.s);
123         port = msg->rcv.dst_port;
124
125         if(strncmp(ip.s, "sip:", 4)!=0)
126         {
127                 strncpy(contact->s, "sip:", 4);
128                 contact->len+= 4;
129         }       
130         strncpy(contact->s+contact->len, ip.s, ip.len);
131         contact->len += ip.len;
132         if(contact->len> LCONTACT_BUF_SIZE - 21)
133         {
134                 LM_ERR("buffer overflow\n");
135                 pkg_free(contact->s);
136                 pkg_free(contact);
137                 return NULL;
138
139         }       
140         len= sprintf(contact->s+contact->len, ":%d;transport=" , port);
141         if(len< 0)
142         {
143                 LM_ERR("unsuccessful sprintf\n");
144                 pkg_free(contact->s);
145                 pkg_free(contact);
146                 return NULL;
147         }       
148         contact->len+= len;
149         strncpy(contact->s+ contact->len, proto, 3);
150         contact->len += 3;
151         
152         return contact;
153         
154 }
155
156 //str* int_to_str(long int n);
157
158 int a_to_i (char *s,int len);
159
160 void to64frombits(unsigned char *out, const unsigned char *in, int inlen);
161
162 int send_error_reply(struct sip_msg* msg, int reply_code, str reply_str);
163
164 #endif
165