core-lightning/tools/gen/print_impl_template

/* This file was generated by generate-wire.py */
/* Do not modify this file! Modify the _csv file it was generated from. */

#include "${options.header_filename}"
#include <ccan/array_size/array_size.h>
#include <ccan/mem/mem.h>
#include <ccan/tal/str/str.h>
#include <common/utils.h>
#include <inttypes.h>
#include <stdio.h>

void print${options.enum_name}_message(const u8 *msg)
{
	switch ((enum ${options.enum_name})fromwire_peektype(msg)) {
% for msg in enum_sets[0]['set']:
		case ${msg.enum_name()}:
			printf("${msg.enum_name()}:\n");
			printwire_${msg.name}("${msg.name}", msg);
			return;
% endfor
	}

	printf("UNKNOWN: %s\\n", tal_hex(msg, msg));
}

## 'component' for 'truncate check 
<%def name="truncate_check(nested=False)">
	if (!${ '*' if nested else '' }cursor) {
		printf("**TRUNCATED**\n");
		return;
	}
</%def> \
## definition for printing field sets
<%def name="print_fieldset(fields, nested, cursor, plen)">
% for f in fields:
    % if f.is_extension():
	if (plen <= 0)
		return;
	printf("(${','.join(f.extension_names)}):");
    % endif
    % if f.len_field_of:
	${f.type_obj.type_name()} ${f.name} = fromwire_${f.type_obj.name}(${cursor}, ${plen});${truncate_check(nested)} <% continue %> \
    % endif	
	printf("${f.name}=");
    % if f.type_obj.is_tlv():
	printwire_tlvs(tal_fmt(NULL, "%s.${f.name}", fieldname), ${cursor}, ${plen}, print_tlvs_${f.type_obj.tlv.name}, ARRAY_SIZE(print_tlvs_${f.type_obj.tlv.name}));
    % elif f.is_array() or f.is_varlen():
	% if f.type_obj.has_array_helper():
	printwire_${f.type_obj.name}_array(tal_fmt(NULL, "%s.${f.name}", fieldname), ${cursor}, ${plen}, ${f.size()});
	% else:
	printf("[");
	for (size_t i = 0; i < ${f.size()}; i++) {
	    % if f.type_obj.is_subtype():
		printf("{\n");
		printwire_${f.type_obj.name}(tal_fmt(NULL, "%s.${f.name}", fieldname), ${cursor}, ${plen});
		printf("}\n");
	    % else:
		${f.type_obj.type_name()} v;
		% if f.type_obj.is_assignable():
		v = fromwire_${f.type_obj.name}(${cursor}, ${plen});
		% else:
		fromwire_${f.type_obj.name}(${cursor}, ${plen}, &v);
		% endif
		if (!*cursor) {
			printf("**TRUNCATED**\n");
			return;
		}
<% typename = f.type_obj.name if not f.type_obj.is_truncated() else f.type_obj.name[1:] %>\
		printwire_${typename}(tal_fmt(NULL, "%s.${f.name}", fieldname), &v);
	    % endif
	}
	printf("]");
	% endif
${truncate_check(nested)} \
    % elif f.type_obj.is_subtype():
	printf("{\n");
	printwire_${f.type_obj.name}(tal_fmt(NULL, "%s.${f.name}", fieldname), ${cursor}, ${plen});
	printf("}\n");
    % else:
	    % if f.type_obj.is_assignable():
	${f.type_obj.type_name()} ${f.name} = fromwire_${f.type_obj.name}(${cursor}, ${plen});
	    % else:
	${f.type_obj.type_name()} ${f.name};
	fromwire_${f.type_obj.name}(${cursor}, ${plen}, &${f.name});
	    % endif
	<% typename = f.type_obj.name if not f.type_obj.is_truncated() else f.type_obj.name[1:] %>
	printwire_${typename}(tal_fmt(NULL, "%s.${f.name}", fieldname), &${f.name}); ${truncate_check(nested)} \
    % endif
% endfor
</%def> \
## Definitions for 'subtypes'
% for subtype in subtypes:

<%
    static = '' if options.expose_subtypes else 'static '
%>\
${static}void printwire_${subtype.name}(const char *fieldname, const u8 **cursor, size_t *plen)
{
	${print_fieldset(subtype.fields.values(), True, 'cursor', 'plen')}
}
% endfor
% for tlv in tlvs.values():

    % for msg in tlv.messages.values():
static void printwire_${msg.struct_name()}(const char *fieldname, const u8 **cursor, size_t *plen)
{
	printf("(msg_name=%s)\n", "${msg.name}");
	${print_fieldset(msg.fields.values(), True, 'cursor', 'plen')}
}
    % endfor

static const struct tlv_print_record_type print_tlvs_${tlv.name}[] = {
    % for msg in tlv.messages.values():
	{ ${msg.number}, printwire_${msg.struct_name()} },
    % endfor
};
% endfor
% for msg in messages:
void printwire_${msg.name}(const char *fieldname, const u8 *cursor)
{

	size_t plen = tal_count(cursor);
	if (fromwire_u16(&cursor, &plen) != ${msg.enum_name()}) {
		printf("WRONG TYPE?!\n");
		return;
	}
${print_fieldset(msg.fields.values(), False, '&cursor', '&plen')}

## Length check
	if (plen != 0)
		printf("EXTRA: %s\n", tal_hexstr(NULL, cursor, plen));
}
% endfor

void print${options.enum_name}_tlv_message(const char *tlv_name, const u8 *msg) {
% if bool(tlvs):
	size_t plen;
    % for tlv_name in tlvs:
	plen = tal_count(msg);
	if (strcmp(tlv_name, "${tlv_name}") == 0) {
		printwire_tlvs(tlv_name, &msg, &plen, print_tlvs_${tlv_name}, ARRAY_SIZE(print_tlvs_${tlv_name}));
	}
    % endfor
% else:
	printf("ERR: No TLV definition found for %s\n", tlv_name);
% endif
}