Updated license
[anna.git] / source / diameter.comm / ClientSession.cpp
1 // ANNA - Anna is Not Nothingness Anymore
2 //
3 // (c) Copyright 2005-2014 Eduardo Ramos Testillano & Francisco Ruiz Rayo
4 //
5 // https://bitbucket.org/testillano/anna
6 //
7 // Redistribution and use in source and binary forms, with or without
8 // modification, are permitted provided that the following conditions
9 // are met:
10 //
11 //     * Redistributions of source code must retain the above copyright
12 // notice, this list of conditions and the following disclaimer.
13 //     * Redistributions in binary form must reproduce the above
14 // copyright notice, this list of conditions and the following disclaimer
15 // in the documentation and/or other materials provided with the
16 // distribution.
17 //     * Neither the name of Google Inc. nor the names of its
18 // contributors may be used to endorse or promote products derived from
19 // this software without specific prior written permission.
20 //
21 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
24 // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
25 // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
26 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
27 // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
31 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 //
33 // Authors: eduardo.ramos.testillano@gmail.com
34 //          cisco.tierra@gmail.com
35
36
37 #include <anna/core/functions.hpp>
38 #include <anna/diameter/defines.hpp>
39 #include <anna/diameter/functions.hpp>
40 #include <anna/diameter/helpers/helpers.hpp>
41 #include <anna/diameter/codec/functions.hpp>
42 #include <anna/diameter/codec/Message.hpp>
43 #include <anna/diameter/helpers/base/functions.hpp>
44 #include <anna/time/functions.hpp>
45
46 #include <anna/diameter.comm/ClientSession.hpp>
47 #include <anna/diameter.comm/Engine.hpp>
48 #include <anna/diameter.comm/Entity.hpp>
49 #include <anna/diameter.comm/Server.hpp>
50 #include <anna/diameter.comm/Response.hpp>
51 #include <anna/diameter.comm/Message.hpp>
52 #include <anna/diameter.comm/OamModule.hpp>
53 #include <anna/diameter.comm/TimerManager.hpp>
54 #include <anna/diameter.comm/Timer.hpp>
55 #include <anna/diameter.comm/ClientSessionReceiver.hpp>
56 #include <anna/diameter.comm/ReceiverFactoryImpl.hpp>
57
58 #include <anna/comm/ClientSocket.hpp>
59 #include <anna/app/functions.hpp>
60 #include <anna/core/functions.hpp>
61 #include <anna/core/DataBlock.hpp>
62 #include <anna/core/tracing/Logger.hpp>
63 #include <anna/core/tracing/TraceMethod.hpp>
64 #include <anna/xml/Node.hpp>
65 #include <anna/timex/Engine.hpp>
66
67 // Standard
68 #include <stdlib.h> // rand()
69 #include <time.h>
70
71
72
73 using namespace std;
74 using namespace anna::diameter;
75 using namespace anna::diameter::comm;
76
77 //static
78 const anna::Millisecond ClientSession::DefaultWatchdogPeriod(30000); // Watchdog messages timeout
79
80
81 ClientSession::ClientSession() : Session("diameter::comm::ClientSession", "Diameter Keep-Alive Timer"),
82   a_receiverFactory(this),
83   a_cer(ClassCode::Bind),
84   a_dwr(ClassCode::ApplicationMessage) // realmente no es necesario, los Message son por defecto de aplicacion
85 { initialize(); }
86
87
88 void ClientSession::initialize() throw() {
89   Session::initialize();
90   a_autoRecovery = true;
91   a_parent = NULL;
92   a_server = NULL;
93   a_watchdogState = WatchdogState::TimerStopped;
94   a_hidden = false;
95 }
96
97 //ClientSession::~ClientSession() {;}
98
99
100 const std::string& ClientSession::getAddress() const throw() {
101   return a_parent->getAddress();
102 }
103
104 int ClientSession::getPort() const throw() {
105   return a_parent->getPort();
106 }
107
108
109 void ClientSession::setState(State::_v state) throw() {
110   Session::setState(state);
111   // Inform father server (availability changes):
112   bool changes = a_parent->refreshAvailability();
113 }
114
115 void ClientSession::bind() throw(anna::RuntimeException) {
116   LOGMETHOD(anna::TraceMethod traceMethod(a_className, "bind", ANNA_FILE_LOCATION));
117
118   if(a_state != State::Closed)
119     return;
120
121   LOGDEBUG(
122     string msg("diameter::comm::ClientSession::bind | ");
123     msg += asString();
124     anna::Logger::debug(msg, ANNA_FILE_LOCATION);
125   );
126
127   // Connection:
128   if(!a_server)
129     throw anna::RuntimeException("Server is not yet created", ANNA_FILE_LOCATION);
130
131   bool serverAvailable = a_server->isAvailable();
132   LOGDEBUG(
133
134     if(serverAvailable) anna::Logger::debug("Server AVAILABLE", ANNA_FILE_LOCATION);
135     else anna::Logger::debug("Server NOT AVAILABLE. Connecting ...", ANNA_FILE_LOCATION);
136     );
137
138   if(!serverAvailable) {
139     a_server->connect();
140     return;
141   }
142
143   // Some operations could be done before sending CER, for example non-standard Origin-Host manipulation for
144   // Tekelec PCRF
145   a_engine->bindingClientSession(this);
146
147   // OAM Lo comento, porque no se contabilizan los reintentos y por lo tanto no son muy Ăștiles.
148 //  OamModule &oamModule = OamModule::instantiate();
149 //  oamModule.count(a_server->isAvailable() ? OamModule::Counter::TCPConnectOK:OamModule::Counter::TCPConnectNOK);
150   // Application bind
151   if(send(&a_cer))
152     LOGDEBUG(anna::Logger::debug("CER sent to the server", ANNA_FILE_LOCATION));
153 }
154
155
156 void ClientSession::setCERandDWR(const anna::DataBlock & cer, const anna::DataBlock & dwr) throw(anna::RuntimeException) {
157   if(codec::functions::getCommandId(cer) != helpers::base::COMMANDID__Capabilities_Exchange_Request) {
158     throw anna::RuntimeException("The message provided as 'CER' is not a Capabilities-Exchange-Request", ANNA_FILE_LOCATION);
159   }
160
161   if(codec::functions::getCommandId(dwr) != helpers::base::COMMANDID__Device_Watchdog_Request) {
162     throw anna::RuntimeException("The message provided as 'DWR' is not a Device-Watchdog-Request", ANNA_FILE_LOCATION);
163   }
164
165   // La verificacion ya se hace implicitamente antes
166   //   if ((a_cer.isEmpty()) || (a_dwr.isEmpty())) {
167   //      LOGDEBUG (anna::Logger::debug ("Must define valid CER and DWR messages before use bind !", ANNA_FILE_LOCATION));
168   //      return;
169   //   }
170   a_cer.setBody(cer);
171   a_dwr.setBody(dwr);
172 }
173
174
175 const Response* ClientSession::send(const Message* message) throw(anna::RuntimeException) {
176   LOGMETHOD(anna::TraceMethod traceMethod(a_className, "send", ANNA_FILE_LOCATION));
177
178   if(!message)
179     throw anna::RuntimeException("Cannot send a NULL message", ANNA_FILE_LOCATION);
180
181   // Command id:
182   bool isRequest;
183   diameter::CommandId cid = message->getCommandId(isRequest);
184   LOGDEBUG(
185     std::string msg = "Sending diameter message: ";
186     msg += anna::diameter::functions::commandIdAsPairString(cid);
187     anna::Logger::debug(msg, ANNA_FILE_LOCATION);
188   );
189
190   if(hidden()) {
191     if((cid.first != helpers::base::COMMANDID__Capabilities_Exchange_Request.first)  /* not CER/CEA */
192         && (cid.first != helpers::base::COMMANDID__Device_Watchdog_Request.first) /* not DWR/DWA */
193         && (cid.first != helpers::base::COMMANDID__Disconnect_Peer_Request.first)) { /* not DPR/DPA */
194       LOGDEBUG(
195         std::string msg(asString());
196         msg += " | Client-session hidden for application messages delivery";
197         anna::Logger::debug(msg, ANNA_FILE_LOCATION);
198       );
199       return NULL;
200     }
201   }
202
203   // Checkings:
204   if((a_state == State::Closed) && (cid != helpers::base::COMMANDID__Capabilities_Exchange_Request)) {
205     string msg(asString());
206     msg += " | ClientSession::bind is not initiated";
207     throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
208   }
209
210   if(a_state == State::WaitingBind) {
211     string msg(asString());
212     msg += " | Still waiting for bind ack (CEA)";
213     throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
214   }
215
216   if(a_state == State::Failover) {
217     string msg(asString());
218     msg += " | Disabled sent on failover state";
219     throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
220   }
221
222   if(a_state == State::Closing) {
223     string msg(asString());
224     msg += " | Disabled sent on closing state";
225     throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
226   }
227
228   // Check states:
229   if(cid == helpers::base::COMMANDID__Capabilities_Exchange_Request) {
230     if(a_state != State::Closed) {
231       string msg(asString());
232       msg += " | Discarding CER on not closed state";
233       throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
234     }
235   } else if(cid ==  helpers::base::COMMANDID__Device_Watchdog_Request) {
236     if(a_state == State::WaitingDPA) {
237       string msg(asString());
238       msg += " | DWR is not sent on 'WaitingDPA' state";
239       //throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
240       LOGDEBUG(anna::Logger::debug(msg, ANNA_FILE_LOCATION));
241       return NULL;
242     }
243
244     if(a_state == State::Disconnecting) {
245       string msg(asString());
246       msg += " | DWR is not sent on 'Disconnecting' state";
247       //throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
248       LOGDEBUG(anna::Logger::debug(msg, ANNA_FILE_LOCATION));
249       return NULL;
250     }
251
252     if(a_state == State::Closing) {
253       string msg(asString());
254       msg += " | DWR is not sent on 'Closing' state";
255       //throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
256       LOGDEBUG(anna::Logger::debug(msg, ANNA_FILE_LOCATION));
257       return NULL;
258     }
259   } else if(cid ==  helpers::base::COMMANDID__Disconnect_Peer_Request) {
260     if(a_state == State::WaitingDPA) {
261       string msg(asString());
262       msg += " | Still waiting for DPR ack (DPA)";
263       throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
264     }
265
266     if(a_state == State::Disconnecting) {
267       string msg(asString());
268       msg += " | Client disconnection has already been initiated";
269       throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
270     }
271   } else {
272     if((a_state == State::WaitingDPA) || (a_state == State::Disconnecting)) {
273       if(cid != helpers::base::COMMANDID__Disconnect_Peer_Answer) {
274         LOGDEBUG(
275           string msg("diameter::comm::ClientSession::send | ");
276           msg += asString();
277           msg += " | Sents (request or answer) blocked to diameter server (disconnection in progress). Discarding ...";
278           anna::Logger::debug(msg, ANNA_FILE_LOCATION);
279         );
280         return NULL;
281       }
282     }
283   }
284
285   // Trace send operation:
286   LOGDEBUG(
287     string msg("diameter::comm::ClientSession::send | ");
288     msg += asString();
289     msg += " | ";
290     msg += message->asString();
291     anna::Logger::debug(msg, ANNA_FILE_LOCATION);
292   );
293   bool fixed = false; // answers cannot be fixed
294   Message * message_nc = const_cast<Message*>(message);
295
296   if(isRequest) {
297     if(/* entity */getParent()->getParent()->isDeprecated()) {
298       string msg(asString());
299       msg += " | Parent entity is deprecated. Request send blocked.";
300       throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
301     }
302
303     // Fixing indicator:
304     fixed = message_nc->fixRequestSequence(a_nextHopByHop, a_nextEndToEnd, a_engine->getFreezeEndToEndOnSending());
305     message_nc->updateRequestTimestampMs(); // statistics purposes (processing time for request type)
306   }
307
308   // Send message
309   try {
310     message->send(*this);
311
312     // Next hop by hop & end to end identifiers:
313     if(isRequest) generateNextSequences();
314
315     //   Transaction state
316     //         The Diameter protocol requires that agents maintain transaction
317     //         state, which is used for failover purposes.  Transaction state
318     //         implies that upon forwarding a request, the Hop-by-Hop identifier
319     //         is saved; the field is replaced with a locally unique identifier,
320     //         which is restored to its original value when the corresponding
321     //         answer is received.  The request's state is released upon receipt
322     //         of the answer.  A stateless agent is one that only maintains
323     //         transaction state.
324     //
325     updateOutgoingActivityTime();
326     // OAM
327     countSendings(cid, true /* send ok */);
328     // Trace non-application messages:
329     LOGDEBUG(
330
331       if((cid == helpers::base::COMMANDID__Capabilities_Exchange_Request) ||
332          (cid == helpers::base::COMMANDID__Device_Watchdog_Request) ||
333     (cid == helpers::base::COMMANDID__Disconnect_Peer_Request)) {
334     anna::Logger::debug("Sent DataBlock to XML representation:", ANNA_FILE_LOCATION);
335       try { anna::diameter::codec::Message msg; msg.decode(message->getBody()); /* decode to be traced */ } catch(anna::RuntimeException&) {;}
336     }
337     );
338
339     // Restore sequences:
340     if(fixed) message_nc->restoreSequencesAfterFix();  // restore to application sequences after fix
341   } catch(anna::RuntimeException&) {
342     if(fixed) message_nc->restoreSequencesAfterFix();  // restore to application sequences after fix
343
344     // OAM
345     countSendings(cid, false /* send no ok */);
346     throw;
347   }
348
349   // Renew states:
350   if(cid ==  helpers::base::COMMANDID__Capabilities_Exchange_Request) {
351     setState(State::WaitingBind);
352   } else if(cid ==  helpers::base::COMMANDID__Disconnect_Peer_Request) {
353     LOGWARNING(anna::Logger::warning("DPR has been sent to the peer (diameter server)", ANNA_FILE_LOCATION));
354     setState(State::WaitingDPA);
355   }
356
357 //   else {
358 //      // No changes
359 //   }
360
361   // Answers are not temporized:
362   if(!isRequest) return NULL;
363
364   // Neither DWR:
365   if(cid == helpers::base::COMMANDID__Device_Watchdog_Request) {
366     setWatchdogState(WatchdogState::WaitingDWA);
367     return NULL;
368   }
369
370   // Request will have context responses:
371   Response* result(NULL);
372   result = Response::instance(message->getClassCode(), a_nextHopByHop - 1 /* current request sent to server */);
373   result->setRequest(message);
374   response_add(result);
375   return result;
376 }
377
378 bool ClientSession::unbind(bool forceDisconnect)
379 throw(anna::RuntimeException) {
380   LOGMETHOD(anna::TraceMethod traceMethod(a_className, "unbind", ANNA_FILE_LOCATION));
381
382   if(a_state == State::Closed)
383     return false;
384
385   // Client socket:
386   anna::comm::ClientSocket * cs = const_cast<anna::comm::ClientSocket*>(a_server->getClientSocket());
387 //   LOGDEBUG(
388 //      string msg("Server to be unbound | ");
389 //      msg += a_server->asString();
390 //      anna::Logger::debug(msg, ANNA_FILE_LOCATION);
391 //   );
392
393   if(forceDisconnect) {
394     LOGDEBUG(anna::Logger::debug("Immediate disconnection (forceDisconnect)", ANNA_FILE_LOCATION));
395
396     if(cs) cs->requestClose();  // this will invoke finalize()
397
398     return true;
399   }
400
401   if(a_state == State::Disconnecting) {
402     LOGDEBUG(
403       string msg("diameter::comm::ClientSession::unbind | ");
404       msg += asString();
405       msg += " | Disconnection already in progress !";
406       anna::Logger::debug(msg, ANNA_FILE_LOCATION);
407     );
408     return false;
409   }
410
411   if(a_state == State::Failover) {
412     LOGDEBUG(
413       string msg("diameter::comm::ClientSession::unbind | ");
414       msg += asString();
415       msg += " | Unbind on failover state. Disconnect now.";
416       anna::Logger::debug(msg, ANNA_FILE_LOCATION);
417     );
418
419     if(cs) cs->requestClose();  // this will invoke finalize()
420
421     return true;
422   }
423
424   if(a_state == State::WaitingBind) {
425     LOGDEBUG(
426       string msg("diameter::comm::ClientSession::unbind | ");
427       msg += asString();
428       msg += " | Unbind on WaitingBind state. Disconnect now.";
429       anna::Logger::debug(msg, ANNA_FILE_LOCATION);
430     );
431
432     if(cs) cs->requestClose();  // this will invoke finalize()
433
434     return true;
435   }
436
437   if(a_onDisconnect == OnDisconnect::IgnorePendings) {
438     LOGDEBUG(anna::Logger::debug("Immediate disconnection (IgnorePendings)", ANNA_FILE_LOCATION));
439
440     if(cs) cs->requestClose();  // this will invoke finalize()
441
442     return true;
443   }
444
445   if(getOTARequests() == 0) {  // No pendings
446     LOGDEBUG(anna::Logger::debug("No pending answers. Perform client-session close.", ANNA_FILE_LOCATION));
447
448     if(cs) cs->requestClose();  // this will invoke finalize()
449
450     return true;
451   }
452
453   if(a_state == State::Closing) {
454     LOGDEBUG(
455       string msg("diameter::comm::ClientSession::unbind | ");
456       msg += asString();
457       msg += " | Closing already in progress (waiting pendings) !";
458       anna::Logger::debug(msg, ANNA_FILE_LOCATION);
459     );
460   }
461
462   return false;
463 }
464
465 void ClientSession::eventPeerShutdown() throw() {
466   // Inform father server:
467   a_parent->eventPeerShutdown(this);
468 }
469
470 void ClientSession::eventResponse(const Response& response) throw(anna::RuntimeException) {
471   // Inform father server:
472   a_parent->eventResponse(response);
473 }
474
475 void ClientSession::eventRequest(const anna::DataBlock &request) throw(anna::RuntimeException) {
476   // Inform father server:
477   a_parent->eventRequest(this, request);
478 }
479
480 void ClientSession::eventUnknownResponse(const anna::DataBlock& response) throw(anna::RuntimeException) {
481   // Inform father server:
482   a_parent->eventUnknownResponse(this, response);
483 }
484
485
486
487 //------------------------------------------------------------------------------------------
488 // Se invoca desde el diameter::comm::Receiver
489 //------------------------------------------------------------------------------------------
490 void ClientSession::receive(const anna::comm::Message& message)
491 throw(anna::RuntimeException) {
492   LOGMETHOD(anna::TraceMethod traceMethod(a_className, "receive", ANNA_FILE_LOCATION));
493   // Activity:
494   updateIncomingActivityTime();
495   activateTimer();
496   // Command id:
497   const anna::DataBlock & db = message.getBody();
498   diameter::CommandId cid = codec::functions::getCommandId(db);
499   bool isRequest = cid.second;
500   LOGDEBUG(
501     std::string msg = "Received diameter message: ";
502     msg += anna::diameter::functions::commandIdAsPairString(cid);
503     anna::Logger::debug(msg, ANNA_FILE_LOCATION);
504
505     if((cid == helpers::base::COMMANDID__Capabilities_Exchange_Answer) || (cid.first == helpers::base::COMMANDID__Device_Watchdog_Request.first))
506   try { anna::diameter::codec::Message dmsg; dmsg.decode(db); /* decode to be traced */ } catch(anna::RuntimeException&) {;}
507 );
508   // Main counters:
509   OamModule &oamModule = OamModule::instantiate();
510   oamModule.count(isRequest ? OamModule::Counter::RequestReceived : OamModule::Counter::AnswerReceived);
511   oamModule.count(isRequest ? OamModule::Counter::RequestReceivedOnClientSession : OamModule::Counter::AnswerReceivedOnClientSession);
512   // Statistic (size)
513   a_parent->updateReceivedMessageSizeStatisticConcept(message.getSize()); // only on reception (application could manage sent sizes)
514
515   if(isRequest) {
516     /////////////////////////////
517     // Here received a request //
518     /////////////////////////////
519
520     // Received CER
521     if(cid == helpers::base::COMMANDID__Capabilities_Exchange_Request) {
522       LOGWARNING(anna::Logger::warning("Received CER: unexpected message at client-side", ANNA_FILE_LOCATION));
523       return;
524     }
525     // Received DWR
526     else if(cid == helpers::base::COMMANDID__Device_Watchdog_Request) {
527 //         LOGWARNING(anna::Logger::warning("Received DWR: unexpected message at client-side", ANNA_FILE_LOCATION));
528 //         return;
529       // Non-usual but could happen:
530       oamModule.count(OamModule::Counter::DWRReceived);
531       sendDWAToServer(db /* DWR datablock received from server */);
532       return;
533     }
534     // Received DPR
535     else if(cid == helpers::base::COMMANDID__Disconnect_Peer_Request) {
536       oamModule.count(OamModule::Counter::DPRReceived);
537
538       if(a_state == State::Bound) {
539         a_dpr.setBody(db);
540         setState(State::Disconnecting);
541         LOGWARNING(anna::Logger::warning("DPR has been received from peer (diameter server)", ANNA_FILE_LOCATION));
542
543         if(getOTARequests() == 0) sendDPA();
544
545         return; // DPR won't be informed because virtual readDPA is available for this
546       }
547     }
548
549     try {
550       eventRequest(db);
551     } catch(anna::RuntimeException& ex) {
552       ex.trace();
553     }
554
555     return;
556   }
557
558   /////////////////////////////
559   // Here received an answer //
560   /////////////////////////////
561   bool doUnbind = false;
562   bool immediateUnbind = false;
563   int resultCode = 0;
564
565   try {
566     resultCode = helpers::base::functions::getResultCode(db);
567   } catch(anna::RuntimeException& ex) {
568     ex.trace();
569   }
570
571   // Received CEA
572   if(cid == helpers::base::COMMANDID__Capabilities_Exchange_Answer) {
573     oamModule.count(OamModule::Counter::CEAReceived);
574
575     if(a_state != State::WaitingBind) {
576       LOGWARNING(anna::Logger::warning("Received CEA: unexpected message at not-WaitingBind state", ANNA_FILE_LOCATION));
577       return; // we don't send its request
578 //         string msg("diameter::comm::ClientSession::receive | ");
579 //         msg += asString();
580 //         msg += " | Received CEA on not-WaitingBind state: unexpected Bind-response";
581 //         throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
582     }
583
584     if(resultCode != helpers::base::AVPVALUES__Result_Code::DIAMETER_SUCCESS) {
585       LOGWARNING(
586         std::string msg = anna::functions::asString("Received CEA with non-success Result-Code (%d). Unbinding connection.", resultCode);
587         anna::Logger::warning(msg, ANNA_FILE_LOCATION);
588       );
589       doUnbind = true;
590     } else {
591       setState(State::Bound);
592       //activateTimer(); // Ya se invoca al inicio de este metodo ::receive
593       // Inform father server (availability changes):
594       bool changes = a_parent->refreshAvailability();
595       //startClock();
596     }
597   }
598   // Received DWA
599   else if(cid == helpers::base::COMMANDID__Device_Watchdog_Answer) {
600     oamModule.count(OamModule::Counter::DWAReceived);
601     setWatchdogState(WatchdogState::WaitingTimerExpiration);
602
603     if(resultCode != helpers::base::AVPVALUES__Result_Code::DIAMETER_SUCCESS)
604       LOGWARNING(
605         std::string msg = anna::functions::asString("Received DWA with non-success Result-Code (%d)... but ASSUME keep-alive is reached", resultCode);
606         anna::Logger::warning(msg, ANNA_FILE_LOCATION);
607       );
608
609     if(a_state == State::Failover) {
610       setState(State::Bound);
611       LOGDEBUG(
612         string msg("diameter::comm::ClientSession::receive | ");
613         msg += asString();
614         msg += " | Received DWA on failover state: recovering Bound state";
615         anna::Logger::debug(msg, ANNA_FILE_LOCATION);
616       );
617     }
618
619     // Keep-Alive don't manage context
620     return;
621   }
622   // Received DPA
623   else if(cid == helpers::base::COMMANDID__Disconnect_Peer_Answer) {
624     oamModule.count(OamModule::Counter::DPAReceived);
625
626     if(a_state == State::WaitingDPA) {
627       if(resultCode != helpers::base::AVPVALUES__Result_Code::DIAMETER_SUCCESS) {
628         LOGWARNING(
629           std::string msg = anna::functions::asString("Received DPA with non-success Result-Code (%d). Ignoring and recovering Bound state", resultCode);
630           anna::Logger::warning(msg, ANNA_FILE_LOCATION);
631         );
632         setState(State::Bound);
633       } else {
634         LOGWARNING(anna::Logger::warning("Received DPA With Result-Code = DIAMETER_SUCCESS. Disconnect now.", ANNA_FILE_LOCATION));
635         immediateUnbind = true;
636         doUnbind = true;
637       }
638     }
639   }
640
641   HopByHop hopByHop = codec::functions::getHopByHop(db); // context identification
642   Response* response = response_find(hopByHop);
643
644   // Out-of-context responses:
645   if(!response) {
646     // OAM
647     oamModule.count(OamModule::Counter::AnswerReceivedUnknown);
648     oamModule.count(OamModule::Counter::AnswerReceivedOnClientSessionUnknown);
649     oamModule.activateAlarm(OamModule::Alarm::AnswerReceivedOnClientSessionUnknown);
650     eventUnknownResponse(db);
651     string msg(asString());
652     msg += anna::functions::asString(" | Response received from entity, for non registered context (HopByHop: %u)", hopByHop);
653     throw anna::RuntimeException(msg, ANNA_FILE_LOCATION);
654   }
655
656   response->setResultCode(Response::ResultCode::Success);
657   response->cancelTimer();
658   LOGDEBUG(
659     string msg("diameter::comm::ClientSession::receive | ");
660     msg += asString();
661     msg += " | Received answer";
662     msg += response->asString();
663     anna::Logger::debug(msg, ANNA_FILE_LOCATION);
664   );
665   // Statistics
666   anna::Millisecond current = (anna::Millisecond)anna::functions::millisecond();
667   anna::Millisecond request = response->getRequest()->getRequestTimestampMs();
668   anna::Millisecond timeToAnswerMs = current - request;
669   a_parent->updateProcessingTimeStatisticConcept(timeToAnswerMs);
670   LOGDEBUG
671   (
672     std::string msg = "This diameter request context lasted ";
673     msg += anna::functions::asString(timeToAnswerMs);
674     msg += " milliseconds at diameter server (included network time)";
675     anna::Logger::debug(msg, ANNA_FILE_LOCATION);
676   );
677   // Progress origin for tracking purposes on asyncronous boxes with both diameter interfaces (entities and clients)
678   Message * requestMessage = const_cast<Message*>(response->getRequest());
679   requestMessage->setRequestServerSessionKey(response->getRequest()->getRequestServerSessionKey()); // -1 means unkown/unset
680
681   if(cid != helpers::base::COMMANDID__Disconnect_Peer_Answer) {
682     // don't progress DPA: unbind is automatically performed and not open to any application decision
683     try {
684       response->setMessage(&db);
685       // Restore received datablock
686       LOGDEBUG(
687         string msg("diameter::comm::ClientSession::receive | Restore answer to original request sequences (hop-by-hop = ");
688         msg += anna::functions::asString(response->getRequest()->getRequestHopByHop());
689         msg += ", end-to-end = ";
690         msg += anna::functions::asString(response->getRequest()->getRequestEndToEnd());
691         msg += ")";
692         anna::Logger::debug(msg, ANNA_FILE_LOCATION);
693       );
694       diameter::codec::functions::setHopByHop((anna::DataBlock&)db, response->getRequest()->getRequestHopByHop());
695       diameter::codec::functions::setEndToEnd((anna::DataBlock&)db, response->getRequest()->getRequestEndToEnd());
696       eventResponse(*response);
697     } catch(anna::RuntimeException& ex) {
698       ex.trace();
699     }
700   }
701
702   response_erase(response);
703
704   // Unbind trigger
705   if(doUnbind)
706     unbind(immediateUnbind);
707 }
708
709 void ClientSession::finalize() throw() {
710   LOGMETHOD(anna::TraceMethod traceMethod(a_className, "finalize", ANNA_FILE_LOCATION));
711   Session::finalize();
712   // Check deprecated entity:
713   const Entity *entity = getParent() /* server */ ->getParent() /* entity */;
714   // Inform father server (availability changes):
715   bool changes = a_parent->refreshAvailability();
716   // OAM
717   const Server *server = getParent();
718   bool multipleConnections = (server->getMaxClientSessions() > 1);
719   std::string socket = anna::functions::socketLiteralAsString(getAddress(), getPort());
720   OamModule &oamModule = OamModule::instantiate();
721
722   if(multipleConnections) {
723     oamModule.activateAlarm(OamModule::Alarm::c_LostAvailabilityOverClientSessionWithServer__s__ClientSessionId__d__, socket.c_str(), getSocketId());
724     oamModule.count(OamModule::Counter::LostAvailabilityOverClientSession);
725   } else {
726     oamModule.activateAlarm(OamModule::Alarm::c_LostAvailabilityOverClientSessionWithServer__s__, socket.c_str());
727     oamModule.count(OamModule::Counter::LostAvailabilityOverClientSession);
728   }
729 }
730
731 void ClientSession::recover() throw() {
732   LOGMETHOD(anna::TraceMethod traceMethod(a_className, "recover", ANNA_FILE_LOCATION));
733
734   try {
735     bind();
736   } catch(anna::RuntimeException &ex) {
737     // Again:
738     anna::comm::ClientSocket * cs = const_cast<anna::comm::ClientSocket*>(a_server->getClientSocket());
739
740     if(cs) cs->requestClose();
741
742     ex.trace();
743   }
744
745   // Inform father server (availability changes):
746   bool changes = a_parent->refreshAvailability();
747   // OAM
748   const Server *server = getParent();
749   bool multipleConnections = (server->getMaxClientSessions() > 1);
750   std::string socket = anna::functions::socketLiteralAsString(getAddress(), getPort());
751   OamModule &oamModule = OamModule::instantiate();
752
753   if(multipleConnections) {
754     oamModule.cancelAlarm(OamModule::Alarm::c_LostAvailabilityOverClientSessionWithServer__s__ClientSessionId__d__, socket.c_str(), getSocketId());
755     oamModule.count(OamModule::Counter::RecoveredAvailabilityOverClientSession);
756   } else {
757     oamModule.cancelAlarm(OamModule::Alarm::c_LostAvailabilityOverClientSessionWithServer__s__, socket.c_str());
758     oamModule.count(OamModule::Counter::RecoveredAvailabilityOverClientSession);
759   }
760 }
761
762 void ClientSession::sendDWAToServer(const anna::DataBlock& dwrDB)
763 throw(anna::RuntimeException) {
764   LOGMETHOD(anna::TraceMethod traceMethod(a_className, "sendDWAToServer", ANNA_FILE_LOCATION));
765   anna::DataBlock dwa(true);
766   a_engine->readDWA(dwa, dwrDB); // Asume that DWA is valid ...
767
768   if(dwa.isEmpty())
769     throw anna::RuntimeException("This diameter agent defines an empty DWA message. Remote server never will validate this connection health", ANNA_FILE_LOCATION);
770
771   Message msgDwa;
772   msgDwa.setBody(dwa);
773   send(&msgDwa);
774 }
775
776 //-------------------------------------------------------------------------
777 // Se invoca desde diameter::comm::Timer
778 //-------------------------------------------------------------------------
779 void ClientSession::expireResponse(diameter::comm::Response* response)
780 throw() {
781   LOGMETHOD(anna::TraceMethod traceMethod(a_className, "expireResponse", ANNA_FILE_LOCATION));
782   Session::expireResponse(response);
783   // OAM
784   OamModule &oamModule = OamModule::instantiate();
785   oamModule.count(OamModule::Counter::RequestSentExpired);
786   oamModule.count(OamModule::Counter::RequestSentOnClientSessionExpired);
787   oamModule.activateAlarm(OamModule::Alarm::RequestSentOnClientSessionExpired);
788
789   // Check father server idleness:
790   if(idle()) a_parent->childIdle();
791
792 //   if (idle()) {
793 //      LOGDEBUG(anna::Logger::debug("ClientSession is idle after an expiration...", ANNA_FILE_LOCATION));
794 //      a_parent->childIdle();
795 //   }
796 //   else {
797 //      LOGDEBUG(anna::Logger::debug("ClientSession is busy after an expiration...", ANNA_FILE_LOCATION));
798 //   }
799 }
800
801
802 std::string ClientSession::asString() const
803 throw() {
804   string result = Session::asString();
805   result += " | Parent Server: ";
806   result += anna::functions::socketLiteralAsString(getAddress(), getPort());
807   result += " | Auto-recovery: ";
808   result += (a_autoRecovery ? "yes" : "no");
809   result += " | WatchdogState: ";
810   result += asText(a_watchdogState);
811   // Diferente del timeout de ApplicationMessage:
812   result += " | Watchdog Period: ";
813   result += getTimeout().asString();
814   result += " | Hidden: ";
815   result += (hidden() ? "yes" : "no");
816
817   if(a_server) {
818     result += " | MaxConnectionDelay: ";
819     result += a_server->getMaxConnectionDelay().asString();
820   }
821
822   return result += " }";
823 }
824
825 anna::xml::Node* ClientSession::asXML(anna::xml::Node* parent) const
826 throw() {
827   anna::xml::Node* result = Session::asXML(parent);
828   parent->createChild("diameter.comm.ClientSession");
829   result->createAttribute("ParentServer", anna::functions::socketLiteralAsString(getAddress(), getPort()));
830   result->createAttribute("AutoRecovery", (a_autoRecovery ? "yes" : "no"));
831   result->createAttribute("WatchdogState", asText(a_watchdogState));
832   // Diferente del timeout de ApplicationMessage:
833   result->createAttribute("WatchdogPeriod", getTimeout().asString());
834
835   if(a_server) result->createAttribute("MaxConnectionDelay", a_server->getMaxConnectionDelay().asString());
836
837   result->createAttribute("Hidden", hidden() ? "yes" : "no");
838   return result;
839 }
840
841
842 const char* ClientSession::asText(const WatchdogState::_v watchdogState)
843 throw() {
844   static const char* text [] = { "TimerStopped", "WaitingTimerExpiration", "WaitingDWA" };
845   return text [watchdogState];
846 }
847
848
849 //------------------------------------------------------------------------------
850 //------------------------------------------------------ ClientSession::expire()
851 //------------------------------------------------------------------------------
852 void ClientSession::expire(anna::timex::Engine *timeController) throw(anna::RuntimeException) {
853   LOGMETHOD(anna::TraceMethod traceMethod(a_className, "expire (watchdog timer)", ANNA_FILE_LOCATION));
854
855   //   The client MUST NOT close the primary connection until the
856   //    primary's watchdog timer has expired at least twice without a
857   //    response (note that the watchdog is not sent a second time,
858   //    however).
859   if(a_watchdogState == WatchdogState::WaitingDWA) {
860     if(a_state == State::Failover) {
861       LOGWARNING(anna::Logger::warning("Unbinding client-session: Tw expired after first DWA missing (2*Tw elapsed)", ANNA_FILE_LOCATION));
862       unbind();
863       return; // finalize will stop the stopped timer ...
864     }
865
866     setState(State::Failover);
867     LOGWARNING(anna::Logger::warning("Going to Failover state: first DWA missing", ANNA_FILE_LOCATION));
868     activateTimer(); // another chance on failover
869     return;
870   }
871
872   // WaitingTimerExpiration arrives here:
873   const Response* sent;
874
875   try {
876     sent = send(&a_dwr);
877   } catch(anna::RuntimeException&) {
878     LOGDEBUG(anna::Logger::debug("Failed to send DWR to the server: unbinding ...", ANNA_FILE_LOCATION));
879     setState(State::Failover);
880     unbind();
881     throw;
882   }
883
884   LOGDEBUG(if(sent) anna::Logger::debug("DWR sent to the server", ANNA_FILE_LOCATION););
885
886   activateTimer();
887 }
888
889 void ClientSession::setWatchdogPeriod(const anna::Millisecond & watchdogPeriod) throw() {
890   setTimeout(watchdogPeriod);
891 }
892
893 void ClientSession::setWatchdogState(WatchdogState::_v wState) throw() {
894   LOGDEBUG(
895
896   if(wState != a_watchdogState) {
897   std::string msg("Session watchdog state change: ");
898     msg += asText(a_watchdogState);
899     msg += " -> ";
900     msg += asText(wState);
901     anna::Logger::debug(msg, ANNA_FILE_LOCATION);
902   }
903   );
904   a_watchdogState = wState;
905 }
906
907
908 void ClientSession::timerStopped() throw() {
909   LOGDEBUG(anna::Logger::debug("Watchdog timer stopped", ANNA_FILE_LOCATION));
910   setWatchdogState(WatchdogState::TimerStopped);
911 }
912
913 void ClientSession::timerStarted() throw() {
914   LOGDEBUG(anna::Logger::debug("Watchdog timer started", ANNA_FILE_LOCATION));
915
916   if(a_watchdogState == WatchdogState::WaitingDWA) return;
917
918   setWatchdogState(WatchdogState::WaitingTimerExpiration);
919 }
920
921
922 //------------------------------------------------------------------------------
923 //---------------------------------- ClientSession::updateIncomingActivityTime()
924 //------------------------------------------------------------------------------
925 void ClientSession::updateIncomingActivityTime() throw() {
926   Session::updateIncomingActivityTime();
927   a_parent->updateIncomingActivityTime();
928 }
929
930
931 //------------------------------------------------------------------------------
932 //---------------------------------- ClientSession::updateOutgoingActivityTime()
933 //------------------------------------------------------------------------------
934 void ClientSession::updateOutgoingActivityTime(void) throw() {
935   Session::updateOutgoingActivityTime();
936   a_parent->updateOutgoingActivityTime();
937 }
938
939
940
941 //------------------------------------------------------------------------------
942 //----------------------------------------------- ClientSession::countSendings()
943 //------------------------------------------------------------------------------
944 void ClientSession::countSendings(const diameter::CommandId & cid, bool ok)throw() {
945   OamModule &oamModule = OamModule::instantiate();
946   bool isRequest = cid.second;
947
948   if(ok) {
949     // Main counters:
950     oamModule.count(isRequest ? OamModule::Counter::RequestSentOK : OamModule::Counter::AnswerSentOK);
951     oamModule.count(isRequest ? OamModule::Counter::RequestSentOnClientSessionOK : OamModule::Counter::AnswerSentOnClientSessionOK);
952
953     if(cid == helpers::base::COMMANDID__Capabilities_Exchange_Request) oamModule.count(OamModule::Counter::CERSentOK);
954     else if(cid == helpers::base::COMMANDID__Device_Watchdog_Request) oamModule.count(OamModule::Counter::DWRSentOK);
955     else if(cid == helpers::base::COMMANDID__Device_Watchdog_Answer) oamModule.count(OamModule::Counter::DWASentOK);  // not usual (dwr was received from server)
956     else if(cid == helpers::base::COMMANDID__Disconnect_Peer_Request) oamModule.count(OamModule::Counter::DPRSentOK);
957     else if(cid == helpers::base::COMMANDID__Disconnect_Peer_Answer) oamModule.count(OamModule::Counter::DPASentOK);
958   } else {
959     // Main counters:
960     oamModule.count(isRequest ? OamModule::Counter::RequestSentNOK : OamModule::Counter::AnswerSentNOK);
961     oamModule.count(isRequest ? OamModule::Counter::RequestSentOnClientSessionNOK : OamModule::Counter::AnswerSentOnClientSessionNOK);
962
963     if(cid == helpers::base::COMMANDID__Capabilities_Exchange_Request) oamModule.count(OamModule::Counter::CERSentNOK);
964     else if(cid == helpers::base::COMMANDID__Device_Watchdog_Request) oamModule.count(OamModule::Counter::DWRSentNOK);
965     else if(cid == helpers::base::COMMANDID__Device_Watchdog_Answer) oamModule.count(OamModule::Counter::DWASentNOK);  // not usual (dwr was received from server)
966     else if(cid == helpers::base::COMMANDID__Disconnect_Peer_Request) oamModule.count(OamModule::Counter::DPRSentNOK);
967     else if(cid == helpers::base::COMMANDID__Disconnect_Peer_Answer) oamModule.count(OamModule::Counter::DPASentNOK);
968   }
969 }
970