124 lines
3.2 KiB
C
124 lines
3.2 KiB
C
/*
|
|
Copyright (c) 2020 Roger Light <roger@atchoo.org>
|
|
|
|
All rights reserved. This program and the accompanying materials
|
|
are made available under the terms of the Eclipse Public License v1.0
|
|
and Eclipse Distribution License v1.0 which accompany this distribution.
|
|
|
|
The Eclipse Public License is available at
|
|
http://www.eclipse.org/legal/epl-v10.html
|
|
and the Eclipse Distribution License is available at
|
|
http://www.eclipse.org/org/documents/edl-v10.php.
|
|
|
|
Contributors:
|
|
Roger Light - initial implementation and documentation.
|
|
*/
|
|
|
|
#ifdef WITH_XTREPORT
|
|
|
|
/* This file allows reporting of internal parameters to a kcachegrind
|
|
* compatible output file. It is for debugging purposes only and is most likely
|
|
* of no interest to end users.
|
|
*/
|
|
#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
|