baco/ft_printf
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Improve main by implementing fmtsplit to split format into chunks and pass function pointer to compare ft_printf with printf

Browse Source
This commit is contained in:
gbaconni
2022-04-24 00:40:01 +02:00
parent 505f5d9912
commit d4fb946428
11 changed files with 236 additions and 271 deletions
Download Patch File Download Diff File Expand all files Collapse all files

317
main.c
View File

@@ -3,39 +3,85 @@
/* ::: :::::::: */
/* main.c :+: :+: :+: */
/* +:+ +:+ +:+ */
/* By: baco <baco@student.42.fr> +#+ +:+ +#+ */
/* By: gbaconni@student.42lausanne.ch +#+ +:+ +#+ */
/* +#+#+#+#+#+ +#+ */
/* Created: 2022/04/13 06:58:46 by gbaconni #+# #+# */
/* Updated: 2022/04/18 09:12:07 by gbaconni ### lausanne.ch */
/* Updated: 2022/04/24 00:21:23 by gbaconni ### lausanne.ch */
/* */
/* ************************************************************************** */
#include <stdio.h> // printf
#include <stdarg.h> // va_list, va_start, va_end
#include <unistd.h> // write
#include <string.h> // strlen
#include <stdlib.h> // malloc, free
#include <ctype.h> // isdigit
#include <assert.h> // assert
#include <fcntl.h>
#include <sys/mman.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <sys/wait.h> // wait
#include "libftprintf/libftprintf.h"
void ft_begin(int *fd)
char *ft_fmtsplit(char **fmt)
{
char *format;
char *start;
char *end;
int len;
format = NULL;
start = *fmt;
end = *fmt;
if (start == NULL)
return (NULL);
if (*end == '%')
if (*end++ == '%')
end++;
while (*end != '\0' && *end != '%')
end++;
len = end - start;
format = (char *) calloc(len + 1, sizeof(char));
if (format == NULL)
return (NULL);
strncpy(format, start, len);
if (*end == '\0')
*fmt = NULL;
else
*fmt += len;
return (format);
}
int _printf(int (*f)(const char *restrict, ...), \
char *format, char *arg)
{
int ret;
char c;
ret = 0;
c = *(format + 1 + ft_skipchars(format + 1, "0123456789# +"));
if (c == 'c')
ret = (*f)(format, *arg);
else if (c == 's')
ret = (*f)(format, arg);
else if (c == 'p')
ret = (*f)(format, &arg);
else if (c == 'x' || c == 'X')
ret = (*f)(format, atol(arg));
else if (c == 'd' || c == 'i' || c == 'u')
ret = (*f)(format, atoi(arg));
else
ret = (*f)(format);
return (ret);
}
int _sprintf(int (*f)(const char *restrict, ...), \
char *str, char *format, char *arg)
{
int ret;
char c;
int fd[3];
ret = 0;
setbuf(stdout, NULL);
pipe(fd);
fd[2] = dup(STDOUT_FILENO);
dup2(fd[1], STDOUT_FILENO);
}
void ft_end(int *fd, char *str)
{
char c;
ret = _printf((*f), format, arg);
dup2(fd[2], STDOUT_FILENO);
fflush(stdout);
close(fd[1]);
@@ -43,222 +89,45 @@ void ft_end(int *fd, char *str)
*str++ = c;
*str = '\0';
close(fd[0]);
return (ret);
}
void ft_begin2(char *out)
int assert_printf(char *format, char *arg)
{
freopen("/dev/null", "a", stdout);
setbuf(stdout, out);
}
void ft_end2(void)
{
freopen("/dev/tty", "a", stdout);
}
int ft_sprintf(char *str, const char *format, ...)
{
va_list ap;
int ret;
int state;
char c;
pid_t cpid;
int pipefd[3];
const int piperead = 0;
const int pipewrite = 1;
const int pipestdout = 2;
ret = 0;
pipe(pipefd);
cpid = fork();
if (cpid == 0)
{
close(pipefd[piperead]);
pipefd[pipestdout] = dup(STDOUT_FILENO);
dup2(pipefd[pipewrite], STDOUT_FILENO);
va_start(ap, format);
ret = ft_vprintf(format, ap);
va_end(ap);
fflush(stdout);
dup2(pipefd[pipestdout], STDOUT_FILENO);
close(pipefd[pipestdout]);
close(pipefd[pipewrite]);
exit (ret);
} else {
close(pipefd[pipewrite]);
while (read(pipefd[piperead], &c, 1) > 0)
*str++ = c;
close(pipefd[piperead]);
wait(&state);
return (WEXITSTATUS(state));
}
}
size_t ft_unescape_len(const char *str)
{
size_t len;
len = 0;
while (*str != '\0')
{
if (*str == '\\')
str++;
len++;
str++;
}
return (len);
}
char ft_unescape_char(const char c)
{
if (c == 'a')
return ('\a');
else if (c == 'b')
return ('\b');
else if (c == 't')
return ('\t');
else if (c == 'n')
return ('\n');
else if (c == 'v')
return ('\v');
else if (c == 'f')
return ('\f');
else if (c == 'r')
return ('\r');
else if (c == 'e')
return ('\033');
else
return (c);
}
char *ft_unescape(const char *str)
{
char *s;
void *ptr;
s = (char *) ft_calloc(ft_unescape_len(str) + 1, sizeof(char));
if (s == NULL)
return (NULL);
ptr = s;
while (*str != '\0')
{
if (*str == '\\')
*s++ = ft_unescape_char(*++str);
else
*s++ = *str;
str++;
}
*s = '\0';
s = ptr;
return (s);
}
int main(int argc, char *argv[])
{
int ft_ret;
int ret;
int ft_ret;
char out[256];
char ft_out[256];
char *format;
char *f;
int d;
char c;
char *s;
int x;
void *ptr;
int fd[3];
d = 0;
c = '\0';
s = "";
x = 42;
ptr = &x;
(void)s;
if (argc > 1)
ret = _sprintf(printf, out, format, arg);
printf("%d = printf(\"%s\", '%s')\n%s\n", ret, format, arg, out);
ft_ret = _sprintf(ft_printf, ft_out, format, arg);
printf("%d = ft_printf(\"%s\", '%s')\n%s\n\n", ft_ret, format, arg, ft_out);
assert(ret == ft_ret);
assert(strcmp(out, ft_out) == 0);
return (ret);
}
int main(int args, char *argv[])
{
char *fmt;
char *format;
char *arg;
argv++;
if (--args < 1)
return (127);
fmt = *argv++;
format = ft_fmtsplit(&fmt);
while (format != NULL)
{
f = argv[1];
format = ft_unescape(f);
if (format[0] == '%')
{
if (format[1] == 'c')
{
c = argv[2][0];
ret = sprintf(out, format, c);
printf("%d = printf(\"%s\", '%c')\n%s\n", ret, f, c, out);
ft_begin(fd);
ft_ret = ft_printf(format, c);
ft_end(fd, ft_out);
printf("%d = ft_printf(\"%s\", '%c')\n%s\n\n", ft_ret, f, c, ft_out);
assert(ret == ft_ret);
assert(strcmp(out, ft_out) == 0);
}
else if (format[1] == 's')
{
s = argv[2];
ret = sprintf(out, format, s);
printf("%d = printf(\"%s\", \"%s\")\n%s\n", ret, f, s, out);
ft_begin(fd);
ft_ret = ft_printf(format, s);
ft_end(fd, ft_out);
printf("%d = ft_printf(\"%s\", \"%s\")\n%s\n\n", ft_ret, f, s, ft_out);
assert(ret == ft_ret);
assert(strcmp(out, ft_out) == 0);
}
else if (format[1] == 'p')
{
s = argv[2];
if (ft_strlen(s) == 0)
{
s = NULL;
ptr = NULL;
}
ret = sprintf(out, format, ptr);
printf("%d = printf(\"%s\", %p)\n%s\n", ret, f, ptr, out);
ft_begin(fd);
ft_ret = ft_printf(format, ptr);
ft_end(fd, ft_out);
printf("%d = ft_printf(\"%s\", %p)\n%s\n\n", ft_ret, f, ptr, ft_out);
assert(ret == ft_ret);
assert(strcmp(out, ft_out) == 0);
}
else if (format[1] == 'd' || format[1] == 'i' || format[1] == 'u')
{
d = atoi(argv[2]);
ret = sprintf(out, format, d);
printf("%d = printf(\"%s\", %d)\n%s\n", ret, f, d, out);
ft_begin(fd);
ft_ret = ft_printf(format, d);
ft_end(fd, ft_out);
printf("%d = ft_printf(\"%s\", %d)\n%s\n\n", ft_ret, f, d, ft_out);
assert(ret == ft_ret);
assert(strcmp(out, ft_out) == 0);
}
else if (format[1] == 'x' || format[1] == 'X')
{
d = atoi(argv[2]);
ret = sprintf(out, format, d);
printf("%d = printf(\"%s\", %d)\n%s\n", ret, f, d, out);
ft_begin(fd);
ft_ret = ft_printf(format, d);
ft_end(fd, ft_out);
printf("%d = ft_printf(\"%s\", %d)\n%s\n\n", ft_ret, f, d, ft_out);
assert(ret == ft_ret);
assert(strcmp(out, ft_out) == 0);
}
}
else
{
s = argv[2];
ret = sprintf(out, format, s);
printf("%d = printf(\"%s\", \"%s\")\n%s\n", ret, f, s, out);
ft_begin(fd);
ft_ret = ft_printf(format, s);
ft_end(fd, ft_out);
printf("%d = ft_printf(\"%s\", \"%s\")\n%s\n\n", ft_ret, f, s, ft_out);
assert(ret == ft_ret);
assert(strcmp(out, ft_out) == 0);
}
if (*format == '%' && *(format + 1) != '%' && --args)
arg = *argv++;
else
arg = NULL;
assert_printf(format, arg);
free(format);
format = ft_fmtsplit(&fmt);
}
return (0);
}