+/* This file is part of the Linux Trace Toolkit viewer
+ * Copyright (C) 2003-2004 Xiangxiu Yang
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License Version 2 as
+ * published by the Free Software Foundation;
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
+ * MA 02111-1307, USA.
+ */
+
#include <stdio.h>
#include <fcntl.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <dirent.h>
-#include <linux/errno.h>
+#include <linux/errno.h>
+
+// For realpath
+#include <limits.h>
+#include <stdlib.h>
+
#include "parser.h"
#include <ltt/ltt.h>
#include "ltt-private.h"
#include <ltt/trace.h>
#include <ltt/facility.h>
+#include <ltt/event.h>
#define DIR_NAME_SIZE 256
int i=0;
LttSystemDescription* des = (LttSystemDescription* )user_data;
if(strcmp("system", element_name)){
- g_warning("This is not system.xml file\n");
- exit(1);
+ *error = g_error_new(G_MARKUP_ERROR,
+ G_LOG_LEVEL_WARNING,
+ "This is not system.xml file");
+ return;
}
while(attribute_names[i]){
}else if(strcmp("ltt_block_size", attribute_names[i])==0){
des->ltt_block_size = atoi(attribute_values[i]);
}else{
- g_warning("Not a valid attribute\n");
- exit(1);
+ *error = g_error_new(G_MARKUP_ERROR,
+ G_LOG_LEVEL_WARNING,
+ "Not a valid attribute");
+ return;
}
i++;
}
tf->trace = t;
tf->fd = open(fileName, O_RDONLY, 0);
if(tf->fd < 0){
- g_error("Unable to open input data file %s\n", fileName);
+ g_warning("Unable to open input data file %s\n", fileName);
+ g_free(tf->name);
+ g_free(tf);
+ return NULL;
}
// Get the file's status
if(fstat(tf->fd, &lTDFStat) < 0){
- g_error("Unable to get the status of the input data file %s\n", fileName);
+ g_warning("Unable to get the status of the input data file %s\n", fileName);
+ g_free(tf->name);
+ close(tf->fd);
+ g_free(tf);
+ return NULL;
}
// Is the file large enough to contain a trace
g_ptr_array_add(t->per_cpu_tracefiles, tf);
}
-void ltt_tracefile_open_control(LttTrace *t, char * control_name)
+gint ltt_tracefile_open_control(LttTrace *t, char * control_name)
{
LttTracefile * tf;
- LttEvent * ev;
+ LttEvent ev;
LttFacility * f;
guint16 evId;
void * pos;
int i;
tf = ltt_tracefile_open(t,control_name);
- if(!tf) return;
+ if(!tf) {
+ g_warning("ltt_tracefile_open_control : bad file descriptor");
+ return -1;
+ }
t->control_tracefile_number++;
g_ptr_array_add(t->control_tracefiles,tf);
//parse facilities tracefile to get base_id
if(strcmp(&control_name[strlen(control_name)-10],"facilities") ==0){
while(1){
- ev = ltt_tracefile_read(tf);
- if(!ev)return; // end of file
+ if(!ltt_tracefile_read(tf,&ev)) return 0; // end of file
- if(ev->event_id == TRACE_FACILITY_LOAD){
- pos = ev->data;
+ if(ev.event_id == TRACE_FACILITY_LOAD){
+ pos = ev.data;
fLoad.name = (char*)pos;
fLoad.checksum = *(LttChecksum*)(pos + strlen(fLoad.name));
fLoad.base_code = *(guint32 *)(pos + strlen(fLoad.name) + sizeof(LttChecksum));
break;
}
}
- if(i==t->facility_number)
- g_error("Facility: %s, checksum: %d is not founded\n",
+ if(i==t->facility_number) {
+ g_warning("Facility: %s, checksum: %d is not found\n",
fLoad.name,fLoad.checksum);
- }else if(ev->event_id == TRACE_BLOCK_START){
+ return -1;
+ }
+ }else if(ev.event_id == TRACE_BLOCK_START){
continue;
- }else if(ev->event_id == TRACE_BLOCK_END){
+ }else if(ev.event_id == TRACE_BLOCK_END){
break;
- }else g_error("Not valid facilities trace file\n");
+ }else {
+ g_warning("Not valid facilities trace file\n");
+ return -1;
+ }
}
}
+ return 0;
}
/*****************************************************************************
/*****************************************************************************
*Get system information
****************************************************************************/
-void getSystemInfo(LttSystemDescription* des, char * pathname)
+gint getSystemInfo(LttSystemDescription* des, char * pathname)
{
FILE * fp;
char buf[DIR_NAME_SIZE];
char description[4*DIR_NAME_SIZE];
GMarkupParseContext * context;
- GError * error;
+ GError * error = NULL;
GMarkupParser markup_parser =
{
parser_start_element,
fp = fopen(pathname,"r");
if(!fp){
- g_error("Can not open file : %s\n", pathname);
+ g_warning("Can not open file : %s\n", pathname);
+ return -1;
}
context = g_markup_parse_context_new(&markup_parser, 0, des,NULL);
while(fgets(buf,DIR_NAME_SIZE, fp) != NULL){
if(!g_markup_parse_context_parse(context, buf, DIR_NAME_SIZE, &error)){
- g_warning("Can not parse xml file: \n%s\n", error->message);
- exit(1);
+ if(error != NULL) {
+ g_warning("Can not parse xml file: \n%s\n", error->message);
+ g_error_free(error);
+ }
+ g_markup_parse_context_free(context);
+ fclose(fp);
+ return -1;
}
}
+ g_markup_parse_context_free(context);
fclose(fp);
+ return 0;
}
/*****************************************************************************
*The following functions get facility/tracefile information
****************************************************************************/
-void getFacilityInfo(LttTrace *t, char* eventdefs)
+gint getFacilityInfo(LttTrace *t, char* eventdefs)
{
DIR * dir;
struct dirent *entry;
char name[DIR_NAME_SIZE];
dir = opendir(eventdefs);
- if(!dir) g_error("Can not open directory: %s\n", eventdefs);
+ if(!dir) {
+ g_warning("Can not open directory: %s\n", eventdefs);
+ return -1;
+ }
while((entry = readdir(dir)) != NULL){
ptr = &entry->d_name[strlen(entry->d_name)-4];
setFieldsOffset(NULL, et, NULL, t);
}
}
+ return 0;
}
-void getControlFileInfo(LttTrace *t, char* control)
+gint getControlFileInfo(LttTrace *t, char* control)
{
DIR * dir;
struct dirent *entry;
char name[DIR_NAME_SIZE];
dir = opendir(control);
- if(!dir) g_error("Can not open directory: %s\n", control);
+ if(!dir) {
+ g_warning("Can not open directory: %s\n", control);
+ return -1;
+ }
while((entry = readdir(dir)) != NULL){
if(strcmp(entry->d_name,"facilities") != 0 &&
strcpy(name,control);
strcat(name,entry->d_name);
- ltt_tracefile_open_control(t,name);
+ if(ltt_tracefile_open_control(t,name))
+ return -1;
}
closedir(dir);
+ return 0;
}
-void getCpuFileInfo(LttTrace *t, char* cpu)
+gint getCpuFileInfo(LttTrace *t, char* cpu)
{
DIR * dir;
struct dirent *entry;
char name[DIR_NAME_SIZE];
dir = opendir(cpu);
- if(!dir) g_error("Can not open directory: %s\n", cpu);
+ if(!dir) {
+ g_warning("Can not open directory: %s\n", cpu);
+ return -1;
+ }
while((entry = readdir(dir)) != NULL){
if(strcmp(entry->d_name,".") != 0 &&
- strcmp(entry->d_name,"..") != 0 ){
+ strcmp(entry->d_name,"..") != 0 &&
+ strcmp(entry->d_name,".svn") != 0){
strcpy(name,cpu);
strcat(name,entry->d_name);
ltt_tracefile_open_cpu(t,name);
}else continue;
}
closedir(dir);
+ return 0;
}
/*****************************************************************************
*
*When a trace is closed, all the associated facilities, types and fields
*are released as well.
+ *
+ * MD : Fixed this function so it uses realpath, dealing well with
+ * forgotten cases (.. were not used correctly before).
+ *
****************************************************************************/
void get_absolute_pathname(const char *pathname, char * abs_pathname)
char * ptr, *ptr1;
size_t size = DIR_NAME_SIZE;
abs_pathname[0] = '\0';
- if(!getcwd(abs_pathname, size)){
- g_warning("Can not get current working directory\n");
- strcat(abs_pathname, pathname);
+
+ if ( realpath (pathname, abs_pathname) != NULL)
+ return;
+ else
+ {
+ // FIXME : Path is wrong, is it ok to return the pathname unmodified ?
+ strcpy(abs_pathname, pathname);
return;
}
- strcat(abs_pathname,"/");
+
+ return;
- ptr = (char*)pathname;
- ptr1 = ptr + 1;
- while(*ptr == '.' && *ptr1 == '.'){
- ptr += 3;
- ptr1 = ptr + 1;
- }
- strcat(abs_pathname,ptr);
}
LttTrace *ltt_trace_open(const char *pathname)
gboolean has_slash = FALSE;
get_absolute_pathname(pathname, abs_path);
-
//establish the pathname to different directories
if(abs_path[strlen(abs_path)-1] == '/')has_slash = TRUE;
strcpy(eventdefs,abs_path);
strcat(cpu,"cpu/");
//new trace
- t = g_new(LttTrace, 1);
sys_description = g_new(LttSystemDescription, 1);
+ t = g_new(LttTrace, 1);
t->pathname = g_strdup(abs_path);
t->facility_number = 0;
t->control_tracefile_number = 0;
//get system description
strcpy(tmp,info);
strcat(tmp,"system.xml");
- getSystemInfo(sys_description, tmp);
+ if(getSystemInfo(sys_description, tmp)) {
+ g_ptr_array_free(t->facilities, TRUE);
+ g_ptr_array_free(t->per_cpu_tracefiles, TRUE);
+ g_ptr_array_free(t->control_tracefiles, TRUE);
+ g_free(sys_description);
+ g_free(t->pathname);
+ g_free(t);
+ return NULL;
+ }
+
+
//get facilities info
- getFacilityInfo(t,eventdefs);
+ if(getFacilityInfo(t,eventdefs)) {
+ g_ptr_array_free(t->facilities, TRUE);
+ g_ptr_array_free(t->per_cpu_tracefiles, TRUE);
+ g_ptr_array_free(t->control_tracefiles, TRUE);
+ g_free(sys_description);
+ g_free(t->pathname);
+ g_free(t);
+ return NULL;
+ }
//get control tracefile info
getControlFileInfo(t,control);
+ /*
+ if(getControlFileInfo(t,control)) {
+ g_ptr_array_free(t->facilities, TRUE);
+ g_ptr_array_free(t->per_cpu_tracefiles, TRUE);
+ g_ptr_array_free(t->control_tracefiles, TRUE);
+ g_free(sys_description);
+ g_free(t->pathname);
+ g_free(t);
+ return NULL;
+ }*/ // With fatal error
//get cpu tracefile info
- getCpuFileInfo(t,cpu);
+ if(getCpuFileInfo(t,cpu)) {
+ g_ptr_array_free(t->facilities, TRUE);
+ g_ptr_array_free(t->per_cpu_tracefiles, TRUE);
+ g_ptr_array_free(t->control_tracefiles, TRUE);
+ g_free(sys_description);
+ g_free(t->pathname);
+ g_free(t);
+ return NULL;
+ }
return t;
}
if(ltt_time_compare(endBig,endTmp) < 0) endBig = endTmp;
}
- *start = startSmall;
- *end = endBig;
+ if(start != NULL) *start = startSmall;
+ if(end != NULL) *end = endBig;
}
LttTime lttTime;
int headTime = ltt_time_compare(t->a_block_start->time, time);
int tailTime = ltt_time_compare(t->a_block_end->time, time);
- LttEvent * ev;
+ LttEvent ev;
if(headTime < 0 && tailTime > 0){
if(ltt_time_compare(t->a_block_end->time, t->current_event_time) !=0) {
}
}else if(err < 0){
while(1){
- ev = ltt_tracefile_read(t);
- if(ev == NULL){
+ if(ltt_tracefile_read(t,&ev) == NULL) {
g_print("End of file\n");
return;
}
/*****************************************************************************
* Seek to the first event with position equal or larger to ep
+ *
+ * Modified by Mathieu Desnoyers to used faster offset position instead of
+ * re-reading the whole buffer.
****************************************************************************/
-void ltt_tracefile_seek_position(LttTracefile *t, LttEventPosition *ep)
+void ltt_tracefile_seek_position(LttTracefile *t, const LttEventPosition *ep)
{
//if we are at the right place, just return
if(t->which_block == ep->block_num && t->which_event == ep->event_num)
if(t->which_block == ep->block_num) updateTracefile(t);
else readBlock(t,ep->block_num);
-
- //event offset is availiable
+ //event offset is available
if(ep->old_position){
- t->cur_heart_beat_number = ep->heart_beat_number;
+ int err;
+
+ t->which_event = ep->event_num;
t->cur_event_pos = t->buffer + ep->event_offset;
+ t->prev_event_time = ep->event_time;
+ t->current_event_time = ep->event_time;
+ t->cur_heart_beat_number = ep->heart_beat_number;
+ t->cur_cycle_count = ep->event_cycle_count;
+
+ /* This is a workaround for fast position seek */
+ t->last_event_pos = ep->last_event_pos;
+ t->prev_block_end_time = ep->prev_block_end_time;
+ t->prev_event_time = ep->prev_event_time;
+ t->pre_cycle_count = ep->pre_cycle_count;
+ t->count = ep->count;
+ /* end of workaround */
+
+ //update the fields of the current event and go to the next event
+ err = skipEvent(t);
+ if(err == ERANGE) g_error("event id is out of range\n");
+
return;
}
- //only block number and event index are availiable
- while(t->which_event < ep->event_num) ltt_tracefile_read(t);
+ //only block number and event index are available
+ //MD: warning : this is slow!
+ g_warning("using slow O(n) tracefile seek position");
+
+ LttEvent event;
+ while(t->which_event < ep->event_num) ltt_tracefile_read(t, &event);
return;
}
* LttEvent * : an event to be processed
****************************************************************************/
-LttEvent *ltt_tracefile_read(LttTracefile *t)
+LttEvent *ltt_tracefile_read(LttTracefile *t, LttEvent *event)
{
- LttEvent * lttEvent = &t->an_event;
int err;
if(t->cur_event_pos == t->buffer + t->block_size){
if(err)g_error("Can not read tracefile");
}
- lttEvent->event_id = (int)(*(guint16 *)(t->cur_event_pos));
- if(lttEvent->event_id == TRACE_TIME_HEARTBEAT)
+ event->event_id = (int)(*(guint16 *)(t->cur_event_pos));
+ if(event->event_id == TRACE_TIME_HEARTBEAT)
t->cur_heart_beat_number++;
t->prev_event_time = t->current_event_time;
// t->current_event_time = getEventTime(t);
- lttEvent->time_delta = *(guint32 *)(t->cur_event_pos + EVENT_ID_SIZE);
- lttEvent->event_time = t->current_event_time;
+ event->time_delta = *(guint32 *)(t->cur_event_pos + EVENT_ID_SIZE);
+ event->event_time = t->current_event_time;
+ event->event_cycle_count = t->cur_cycle_count;
+
+ event->tracefile = t;
+ event->data = t->cur_event_pos + EVENT_HEADER_SIZE;
+ event->which_block = t->which_block;
+ event->which_event = t->which_event;
+
+ /* This is a workaround for fast position seek */
+ event->last_event_pos = t->last_event_pos;
+ event->prev_block_end_time = t->prev_block_end_time;
+ event->prev_event_time = t->prev_event_time;
+ event->pre_cycle_count = t->pre_cycle_count;
+ event->count = t->count;
+ /* end of workaround */
+
- lttEvent->tracefile = t;
- lttEvent->data = t->cur_event_pos + EVENT_HEADER_SIZE;
- lttEvent->which_block = t->which_block;
- lttEvent->which_event = t->which_event;
//update the fields of the current event and go to the next event
err = skipEvent(t);
if(err == ERANGE) g_error("event id is out of range\n");
- lttEvent->event_cycle_count = t->cur_cycle_count;
-
- return lttEvent;
+ return event;
}
/****************************************************************************
return 0;
}
+
/*****************************************************************************
*Function name
* getCyclePerNsec : calculate cycles per nsec for current block
LttTime time;
LttCycleCount cycle_count; // cycle count for the current event
LttCycleCount lEventTotalCycle; // Total cycles from start for event
- double lEventNSec; // Total usecs from start for event
+ LttCycleCount lEventNSec; // Total usecs from start for event
LttTime lTimeOffset; // Time offset in struct LttTime
guint16 evId;
- gint64 nanoSec, tmpCycleCount = (((guint64)1)<<32);
+ LttCycleCount tmpCycleCount = (((LttCycleCount)1)<<32);
evId = *(guint16 *)tf->cur_event_pos;
if(evId == TRACE_BLOCK_START){
tf->pre_cycle_count = cycle_count;
cycle_count += tmpCycleCount * tf->count;
- if(tf->cur_heart_beat_number > tf->count)
- cycle_count += tmpCycleCount * (tf->cur_heart_beat_number - tf->count);
+ // if(tf->cur_heart_beat_number > tf->count)
+ // cycle_count += tmpCycleCount * (tf->cur_heart_beat_number - tf->count);
tf->cur_cycle_count = cycle_count;
lEventTotalCycle -= tf->a_block_start->cycle_count;
// Convert it to nsecs
- lEventNSec = lEventTotalCycle / tf->cycle_per_nsec;
- nanoSec = lEventNSec;
+ lEventNSec = (double)lEventTotalCycle / (double)tf->cycle_per_nsec;
// Determine offset in struct LttTime
- lTimeOffset.tv_nsec = nanoSec % NANOSECONDS_PER_SECOND;
- lTimeOffset.tv_sec = nanoSec / NANOSECONDS_PER_SECOND;
+ lTimeOffset.tv_nsec = lEventNSec % NANOSECONDS_PER_SECOND;
+ lTimeOffset.tv_sec = lEventNSec / NANOSECONDS_PER_SECOND;
time = ltt_time_add(tf->a_block_start->time, lTimeOffset);
return s->trace_start;
}
+
+LttTracefile *ltt_tracefile_new()
+{
+ return g_new(LttTracefile, 1);
+}
+
+void ltt_tracefile_destroy(LttTracefile *tf)
+{
+ g_free(tf);
+}
+
+void ltt_tracefile_copy(LttTracefile *dest, const LttTracefile *src)
+{
+ *dest = *src;
+}
+