Kristyano Pereira

Alguém poderia me ajudar com este algoritmo? Em nosso trabalho da faculdade precisamos passar nosso programa C para portugol #include <stdio.h> #include <stdlib.h> #include <string.h> #include <fcntl.h> #include <time.h> #include <openssl/sha.h> #include <sys/types.h> #include <sys/stat.h> int OWNER_USER = 1; char usuario[128]; struct Cadastro { char login[128]; int id; char hash[128]; char nome[128]; char cargo[128]; }; struct Estoque { char produto[128]; int quantidade; }; struct Loja { char produto[128]; int quantidade; }; void printCadastro(struct Cadastro *ptr) { printf("Nome: %s\n", ptr->nome); printf("Id: %d\n", ptr->id); printf("Hash: %s\n", ptr->hash); printf("Nome: %s\n", ptr->nome); printf("Cargo: %s\n", ptr->cargo); } int pegarTAM(FILE **fptr) { char *buffer = (char *) malloc(4096 * sizeof(char)); char *ch; int TAM = 0; fread(buffer, 1, 4096 * sizeof(char), *fptr); rewind(*fptr); ch = strtok(buffer, "\n"); while (ch != NULL) { ch = strtok(NULL, "\n"); TAM++; } free(buffer); return TAM; } void pagina_login(struct Cadastro *ptr, int TAM) { int login_flag = 0, owner_user = 1, t = 3, i = 0, j = 0, key = -1; char login[128], senha[128]; unsigned char tmp_hash[SHA256_DIGEST_LENGTH]; char hex[SHA256_DIGEST_LENGTH * 2]; printf("------------------------------------------------\n" "Login: "); scanf("%128s", login); if ((strcmp("owner", login) == 0)) { owner_user = 0; } for (i = 0; i < TAM; ++i) { if ((strcmp(login, (ptr + i)->login) == 0)) { key = i; break; } if ((strcmp(login, (ptr + i)->login) != 0)) { if (i == TAM - 1) { printf("Usuário não encontrado.\n"); printf("------------------------------------------------\n"); exit(EXIT_FAILURE); } } } do { printf("Senha: "); scanf("%128s", senha); SHA256((const unsigned char *) senha, strlen(senha), tmp_hash); for (i = 0, j = 0; i < SHA256_DIGEST_LENGTH; ++i, j += 2) { sprintf((hex + j), "%02x", tmp_hash[i]); } login_flag = (strcmp((ptr + key)->hash, hex) == 0) ? 0 : 1; if (login_flag == 1) { printf("Senha Incorreta.\n"); } else { printf("Senha Correta.\n"); printf("------------------------------------------------\n"); strcpy(usuario, (ptr + key)->login); if (owner_user == 0) OWNER_USER = 0; break; } t--; } while (t > 0); } void cadastrar(FILE **fptr) { if (OWNER_USER != 0) { printf( "\nOperação Negada.\n\n"); return; } int i = 0, j = 0; char login[128], senha[128], nome[128], cargo[128], hex[64]; unsigned char hash[32]; fseek(*fptr, 0, SEEK_END); srand(time(NULL)); printf("Cadastrando novo funcionário.\n"); printf("Novo login: "); scanf("%128s", login); printf("Nova senha: "); scanf("%128s", senha); printf("Nome:" ); scanf("%128s", nome); printf("Cargo:" ); scanf("%128s", cargo); fputs(login, *fptr); fputc(':', *fptr); fputc('1', *fptr); fputc(':', *fptr); SHA256(senha, strlen(senha), hash); for (i = 0, j = 0; i < SHA256_DIGEST_LENGTH; ++i, j += 2) { sprintf((hex + j), "%02x", hash[i]); } fputs(hex, *fptr); fputc(':', *fptr); fputs(nome, *fptr); fputc(':', *fptr); fputs(cargo, *fptr); fputc('\n', *fptr); rewind(*fptr); } void preencherCadastro(struct Cadastro *ptr, FILE **fptr, int TAM) { int i = 0; char buffer[4096]; char *ch; for (i = 0; i < TAM; ++i) { fgets(buffer, sizeof(buffer), *fptr); ch = strtok(buffer, ":"); strcpy((ptr + i)->login, ch); ch = strtok(NULL, ":"); (ptr + i)->id = *ch - 48; ch = strtok(NULL, ":"); strcpy((ptr + i)->hash, ch); ch = strtok(NULL, ":"); strcpy((ptr + i)->nome, ch); ch = strtok(NULL, ":"); strcpy((ptr + i)->cargo, ch); } } void removerLoja(struct Loja *l_ptr) { int quantidade = 0, i = 0; char produto[128]; printf("Digite a o produto e a quantidade a ser removida da loja.\n"); scanf("%128s", produto); for (i = 0; i < 256; ++i) { if (strcmp(produto, (l_ptr + i)->produto) == 0) { scanf("%d", &quantidade); if (quantidade > (l_ptr + i)->quantidade) { printf("Operação não permitida.\n"); printf("Quantidade maior que a da loja (%d)\n", (l_ptr + i)->quantidade); return; } else { (l_ptr + i)->quantidade = (l_ptr + i)->quantidade - quantidade; printf("Nova quantidade na loja de %d.\n", (l_ptr + i)->quantidade); return; } } } printf("Produto não encontrado.\n"); } void adicionarProdutoEstoque(struct Estoque *ptr) { int i = 0; for (i = 0; i < 256; ++i) { if ((ptr + i)->quantidade == 0) { printf("Digite o nome do produto e sua quantidade.\n"); scanf("%128s", (ptr + i)->produto); scanf("%d", &((ptr + i)->quantidade)); printf("%d produto(s) %s adicionados ao estoque.\n\n\n", (ptr + i)->quantidade, (ptr + i)->produto); return; } } } void adicionarLoja(struct Estoque *e_ptr, struct Loja *l_ptr) { char produto[128]; int quantidade, i = 0, j = 0; printf("Produto que deseja adicionar a loja.\n"); scanf("%128s", produto); for (i = 0; i < 256; ++i) { if ((strcmp(produto, (e_ptr + i)->produto) == 0)) { printf("Qual quantidade deseja adicionar a loja: "); scanf("%d", &quantidade); if (quantidade > (e_ptr + i)->quantidade) { printf("Operação não permitida.\n"); printf("Quantidade maior que a do estoque (%d)\n", (e_ptr + i)->quantidade); return; } else { for (j = 0; j < 256; ++j) { if ((l_ptr + j)->quantidade == 0) { strcpy((l_ptr + j)->produto, produto); (l_ptr + j)->quantidade = quantidade; break; } } printf("%d produtos de %s adicionados a loja.\n", quantidade, (e_ptr + i)->produto); (e_ptr + i)->quantidade = (e_ptr + i)->quantidade - quantidade; printf("Quantidade restante no estoque: %d\n", (e_ptr + i)->quantidade); return; } } } printf("Produto não encontrado no estoque.\n"); } FILE **preencherArquivo(struct Cadastro *cadastro, FILE **fptr, char *argv) { FILE **f_ptr = (FILE **) malloc(sizeof(FILE *)); char zeros[128]; int i = 0; memset(zeros, 0, 128 * sizeof(char)); *f_ptr = freopen(NULL, "w", *fptr); for (i = 0; i < 3; ++i) { if ((strcmp(zeros, (cadastro + i)->login) == 0)) { continue; } else { fputs((cadastro + i)->login, *f_ptr); fputc(':', *fptr); fputc((cadastro + i)->id + 48, *f_ptr); fputc(':', *fptr); fputs((cadastro + i)->hash, *f_ptr); fputc(':', *fptr); fputs((cadastro + i)->nome, *f_ptr); fputc(':', *fptr); fputs((cadastro + i)->cargo, *f_ptr); } } return f_ptr; } void removerUsuario(FILE **fptr, struct Cadastro *cadastro, char *argv) { if (OWNER_USER != 0) { printf( "\nOperação Negada.\n\n"); return; } char login[128]; int i = 0; printf("Digite o nome do login: "); scanf("%128s", login); for (i = 0; i < 3; ++i) { printf("user: %s\n", (cadastro + i)->login); if ((strcmp(login, (cadastro + i)->login) == 0)) { memset((cadastro + i), 0, 128); fptr = preencherArquivo(cadastro, fptr, argv); return; } } printf("Usuário não encontrado.\n"); } void menu(FILE **fptr, struct Cadastro *cadastro, char *argv) { printf("Bem vindo usuário %s.\n", usuario); struct Estoque *estoque = (struct Estoque *) malloc(256 * sizeof(struct Estoque)); struct Loja *loja = (struct Loja *) malloc(256 * sizeof(struct Loja)); int choice = 0; printf("\n\n\n\n"); while (1) { printf("Opções de usuário:\n"); printf("[1] Cadastrar novo funcionário.\n"); printf("[2] Remover funcionário.\n"); printf("[3] Adicionar produto ao estoque.\n"); printf("[4] Adicionar produto a loja.\n"); printf("[5] Remover produto da loja.\n"); printf("[*] Sair do Programa.\n"); scanf("%d", &choice); #ifdef WINDOWS system("cls"); #else system("clear"); #endif switch (choice) { case 1: cadastrar(fptr); break; case 2: removerUsuario(fptr, cadastro, argv); break; case 3: adicionarProdutoEstoque(estoque); break; case 4: adicionarLoja(estoque, loja); break; case 5: removerLoja(loja); break; default: exit(EXIT_SUCCESS); } } } int main(int argc, char *argv[]) { if (argc != 2) { fprintf(stderr, "Error in argc.\n"); exit(EXIT_FAILURE); } struct stat st; if (stat(argv[1], &st)) { fprintf(stderr, "Erro no arquivo.\n"); exit(EXIT_FAILURE); } FILE *fptr = fopen(argv[1], "r+"); int TAM = pegarTAM(&fptr); struct Cadastro *cadastro = (struct Cadastro *) malloc(TAM * sizeof(struct Cadastro)); preencherCadastro(cadastro, &fptr, TAM); pagina_login(&cadastro[0], TAM); menu(&fptr, cadastro, argv[1]); free(cadastro); return 0; }