os_lab5_scans dir

/*
./prog dir
scans dir
prints: - names of subdir
	- symlinks pointing to absolute paths; (use readlink())
recursive, entire subtree*/

#include <sys/types.h>
#include <dirent.h>
#include <stdlib.h>
#include <stdio.h>
#include <sys/stat.h>
#include <unistd.h>
#include <string.h>

#define BOLDRED     "\033[1m\033[31m"      /* Bold Red */
#define BOLDGREEN   "\033[1m\033[32m"      /* Bold Green */
#define BOLDYELLOW  "\033[1m\033[33m"      /* Bold Yellow */
#define BOLDBLUE    "\033[1m\033[34m"      /* Bold Blue */
#define BOLDCYAN    "\033[1m\033[36m"      /* Bold Cyan */

void read_dir_rec(char* current_path);

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

	if(argc == 2)
	{
		DIR* current_dir;
		char* path = (char*)malloc(strlen(argv[1]) * sizeof(char));
		struct stat entity_info;
		struct dirent *dir_entity;
		int strl = strlen(argv[1]);

		if(argv[1][strl-1] != '/')
		{
			printf("%sPut '/' at the end of the directory\n\x1b[0m", BOLDRED);
			return 1;
		}
		if((current_dir = opendir(argv[1])) != 0)
		{
			while((dir_entity = readdir(current_dir)) != 0)
			{
				strcpy(path, argv[1]);
				char* name = strcat(path, dir_entity->d_name);

				if (lstat(name, &entity_info) == 0)
				{
					//print subrees
					if(S_ISDIR(entity_info.st_mode))
					{
						printf("%s%s is a directory\n\x1b[0m",BOLDBLUE, name);
					}
					//check if links with abs paths
					if(S_ISLNK(entity_info.st_mode))
					{
						int size = entity_info.st_size + 1;
						char* buf = (char*)malloc(size);
						int ret;
						if((ret = readlink(name, buf, size)) == -1)
						{
							printf("%sError at reading the link\x1b[0m", BOLDRED);
							return 2;
						}

						//Realloc if the link has a greater size than anticipated
						if(ret > size)
						{
							if(realloc(buf, ret))
							{
								readlink(name, buf, ret);
							}
						}
						if(buf[0] != '.')
						{
							printf("%s%s is a symlink to %s\n\x1b[0m",BOLDCYAN, name, buf);
						}
						free(buf);
					}
				}
			}
		}else{
			printf("%sError at opening directory\x1b[0m", BOLDRED);
			return 3;
		}

		read_dir_rec(argv[1]);
	}
	else{
		printf("%sUsage: %s dir_path\n\x1b[0m",BOLDRED, argv[0]);
		return 4;
	}

	return 0;
}

void read_dir_rec(char* current_path)
{
	DIR* current_dir = opendir(current_path);
	char* path = (char*)malloc(strlen(current_path) * sizeof(char));
	struct stat entity_info;
	struct dirent *dir_entity;
	int counter;
	while((dir_entity = readdir(current_dir)) != 0)
	{
		counter++;
		strcpy(path, current_path);

		char* name = (char*)malloc((strlen(path) + strlen(dir_entity->d_name) + 1) * sizeof(char));
		if(path[strlen(path) - 1] != '/')
			name = strcat(path, "/");
		name = strcat(path, dir_entity->d_name);

		if (lstat(name, &entity_info) == 0)
		{
			if(S_ISDIR(entity_info.st_mode))
			{
				if((strcmp(dir_entity->d_name, ".") != 0) & (strcmp(dir_entity->d_name, "..") != 0))
				{//\033[1m\033[33m
					printf("%sEntered %s%s %sfrom %s%s\x1b[0m\n",
						BOLDYELLOW,  BOLDGREEN, name, BOLDYELLOW, BOLDGREEN, current_path);
					read_dir_rec(name);
				}
			}
		}else
		{
			printf("%sCould not read stat for %s\n\x1b[0m", BOLDRED, name);
		}
	}
	return;
}