poprouting: fix a resource leak
[olsrd.git] / lib / poprouting / src / olsrd_poprouting.c
1 /*
2  * The olsr.org Optimized Link-State Routing daemon (olsrd)
3  *
4  * (c) by the OLSR project
5  *
6  * See our Git repository to find out who worked on this file
7  * and thus is a copyright holder on it.
8  *
9  * All rights reserved.
10  *
11  * Redistribution and use in source and binary forms, with or without
12  * modification, are permitted provided that the following conditions
13  * are met:
14  *
15  * * Redistributions of source code must retain the above copyright
16  *   notice, this list of conditions and the following disclaimer.
17  * * Redistributions in binary form must reproduce the above copyright
18  *   notice, this list of conditions and the following disclaimer in
19  *   the documentation and/or other materials provided with the
20  *   distribution.
21  * * Neither the name of olsr.org, olsrd nor the names of its
22  *   contributors may be used to endorse or promote products derived
23  *   from this software without specific prior written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
26  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
27  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
28  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
29  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
30  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
31  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
32  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
33  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
35  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36  * POSSIBILITY OF SUCH DAMAGE.
37  *
38  * Visit http://www.olsr.org for more information.
39  *
40  * If you find this software useful feel free to make a donation
41  * to the project. For more information see the website or contact
42  * the copyright holders.
43  *
44  */
45
46 #include "olsrd_poprouting.h"
47
48 #include <unistd.h>
49
50 #include "info/info_types.h"
51 #include "info/http_headers.h"
52 #include "olsr.h"
53 #include "scheduler.h"
54
55 float timer = 0.0f;
56 float hello_mult = 10.0f;
57 float tc_mult = 60.0f;
58
59 unsigned long long get_supported_commands_mask(void) {
60   return SIW_POPROUTING;
61 }
62
63 bool isCommand(const char *str, unsigned long long siw) {
64   bool r;
65   const char *prefix, s[2] = "=";
66   char *string, *cmd, *s_timer;
67   string = strdup(str);
68   switch (siw) {
69     case SIW_POPROUTING_HELLO:
70       prefix = "/helloTimer";
71       break;
72
73     case SIW_POPROUTING_TC:
74       prefix = "/tcTimer";
75       break;
76
77     case SIW_POPROUTING_HELLO_MULT:
78       prefix = "/helloTimerMult";
79       break;
80
81     case SIW_POPROUTING_TC_MULT:
82       prefix = "/tcTimerMult";
83       break;
84
85     default:
86       free(string);
87       return false;
88   }
89   cmd = strtok(string, s);
90   s_timer = strtok(NULL, s);
91   if (s_timer) {
92     timer = atof(s_timer);
93   } else {
94     timer = 0;
95   }
96
97   r = !strcmp(cmd, prefix) && (timer >= 0);
98
99   free(string);
100
101   return r;
102 }
103
104 void output_error(struct autobuf *abuf, unsigned int status, const char * req __attribute__((unused)), bool http_headers) {
105   if (http_headers || (status == INFO_HTTP_OK)) {
106     return;
107   }
108
109   /* !http_headers && !INFO_HTTP_OK */
110
111   if (status == INFO_HTTP_NOCONTENT) {
112     /* wget can't handle output of zero length */
113     abuf_puts(abuf, "\n");
114   } else {
115     abuf_appendf(abuf, "error: %s\n", httpStatusToReply(status));
116   }
117 }
118
119 void set_hello_timer(struct autobuf *abuf) {
120   struct olsr_if *in;
121   assert(abuf);
122   in = olsr_cnf->interfaces;
123   if (timer != 0.0f) {
124     char response[20];
125     sprintf(response, "hello:%.2f\n", (double) in->cnf->hello_params.emission_interval);
126     abuf_puts(abuf, response);
127     return;
128   }
129
130   while (in != NULL ) {
131     olsr_printf(1, "(POPROUTING) Setting Hello Timer=%f for interface %s\n", (double) timer, in->name);
132     //olsr_change_timer(in->interf->hello_gen_timer, timer * MSEC_PER_SEC, 0, 1);
133     in->interf->hello_gen_timer->timer_period = timer * MSEC_PER_SEC;
134     in->interf->hello_gen_timer->timer_jitter_pct = POPROUTING_JITTER; // Jitter to 5%
135     in->cnf->hello_params.emission_interval = timer;
136     in->cnf->hello_params.validity_time = timer * hello_mult;
137     in->interf->valtimes.hello = reltime_to_me(in->cnf->hello_params.validity_time * MSEC_PER_SEC);
138     in->interf->hello_etime = in->cnf->hello_params.emission_interval * MSEC_PER_SEC;
139     in = in->next;
140   }
141   abuf_puts(abuf, "0\n");
142   return;
143 }
144
145 void set_tc_timer(struct autobuf *abuf) {
146   struct olsr_if *in;
147   in = olsr_cnf->interfaces;
148   if (timer != 0.0f) {
149     char response[20];
150     sprintf(response, "tc:%.2f\n", (double) in->cnf->tc_params.emission_interval);
151     abuf_puts(abuf, response);
152     return;
153   }
154
155   while (in != NULL ) {
156     olsr_printf(1, "(POPROUTING) Setting Tc Timer=%f for interface %s\n", (double) timer, in->name);
157     //olsr_change_timer(in->interf->tc_gen_timer, timer * MSEC_PER_SEC, 0, 1);
158     in->interf->tc_gen_timer->timer_period = timer * MSEC_PER_SEC;
159     in->interf->tc_gen_timer->timer_jitter_pct = POPROUTING_JITTER; // Jitter to 5%
160     in->cnf->tc_params.emission_interval = timer;
161     in->cnf->tc_params.validity_time = timer * tc_mult;
162     in->interf->valtimes.tc = reltime_to_me(in->cnf->tc_params.validity_time * MSEC_PER_SEC);
163     in = in->next;
164   }
165   abuf_puts(abuf, "0\n");
166   return;
167 }
168
169 void set_tc_timer_mult(struct autobuf *abuf) {
170   float current_timer;
171   struct olsr_if *in;
172   assert(abuf);
173   in = olsr_cnf->interfaces;
174   if (timer != 0.0f) {
175     char response[20];
176     sprintf(response, "tc_mult:%.2f\n", (double) tc_mult);
177     abuf_puts(abuf, response);
178     return;
179   } else {
180     tc_mult = timer;
181   }
182
183   while (in != NULL ) {
184     olsr_printf(1, "(POPROUTING) Setting Tc Timer Mult=%f for interface %s\n", (double) tc_mult, in->name);
185     current_timer = in->cnf->tc_params.emission_interval;
186     in->cnf->tc_params.validity_time = current_timer * tc_mult;
187     in->interf->valtimes.tc = reltime_to_me(in->cnf->tc_params.validity_time * MSEC_PER_SEC);
188     in = in->next;
189   }
190   abuf_puts(abuf, "0\n");
191   return;
192 }
193
194 void set_hello_timer_mult(struct autobuf *abuf) {
195   float current_timer;
196   struct olsr_if *in;
197   assert(abuf);
198   in = olsr_cnf->interfaces;
199   if (timer != 0.0f) {
200     char response[20];
201     sprintf(response, "hello_mult:%.2f\n", (double) hello_mult);
202     abuf_puts(abuf, response);
203     return;
204   } else {
205     hello_mult = timer;
206   }
207
208   while (in != NULL ) {
209     olsr_printf(1, "(POPROUTING) Setting Hello Timer Mult=%f for interface %s\n", (double) hello_mult, in->name);
210     current_timer = in->cnf->hello_params.emission_interval;
211     in->cnf->hello_params.validity_time = current_timer * hello_mult;
212     in->interf->valtimes.hello = reltime_to_me(in->cnf->hello_params.validity_time * MSEC_PER_SEC);
213     in = in->next;
214   }
215   abuf_puts(abuf, "0\n");
216   return;
217 }