fetchy/fetchy.c

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <math.h>
#include <dirent.h>

#define BUF_SIZE 20


void truncate_spaces_leading(char *str);
void read_line(char x);
int count_files(char *path);

static char *get_sys(char *sys);
static char *get_kernel(void);
static char *get_uptime(void);
static int get_packages(char sys);
static char *get_RAM(void);
static char *get_cpu(void);
void get_gpu(char gpu[]);


char *os_name = NULL, *uptime = NULL, *kern_name = NULL, *ram_info = NULL, *cpu_name = NULL;


int main(int argc, char *argv[]){

	char gpu[70], sys;
	char *os = malloc(BUF_SIZE);
	get_gpu(gpu);

	os = get_sys(&sys);

	if ( sys == 'a' ) {

		printf("\n");
		printf("\x1b[1m         .          \x1b[36mOS\x1b[0m    ->   %s\n", os);
		printf("\x1b[1m        / \\         \x1b[36mKRNL\x1b[0m  ->   %s\n", get_kernel());
		printf("\x1b[1m       /   \\        \x1b[36mUPT\x1b[0m   ->   %s\n", get_uptime());
		printf("\x1b[1m      /^.   \\       \x1b[36mPKGS\x1b[0m  ->   %d\n", get_packages(sys));
		printf("\x1b[1m     /  .-.  \\      \x1b[36m\x1b[0m     \n");
		printf("\x1b[1m    /  (   ) _\\     \x1b[36mCPU\x1b[0m   ->   %s\n", get_cpu());
		printf("\x1b[1m   / _.~   ~._^\\    \x1b[36mGPU\x1b[0m   ->   %s\n", gpu);
		printf("\x1b[1m  /.^         ^.\\   \x1b[36mRAM\x1b[0m   ->   %s\n", get_RAM());
		printf("\n\n");
	}


	if ( sys == 'u' ) {

		printf("\n");
		printf("\x1b[1m                .-.		\x1b[36mOS\x1b[0m    ->   %s\n", get_sys(&sys));
		printf("\x1b[1m          .-'``(|||)		\x1b[36mKERNEL\x1b[0m  ->   %s\n", get_kernel());
		printf("\x1b[1m       ,`\\ \\    `-`.		\x1b[36mUPTIME\x1b[0m   ->   %s\n", get_uptime());
		printf("\x1b[1m      /   \\ '``-.   `		\x1b[36mPACKAGES\x1b[0m  ->   %d\n", get_packages(sys));
		printf("\x1b[1m    .-.  ,       `___:		\x1b[36m\x1b[0m     \n");
		printf("\x1b[1m   (:::) :        ___		\x1b[36mCPU\x1b[0m   ->   %s\n", get_cpu());
		printf("\x1b[1m    `-`  `       ,   :		\x1b[36mGPU\x1b[0m   ->   %s\n", gpu);
		printf("\x1b[1m      \\   / ,..-`   ,		\x1b[36mRAM\x1b[0m   ->   %s\n", get_RAM());
		printf("\x1b[1m       `./ /    .-.`			\x1b[36m\x1b[0m        \n");
		printf("\x1b[1m          `-..-(   )  		\x1b[36m\x1b[0m        \n");
		printf("\x1b[1m                `-`			\x1b[36m\x1b[0m        \n");
		printf("\n\n");

	}


	free(os_name);
	free(uptime);
	free(ram_info);
	free(kern_name);
	free(cpu_name);
	return 0;
}




void read_line(char x){
    int c;
    while (( c = getchar()) != x && c != EOF)  { }
}



void truncate_spaces_leading(char *str){
    int src = 0, dst = 0;
    while(*(str + dst) == ' ') dst++;

    while(*(str + dst) != '\0') {
        *(str + src) = *(str + dst);
        if(*(str + (dst++)) == ' ')
            while(*(str + dst) == ' ') dst++;

        src++;
    }

    *(str + src) = '\0';
}

void truncate_spaces_trailing(char *str){
    int index, i = -1;

	/* Find last index of non-white space character */
    i = 0;
    while(str[i] != '\0'){
        if(str[i] != ' ' && str[i] != '\t' && str[i] != '\n'){
            index= i;
		}
        i++;
    }

    /* Mark next character to last non-white space character as NULL */
    str[index + 1] = '\0';
}

static char *get_sys(char *sys){
	os_name = malloc(BUF_SIZE);
	char *name = malloc(BUF_SIZE);
	FILE *sysName = fopen("/etc/issue", "rt");
	
	fscanf(sysName, "%s ", name);
	fclose(sysName);
	truncate_spaces_leading(name);

	snprintf(os_name, BUF_SIZE, "%s Linux", name);
	
	if ( !strcmp( name, "Arch")) *sys = 'a';
	if ( !strcmp( name, "Ubuntu"))	*sys = 'u';
		
	free(name);
	return os_name;
}


static char *get_cpu(void){
	char *line = malloc(BUF_SIZE * 4);
	cpu_name = malloc(BUF_SIZE * 4);
	FILE *cpu = fopen("/proc/cpuinfo", "rt");
	
	for(int i = 0; i < 5; i++)
		fgets(line, BUF_SIZE * 4, cpu);

	snprintf(cpu_name, BUF_SIZE * 4, "%s", strchr(line, ':') +2); 
	truncate_spaces_trailing(cpu_name);
	
	fclose(cpu);
	free(line);

	return cpu_name;
}

void get_gpu(char gpu[]){
	FILE *gpuName = popen("lspci -v | grep VGA -m 1 | awk -F'[' '{ print $2 }' | awk  -F']' '{ print $1 }' ", "r");

	fscanf(gpuName, "%[^\n]%s", gpu);
	fclose(gpuName);
}



static char *get_kernel(void){
	kern_name = malloc(BUF_SIZE);
	char *kernel = malloc(BUF_SIZE);
	FILE *kInfo = fopen("/proc/version", "rt");

	fscanf(kInfo, "Linux version %s ", kernel);
	fclose(kInfo);

	truncate_spaces_leading(kernel);
	snprintf(kern_name, BUF_SIZE + 5, "Linux %s", kernel);
	free(kernel);

	return kern_name;
}

static char *get_uptime(void){
	int sec, hr, min;
	FILE *FUp = fopen("/proc/uptime", "rt");
	uptime = malloc(BUF_SIZE);

	fscanf(FUp, "%d", &sec);
	fclose(FUp);

	hr = (sec/60/60%24);
	min = (sec/60%60);

	snprintf(uptime, BUF_SIZE, "%dh, %dmin", hr, min);
	return uptime;
}

static int get_packages(char sys){

	DIR *packageDir;
	int fileCount = 0;
	struct dirent * entry;

	switch (sys){
		case 'a':
			packageDir = opendir("/var/lib/pacman/local");
			break;
		case 'u':
			
			break;
		default:
			printf("\n\n\aUnable to find package list\n\n");
	}



	while ((entry = readdir(packageDir)) != NULL) {
		if (entry->d_type == DT_DIR) {
			fileCount++;
		}
	}
	closedir(packageDir);



	return fileCount;

}

static char *get_RAM(){
	int bar_percent;
	float total, free_mem, used;
	float real_percent;
	ram_info = malloc(BUF_SIZE * 3);
	char *line = malloc(BUF_SIZE * 3);
	char bar[] = "[----------]";

	FILE *RAM = fopen("/proc/meminfo", "rt");

	

	fgets(line, BUF_SIZE * 3, RAM);
	truncate_spaces_leading(line);
	sscanf(line, " MemTotal: %f", &total);

	fgets(line, BUF_SIZE * 3, RAM);
	truncate_spaces_leading(line);
	sscanf(line, " MemFree: %f", &free_mem);

	fclose(RAM);

	used = total - free_mem;
	real_percent = (used / total) * 100;
	bar_percent = round(real_percent / 10);

	for( int i = 1; i <= bar_percent; i++){
		bar[i] = '*';
	}

	snprintf(ram_info, BUF_SIZE * 3, "%.2f GB of %.2f GB,  %s -> %.2f %%", used / 1000000, total / 1000000, bar, real_percent);

	free(line);
	return ram_info;
}