#ifdef WITH_XTREPORT
#include "config.h"
#include <stdio.h>
#include <uthash.h>
#include "mosquitto_broker_internal.h"
#include "mosquitto_internal.h"
#include "net_mosq.h"
static void client_cost(FILE *fptr, struct mosquitto *context, int fn_index)
{
size_t pkt_count, pkt_bytes;
size_t cmsg_count, cmsg_bytes;
struct mosquitto__packet *pkt_tmp;
size_t tBytes;
pkt_count = 1;
pkt_bytes = context->in_packet.packet_length;
if(context->current_out_packet){
pkt_count++;
pkt_bytes += context->current_out_packet->packet_length;
}
pkt_tmp = context->out_packet;
while(pkt_tmp){
pkt_count++;
pkt_bytes += pkt_tmp->packet_length;
pkt_tmp = pkt_tmp->next;
}
cmsg_count = (size_t)context->msgs_in.msg_count;
cmsg_bytes = context->msgs_in.msg_bytes;
cmsg_count += (size_t)context->msgs_out.msg_count;
cmsg_bytes += context->msgs_out.msg_bytes;
tBytes = pkt_bytes + cmsg_bytes;
if(context->id){
tBytes += strlen(context->id);
}
fprintf(fptr, "%d %ld %lu %lu %lu %lu %d\n", fn_index,
tBytes,
pkt_count, cmsg_count,
pkt_bytes, cmsg_bytes,
context->sock == INVALID_SOCKET?0:context->sock);
}
void xtreport(void)
{
pid_t pid;
char filename[40];
FILE *fptr;
struct mosquitto *context, *ctxt_tmp;
int fn_index = 2;
static int iter = 1;
pid = getpid();
snprintf(filename, 40, "/tmp/xtmosquitto.kcg.%d.%d", pid, iter);
iter++;
fptr = fopen(filename, "wt");
if(fptr == NULL) return;
fprintf(fptr, "# callgrind format\n");
fprintf(fptr, "version: 1\n");
fprintf(fptr, "creator: mosquitto\n");
fprintf(fptr, "pid: %d\n", pid);
fprintf(fptr, "cmd: mosquitto\n\n");
fprintf(fptr, "positions: line\n");
fprintf(fptr, "event: tB : total bytes\n");
fprintf(fptr, "event: pkt : currently queued packets\n");
fprintf(fptr, "event: cmsg : currently pending client messages\n");
fprintf(fptr, "event: pktB : currently queued packet bytes\n");
fprintf(fptr, "event: cmsgB : currently pending client message bytes\n");
fprintf(fptr, "events: tB pkt cmsg pktB cmsgB sock\n");
fprintf(fptr, "fn=(1) clients\n");
fprintf(fptr, "1 0 0 0 0 0 0\n");
fn_index = 2;
HASH_ITER(hh_id, db.contexts_by_id, context, ctxt_tmp){
if(context->id){
fprintf(fptr, "cfn=(%d) %s\n", fn_index, context->id);
}else{
fprintf(fptr, "cfn=(%d) unknown\n", fn_index);
}
fprintf(fptr, "calls=1 %d\n", fn_index);
client_cost(fptr, context, fn_index);
fn_index++;
}
fn_index = 2;
HASH_ITER(hh_id, db.contexts_by_id, context, ctxt_tmp){
fprintf(fptr, "fn=(%d)\n", fn_index);
client_cost(fptr, context, fn_index);
fn_index++;
}
fclose(fptr);
}
#endif