%description:
Test TCPMsgBasedSendQueue::enqueueAppData()
Enqueueing 4GB, but queue capacity only 2GiB.

%includes:
#include "TCPQueueTesterFunctions.h"

%global:

using namespace ::inet::tcp;

%activity:
TCPMsgBasedSendQueue sendQueue;
TCPMsgBasedSendQueue *sq = &sendQueue;

sq->init(0);
EV << sq->info() <<"\n";

enqueue(sq, "msg1", 500000000); //          0.. 500000000
enqueue(sq, "msg2", 500000000); //  500000000..1000000000
enqueue(sq, "msg3", 500000000); // 1000000000..1500000000
enqueue(sq, "msg4", 500000000); // 1500000000..2000000000
tryenqueue(sq, "msg5", 500000000); // 2000000000..2500000000
tryenqueue(sq, "msg6", 500000000); // 2500000000..3000000000
tryenqueue(sq, "msg7", 500000000); // 3000000000..3500000000
tryenqueue(sq, "msg8", 500000000); // 3500000000..4000000000

EV << ".\n";

%contains: stdout
[0..0), 0 packets
SQ:enqueue("msg1", 500000000): --> [0..500000000), 1 packets
SQ:enqueue("msg2", 500000000): --> [0..1000000000), 2 packets
SQ:enqueue("msg3", 500000000): --> [0..1500000000), 3 packets
SQ:enqueue("msg4", 500000000): --> [0..2000000000), 4 packets
SQ:enqueue("msg5", 500000000): --> Error: Send queue is full --> [0..2500000000), 4 packets
SQ:enqueue("msg6", 500000000): --> Error: Send queue is full --> [0..3000000000), 4 packets
SQ:enqueue("msg7", 500000000): --> Error: Send queue is full --> [0..3500000000), 4 packets
SQ:enqueue("msg8", 500000000): --> Error: Send queue is full --> [0..4000000000), 4 packets
.