tapecrypt/decryptstdout.cpp at master · SimonFormanek/tapecrypt · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
/*
decrypt.cpp - reimplement decrypt.sh
*/

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


char outFilNam[512], inFilNam[512], buf[1024];
int tapeInit = 0, inSize = 0, i = 0;

unsigned char* tape = NULL;

char* line = NULL;
size_t llen = 0;
ssize_t lread;

unsigned char znak[3] = {0,0,0};
unsigned char znaky[2][255];

//----------------------------------------------------------------------------

void fuj(char* mess) {

  if(tape != NULL) delete[] tape;
  perror(mess);
  exit(EXIT_FAILURE);
}
//----------------------------------------------------------------------------

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

  memset(&buf, 0, sizeof(buf));

  if(argc < 2) {
    sprintf(buf, "Chybi povinne parametry! KONEC!\n\0");
    fuj(buf);
  }

  sprintf(inFilNam, "%s.htmc\0", argv[1]);
//  sprintf(inFilNam, "%s\0", argv[1]);
  sprintf(outFilNam, "%s.htmt\0", argv[1]);


  FILE* inFil = fopen(inFilNam, "r");
  if(inFil == NULL) {
    sprintf(buf, "Nelze otevrit vstupni soubor '%s'! KONEC!\n\0", inFilNam);
    fuj(buf);
  }

  lread = getline(&line, &llen, inFil);
  char* dvojtec = strchr(line, ':'); *dvojtec = 0; dvojtec++;
  sscanf(line, "%i", &inSize);
  sscanf(dvojtec, "%i", &tapeInit);


  //pripravit segment pasky:
  FILE* tapeFil = fopen("tape.txt", "r");
  if(tapeFil == NULL) {
    sprintf(buf, "Nelze otevrit soubor s paskou 'tape.txt'! KONEC!\n\0");
    fuj(buf);
  }

  for(i = 0; i <= tapeInit; i++) { //nalistuj 1.polozku
    if((lread = getline(&line, &llen, tapeFil)) == -1) break;
  }

  tape = new unsigned char[inSize+1];

  for(i = 0; i < inSize; i++) { //1.mame uz nactenou - ulozit do pameti a brat dalsi..

    sscanf(line, "%i", &tape[i]);
    if((lread = getline(&line, &llen, tapeFil)) == -1) {
      sprintf(buf, "Dosazeno konce souboru 'tape.txt' - nelze nacist potrebnou delku klice! KONEC!\n\0");
      fuj(buf);
    }
  }

  fclose(tapeFil);


  //pripravit tabulku znaku:
  memset(&znak, 0, sizeof(znak));
  memset(&znaky, 0, sizeof(znaky));

  FILE* anFil = fopen("anumlong.txt", "r");
  if(anFil == NULL) {
    sprintf(buf, "Nelze otevrit soubor se znaky 'anumlong.txt'! KONEC!\n\0");
    fuj(buf);
  }

  i = 0;
  char* delim = NULL; //TODO tohle cele postupne asi upravit||vyhodit po dohode na definit.formatu souboru
  while((lread = getline(&line, &llen, anFil)) != -1) {
    delim = strchr(line, ':'); delim++;
    znaky[0][i] = *delim++;
    znaky[1][i] = (*delim != '\n') ? *delim : 0;
    i++;
  }

  fclose(anFil);


  FILE* outFil = fopen(outFilNam, "w");
  if(outFil == NULL) {
    sprintf(buf, "Nelze otevrit vystupni soubor '%s'! KONEC!\n\0", outFilNam);
    fuj(buf);
  }

  unsigned char rd = 0; unsigned int rdi = 0;
  i = 0;
  while((lread = getline(&line, &llen, inFil)) != -1) {
    sscanf(line, "%i", &rdi);
    rd = rdi;
    rd -= tape[i]; //devernamize_it
    znak[0] = znaky[0][rd]; znak[1] = znaky[1][rd];

    fprintf(outFil, "%s", znak);

    i++;
  }


  fclose(outFil); fclose(inFil);

  delete[] tape;

  exit(EXIT_SUCCESS);
}

//-------------------------------END-------------------------------