RICPLT-3008 Subscription register free id list
[ric-plt/submgr.git] / pkg / control / control.go
old mode 100644 (file)
new mode 100755 (executable)
index 8a06174..cc176c2
 
 package control
 
-import "C"
-
 import (
-       "errors"
+       "fmt"
+       "gerrit.o-ran-sc.org/r/ric-plt/e2ap/pkg/e2ap"
        rtmgrclient "gerrit.o-ran-sc.org/r/ric-plt/submgr/pkg/rtmgr_client"
        rtmgrhandle "gerrit.o-ran-sc.org/r/ric-plt/submgr/pkg/rtmgr_client/handle"
        "gerrit.o-ran-sc.org/r/ric-plt/xapp-frame/pkg/xapp"
        httptransport "github.com/go-openapi/runtime/client"
        "github.com/go-openapi/strfmt"
        "github.com/spf13/viper"
-       "math/rand"
+       "sync"
        "time"
-       "sync"  
 )
 
-var subReqTime time.Duration = 2 * time.Second
-var SubDelReqTime time.Duration = 2 * time.Second
+//-----------------------------------------------------------------------------
+//
+//-----------------------------------------------------------------------------
+
+var subReqTime time.Duration = 5 * time.Second
+var subDelReqTime time.Duration = 5 * time.Second
+var maxSubReqTryCount uint64 = 2    // Initial try + retry
+var maxSubDelReqTryCount uint64 = 2 // Initial try + retry
 
 type Control struct {
-       e2ap        *E2ap
-       registry    *Registry
-       rtmgrClient *RtmgrClient
-       tracker     *Tracker
-       timerMap        *TimerMap
-       rmrSendMutex *sync.Mutex        
+       e2ap         *E2ap
+       registry     *Registry
+       tracker      *Tracker
+       timerMap     *TimerMap
+       rmrSendMutex sync.Mutex
+       msgCounter   uint64
 }
 
 type RMRMeid struct {
-       PlmnID string
-       EnbID  string
+       PlmnID  string
+       EnbID   string
        RanName string
 }
 
-var seedSN uint16
-
 const (
        CREATE Action = 0
        MERGE  Action = 1
@@ -62,24 +64,23 @@ const (
 )
 
 func init() {
-       xapp.Logger.Info("SUBMGR /ric-plt-submgr:r3-test-v4")
+       xapp.Logger.Info("SUBMGR")
        viper.AutomaticEnv()
        viper.SetEnvPrefix("submgr")
        viper.AllowEmptyEnv(true)
-       seedSN = uint16(viper.GetInt("seed_sn"))
-       if seedSN == 0 {
-               rand.Seed(time.Now().UnixNano())
-               seedSN = uint16(rand.Intn(65535))
-       }
-       if seedSN > 65535 {
-               seedSN = 0
-       }
-       xapp.Logger.Info("SUBMGR: Initial Sequence Number: %v", seedSN)
 }
 
-func NewControl() Control {
+func NewControl() *Control {
+
+       transport := httptransport.New(viper.GetString("rtmgr.HostAddr")+":"+viper.GetString("rtmgr.port"), viper.GetString("rtmgr.baseUrl"), []string{"http"})
+       client := rtmgrclient.New(transport, strfmt.Default)
+       handle := rtmgrhandle.NewProvideXappSubscriptionHandleParamsWithTimeout(10 * time.Second)
+       deleteHandle := rtmgrhandle.NewDeleteXappSubscriptionHandleParamsWithTimeout(10 * time.Second)
+       rtmgrClient := RtmgrClient{client, handle, deleteHandle}
+
        registry := new(Registry)
-       registry.Initialize(seedSN)
+       registry.Initialize()
+       registry.rtmgrClient = &rtmgrClient
 
        tracker := new(Tracker)
        tracker.Init()
@@ -87,46 +88,73 @@ func NewControl() Control {
        timerMap := new(TimerMap)
        timerMap.Init()
 
-       rmrSendMutex := &sync.Mutex{}
-
-       transport := httptransport.New(viper.GetString("rtmgr.HostAddr")+":"+viper.GetString("rtmgr.port"), viper.GetString("rtmgr.baseUrl"), []string{"http"})
-       client := rtmgrclient.New(transport, strfmt.Default)
-       handle := rtmgrhandle.NewProvideXappSubscriptionHandleParamsWithTimeout(10 * time.Second)
-       deleteHandle := rtmgrhandle.NewDeleteXappSubscriptionHandleParamsWithTimeout(10 * time.Second)
-       rtmgrClient := RtmgrClient{client, handle, deleteHandle}
-
-       return Control{new(E2ap), registry, &rtmgrClient, tracker, timerMap, rmrSendMutex}
+       return &Control{e2ap: new(E2ap),
+               registry:   registry,
+               tracker:    tracker,
+               timerMap:   timerMap,
+               msgCounter: 0,
+       }
 }
 
 func (c *Control) Run() {
        xapp.Run(c)
 }
 
-func (c *Control) rmrSend(params *xapp.RMRParams) (err error) {
+func (c *Control) rmrSendRaw(desc string, params *RMRParams) (err error) {
+
+       xapp.Logger.Info("%s: %s", desc, params.String())
        status := false
        i := 1
-       for ; i <= 10 && status == false; i++ { 
+       for ; i <= 10 && status == false; i++ {
                c.rmrSendMutex.Lock()
-               status = xapp.Rmr.Send(params, false)
+               status = xapp.Rmr.Send(params.RMRParams, false)
                c.rmrSendMutex.Unlock()
                if status == false {
-                       xapp.Logger.Info("rmr.Send() failed. Retry count %v, Mtype: %v, SubId: %v, Xid %s",i, params.Mtype, params.SubId, params.Xid)
+                       xapp.Logger.Info("rmr.Send() failed. Retry count %d, %s", i, params.String())
                        time.Sleep(500 * time.Millisecond)
                }
        }
        if status == false {
-               err = errors.New("rmr.Send() failed")
+               err = fmt.Errorf("rmr.Send() failed. Retry count %d, %s", i, params.String())
+               xapp.Logger.Error("%s: %s", desc, err.Error())
                xapp.Rmr.Free(params.Mbuf)
        }
        return
 }
 
-func (c *Control) rmrReplyToSender(params *xapp.RMRParams) (err error) {
-       c.rmrSend(params)
-       return
+func (c *Control) rmrSend(desc string, subs *Subscription, trans *Transaction) (err error) {
+       params := &RMRParams{&xapp.RMRParams{}}
+       params.Mtype = trans.GetMtype()
+       params.SubId = int(subs.GetSubId())
+       params.Xid = ""
+       params.Meid = subs.GetMeid()
+       params.Src = ""
+       params.PayloadLen = len(trans.Payload.Buf)
+       params.Payload = trans.Payload.Buf
+       params.Mbuf = nil
+
+       return c.rmrSendRaw(desc, params)
 }
 
-func (c *Control) Consume(msg *xapp.RMRParams) (err error) {
+func (c *Control) rmrReplyToSender(desc string, subs *Subscription, trans *Transaction) (err error) {
+       params := &RMRParams{&xapp.RMRParams{}}
+       params.Mtype = trans.GetMtype()
+       params.SubId = int(subs.GetSubId())
+       params.Xid = trans.GetXid()
+       params.Meid = trans.GetMeid()
+       params.Src = ""
+       params.PayloadLen = len(trans.Payload.Buf)
+       params.Payload = trans.Payload.Buf
+       params.Mbuf = nil
+
+       return c.rmrSendRaw(desc, params)
+}
+
+func (c *Control) Consume(params *xapp.RMRParams) (err error) {
+       xapp.Rmr.Free(params.Mbuf)
+       params.Mbuf = nil
+       msg := &RMRParams{params}
+       c.msgCounter++
        switch msg.Mtype {
        case xapp.RICMessageTypes["RIC_SUB_REQ"]:
                go c.handleSubscriptionRequest(msg)
@@ -138,431 +166,517 @@ func (c *Control) Consume(msg *xapp.RMRParams) (err error) {
                go c.handleSubscriptionDeleteRequest(msg)
        case xapp.RICMessageTypes["RIC_SUB_DEL_RESP"]:
                go c.handleSubscriptionDeleteResponse(msg)
+       case xapp.RICMessageTypes["RIC_SUB_DEL_FAILURE"]:
+               go c.handleSubscriptionDeleteFailure(msg)
        default:
                xapp.Logger.Info("Unknown Message Type '%d', discarding", msg.Mtype)
        }
+
        return nil
 }
 
-func (c *Control) handleSubscriptionRequest(params *xapp.RMRParams) {
-       xapp.Logger.Info("Subscription Request Received from Src: %s, Mtype: %v, SubId: %v, Xid: %s, Meid: %v",params.Src, params.Mtype, params.SubId, params.Xid, params.Meid)
-       xapp.Rmr.Free(params.Mbuf)
-       params.Mbuf = nil
+func (c *Control) handleSubscriptionRequest(params *RMRParams) {
+       xapp.Logger.Info("SubReq from xapp: %s", params.String())
 
-       /* Reserve a sequence number and set it in the payload */
-       newSubId, isIdValid := c.registry.ReserveSequenceNumber()
-       if isIdValid != true {
-               xapp.Logger.Error("Further processing of this SubscriptionRequest stopped. SubId: %v, Xid: %s",params.SubId, params.Xid)
-               return 
-       }
+       //
+       //
+       //
+       trans, err := c.tracker.TrackTransaction(NewRmrEndpoint(params.Src),
+               params.Xid,
+               params.Meid,
+               false,
+               true)
 
-       err := c.e2ap.SetSubscriptionRequestSequenceNumber(params.Payload, newSubId)
        if err != nil {
-               xapp.Logger.Error("Unable to set Subscription Sequence Number in Payload. Dropping this Subscription Request message. Err: v%, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               xapp.Logger.Error("SubReq: %s, Dropping this msg. %s", err.Error(), params.String())
                return
        }
 
-       srcAddr, srcPort, err := c.rtmgrClient.SplitSource(params.Src)
+       //
+       //
+       //
+       trans.SubReqMsg, err = c.e2ap.UnpackSubscriptionRequest(params.Payload)
        if err != nil {
-               xapp.Logger.Error("Failed to update routing-manager about the subscription request with reason: %s", err)
+               xapp.Logger.Error("SubReq: %s Dropping this msg. %s", err.Error(), trans)
+               trans.Release()
                return
        }
 
-       /* Create transatcion records for every subscription request */
-       xactKey := TransactionKey{newSubId, CREATE}
-       xactValue := Transaction{*srcAddr, *srcPort, params}
-       err = c.tracker.TrackTransaction(xactKey, xactValue)
+       //
+       //
+       //
+       subs, err := c.registry.ReserveSubscription(&trans.RmrEndpoint, trans.Meid)
        if err != nil {
-               xapp.Logger.Error("Failed to create a Subscription Request transaction record. Err: %v", err)
+               xapp.Logger.Error("SubReq: %s, Dropping this msg. %s", err.Error(), trans)
+               trans.Release()
                return
        }
 
-       /* Update routing manager about the new subscription*/
-       subRouteAction := SubRouteInfo{CREATE, *srcAddr, *srcPort, newSubId}
-       xapp.Logger.Info("Starting routing manager update")
-       err = c.rtmgrClient.SubscriptionRequestUpdate(subRouteAction)
+       err = subs.SetTransaction(trans)
        if err != nil {
-               xapp.Logger.Error("Failed to update routing manager. Dropping this Subscription Request message. Err: %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               xapp.Logger.Error("SubReq: %s, Dropping this msg. %s", err.Error(), trans)
+               subs.Release()
+               trans.Release()
                return
        }
 
-       // Setting new subscription ID in the RMR header
-       params.SubId = int(newSubId)
-       xapp.Logger.Info("Forwarding Subscription Request to E2T: Mtype: %v, SubId: %v, Xid %s, Meid %v",params.Mtype, params.SubId, params.Xid, params.Meid)
-       err = c.rmrSend(params)
+       trans.SubReqMsg.RequestId.Seq = uint32(subs.GetSubId())
+
+       //
+       // TODO: subscription create is in fact owned by subscription and not transaction.
+       //       Transaction is toward xapp while Subscription is toward ran.
+       //       In merge several xapps may wake transactions, while only one subscription
+       //       toward ran occurs -> subscription owns subscription creation toward ran
+       //
+       //       This is intermediate solution while improving message handling
+       //
+       trans.Mtype, trans.Payload, err = c.e2ap.PackSubscriptionRequest(trans.SubReqMsg)
        if err != nil {
-               xapp.Logger.Error("Failed to send request to E2T %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
-       } /*else {
-               c.timerMap.StartTimer(newSubId, subReqTime, c.handleSubscriptionRequestTimer)
-       }*/
-       xapp.Logger.Debug("--- Debugging transaction table = %v", c.tracker.transactionTable)
+               xapp.Logger.Error("SubReq: %s for trans %s", err.Error(), trans)
+               subs.Release()
+               trans.Release()
+               return
+       }
+
+       c.rmrSend("SubReq: SubReq to E2T", subs, trans)
+
+       c.timerMap.StartTimer("RIC_SUB_REQ", int(subs.GetSubId()), subReqTime, FirstTry, c.handleSubscriptionRequestTimer)
+       xapp.Logger.Debug("SubReq: Debugging trans table = %v", c.tracker.transactionXappTable)
        return
 }
 
-func (c *Control) handleSubscriptionResponse(params *xapp.RMRParams) {
-       xapp.Logger.Info("Subscription Response Received from Src: %s, Mtype: %v, SubId: %v, Meid: %v",params.Src, params.Mtype, params.SubId, params.Meid)
-       xapp.Rmr.Free(params.Mbuf)
-       params.Mbuf = nil
+func (c *Control) handleSubscriptionResponse(params *RMRParams) {
+       xapp.Logger.Info("SubResp from E2T: %s", params.String())
 
-       payloadSeqNum, err := c.e2ap.GetSubscriptionResponseSequenceNumber(params.Payload)
+       //
+       //
+       //
+       SubRespMsg, err := c.e2ap.UnpackSubscriptionResponse(params.Payload)
        if err != nil {
-               xapp.Logger.Error("Unable to get Subscription Sequence Number from Payload. Dropping this Subscription Responsemessage. Err: v%, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               xapp.Logger.Error("SubResp: %s Dropping this msg. %s", err.Error(), params.String())
                return
        }
 
-       xapp.Logger.Info("Received payloadSeqNum: %v",payloadSeqNum)
-       if !c.registry.IsValidSequenceNumber(payloadSeqNum) {
-               xapp.Logger.Error("Unknown payloadSeqNum. Dropping this Subscription Response message. PayloadSeqNum: %v, SubId: %v, Xid: %s", payloadSeqNum, params.SubId, params.Xid)         
-               return
+       //
+       //
+       //
+       subs := c.registry.GetSubscription(uint16(SubRespMsg.RequestId.Seq))
+       if subs == nil && params.SubId > 0 {
+               subs = c.registry.GetSubscription(uint16(params.SubId))
        }
 
-//     c.timerMap.StopTimer(payloadSeqNum)
+       if subs == nil {
+               xapp.Logger.Error("SubResp: Not valid subscription found payloadSeqNum: %d, SubId: %d. Dropping this msg. %s", SubRespMsg.RequestId.Seq, params.SubId, params.String())
+               return
+       }
+       xapp.Logger.Info("SubResp: subscription found payloadSeqNum: %d, SubId: %d", SubRespMsg.RequestId.Seq, subs.GetSubId())
 
-       c.registry.setSubscriptionToConfirmed(payloadSeqNum)
-       var transaction Transaction
-       transaction, err = c.tracker.RetriveTransaction(payloadSeqNum, CREATE)
-       if err != nil {
-               xapp.Logger.Error("Failed to retrive transaction record. Dropping this Subscription Response message. Err: v%, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+       //
+       //
+       //
+       trans := subs.GetTransaction()
+       if trans == nil {
+               xapp.Logger.Error("SubResp: Unknown trans. Dropping this msg. SubId: %d", subs.GetSubId())
                return
        }
-       xapp.Logger.Info("Subscription ID: %v, from address: %v:%v. Retrieved old subId...", int(payloadSeqNum), transaction.XappInstanceAddress, transaction.XappPort)
 
-    params.SubId = int(payloadSeqNum)
-    params.Xid = transaction.OrigParams.Xid
-       
-       xapp.Logger.Info("Forwarding Subscription Response to UEEC: Mtype: %v, SubId: %v, Xid: %s, Meid: %v",params.Mtype, params.SubId, params.Xid, params.Meid)
-       err = c.rmrReplyToSender(params)
-       if err != nil {
-               xapp.Logger.Error("Failed to send response to requestor %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+       trans.SubRespMsg = SubRespMsg
+
+       //
+       //
+       //
+       c.timerMap.StopTimer("RIC_SUB_REQ", int(subs.GetSubId()))
+
+       responseReceived := trans.CheckResponseReceived()
+       if responseReceived == true {
+               // Subscription timer already received
+               return
        }
 
-       xapp.Logger.Info("Subscription ID: %v, from address: %v:%v. Deleting transaction record", int(payloadSeqNum), transaction.XappInstanceAddress, transaction.XappPort)
-       transaction, err = c.tracker.completeTransaction(payloadSeqNum, CREATE)
+       trans.Mtype, trans.Payload, err = c.e2ap.PackSubscriptionResponse(trans.SubRespMsg)
        if err != nil {
-               xapp.Logger.Error("Failed to delete a Subscription Request transaction record due to %v", err)
+               xapp.Logger.Error("SubResp: %s for trans %s", err.Error(), trans)
+               trans.Release()
                return
        }
+
+       subs.Confirmed()
+       trans.Release()
+       c.rmrReplyToSender("SubResp: SubResp to xapp", subs, trans)
        return
 }
 
-func (c *Control) handleSubscriptionFailure(params *xapp.RMRParams) {
-       xapp.Logger.Info("Subscription Failure Received from Src: %s, Mtype: %v, SubId: %v, Meid: %v",params.Src, params.Mtype, params.SubId, params.Meid)
-       xapp.Rmr.Free(params.Mbuf)
-       params.Mbuf = nil
+func (c *Control) handleSubscriptionFailure(params *RMRParams) {
+       xapp.Logger.Info("SubFail from E2T: %s", params.String())
 
-       payloadSeqNum, err := c.e2ap.GetSubscriptionFailureSequenceNumber(params.Payload)
+       //
+       //
+       //
+       SubFailMsg, err := c.e2ap.UnpackSubscriptionFailure(params.Payload)
        if err != nil {
-               xapp.Logger.Error("Unable to get Subscription Sequence Number from Payload. Dropping this Subscription Failure message. Err: v%, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               xapp.Logger.Error("SubFail: %s Dropping this msg. %s", err.Error(), params.String())
                return
        }
-       xapp.Logger.Info("Received payloadSeqNum: %v", payloadSeqNum)
 
-//     c.timerMap.StopTimer(payloadSeqNum)
+       //
+       //
+       //
+       subs := c.registry.GetSubscription(uint16(SubFailMsg.RequestId.Seq))
+       if subs == nil && params.SubId > 0 {
+               subs = c.registry.GetSubscription(uint16(params.SubId))
+       }
 
-       var transaction Transaction
-       transaction, err = c.tracker.RetriveTransaction(payloadSeqNum, CREATE)
-       if  err != nil {
-               xapp.Logger.Error("Failed to retrive transaction record. Dropping this Subscription Failure message. Err: %v, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+       if subs == nil {
+               xapp.Logger.Error("SubFail: Not valid subscription found payloadSeqNum: %d, SubId: %d. Dropping this msg. %s", SubFailMsg.RequestId.Seq, params.SubId, params.String())
                return
        }
-       xapp.Logger.Info("Subscription ID: %v, from address: %v:%v. Forwarding response to requestor...", int(payloadSeqNum), transaction.XappInstanceAddress, transaction.XappPort)
+       xapp.Logger.Info("SubFail: subscription found payloadSeqNum: %d, SubId: %d", SubFailMsg.RequestId.Seq, subs.GetSubId())
 
-       params.SubId = int(payloadSeqNum)
-       params.Xid = transaction.OrigParams.Xid
-
-       xapp.Logger.Info("Forwarding Subscription Failure to UEEC: Mtype: %v, SubId: %v, Xid: %v, Meid: %v",params.Mtype, params.SubId, params.Xid, params.Meid)
-       err = c.rmrReplyToSender(params)
-       if err != nil {
-               xapp.Logger.Error("Failed to send response to requestor %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+       //
+       //
+       //
+       trans := subs.GetTransaction()
+       if trans == nil {
+               xapp.Logger.Error("SubFail: Unknown trans. Dropping this msg. SubId: %d", subs.GetSubId())
+               return
        }
+       trans.SubFailMsg = SubFailMsg
 
-       time.Sleep(3 * time.Second)
+       //
+       //
+       //
+       c.timerMap.StopTimer("RIC_SUB_REQ", int(subs.GetSubId()))
 
-       xapp.Logger.Info("Starting routing manager update")
-       subRouteAction := SubRouteInfo{CREATE, transaction.XappInstanceAddress, transaction.XappPort, payloadSeqNum}
-       err = c.rtmgrClient.SubscriptionRequestUpdate(subRouteAction)
+       responseReceived := trans.CheckResponseReceived()
        if err != nil {
-               xapp.Logger.Error("Failed to update routing manager. Err: %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               return
        }
 
-       xapp.Logger.Info("Deleting trancaction record")
-       if c.registry.releaseSequenceNumber(payloadSeqNum) {
-               transaction, err = c.tracker.completeTransaction(payloadSeqNum, CREATE)
-               if err != nil {
-                       xapp.Logger.Error("Failed to delete a Subscription Request transaction record due to %v", err)
-                       return
-               }
-       } else {
-               xapp.Logger.Error("Failed to release sequency number. SubId: %v, Xid: %s", params.SubId, params.Xid)
+       if responseReceived == true {
+               // Subscription timer already received
                return
        }
+
+       trans.Mtype, trans.Payload, err = c.e2ap.PackSubscriptionFailure(trans.SubFailMsg)
+       if err == nil {
+               c.rmrReplyToSender("SubFail: SubFail to xapp", subs, trans)
+               time.Sleep(3 * time.Second)
+       } else {
+               //TODO error handling improvement
+               xapp.Logger.Error("SubFail: %s for trans %s (continuing cleaning)", err.Error(), trans)
+       }
+
+       trans.Release()
+       subs.Release()
        return
 }
 
-func (c *Control) handleSubscriptionRequestTimer(subId uint16) {
-       xapp.Logger.Info("Subscription Request timer expired. SubId: %v",subId)
-/*     
-       transaction, err := c.tracker.completeTransaction(subId, CREATE)
-       if err != nil {
-               xapp.Logger.Error("Failed to delete a Subscription Request transaction record due to %v", err)
+func (c *Control) handleSubscriptionRequestTimer(strId string, nbrId int, tryCount uint64) {
+       xapp.Logger.Info("SubReq timeout: subId: %v,  tryCount: %v", nbrId, tryCount)
+
+       subs := c.registry.GetSubscription(uint16(nbrId))
+       if subs == nil {
+               xapp.Logger.Error("SubReq timeout: Unknown payloadSeqNum. Dropping this msg. SubId: %v", nbrId)
                return
        }
-       xapp.Logger.Info("SubId: %v, Xid %v, Meid: %v",subId, transaction.OrigParams.Xid, transaction.OrigParams.Meid)
-
-       var params xapp.RMRParams
-       params.Mtype = 12012 //xapp.RICMessageTypes["RIC_SUB_FAILURE"]
-       params.SubId = int(subId)
-       params.Meid = transaction.OrigParams.Meid
-       params.Xid = transaction.OrigParams.Xid
-       payload := []byte("40C9408098000003EA7E00050000010016EA6300020021EA6E00808180EA6F000400000000EA6F000400010040EA6F000400020080EA6F0004000300C0EA6F000400040100EA6F000400050140EA6F000400060180EA6F0004000701C0EA6F000400080200EA6F000400090240EA6F0004000A0280EA6F0004000B02C0EA6F0004000C0300EA6F0004000D0340EA6F0004000E0380EA6F0004000F03C0")
-       params.PayloadLen = len(payload)
-       params.Payload = payload
 
-       xapp.Logger.Info("Forwarding Subscription Failure to UEEC: Mtype: %v, SubId: %v, Xid: %s, Meid: %v",params.Mtype, params.SubId, params.Xid, params.Meid)
-       err = c.rmrReplyToSender(&params)
-       if err != nil {
-               xapp.Logger.Error("Failed to send response to requestor %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+       trans := subs.GetTransaction()
+       if trans == nil {
+               xapp.Logger.Error("SubReq timeout: Unknown trans. Dropping this msg. SubId: %v", subs.GetSubId())
+               return
        }
-*/
-/*
-       time.Sleep(3 * time.Second)
-
-       xapp.Logger.Info("Subscription ID: %v, from address: %v:%v. Deleting transaction record", int(subId), transaction.XappInstanceAddress, transaction.XappPort)
 
-       xapp.Logger.Info("Starting routing manager update")
-       subRouteAction := SubRouteInfo{DELETE, transaction.XappInstanceAddress, transaction.XappPort, payloadSeqNum}
-       c.rtmgrClient.SubscriptionRequestUpdate(subRouteAction)
+       responseReceived := trans.CheckResponseReceived()
 
-       xapp.Logger.Info("Deleting trancaction record")
-       if c.registry.releaseSequenceNumber(payloadSeqNum) {
-               transaction, err = c.tracker.completeTransaction(payloadSeqNum, CREATE)
-               if err != nil {
-                       xapp.Logger.Error("Failed to delete a Subscription Request transaction record due to %v", err)
-                       return
-               }
+       if responseReceived == true {
+               // Subscription Response or Failure already received
+               return
        }
-*/
-       return
-}
 
-func (act Action) String() string {
-       actions := [...]string{
-               "CREATE",
-               "MERGE",
-               "NONE",
-               "DELETE",
-       }
+       if tryCount < maxSubReqTryCount {
+               xapp.Logger.Info("SubReq timeout: subs: %s trans: %s", subs, trans)
 
-       if act < CREATE || act > DELETE {
-               return "Unknown"
-       }
-       return actions[act]
-}
+               trans.RetryTransaction()
 
-func (act Action) valid() bool {
-       switch act {
-       case CREATE, MERGE, DELETE:
-               return true
-       default:
-               return false
+               c.rmrSend("SubReq timeout: SubReq to E2T", subs, trans)
+
+               tryCount++
+               c.timerMap.StartTimer("RIC_SUB_REQ", int(subs.GetSubId()), subReqTime, tryCount, c.handleSubscriptionRequestTimer)
+               return
        }
-}
 
-func (c *Control) handleSubscriptionDeleteRequest(params *xapp.RMRParams) {
-       xapp.Logger.Info("Subscription Delete Request Received from Src: %s, Mtype: %v, SubId: %v, Xid: %s, Meid: %v",params.Src, params.Mtype, params.SubId, params.Xid, params.Meid)
-       xapp.Rmr.Free(params.Mbuf)
-       params.Mbuf = nil
+       // Release CREATE transaction
+       trans.Release()
+
+       // Create DELETE transaction (internal and no messages toward xapp)
+       deltrans, err := c.tracker.TrackTransaction(&trans.RmrEndpoint,
+               trans.GetXid(),
+               trans.GetMeid(),
+               false,
+               false)
 
-       payloadSeqNum, err := c.e2ap.GetSubscriptionDeleteRequestSequenceNumber(params.Payload)
        if err != nil {
-               xapp.Logger.Error("Unable to get Subscription Sequence Number from Payload. Dropping this Subscription Delete Request message. Err: %v, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               xapp.Logger.Error("SubReq timeout: %s, Dropping this msg.", err.Error())
+               //TODO improve error handling. Important at least in merge
+               subs.Release()
                return
        }
-       xapp.Logger.Info("Received payloadSeqNum: %v", payloadSeqNum)
-       if c.registry.IsValidSequenceNumber(payloadSeqNum) {
-               c.registry.deleteSubscription(payloadSeqNum)
-               err = c.trackDeleteTransaction(params, payloadSeqNum)
-               if err != nil {
-                       xapp.Logger.Error("Failed to create transaction record. Dropping this Subscription Delete Request message. Err: %v, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
-                       return
-               }
-       } else {
-               xapp.Logger.Error("Not valid sequence number. Dropping this Subscription Delete Request message. SubId: %v, Xid: %s", params.SubId, params.Xid)
+
+       deltrans.SubDelReqMsg = &e2ap.E2APSubscriptionDeleteRequest{}
+       deltrans.SubDelReqMsg.RequestId.Id = trans.SubReqMsg.RequestId.Id
+       deltrans.SubDelReqMsg.RequestId.Seq = uint32(subs.GetSubId())
+       deltrans.SubDelReqMsg.FunctionId = trans.SubReqMsg.FunctionId
+       deltrans.Mtype, deltrans.Payload, err = c.e2ap.PackSubscriptionDeleteRequest(deltrans.SubDelReqMsg)
+       if err != nil {
+               xapp.Logger.Error("SubReq timeout: Packing SubDelReq failed. Err: %v", err)
+               //TODO improve error handling. Important at least in merge
+               deltrans.Release()
+               subs.Release()
                return
        }
-       
-       xapp.Logger.Info("Forwarding Delete Subscription Request to E2T: Mtype: %v, SubId: %v, Xid: %s, Meid: %v",params.Mtype, params.SubId, params.Xid, params.Meid)
-       c.rmrSend(params)
-       if err != nil {
-               xapp.Logger.Error("Failed to send request to E2T %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
-       } /*else {
-               c.timerMap.StartTimer(payloadSeqNum, SubDelReqTime, c.handleSubscriptionDeleteRequestTimer)
-       }*/
-       return
-}
 
-func (c *Control) trackDeleteTransaction(params *xapp.RMRParams, payloadSeqNum uint16) (err error) {
-       srcAddr, srcPort, err := c.rtmgrClient.SplitSource(params.Src)
+       err = subs.SetTransaction(deltrans)
        if err != nil {
-               xapp.Logger.Error("Failed to update routing-manager about the subscription delete request with reason: %s", err)
+               xapp.Logger.Error("SubReq timeout: %s, Dropping this msg.", err.Error())
+               //TODO improve error handling. Important at least in merge
+               deltrans.Release()
+               return
        }
-       xactKey := TransactionKey{payloadSeqNum, DELETE}
-       xactValue := Transaction{*srcAddr, *srcPort, params}
-       err = c.tracker.TrackTransaction(xactKey, xactValue)
+
+       c.rmrSend("SubReq timer: SubDelReq to E2T", subs, deltrans)
+       c.timerMap.StartTimer("RIC_SUB_DEL_REQ", int(subs.GetSubId()), subDelReqTime, FirstTry, c.handleSubscriptionDeleteRequestTimer)
        return
 }
 
-func (c *Control) handleSubscriptionDeleteResponse(params *xapp.RMRParams) (err error) {
-       xapp.Logger.Info("Subscription Delete Response Received from Src: %s, Mtype: %v, SubId: %v, Meid: %v",params.Src, params.Mtype, params.SubId, params.Meid)
-       xapp.Rmr.Free(params.Mbuf)
-       params.Mbuf = nil
+func (c *Control) handleSubscriptionDeleteRequest(params *RMRParams) {
+       xapp.Logger.Info("SubDelReq from xapp: %s", params.String())
+
+       //
+       //
+       //
+       trans, err := c.tracker.TrackTransaction(NewRmrEndpoint(params.Src),
+               params.Xid,
+               params.Meid,
+               false,
+               true)
 
-       payloadSeqNum, err := c.e2ap.GetSubscriptionDeleteResponseSequenceNumber(params.Payload)
        if err != nil {
-               xapp.Logger.Error("Unable to get Subscription Sequence Number from Payload. Dropping this Subscription Delete Response message. Err: %, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               xapp.Logger.Error("SubDelReq: %s, Dropping this msg. %s", err.Error(), params.String())
                return
        }
-       xapp.Logger.Info("Received payloadSeqNum: %v", payloadSeqNum)
 
-//     c.timerMap.StopTimer(payloadSeqNum)
-       
-       var transaction Transaction
-       transaction, err = c.tracker.RetriveTransaction(payloadSeqNum, DELETE)
-       if  err != nil {
-               xapp.Logger.Error("Failed to retrive transaction record. Dropping this Subscription Delete Response message. Err: %v, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+       //
+       //
+       //
+       trans.SubDelReqMsg, err = c.e2ap.UnpackSubscriptionDeleteRequest(params.Payload)
+       if err != nil {
+               xapp.Logger.Error("SubDelReq: %s Dropping this msg. %s", err.Error(), trans)
+               trans.Release()
                return
        }
-       xapp.Logger.Info("Subscription ID: %v, from address: %v:%v. Forwarding response to requestor...", int(payloadSeqNum), transaction.XappInstanceAddress, transaction.XappPort)
 
-    params.SubId = int(payloadSeqNum)
-    params.Xid = transaction.OrigParams.Xid
-       xapp.Logger.Info("Forwarding Subscription Delete Response to UEEC: Mtype: %v, SubId: %v, Xid: %v, Meid: %v",params.Mtype, params.SubId, params.Xid, params.Meid)
-       err = c.rmrReplyToSender(params)
-       if err != nil {
-               xapp.Logger.Error("Failed to send response to requestor %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
-//             return
+       //
+       //
+       //
+       subs := c.registry.GetSubscription(uint16(trans.SubDelReqMsg.RequestId.Seq))
+       if subs == nil && params.SubId > 0 {
+               subs = c.registry.GetSubscription(uint16(params.SubId))
        }
 
-       time.Sleep(3 * time.Second)
+       if subs == nil {
+               xapp.Logger.Error("SubDelReq: Not valid subscription found payloadSeqNum: %d, SubId: %d. Dropping this msg. %s", trans.SubDelReqMsg.RequestId.Seq, params.SubId, trans)
+               trans.Release()
+               return
+       }
+       xapp.Logger.Info("SubDelReq: subscription found payloadSeqNum: %d, SubId: %d. %s", trans.SubDelReqMsg.RequestId.Seq, params.SubId, trans)
 
-       xapp.Logger.Info("Starting routing manager update")
-       subRouteAction := SubRouteInfo{DELETE, transaction.XappInstanceAddress, transaction.XappPort, payloadSeqNum}
-       err = c.rtmgrClient.SubscriptionRequestUpdate(subRouteAction)
+       err = subs.SetTransaction(trans)
        if err != nil {
-               xapp.Logger.Error("Failed to update routing manager %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               xapp.Logger.Error("SubDelReq: %s, Dropping this msg. %s", err.Error(), trans)
+               trans.Release()
                return
        }
 
-       xapp.Logger.Info("Deleting trancaction record")
-       if c.registry.releaseSequenceNumber(payloadSeqNum) {
-               transaction, err = c.tracker.completeTransaction(payloadSeqNum, DELETE)
-               if err != nil {
-                       xapp.Logger.Error("Failed to delete a Subscription Delete Request transaction record due to %v", err)
-                       return
-               }
-       } else {
-               xapp.Logger.Error("Failed to release sequency number. SubId: %v, Xid: %s", params.SubId, params.Xid)
+       //
+       // TODO: subscription delete is in fact owned by subscription and not transaction.
+       //       Transaction is toward xapp while Subscription is toward ran.
+       //       In merge several xapps may wake transactions, while only one subscription
+       //       toward ran occurs -> subscription owns subscription creation toward ran
+       //
+       //       This is intermediate solution while improving message handling
+       //
+       trans.Mtype, trans.Payload, err = c.e2ap.PackSubscriptionDeleteRequest(trans.SubDelReqMsg)
+       if err != nil {
+               xapp.Logger.Error("SubDelReq: %s for trans %s", err.Error(), trans)
+               trans.Release()
                return
        }
+
+       subs.UnConfirmed()
+
+       c.rmrSend("SubDelReq: SubDelReq to E2T", subs, trans)
+
+       c.timerMap.StartTimer("RIC_SUB_DEL_REQ", int(subs.GetSubId()), subDelReqTime, FirstTry, c.handleSubscriptionDeleteRequestTimer)
        return
 }
 
-func (c *Control) handleSubscriptionDeleteFailure(params *xapp.RMRParams) {
-       xapp.Logger.Info("Subscription Delete Failure Received from Src: %s, Mtype: %v, SubId: %v, Meid: %v",params.Src, params.Mtype, params.SubId, params.Meid)
-       xapp.Rmr.Free(params.Mbuf)
-       params.Mbuf = nil
+func (c *Control) handleSubscriptionDeleteResponse(params *RMRParams) (err error) {
+       xapp.Logger.Info("SubDelResp from E2T:%s", params.String())
 
-       payloadSeqNum, err := c.e2ap.GetSubscriptionDeleteFailureSequenceNumber(params.Payload)
+       //
+       //
+       //
+       SubDelRespMsg, err := c.e2ap.UnpackSubscriptionDeleteResponse(params.Payload)
        if err != nil {
-               xapp.Logger.Error("Unable to get Subscription Sequence Number from Payload. Dropping this Subscription Delete Failure message. Err: %, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               xapp.Logger.Error("SubDelResp: %s Dropping this msg. %s", err.Error(), params.String())
                return
        }
-       xapp.Logger.Info("Received payloadSeqNum: %v", payloadSeqNum)
 
-//     c.timerMap.StopTimer(payloadSeqNum)
+       //
+       //
+       //
+       subs := c.registry.GetSubscription(uint16(SubDelRespMsg.RequestId.Seq))
+       if subs == nil && params.SubId > 0 {
+               subs = c.registry.GetSubscription(uint16(params.SubId))
+       }
 
-       var transaction Transaction
-       transaction, err = c.tracker.RetriveTransaction(payloadSeqNum, DELETE)
-       if  err != nil {
-               xapp.Logger.Error("Failed to retrive transaction record. Dropping this Subscription Delete Failure message. Err %v, SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+       if subs == nil {
+               xapp.Logger.Error("SubDelResp: Not valid subscription found payloadSeqNum: %d, SubId: %d. Dropping this msg. %s", SubDelRespMsg.RequestId.Seq, params.SubId, params.String())
                return
        }
-       xapp.Logger.Info("Subscription ID: %v, from address: %v:%v. Forwarding response to requestor...", int(payloadSeqNum), transaction.XappInstanceAddress, transaction.XappPort)
+       xapp.Logger.Info("SubDelResp: subscription found payloadSeqNum: %d, SubId: %d", SubDelRespMsg.RequestId.Seq, subs.GetSubId())
 
-    params.SubId = int(payloadSeqNum)
-    params.Xid = transaction.OrigParams.Xid
-       xapp.Logger.Info("Forwarding Subscription Delete Failure to UEEC: Mtype: %v, SubId: %v, Xid: %v, Meid: %v",params.Mtype, params.SubId, params.Xid, params.Meid)
-       err = c.rmrReplyToSender(params)
-       if err != nil {
-               xapp.Logger.Error("Failed to send response to requestor %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
-//             return
+       //
+       //
+       //
+       trans := subs.GetTransaction()
+       if trans == nil {
+               xapp.Logger.Error("SubDelResp: Unknown trans. Dropping this msg. SubId: %d", subs.GetSubId())
+               return
        }
 
-       time.Sleep(3 * time.Second)
+       trans.SubDelRespMsg = SubDelRespMsg
 
-       xapp.Logger.Info("Starting routing manager update")
-       subRouteAction := SubRouteInfo{DELETE, transaction.XappInstanceAddress, transaction.XappPort, payloadSeqNum}
-       c.rtmgrClient.SubscriptionRequestUpdate(subRouteAction)
+       //
+       //
+       //
+       c.timerMap.StopTimer("RIC_SUB_DEL_REQ", int(subs.GetSubId()))
+
+       responseReceived := trans.CheckResponseReceived()
+       if responseReceived == true {
+               // Subscription Delete timer already received
+               return
+       }
+
+       c.sendSubscriptionDeleteResponse("SubDelResp", trans, subs)
+       return
+}
+
+func (c *Control) handleSubscriptionDeleteFailure(params *RMRParams) {
+       xapp.Logger.Info("SubDelFail from E2T:%s", params.String())
+
+       //
+       //
+       //
+       SubDelFailMsg, err := c.e2ap.UnpackSubscriptionDeleteFailure(params.Payload)
        if err != nil {
-               xapp.Logger.Error("Failed to update routing manager %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+               xapp.Logger.Error("SubDelFail: %s Dropping this msg. %s", err.Error(), params.String())
                return
        }
 
-       xapp.Logger.Info("Deleting trancaction record")
-       if c.registry.releaseSequenceNumber(payloadSeqNum) {
-               transaction, err = c.tracker.completeTransaction(payloadSeqNum, DELETE)
-               if err != nil {
-                       xapp.Logger.Error("Failed to delete a Subscription Delete Request transaction record due to %v", err)
-                       return
-               }
-       } else {
-               xapp.Logger.Error("Failed to release sequency number. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+       //
+       //
+       //
+       subs := c.registry.GetSubscription(uint16(SubDelFailMsg.RequestId.Seq))
+       if subs == nil && params.SubId > 0 {
+               subs = c.registry.GetSubscription(uint16(params.SubId))
+       }
+
+       if subs == nil {
+               xapp.Logger.Error("SubDelFail: Not valid subscription found payloadSeqNum: %d, SubId: %d. Dropping this msg. %s", SubDelFailMsg.RequestId.Seq, params.SubId, params.String())
+               return
+       }
+       xapp.Logger.Info("SubDelFail: subscription found payloadSeqNum: %d, SubId: %d", SubDelFailMsg.RequestId.Seq, subs.GetSubId())
+
+       //
+       //
+       //
+       trans := subs.GetTransaction()
+       if trans == nil {
+               xapp.Logger.Error("SubDelFail: Unknown trans. Dropping this msg. SubId: %d", subs.GetSubId())
+               return
+       }
+       trans.SubDelFailMsg = SubDelFailMsg
+
+       //
+       //
+       //
+       c.timerMap.StopTimer("RIC_SUB_DEL_REQ", int(subs.GetSubId()))
+
+       responseReceived := trans.CheckResponseReceived()
+       if responseReceived == true {
+               // Subscription Delete timer already received
                return
        }
+
+       c.sendSubscriptionDeleteResponse("SubDelFail", trans, subs)
        return
 }
 
-func (c *Control) handleSubscriptionDeleteRequestTimer(subId uint16) {
-       xapp.Logger.Info("Subscription Delete Request timer expired. SubId: %v",subId)
-/*     
-       transaction, err := c.tracker.completeTransaction(subId, DELETE)
-       if err != nil {
-               xapp.Logger.Error("Failed to delete a Subscription Delete Request transaction record due to %v", err)
+func (c *Control) handleSubscriptionDeleteRequestTimer(strId string, nbrId int, tryCount uint64) {
+       xapp.Logger.Info("SubDelReq timeout: subId: %v, tryCount: %v", nbrId, tryCount)
+
+       subs := c.registry.GetSubscription(uint16(nbrId))
+       if subs == nil {
+               xapp.Logger.Error("SubDelReq timeout: Unknown payloadSeqNum. Dropping this msg. SubId: %v", nbrId)
                return
        }
-       xapp.Logger.Info("SubId: %v, Xid %v, Meid: %v",subId, transaction.OrigParams.Xid, transaction.OrigParams.Meid)
 
-       var params xapp.RMRParams
-       params.Mtype = 12022 //xapp.RICMessageTypes["RIC_SUB_DEL_FAILURE"]
-       params.SubId = int(subId)
-       params.Meid = transaction.OrigParams.Meid
-       params.Xid = transaction.OrigParams.Xid
-       payload := []byte("40CA4018000003EA7E00050000010016EA6300020021EA74000200C0")
-       params.PayloadLen = len(payload)
-       params.Payload = payload
+       trans := subs.GetTransaction()
+       if trans == nil {
+               xapp.Logger.Error("SubDelReq timeout: Unknown trans. Dropping this msg. SubId: %v", subs.GetSubId())
+               return
+       }
 
-       xapp.Logger.Info("Forwarding Subscription Delete Failure to UEEC: Mtype: %v, SubId: %v, Xid: %s, Meid: %v",params.Mtype, params.SubId, params.Xid, params.Meid)
-       err = c.rmrReplyToSender(&params)
-       if err != nil {
-               xapp.Logger.Error("Failed to send response to requestor %v. SubId: %v, Xid: %s", err, params.SubId, params.Xid)
+       responseReceived := trans.CheckResponseReceived()
+       if responseReceived == true {
+               // Subscription Delete Response or Failure already received
+               return
        }
-*/     
-/*
-       time.Sleep(3 * time.Second)
-       xapp.Logger.Info("Subscription ID: %v, from address: %v:%v. Deleting transaction record", int(subId), transaction.XappInstanceAddress, transaction.XappPort)
-
-       xapp.Logger.Info("Starting routing manager update")
-       subRouteAction := SubRouteInfo{DELETE, transaction.XappInstanceAddress, transaction.XappPort, payloadSeqNum}
-       c.rtmgrClient.SubscriptionRequestUpdate(subRouteAction)
-
-       xapp.Logger.Info("Deleting trancaction record")
-       if c.registry.releaseSequenceNumber(payloadSeqNum) {
-               transaction, err = c.tracker.completeTransaction(payloadSeqNum, DELETE)
-               if err != nil {
-                       xapp.Logger.Error("Failed to delete a Subscription Delete Request transaction record due to %v", err)
-                       return
-               }
+
+       if tryCount < maxSubDelReqTryCount {
+               // Set possible to handle new response for the subId
+               trans.RetryTransaction()
+               c.rmrSend("SubDelReq timeout: SubDelReq to E2T", subs, trans)
+               tryCount++
+               c.timerMap.StartTimer("RIC_SUB_DEL_REQ", int(subs.GetSubId()), subReqTime, tryCount, c.handleSubscriptionDeleteRequestTimer)
+               return
        }
-*/
+
+       c.sendSubscriptionDeleteResponse("SubDelReq(timer)", trans, subs)
        return
+}
+
+func (c *Control) sendSubscriptionDeleteResponse(desc string, trans *Transaction, subs *Subscription) {
+
+       if trans.ForwardRespToXapp == true {
+               //Always generate SubDelResp
+               trans.SubDelRespMsg = &e2ap.E2APSubscriptionDeleteResponse{}
+               trans.SubDelRespMsg.RequestId.Id = trans.SubDelReqMsg.RequestId.Id
+               trans.SubDelRespMsg.RequestId.Seq = uint32(subs.GetSubId())
+               trans.SubDelRespMsg.FunctionId = trans.SubDelReqMsg.FunctionId
+
+               var err error
+               trans.Mtype, trans.Payload, err = c.e2ap.PackSubscriptionDeleteResponse(trans.SubDelRespMsg)
+               if err == nil {
+                       c.rmrReplyToSender(desc+": SubDelResp to xapp", subs, trans)
+                       time.Sleep(3 * time.Second)
+               } else {
+                       //TODO error handling improvement
+                       xapp.Logger.Error("%s: %s for trans %s (continuing cleaning)", desc, err.Error(), trans)
+               }
        }
+
+       trans.Release()
+       subs.Release()
+}