2019-07-17 12:40:25 +02:00

102 lines
3.0 KiB
C

/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* convert.c :+: :+: :+: */
/* +:+ +:+ +:+ */
/* By: jfleury <jfleury@student.42.fr> +#+ +:+ +#+ */
/* +#+#+#+#+#+ +#+ */
/* Created: 2019/07/08 11:56:22 by mdchane #+# #+# */
/* Updated: 2019/07/17 12:37:24 by jfleury ### ########.fr */
/* */
/* ************************************************************************** */
#include "asm.h"
static int ft_create_file(char **argv, unsigned char *buffer, int len)
{
char *str;
int len_argv;
int fd;
int i;
len_argv = ft_strlen(argv[1]);
if (!(str = malloc(sizeof(char) * len_argv - 1)))
return (0);
str[len_argv - 2] = 0;
i = 0;
while (argv[1][i] != '.' || argv[1][i + 1] != 's')
{
str[i] = argv[1][i];
i++;
}
str = ft_strextend(str, ".cor");
ft_printf("Writing output program to %s\n", str);
fd = open(str, O_CREAT, S_IRWXU, O_RDWR);
close(fd);
fd = open(str, O_RDWR);
free(str);
write(fd, buffer, len);
close(fd);
return (0);
}
unsigned char *ft_convert_head(t_header *head)
{
unsigned char *buffer;
unsigned char *conv_progsize;
if (!(buffer = (unsigned char *)ft_strnew(sizeof(*buffer) * 2192)))
return (NULL);
buffer[0] = 0;
buffer[1] = 234;
buffer[2] = 131;
buffer[3] = 243;
ft_strcpy_n(buffer, (unsigned char *)head->prog_name, 4, 128);
conv_progsize = ft_conv_hexa(head->prog_size, 4);
ft_strcpy_n(buffer, conv_progsize, 136, 4);
ft_strcpy_n(buffer, (unsigned char *)head->comment, 140, 2048);
ft_strdel((char **)&conv_progsize);
return (buffer);
}
void init_convert(unsigned char **buffer, t_header *head, int *pos)
{
unsigned char *conv_head;
*buffer = (unsigned char *)ft_strnew(2192 + head->prog_size);
conv_head = ft_convert_head(head);
*buffer = ft_strcpy_n(*buffer, conv_head, 0, 2192);
*pos = 2192;
ft_strdel((char **)&conv_head);
}
void ft_convert(t_lst_tk *lst, t_header *head, char **argv,
t_label *lab)
{
unsigned char *buffer;
int pos;
int size_instru;
t_pos_lab pos_lab;
init_convert(&buffer, head, &pos);
pos_lab.lab = lab;
while (lst)
{
pos_lab.pos = pos - 2192;
size_instru = 0;
if (lst->token->type == INSTRUCTION)
buffer = ft_strextend_nm(buffer, ft_conv_instru(lst->token,
&size_instru, pos_lab), pos, size_instru);
else if (lst->token->type == LABEL)
{
if (lst->token->next && lst->token->next->type != COMMENT)
buffer = ft_strextend_nm(buffer, ft_conv_instru(
lst->token->next, &size_instru, pos_lab), pos, size_instru);
}
lst = lst->next;
pos += size_instru;
}
ft_create_file(argv, buffer, 2192 + head->prog_size);
ft_strdel((char **)&buffer);
}