* the array. */
if((basename_len != 0)
&& (basename[basename_len-1] != '_'
+ && field_name != NULL
&& (field_name[0] != '\0'))) {
strncat(basename, "_", PATH_MAX - basename_len);
basename_len = strlen(basename);
}
- strncat(basename, field_name, PATH_MAX - basename_len);
+ if(field_name != NULL)
+ strncat(basename, field_name, PATH_MAX - basename_len);
}
switch(td->type) {
if(print_type(td, fd, 0, basename, "")) return 1;
fprintf(fd, ");\n");
print_tabs(tabs, fd);
- fprintf(fd, "size += ltt_align(*to+*len, size) + size;");
+ fprintf(fd, "size += ltt_align(*to+*len, size) + size;\n");
print_tabs(tabs, fd);
fprintf(fd, "*len += size;");
break;
break;
case SEQUENCE:
print_tabs(tabs, fd);
- fprintf(fd, "lttng_write_%s(buffer, to_base, to, from, len, obj->%s)", basename,
+ fprintf(fd, "lttng_write_%s(buffer, to_base, to, from, len, &obj->%s)", basename,
field_name);
break;
case STRUCT:
print_tabs(tabs, fd);
- fprintf(fd, "lttng_write_struct_%s(buffer, to_base, to, from, len, obj->%s)", basename,
+ fprintf(fd, "lttng_write_struct_%s(buffer, to_base, to, from, len, &obj->%s)", basename,
field_name);
break;
case UNION:
print_tabs(tabs, fd);
- fprintf(fd, "lttng_write_union_%s(buffer, to_base, to, from, len, obj->%s)", basename,
+ fprintf(fd, "lttng_write_union_%s(buffer, to_base, to, from, len, &obj->%s)", basename,
field_name);
break;
case ARRAY:
break;
default:
printf("print_type_alignment_fct : type has no alignment function.\n");
+ return 0;
break;
}
strncat(basename, field_name, PATH_MAX - basename_len);
}
+ switch(td->type) {
+ case SEQUENCE:
+ case STRUCT:
+ case UNION:
+ case ARRAY:
+ break;
+ default:
+ printf("print_type_write_fct : type has no write function.\n");
+ return 0;
+ break;
+ }
+
/* Print header */
switch(td->type) {
case SEQUENCE:
- fprintf(fd, "static inline size_t lttng_get_alignment_sequence_%s(\n",
+ fprintf(fd, "static inline void lttng_write_sequence_%s(\n",
basename);
-
- fprintf(fd, "lttng_get_alignment_sequence_%s(&obj->%s)", basename,
- field_name);
break;
case STRUCT:
- fprintf(fd, "lttng_get_alignment_struct_%s(&obj->%s)", basename,
- field_name);
+ fprintf(fd, "static inline void lttng_write_struct_%s(\n", basename);
break;
case UNION:
- fprintf(fd, "lttng_get_alignment_union_%s(&obj->%s)", basename,
- field_name);
+ fprintf(fd, "static inline void lttng_write_union_%s(\n", basename);
break;
case ARRAY:
- fprintf(fd, "lttng_get_alignment_array_%s(obj->%s)", basename,
- field_name);
+ fprintf(fd, "static inline void lttng_write_array_%s(\n", basename);
break;
default:
printf("print_type_write_fct : type has no write function.\n");
}
print_tabs(1, fd);
- fprintf(fd, "align = \n");
+ fprintf(fd, "align = ");
if(print_type_alignment(td, fd, 0, basename, field_name)) return 1;
fprintf(fd, ";\n");
fprintf(fd, "\n");
fprintf(fd, "void *from;");
print_tabs(1, fd);
fprintf(fd, "size_t len = 0;\n");
- fprintf(fd, "\n");
+ print_tabs(1, fd);
+ fprintf(fd, "size_t reserve_size;\n");
+ print_tabs(1, fd);
fprintf(fd, "size_t slot_size;\n");
- fprintf(fd, "\n");
+ print_tabs(1, fd);
fprintf(fd, "cycles_t tsc;\n");
- fprintf(fd, "\n");
+ print_tabs(1, fd);
fprintf(fd, "size_t before_hdr_pad, size_t after_hdr_pad;\n");
fprintf(fd, "\n");
print_tabs(1, fd);
fprintf(fd, "/* size = to_base + to + len */\n");
print_tabs(1, fd);
- fprintf(fd, "/* Assume that the padding for alignment starts at a void*\n");
+ fprintf(fd, "/* Assume that the padding for alignment starts at a\n");
print_tabs(1, fd);
- fprintf(fd, "/* address. */\n");
+ fprintf(fd, " * sizeof(void *) address. */\n");
fprintf(fd, "\n");
for(unsigned int i=0;i<event->fields.position;i++){
fd, 1, basename, field->name)) return 1;
fprintf(fd, "\n");
}
+ print_tabs(1, fd);
+ fprintf(fd, "reserve_size = to_base + to + len;\n");
+ print_tabs(1, fd);
+ fprintf(fd, "to_base = to = len = 0;\n");
+ fprintf(fd, "\n");
/* Take locks : make sure the trace does not vanish while we write on
* it. A simple preemption disabling is enough (using rcu traces). */
print_tabs(1, fd);
fprintf(fd,
"index = ltt_get_index_from_facility(ltt_facility_%s_%X,\n"\
- "\t\t\t\tevent_%s);\n",
+ "\t\t\t\t\t\tevent_%s);\n",
fac->name, fac->checksum, event->name);
}
fprintf(fd,"\n");
print_tabs(2, fd);
fprintf(fd, "slot_size = 0;\n");
print_tabs(2, fd);
- fprintf(fd, "buffer = ltt_reserve_slot(trace, relayfs_buf, to_base + to + len, &slot_size, &tsc,\n"
- "\t\t&before_hdr_pad, &after_hdr_pad);\n");
+ fprintf(fd, "buffer = ltt_reserve_slot(trace, relayfs_buf,\n");
+ print_tabs(3, fd);
+ fprintf(fd, "reserve_size, &slot_size, &tsc,\n");
+ print_tabs(3, fd);
+ fprintf(fd, "&before_hdr_pad, &after_hdr_pad);\n");
/* If error, return */
print_tabs(2, fd);
fprintf(fd, "if(!buffer) return;\n\n");
type_descriptor_t *type = field->type;
/* Set from */
- print_tabs(3, fd);
- fprintf(fd, "from = %s;\n", field->name);
+ print_tabs(2, fd);
+ switch(type->type) {
+ case SEQUENCE:
+ case UNION:
+ case ARRAY:
+ case STRUCT:
+ case STRING:
+ fprintf(fd, "from = %s;\n", field->name);
+ break;
+ default:
+ fprintf(fd, "from = &%s;\n", field->name);
+ break;
+ }
+
if(print_type_write(type,
fd, 2, basename, field->name)) return 1;
/* For each named type, print the definition */
if((print_type_declaration(types->array[i], fd,
0, "", ""))) return 1;
+ /* Print also the align function */
+ if((print_type_alignment_fct(types->array[i], fd,
+ 0, "", ""))) return 1;
+ /* Print also the write function */
+ if((print_type_write_fct(types->array[i], fd,
+ 0, "", ""))) return 1;
}
return 0;
}
/* For each unnamed type, print the definition */
field_t *f = (field_t*)event->fields.array[j];
type_descriptor_t *t = f->type;
- if(t->type_name == NULL)
+ if(t->type_name == NULL) {
if((print_type_declaration(t, fd, 0, basename, f->name))) return 1;
+ /* Print also the align function */
+ if((print_type_alignment_fct(t, fd, 0, basename, f->name))) return 1;
+ /* Print also the write function */
+ if((print_type_write_fct(t, fd, 0, basename, f->name))) return 1;
+ }
}
+
fprintf(fd, "\n");
fprintf(fd, "/* Event %s logging function */\n",