/*
 * cmdman_prints.c
 *
 * Copyright (c) 2009 Ismael Gomez-Miguelez, UPC <ismael.gomez at tsc.upc.edu>. All rights reserved.
 *
 * This file is part of ALOE.
 *
 * ALOE is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * ALOE 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 ALOE.  If not, see <http://www.gnu.org/licenses/>.
 *
 */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

#include "phal_hw_api.h"
#include "cmdman_backend.h"

char pstr[2048];


void print_to_fd(int fd, char *str)
{
	write(fd,str,strlen(str)+1);
}


/** Print processes list
 *
 * Prints processes to file descriptor as parameter
 * (set to 1 for stdout)
 *
 */
int proc_print(int fd, struct proc_info *procs, int nof_procs)
{
	int i,n;
	char *t,*t2,*t3,*t4,*t5;
        int totalcpu=0,meanperiod=0,maxcpu=0,totalfaults=0;
        float totalvar=0;

	sprintf(pstr, "\nPE\tName\t\tPeriod\tTs\tRelinq\tMean (Var) CPU\tm/v\tMAX CPU\t\t%% CPU\t%% MAX\tMAX MAC\tRT FAULTS\n");
	print_to_fd(fd, pstr);
	n=strlen(pstr)-3+6*8;
	for (i=0;i<n;i++)
		sprintf(&pstr[i], "=");
	sprintf(&pstr[i], "\n");
	print_to_fd(fd, pstr);
        
	for (i = 0; i < nof_procs; i++) {
		if (procs[i].obj_id) {
			if (strlen(procs[i].name)<8)
				t="\t\t";
			else
				t="\t";

                        sprintf(pstr, "%d (%.2f)", procs[i].cpu_usec, procs[i].var_cpu);
			if (strlen(pstr)<8)
				t3="\t\t";
			else
				t3="\t";


                        sprintf(pstr, "%d", procs[i].max_usec);
			if (strlen(pstr)<8)
				t5="\t\t";
			else
				t5="\t";

			sprintf(pstr, "%d:%d\t%s%s%d\t%d\t%d\t%d (%.2f)%s%.2f\t%d%s%.2f%%\t%.2f%%\t%d\t%d\n",
                                        procs[i].pe_id,procs[i].core_id,
					procs[i].name, t,
					procs[i].period,
					procs[i].tstamp,
					procs[i].end_usec,
                                        procs[i].cpu_usec, procs[i].var_cpu, t3,
                                        (float) procs[i].cpu_usec/procs[i].var_cpu,
                                        procs[i].max_usec, t5,
					(float) (procs[i].cpu_usec*100)/procs[i].period,
                                        (float) (procs[i].max_usec*100)/procs[i].period,
                                        procs[i].max_mac,
                                        procs[i].nof_faults);
			print_to_fd(fd, pstr);
                        totalcpu+=procs[i].cpu_usec;
                        maxcpu+=procs[i].max_usec;
                        meanperiod+=procs[i].period;
                        totalvar+=procs[i].var_cpu;
                        totalfaults+=procs[i].nof_faults;
		}
	}
        if (i)
            meanperiod/=i;
        sprintf(pstr, "%d (%.2f)", totalcpu,totalvar);
        if (strlen(pstr)<8)
                t3="\t\t";
        else
                t3="\t";


        sprintf(pstr, "%d", maxcpu);
        if (strlen(pstr)<8)
                t5="\t\t";
        else
                t5="\t";


        sprintf(pstr, "TOTAL:\t\t\t\t\t\t%d (%.2f)%s%.2f\t%d%s%.2f%%\t%.2f%%\t%d\n",
                        totalcpu,totalvar,t3,
                        (float) totalcpu/totalvar,
                        maxcpu,t5,
                        (float) (100*totalcpu)/meanperiod,
                        (float) (100*maxcpu)/meanperiod,
                        totalfaults);
        print_to_fd(fd, pstr);
	for (i=0;i<n;i++)
		pstr[i] = '=';
	pstr[i++] = '\n';
	pstr[i++] = '\0';
	print_to_fd(fd,pstr);

	return 1;
}


int apps_print(int fd, struct app_info *apps, int nof_apps)
{
	int i,n;
	char *t;

	sprintf(pstr, "\nId\tName\t\tStatus\tRT Faults\n");
	print_to_fd(fd, pstr);
	n=strlen(pstr)-3+3*8;
	for (i=0;i<n;i++)
		sprintf(&pstr[i], "=");
	sprintf(&pstr[i], "\n");
	print_to_fd(fd, pstr);

	for (i = 0; i < nof_apps; i++) {
		if (apps[i].app_id) {
			if (strlen(apps[i].name)<8)
				t="\t\t";
			else
				t="\t";

			sprintf(pstr, "%d\t%s%s%d\t%d\n",
					apps[i].app_id,
					apps[i].name, t,
					apps[i].status,
                                        apps[i].nof_rtfaults);
			print_to_fd(fd, pstr);
		} 
	}
	
	for (i=0;i<n;i++)
		pstr[i] = '=';
	pstr[i++] = '\n';
	pstr[i++] = '\0';
	print_to_fd(fd,pstr);
	
	return 1;
}

int pe_print(int fd, struct pe_info *pe, int nof_pe)
{
	int i,j,n;
	char *t;

	sprintf(pstr, "\nName\t\tId\tPlat family\tC\tC'\tBW\tBW'\n");
	print_to_fd(fd, pstr);
	n=strlen(pstr)-3+7*8;
	for (i=0;i<n;i++)
		sprintf(&pstr[i], "=");
	sprintf(&pstr[i], "\n");
	print_to_fd(fd, pstr);

	for (i = 0; i < nof_pe; i++) {
		if (strlen(pe[i].name)<8)
			t="\t\t";
		else
			t="\t";

		sprintf(pstr, "%s%s%d\t\t%d\t%.2f\t%.2f\t%.2f\t%.2f \n",
				pe[i].name,t,
				pe[i].id,
				pe[i].plat_family,
				pe[i].C,
				pe[i].totalC,
				pe[i].intBW,
                                pe[i].totalintBW);
		print_to_fd(fd, pstr);
	}
	
	for (i=0;i<n;i++)
		pstr[i] = '=';
	pstr[i++] = '\n';
	pstr[i++] = '\0';
	print_to_fd(fd,pstr);


	sprintf(pstr, "\nPE:ItfId\t->\tPE:ItfId\tintBW\tintBW'\n");
	print_to_fd(fd, pstr);
	n=strlen(pstr)-3+6*8;
	for (i=0;i<n;i++)
		sprintf(&pstr[i], "=");
	sprintf(&pstr[i], "\n");
	print_to_fd(fd, pstr);

	for (i = 0; i < nof_pe; i++) {
            for (j=0;j<pe[i].nof_xitf;j++) {
		sprintf(pstr, "0x%x:0x%x\t->\t0x%x:0x%x\t%.2f\t%.2f\n",
				pe[i].xitf[j].remote_pe,pe[i].xitf[j].xitf.id,
				pe[i].id,pe[i].xitf[j].remote_id,
				pe[i].xitf[j].xitf.BW, pe[i].xitf[j].totalBW);
		print_to_fd(fd, pstr);
            }
	}

	for (i=0;i<n;i++)
		pstr[i] = '=';
	pstr[i++] = '\n';
	pstr[i++] = '\0';
	print_to_fd(fd,pstr);
	
	return 1;
}

int stats_print(int fd, struct stat_info *stats, int nof_stats)
{
	int i,n;
	char *t2,*t3;


	sprintf(pstr, "\nObjName\t\tStatName\tSize\tType\n");
	print_to_fd(fd, pstr);
	n=strlen(pstr)-3+2*8;
	for (i=0;i<n;i++)
		sprintf(&pstr[i], "=");
	sprintf(&pstr[i], "\n");
	print_to_fd(fd, pstr);
	
	for (i = 0; i < nof_stats; i++) {
		if (strlen(stats[i].objname)>=8) {
			t2="\t";
		} else {
			t2="\t\t";
		}
		if (strlen(stats[i].statname)>=8) {
			t3="\t";
		} else {
			t3="\t\t";
		}
		sprintf(pstr, "%s%s%s%s%d\t%d\n", 
				stats[i].objname,t2,
				stats[i].statname,t3,
				stats[i].size,
				stats[i].type);
		print_to_fd(fd, pstr);
	}
	
	for (i=0;i<n;i++)
		pstr[i] = '=';
	pstr[i++] = '\n';
	pstr[i++] = '\0';
	print_to_fd(fd,pstr);
	
	return 1;
}