X-Git-Url: http://git.lttng.org./?a=blobdiff_plain;f=genevent%2Fgenevent.c;h=b809a8301197e63b03ecd03dc30a7ae6d8a07f16;hb=6b18b6206e1ca859687af3efea2381f8068a8380;hp=2363660eebe595586048fbfabcd8975bdda41d18;hpb=5e07c65f6093f65aa2598d90cea05d1aecf0af42;p=lttv.git diff --git a/genevent/genevent.c b/genevent/genevent.c index 2363660e..b809a830 100644 --- a/genevent/genevent.c +++ b/genevent/genevent.c @@ -45,19 +45,27 @@ This program is distributed in the hope that it will be useful, #include "parser.h" #include "genevent.h" +#define max(a,b) ((a)<(b))?(b):(a) + /* Named types may be referenced from anywhere */ -facility * fac; +facility_t * fac; + +unsigned alignment = 0; int main(int argc, char** argv) { char *token; - parse_file in; + parse_file_t in; char buffer[BUFFER_SIZE]; int i; if(argc < 2){ printf("At least one event definition file is needed\n"); + printf("You may specify the default alignment for a facility with\n"); + printf(" -a x , where x is the desired alignment in bytes.\n"); + printf("The alignment value will affect all the following xml files.\n"); + printf("i.e. genevent -a 8 core.xml -a 4 kernel.xml is valid.\n"); exit(1); } @@ -65,52 +73,61 @@ int main(int argc, char** argv) in.error = error_callback; for(i = 1 ; i < argc ; i++) { - in.lineno = 0; - in.name = allocAndCopy(argv[i]); - - in.fp = fopen(in.name, "r"); - if(!in.fp ){ - in.error(&in,"cannot open facility input file"); - } - while(1){ - token = getToken(&in); - if(in.type == ENDFILE) break; + if(strcmp("-a", argv[i])==0) { + if(i >= argc-1) { + printf("Error : missing argument to -a\n"); + exit(1); + } else i++; + alignment = atoi(argv[i]); + } else { + + in.lineno = 0; + in.name = allocAndCopy(argv[i]); - if(strcmp(token, "<")) in.error(&in,"not a facility file"); - token = getName(&in); - - if(strcmp("facility",token) == 0) { - fac = memAlloc(sizeof(facility)); - fac->name = NULL; - fac->description = NULL; - sequence_init(&(fac->events)); - table_init(&(fac->named_types)); - sequence_init(&(fac->unnamed_types)); - - parseFacility(&in, fac); - - //check if any namedType is not defined - checkNamedTypesImplemented(&fac->named_types); - } - else in.error(&in,"facility token was expected"); - - generateFile(argv[i]); - - free(fac->name); - free(fac->description); - freeEvents(&fac->events); - sequence_dispose(&fac->events); - freeNamedType(&fac->named_types); - table_dispose(&fac->named_types); - freeTypes(&fac->unnamed_types); - sequence_dispose(&fac->unnamed_types); - free(fac); - } + in.fp = fopen(in.name, "r"); + if(!in.fp ){ + in.error(&in,"cannot open facility input file"); + } - free(in.name); - fclose(in.fp); + while(1){ + token = getToken(&in); + if(in.type == ENDFILE) break; + + if(strcmp(token, "<")) in.error(&in,"not a facility file"); + token = getName(&in); + + if(strcmp("facility",token) == 0) { + fac = memAlloc(sizeof(facility_t)); + fac->name = NULL; + fac->description = NULL; + sequence_init(&(fac->events)); + table_init(&(fac->named_types)); + sequence_init(&(fac->unnamed_types)); + + parseFacility(&in, fac); + + //check if any namedType is not defined + checkNamedTypesImplemented(&fac->named_types); + } + else in.error(&in,"facility token was expected"); + + generateFile(argv[i]); + + free(fac->name); + free(fac->description); + freeEvents(&fac->events); + sequence_dispose(&fac->events); + freeNamedType(&fac->named_types); + table_dispose(&fac->named_types); + freeTypes(&fac->unnamed_types); + sequence_dispose(&fac->unnamed_types); + free(fac); + } + free(in.name); + fclose(in.fp); + } } return 0; } @@ -122,7 +139,8 @@ int main(int argc, char** argv) *Input Params * name : name of event definition file ****************************************************************************/ -void generateFile(char *name){ +void generateFile(char *name) +{ char *loadName, *hName, *hIdName, *cName, *tmp, *tmp2; FILE * lFp, *hFp, *iFp, *cFp; int nbEvent; @@ -228,7 +246,8 @@ void generateFile(char *name){ *Output Params * nbEvent : number of events in the facility ****************************************************************************/ -void generateEnumEvent(FILE *fp, char *facName, int * nbEvent, unsigned long checksum) { +void generateEnumEvent(FILE *fp, char *facName, int * nbEvent, + unsigned long checksum) { int pos = 0; fprintf(fp,"#include \n\n"); @@ -241,7 +260,7 @@ void generateEnumEvent(FILE *fp, char *facName, int * nbEvent, unsigned long che fprintf(fp,"enum %s_event {\n",facName); for(pos = 0; pos < fac->events.position;pos++) { - fprintf(fp,"\tevent_%s", ((event *)(fac->events.array[pos]))->name); + fprintf(fp,"\tevent_%s", ((event_t *)(fac->events.array[pos]))->name); if(pos != fac->events.position-1) fprintf(fp,",\n"); } fprintf(fp,"\n};\n\n\n"); @@ -269,26 +288,22 @@ void generateEnumEvent(FILE *fp, char *facName, int * nbEvent, unsigned long che static void printStruct(FILE * fp, int len, void ** array, char * name, char * facName, int * whichTypeFirst, int * hasStrSeq, int * structCount, - type_descriptor *type) + type_descriptor_t *type) { int flag = 0; int pos; - field * fld; - type_descriptor * td; + field_t * fld; + type_descriptor_t * td; for (pos = 0; pos < len; pos++) { - fld = (field *)array[pos]; + fld = (field_t *)array[pos]; td = fld->type; if( td->type == STRING || td->type == SEQUENCE || td->type == ARRAY) { (*hasStrSeq)++; - } -// if (*whichTypeFirst == 0) { -// *whichTypeFirst = 1; //struct first -// } + } else { if (flag == 0) { flag = 1; - fprintf(fp,"struct %s_%s",name, facName); if (structCount) { fprintf(fp, "_%d {\n",++*structCount); @@ -298,31 +313,21 @@ printStruct(FILE * fp, int len, void ** array, char * name, char * facName, } fprintf(fp, "\t%s %s; /* %s */\n", getTypeStr(td),fld->name,fld->description ); -#if 0 - } else { - if (*whichTypeFirst == 0) { - //string or sequence or array first - *whichTypeFirst = 2; - } - (*hasStrSeq)++; - if(flag) { - fprintf(fp,"} __attribute__ ((packed));\n\n"); - } - flag = 0; } -#endif //0 } if(flag) { - if(type->alignment == 0) + unsigned align = max(alignment, type->alignment); + + if(align == 0) fprintf(fp,"} __attribute__ ((packed));\n\n"); else { - if(type->alignment != 1 && type->alignment != 2 - && type->alignment != 4 && type->alignment != 8) { - printf("Wrong alignment %i, using packed.\n", type->alignment); + if(align != 1 && align != 2 + && align != 4 && align != 8) { + printf("Wrong alignment %i, using packed.\n", align); fprintf(fp,"} __attribute__ ((packed));\n\n"); } else - fprintf(fp,"} __attribute__ ((aligned(%i)));\n\n", type->alignment); + fprintf(fp,"} __attribute__ ((aligned(%i)));\n\n", align); } } } @@ -366,7 +371,7 @@ generateTypeDefs(FILE * fp, char *facName) * fp : file to be written to * fHead : enum type ****************************************************************************/ -void generateEnumDefinition(FILE * fp, type_descriptor * type){ +void generateEnumDefinition(FILE * fp, type_descriptor_t * type){ int pos; if(type->already_printed) return; @@ -393,14 +398,15 @@ void generateEnumDefinition(FILE * fp, type_descriptor * type){ * facName : name of facility ****************************************************************************/ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ - event * ev; - field * fld; - type_descriptor * td; + event_t * ev; + field_t * fld; + type_descriptor_t * td; int pos, pos1; int hasStrSeq, flag, structCount, seqCount,strCount, whichTypeFirst=0; + int args_empty; for(pos = 0; pos < fac->events.position; pos++){ - ev = (event *) fac->events.array[pos]; + ev = (event_t *) fac->events.array[pos]; //yxx if(ev->nested)continue; fprintf(fp,"/**** structure and trace function for event: %s ****/\n\n", ev->name); @@ -417,7 +423,7 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ //twice. if(ev->type != 0) for(pos1 = 0; pos1 < ev->type->fields.position; pos1++){ - fld = (field *)ev->type->fields.array[pos1]; + fld = (field_t *)ev->type->fields.array[pos1]; if(fld->type->type == ENUM) generateEnumDefinition(fp, fld->type); } @@ -438,23 +444,46 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ strCount = 0; fprintf(fp, "#ifndef CONFIG_LTT\n"); fprintf(fp,"static inline void trace_%s_%s(",facName,ev->name); - if(ev->type == 0) - fprintf(fp, "void"); - else + + args_empty = 1; + + /* Does it support per trace tracing ? */ + if(ev->per_trace) { + fprintf(fp, "struct ltt_trace_struct *dest_trace"); + args_empty = 0; + } + + /* Does it support per tracefile tracing ? */ + if(ev->per_tracefile) { + if(!args_empty) fprintf(fp, ", "); + fprintf(fp, "unsigned int tracefile_index"); + args_empty = 0; + } + + if(ev->type != 0) { for(pos1 = 0; pos1 < ev->type->fields.position; pos1++){ - fld = (field *)ev->type->fields.array[pos1]; + fld = (field_t *)ev->type->fields.array[pos1]; td = fld->type; + if(!args_empty) fprintf(fp, ", "); if(td->type == ARRAY ){ fprintf(fp,"%s * %s",getTypeStr(td), fld->name); + args_empty = 0; }else if(td->type == STRING){ fprintf(fp,"short int strlength_%d, %s * %s", ++strCount, getTypeStr(td), fld->name); - }else if(td->type == SEQUENCE){ + args_empty = 0; + }else if(td->type == SEQUENCE){ fprintf(fp,"%s seqlength_%d, %s * %s", uintOutputTypes[td->size], ++seqCount,getTypeStr(td), fld->name); - }else fprintf(fp,"%s %s",getTypeStr(td), fld->name); - if(pos1 != ev->type->fields.position - 1) fprintf(fp,", "); + args_empty = 0; + }else { + fprintf(fp,"%s %s",getTypeStr(td), fld->name); + args_empty = 0; + } } + } + if(args_empty) fprintf(fp, "void"); + fprintf(fp,")\n{\n"); fprintf(fp,"}\n"); fprintf(fp,"#else\n"); @@ -463,44 +492,63 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ seqCount = 0; strCount = 0; fprintf(fp,"static inline void trace_%s_%s(",facName,ev->name); - if(ev->type == 0) - fprintf(fp, "void"); - else + + args_empty = 1; + + /* Does it support per trace tracing ? */ + if(ev->per_trace) { + fprintf(fp, "struct ltt_trace_struct *dest_trace"); + args_empty = 0; + } + + /* Does it support per tracefile tracing ? */ + if(ev->per_tracefile) { + if(!args_empty) fprintf(fp, ", "); + fprintf(fp, "unsigned int tracefile_index"); + args_empty = 0; + } + + if(ev->type != 0) { for(pos1 = 0; pos1 < ev->type->fields.position; pos1++){ - fld = (field *)ev->type->fields.array[pos1]; + fld = (field_t *)ev->type->fields.array[pos1]; td = fld->type; + if(!args_empty) fprintf(fp, ", "); if(td->type == ARRAY ){ fprintf(fp,"%s * %s",getTypeStr(td), fld->name); + args_empty = 0; }else if(td->type == STRING){ fprintf(fp,"short int strlength_%d, %s * %s", ++strCount, getTypeStr(td), fld->name); - }else if(td->type == SEQUENCE){ + args_empty = 0; + }else if(td->type == SEQUENCE){ fprintf(fp,"%s seqlength_%d, %s * %s", uintOutputTypes[td->size], ++seqCount,getTypeStr(td), fld->name); - }else fprintf(fp,"%s %s",getTypeStr(td), fld->name); - if(pos1 != ev->type->fields.position - 1) fprintf(fp,", "); + args_empty = 0; + }else { + fprintf(fp,"%s %s",getTypeStr(td), fld->name); + args_empty = 0; + } } - fprintf(fp,")\n{\n"); - + } + if(args_empty) fprintf(fp, "void"); + fprintf(fp,")\n{\n"); //allocate buffer // MD no more need. fprintf(fp,"\tchar buff[buflength];\n"); // write directly to the channel - fprintf(fp, "\tint length;\n"); fprintf(fp, "\tunsigned int index;\n"); fprintf(fp, "\tstruct ltt_channel_struct *channel;\n"); fprintf(fp, "\tstruct ltt_trace_struct *trace;\n"); - fprintf(fp, "\tunsigned long _flags;\n"); fprintf(fp, "\tvoid *buff;\n"); - fprintf(fp, "\tvoid *old_address;\n"); - fprintf(fp, "\tunsigned int header_length;\n"); - fprintf(fp, "\tunsigned int event_length;\n"); - fprintf(fp, "\tunsigned char _offset;\n"); - fprintf(fp, "\tunsigned char length_offset;\n"); + fprintf(fp, "\tunsigned int slot_size;\n"); // total size (incl hdr) + fprintf(fp, "\tunsigned int data_size;\n"); // Size of the event var data. + fprintf(fp, "\tunsigned int before_hdr_pad;\n");// Dynamic padding before event header + fprintf(fp, "\tunsigned int after_hdr_pad;\n"); // Dynamic padding after event header fprintf(fp, "\tstruct rchan_buf *buf;\n"); fprintf(fp, "\tstruct timeval delta;\n"); fprintf(fp, "\tu64 tsc;\n"); + fprintf(fp, "\tchar *ptr;\n"); if(ev->type != 0) fprintf(fp, "\tstruct %s_%s_1* __1;\n\n", ev->name, facName); @@ -511,56 +559,19 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ * just won't iterate on any trace). */ fprintf(fp, "\tif(ltt_traces.num_active_traces == 0) return;\n\n"); - - fprintf(fp, "\t/* Disable interrupts. */\n"); - fprintf(fp, "\tlocal_irq_save(_flags);\n"); - fprintf(fp, "\tpreempt_disable();\n\n"); - - fprintf(fp, "\tltt_nesting[smp_processor_id()]++;\n"); - fprintf(fp, "\tbarrier();\n"); - fprintf(fp, "\tif(ltt_nesting[smp_processor_id()] > 1) goto unlock;\n"); - fprintf(fp, "\tspin_lock(<t_traces.locks[smp_processor_id()]);\n\n"); - fprintf(fp, - "\tindex = ltt_get_index_from_facility(ltt_facility_%s_%X,\n"\ - "\t\t\t\tevent_%s);\n", - facName, checksum, ev->name); - fprintf(fp,"\n"); - - /* For each trace */ - fprintf(fp, "\tlist_for_each_entry(trace, <t_traces.head, list) {\n"); - fprintf(fp, "\t\tif(!trace->active) continue;\n\n"); - - //length of buffer : length of all structures - fprintf(fp,"\t\tlength = 0;\n"); - fprintf(fp,"\t\tlength_offset = 0;\n"); - // if(ev->type == 0) fprintf(fp, "0"); - - fprintf(fp, "\t\tchannel = ltt_get_channel_from_index(trace, index);\n"); - fprintf(fp, "\t\tbuf = channel->rchan->buf[smp_processor_id()];\n"); - fprintf(fp, "\n"); - /* Warning : not atomic reservation : event size depends on the current - * address for alignment */ - /* NOTE : using cmpxchg in reserve with repeat for atomicity */ - // Replaces _offset - fprintf(fp, "\t\tdo {\n"); - fprintf(fp, "\t\t\told_address = buf->data + buf->offset;\n"); - fprintf(fp, "\t\t\theader_length = ltt_get_event_header_data(trace, " - "channel,\n" - "\t\t\t\t\t\t\t\t\t\told_address, &_offset, &delta, &tsc);\n"); - - if(ev->type != 0) - fprintf(fp, "\t\t\tchar *ptr = (char*)old_address + " - "_offset + header_length;\n"); + /* Calculate event variable len + event alignment offset. + * Assume that the padding for alignment starts at a void* + * address. */ + fprintf(fp, "\t\tdata_size = 0;\n"); for(pos1=0;pos1type->alignment > 1) { - fprintf(fp,"\t\t\tlength_offset+=(%u - ((unsigned int)ptr&(%u-1)))&(%u-1) ;\n", - ev->type->alignment, ev->type->alignment, ev->type->alignment); + if(ev->type->alignment > 1) { + fprintf(fp,"\t\t\tdata_size += ltt_align(data_size, %u);\n", + ev->type->alignment); } - fprintf(fp,"\t\t\tlength+=sizeof(struct %s_%s_%d);\n",ev->name, - facName,pos1+1); + fprintf(fp,"\t\t\tdata_size += sizeof(struct %s_%s_%d);\n", + ev->name,facName,pos1+1); // if(pos1 != structCount-1) fprintf(fp," + "); } @@ -570,74 +581,124 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ flag = 0; if(ev->type != 0) for(pos1 = 0; pos1 < ev->type->fields.position; pos1++){ - fld = (field *)ev->type->fields.array[pos1]; + fld = (field_t *)ev->type->fields.array[pos1]; td = fld->type; if(td->type == SEQUENCE || td->type==STRING || td->type==ARRAY){ if(td->type == SEQUENCE) { - if(td->alignment > 1) { - fprintf(fp,"\t\t\tlength_offset+=(%u - ((unsigned int)ptr&(%u-1)))&(%u-1)) ;\n", - td->alignment, td->alignment, td->alignment); - } - fprintf(fp, - "\t\t\tlength+=sizeof(%s) + (sizeof(%s) * seqlength_%d);\n", - uintOutputTypes[td->size], getTypeStr(td), ++seqCount); + + if(td->alignment > 1) { + fprintf(fp,"\t\t\tdata_size += ltt_align(data_size, %u);\n", + td->alignment); + } + fprintf(fp,"\t\t\tdata_size += sizeof(%s);\n", + uintOutputTypes[td->size]); + + if(td->alignment > 1) { + fprintf(fp,"\t\tdata_size += ltt_align(data_size, %u);\n", + td->alignment); + } + fprintf(fp,"\t\tdata_size += sizeof(%s) * seqlength_%d;\n", + getTypeStr(td), seqCount); + } else if(td->type==STRING) { if(td->alignment > 1) { - fprintf(fp,"\t\t\tlength_offset+=(%u - ((unsigned int)ptr&(%u-1)))&(%u-1)) ;\n", - td->alignment, td->alignment, td->alignment); + fprintf(fp,"\t\tdata_size += ltt_align(data_size, %u);\n", + td->alignment); } - fprintf(fp,"length+=strlength_%d + 1;\n", - ++strCount); + strCount++; + fprintf(fp,"\t\tdata_size += strlength_%d + 1;\n", + strCount); } else if(td->type==ARRAY) { if(td->alignment > 1) { - fprintf(fp,"\t\t\tlength_offset+=(%u - ((unsigned int)ptr&(%u-1)))&(%u-1);\n", - td->alignment, td->alignment, td->alignment); + fprintf(fp,"\t\tdata_size += ltt_align(data_size, %u);\n", + td->alignment); } - fprintf(fp,"\t\t\tlength+=sizeof(%s) * %d;\n", - getTypeStr(td),td->size); + fprintf(fp,"\t\tdata_size += sizeof(%s) * %d;\n", + getTypeStr(td), td->size); + if(structCount == 0) flag = 1; } } } - fprintf(fp,";\n"); + + /* We use preempt_disable instead of rcu_read_lock because we want to + * use preempt_enable_no_resched : the only way to be called from the + * scheduler code safely! */ + fprintf(fp, "\tpreempt_disable();\n\n"); + fprintf(fp, "\tltt_nesting[smp_processor_id()]++;\n"); + fprintf(fp, "\tif(ltt_nesting[smp_processor_id()] > 1) goto unlock;\n"); + + if(ev->per_tracefile) { + fprintf(fp, "\tindex = tracefile_index;\n"); + } else { + fprintf(fp, + "\tindex = ltt_get_index_from_facility(ltt_facility_%s_%X,\n"\ + "\t\t\t\tevent_%s);\n", + facName, checksum, ev->name); + } + fprintf(fp,"\n"); - fprintf(fp, "\t\t\tevent_length = _offset + header_length + " - "length_offset + length;\n"); + /* For each trace */ + fprintf(fp, "\tlist_for_each_entry_rcu(trace, <t_traces.head, list) {\n"); + fprintf(fp, "\t\tif(!trace->active) continue;\n\n"); - fprintf(fp, "\t\t\tbuff = relay_reserve(channel->rchan, event_length, " - "old_address);\n"); - fprintf(fp, "\n"); - fprintf(fp, "\t\t} while(PTR_ERR(buff) == -EAGAIN);\n"); + if(ev->per_trace) { + fprintf(fp, "\t\tif(dest_trace != trace) continue;\n\n"); + } + //length of buffer : length of all structures + // if(ev->type == 0) fprintf(fp, "0"); + + fprintf(fp, "\t\tchannel = ltt_get_channel_from_index(trace, index);\n"); + fprintf(fp, "\t\tbuf = channel->rchan->buf[smp_processor_id()];\n"); fprintf(fp, "\n"); - - /* Reserve the channel */ - //fprintf(fp, "\t\tbuff = relay_reserve(channel->rchan, event_length);\n"); - fprintf(fp, "\t\tif(buff == NULL) {\n"); - fprintf(fp, "\t\t\t/* Buffer is full*/\n"); - fprintf(fp, "\t\t\t/* for debug BUG(); */\n"); // DEBUG! - fprintf(fp, "\t\t\tchannel->events_lost[smp_processor_id()]++;\n"); - fprintf(fp, "\t\t\tbreak;\n"); /* don't commit a NULL reservation! */ - fprintf(fp, "\t\t}\n"); - - /* DEBUG */ - //fprintf(fp, "\t\tif(resret == 1) {\n"); - //fprintf(fp, "printk(\"f%%lu e\%%u \", ltt_facility_%s_%X, event_%s);", - // facName, checksum, ev->name); - //fprintf(fp, "\t\t}\n"); + + /* Relay reserve */ + fprintf(fp, "\t\tslot_size = 0;\n"); + fprintf(fp, "\t\tbuff = ltt_reserve_slot(trace, buf, event_length, &slot_size, &tsc,\n" + "\t\t&before_hdr_pad, &after_hdr_pad);\n"); + /* If error, return */ + fprintf(fp, "if(!buff) return;\n"); + + /* write data */ /* Write the header */ + /* FIXME : delta is not set ! */ fprintf(fp, "\n"); fprintf(fp, "\t\tltt_write_event_header(trace, channel, buff, \n" - "\t\t\t\tltt_facility_%s_%X, event_%s, length, _offset);\n", + "\t\t\t\tltt_facility_%s_%X, event_%s, data_size, before_hdr_pad,\n" + "\t\t\t\t&delta, &tsc);\n", facName, checksum, ev->name); fprintf(fp, "\n"); - if(ev->type != 0) - fprintf(fp, "\t\tchar *ptr = (char*)buff + _offset + header_length;\n"); + if(ev->type != 0) { + fprintf(fp,"\t\tptr = (char*)buff + before_hdr_pad + header_length + after_hdr_pad;\n"); + + /* Write structures */ + for(pos1=0;pos1type->alignment > 1) { + fprintf(fp,"\t\tptr += ltt_align((unsigned long)ptr, %u);\n", + ev->type->alignment); + } + fprintf(fp,"\t\t__%d = (struct %s_%s_%d *)(ptr);\n", + pos1+1, ev->name,facName,pos1+1); + + fprintf(fp,"\t\t/* initialize structs */\n"); + + for(pos1 = 0; pos1 < ev->type->fields.position; pos1++){ + fld = (field_t *)ev->type->fields.array[pos1]; + td = fld->type; + if(td->type != ARRAY && td->type != SEQUENCE && td->type != STRING){ + fprintf(fp, "\t\t__%d->%s = %s;\n", pos1+1, fld->name, fld->name); + } + } + if(structCount) fprintf(fp,"\n"); + } + + } + - //declare a char pointer if needed : starts at the end of the structs. //if(structCount + hasStrSeq > 1) { // fprintf(fp,"\t\tchar * ptr = (char*)buff + header_length"); @@ -650,9 +711,11 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ // Declare an alias pointer of the struct type to the beginning // of the reserved area, just after the event header. if(ev->type != 0) { - if(ev->type->alignment > 1) { + + unsigned align = max(alignment, td->alignment); + if(align > 1) { fprintf(fp,"\t\tptr+=(%u - ((unsigned int)ptr&(%u-1)))&(%u-1);\n", - ev->type->alignment, ev->type->alignment, ev->type->alignment); + align, align, align); } fprintf(fp, "\t\t__1 = (struct %s_%s_1 *)(ptr);\n", @@ -680,7 +743,7 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ //structCount = 0; if(ev->type != 0) for(pos1 = 0; pos1 < ev->type->fields.position; pos1++){ - fld = (field *)ev->type->fields.array[pos1]; + fld = (field_t *)ev->type->fields.array[pos1]; td = fld->type; if(td->type != ARRAY && td->type != SEQUENCE && td->type != STRING){ //if(flag == 0){ @@ -698,20 +761,16 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ //else flag = 0; } if(structCount) fprintf(fp,"\n"); - //set ptr to the end of first struct if needed; - //if(structCount + hasStrSeq > 1){ - // fprintf(fp,"\n\t\t//set ptr to the end of the first struct\n"); - // fprintf(fp,"\t\tptr += sizeof(struct %s_%s_1);\n\n",ev->name, facName); - //} - //copy struct, sequence and string to buffer + + //copy sequence and string to buffer seqCount = 0; strCount = 0; flag = 0; structCount = 0; if(ev->type != 0) for(pos1 = 0; pos1 < ev->type->fields.position; pos1++){ - fld = (field *)ev->type->fields.array[pos1]; + fld = (field_t *)ev->type->fields.array[pos1]; td = fld->type; // if(td->type != STRING && td->type != SEQUENCE && td->type != ARRAY){ // if(flag == 0) structCount++; @@ -730,15 +789,16 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ flag = 0; fprintf(fp,"\t\t//copy sequence length and sequence to buffer\n"); - if(td->alignment > 1) { + unsigned align = max(alignment, td->alignment); + if(align > 1) { fprintf(fp,"\t\tptr+=(%u - ((unsigned int)ptr&(%u-1)))&(%u-1);\n", - td->alignment, td->alignment, td->alignment); + align, align, align); } fprintf(fp,"\t\t*ptr = seqlength_%d;\n",++seqCount); fprintf(fp,"\t\tptr += sizeof(%s);\n",uintOutputTypes[td->size]); - if(td->alignment > 1) { + if(align > 1) { fprintf(fp,"\t\tptr+=(%u - ((unsigned int)ptr&(%u-1)))&(%u-1);\n", - td->alignment, td->alignment, td->alignment); + align, align, align); } fprintf(fp,"\t\tmemcpy(ptr, %s, sizeof(%s) * seqlength_%d);\n", fld->name, getTypeStr(td), seqCount); @@ -749,9 +809,10 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ flag = 0; fprintf(fp,"\t\t//copy string to buffer\n"); fprintf(fp,"\t\tif(strlength_%d > 0){\n",++strCount); - if(td->alignment > 1) { + unsigned align = max(alignment, td->alignment); + if(align > 1) { fprintf(fp,"\t\tptr+=(%u - ((unsigned int)ptr&(%u-1)))&(%u-1);\n", - td->alignment, td->alignment, td->alignment); + align, align, align); } fprintf(fp,"\t\t\tmemcpy(ptr, %s, strlength_%d + 1);\n", fld->name, strCount); @@ -763,9 +824,10 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ }else if(td->type==ARRAY){ flag = 0; fprintf(fp,"\t//copy array to buffer\n"); - if(td->alignment > 1) { + unsigned align = max(alignment, td->alignment); + if(align > 1) { fprintf(fp,"\t\tptr+=(%u - ((unsigned int)ptr&(%u-1)))&(%u-1);\n", - td->alignment, td->alignment, td->alignment); + align, align, align); } fprintf(fp,"\tmemcpy(ptr, %s, sizeof(%s) * %d);\n", fld->name, getTypeStr(td), td->size); @@ -774,6 +836,55 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ } if(structCount + seqCount > 1) fprintf(fp,"\n"); + + + + /* commit */ + ltt_commit_slot(buf, buff, slot_size); + + + + +#if 0 + fprintf(fp, "\t\tdo {\n"); + fprintf(fp, "\t\t\told_offset = buf->offset;\n"); + fprintf(fp, "\t\t\tptr = (char*)buf->data + old_offset;\n"); + + + fprintf(fp, "\t\t\theader_length = ltt_get_event_header_data(trace, " + "channel,\n" + "\t\t\t\t\t\t\t\t\t\tptr, &_offset, &delta, &tsc);\n"); + + fprintf(fp, "\t\t\tptr += _offset + header_length;\n"); + + fprintf(fp, "\t\t\tbuff = relay_reserve(channel->rchan, event_length, " + "old_offset);\n"); + fprintf(fp, "\n"); + fprintf(fp, "\t\t} while(PTR_ERR(buff) == -EAGAIN);\n"); + fprintf(fp, "\n"); + + + /* Reserve the channel */ + //fprintf(fp, "\t\tbuff = relay_reserve(channel->rchan, event_length);\n"); + fprintf(fp, "\t\tif(buff == NULL) {\n"); + fprintf(fp, "\t\t\t/* Buffer is full*/\n"); + fprintf(fp, "\t\t\t/* for debug BUG(); */\n"); // DEBUG! + fprintf(fp, "\t\t\tchannel->events_lost[smp_processor_id()]++;\n"); + fprintf(fp, "\t\t\tbreak;\n"); /* don't commit a NULL reservation! */ + fprintf(fp, "\t\t}\n"); + + /* DEBUG */ + //fprintf(fp, "\t\tif(resret == 1) {\n"); + //fprintf(fp, "printk(\"f%%lu e\%%u \", ltt_facility_%s_%X, event_%s);", + // facName, checksum, ev->name); + //fprintf(fp, "\t\t}\n"); + + //set ptr to the end of first struct if needed; + //if(structCount + hasStrSeq > 1){ + // fprintf(fp,"\n\t\t//set ptr to the end of the first struct\n"); + // fprintf(fp,"\t\tptr += sizeof(struct %s_%s_1);\n\n",ev->name, facName); + //} + fprintf(fp,"\n"); fprintf(fp, "\t\t/* Commit the work */\n"); fprintf(fp, "\t\trelay_commit(channel->rchan->buf[smp_processor_id()],\n" @@ -781,20 +892,15 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ fprintf(fp, "\t\tltt_write_commit_counter(" "channel->rchan->buf[smp_processor_id()],\n" "\t\t\t\tbuff);\n"); +#endif //0 /* End of traces iteration */ fprintf(fp, "\t}\n\n"); fprintf(fp, "\n"); - // The generated preempt_check_resched is not dangerous because - // interrupts are disabled. - fprintf(fp, "\tspin_unlock(<t_traces.locks[smp_processor_id()]);\n"); fprintf(fp, "unlock:\n"); - fprintf(fp, "\tbarrier();\n"); fprintf(fp, "\tltt_nesting[smp_processor_id()]--;\n"); - fprintf(fp, "\t/* Re-enable interrupts */\n"); - fprintf(fp, "\tlocal_irq_restore(_flags);\n"); fprintf(fp, "\tpreempt_enable_no_resched();\n"); //fprintf(fp, "\tpreempt_check_resched();\n"); @@ -815,8 +921,8 @@ void generateStructFunc(FILE * fp, char * facName, unsigned long checksum){ *Return Values * char * : type string ****************************************************************************/ -char * getTypeStr(type_descriptor * td){ - type_descriptor * t ; +char * getTypeStr(type_descriptor_t * td){ + type_descriptor_t * t ; switch(td->type){ case INT: @@ -941,7 +1047,8 @@ void generateCfile(FILE * fp, char * filefacname){ fprintf(fp, "\t.name = ltt_facility_name,\n"); fprintf(fp, "\t.num_events = LTT_FACILITY_NUM_EVENTS,\n"); fprintf(fp, "\t.checksum = LTT_FACILITY_CHECKSUM,\n"); - fprintf(fp, "\t.symbol = SYMBOL_STRING(LTT_FACILITY_SYMBOL)\n"); + fprintf(fp, "\t.symbol = SYMBOL_STRING(LTT_FACILITY_SYMBOL),\n"); + fprintf(fp, "\t.alignment = %u\n", alignment); /* default alignment */ fprintf(fp, "};\n"); fprintf(fp, "\n"); fprintf(fp, "#ifndef MODULE\n"); @@ -970,7 +1077,7 @@ void generateCfile(FILE * fp, char * filefacname){ fprintf(fp, "\tprintk(KERN_INFO \"LTT : ltt-facility-%s init dynamic\\n\");\n", filefacname); fprintf(fp, "\n"); fprintf(fp, "\tLTT_FACILITY_SYMBOL = ltt_facility_dynamic_register(&facility);\n"); - fprintf(fp, "\tLTT_FACILITY_SYMBOL_CHECKSUM = LTT_FACILITY_SYMBOL;\n"); + fprintf(fp, "\tLTT_FACILITY_CHECKSUM_SYMBOL = LTT_FACILITY_SYMBOL;\n"); fprintf(fp, "\n"); fprintf(fp, "\treturn LTT_FACILITY_SYMBOL;\n"); fprintf(fp, "}\n");