#include <iostream>
#include <fstream>
#include <sstream>
#include <string>
#include <zlib.h>
#include <stdio.h>
#include <string.h>
#include <assert.h>
#include "zlib.h"
using namespace std;

const size_t buffer_size = 16384;

void writeData(const string& fname, const char *data, size_t size)
{
   static ofstream rtf;
   static int      n = 0;
   static int      brack  = 0;
   static bool     in = false;
   ostringstream   os;

   for (int i = 0; i < static_cast<int>(size); ++i)
   {
      if (*data == '}')
      {
         ++brack;
         if (brack == 1)
         {
            in = true;
            ++n;
            os.str(string());
            os << fname << '.' << n << ".rtf";
            rtf.open(os.str().c_str(), ios_base::out | ios_base::binary);
            cout << "New RTF: " << os.str() << endl;
         }
      }
      if (in)
         rtf << *data;
      if (*data == '}')
      {
         --brack;
         if (brack == 0)
         {
            in = false;
            rtf.close();
         }
         if (brack < 0)
            brack = 0;
      }
      ++data;
   }
}

int main(int argc, char **argv)
{
   z_stream      z;
   unsigned char buf_in[buffer_size], buf_out[buffer_size];

   if (argc != 2)
   {
      cout << "You must specify one MTF-file" << endl;
      return 1;
   }

   ifstream mtf(argv[1], ios_base::in | ios_base::binary);
   mtf.seekg(8);

   z.zalloc = Z_NULL;
   z.zfree = Z_NULL;
   z.opaque = Z_NULL;
   z.avail_in = 0;
   z.next_in = Z_NULL;
   inflateInit(&z);

   while (!mtf.eof())
   {
      mtf.read(reinterpret_cast<char *>(&buf_in[0]), buffer_size);
      z.avail_in = mtf.gcount();
      if (z.avail_in <= 0)
         break;
      z.next_in = buf_in;

      do
      {
         z.avail_out = buffer_size;
         z.next_out = buf_out;
         inflate(&z, Z_NO_FLUSH);
         writeData(argv[1], reinterpret_cast<const char *>(&buf_out[0]), buffer_size - z.avail_out);
      } while (z.avail_out == 0);
   }

   inflateEnd(&z);

   return 0;
}

// ШИФРОВКА  ФАЙЛОВ
int TForm1::Crypto(char key,AnsiString FileName)
{int f;
int n;  //Число прочитанных байтов файлридом
char buf[250];   //Буффер ввода
char a;
int i;
if (FileExists(FileName))
  {f=FileOpen(FileName,fmOpenReadWrite);  //Открываем файл
   while (n)                 //Пока есть прочитанные данные
    {n=FileRead(f,buf,250);              //Считываем 250 байт в буффер
     for (i=0; i<strlen(buf); i++)
      {a=buf[i];                         //Шифруем
       buf[i]=a ^ key;
       i++;
      }
     FileSeek(f,-n,1);                  //Возращаемся на n байтов назад
     FileWrite(f,buf,n);               //Записываем из буфера
    }
   FileClose(f);                 //Закрываем файл
  }
return 1;
}

#include <iostream>
#include <conio.h>
#include <string>
#include <windows.h>

using namespace std;

inline void Encrypt(byte *buffer, long size)
{
  for (long i = 0; i < size; i++)
    buffer[i]++;
}

inline void Decrypt(byte *buffer, long size)
{
  for (long i = 0; i < size; i++)
    buffer[i]--;
}

bool ProcessFile(string fileName, long bufferSize, void (*ProcessBuffer)(byte*, long))
{
  bool processed = false;
  if (bufferSize > 0)
  {
    HANDLE hFile = ::CreateFile(
      fileName.c_str(),
      FILE_ALL_ACCESS,
      FILE_SHARE_READ,
      NULL,
      OPEN_EXISTING,
      FILE_FLAG_OVERLAPPED,
      NULL);
    if (hFile != INVALID_HANDLE_VALUE)
    {
      LARGE_INTEGER fileSize;
      if (::GetFileSizeEx(hFile, &fileSize))
      {
        DWORD dw;
        byte *buffer = new byte[bufferSize];
        OVERLAPPED overrlp;
        ZeroMemory(&overrlp, sizeof(OVERLAPPED));
        LARGE_INTEGER pos;
        for (pos.QuadPart = 0; pos.QuadPart < fileSize.QuadPart; pos.QuadPart+=bufferSize)
        {
          overrlp.Offset = pos.LowPart;
          overrlp.OffsetHigh = pos.HighPart;
          ::ReadFile(hFile, buffer, bufferSize, &dw, &overrlp);
          ::GetOverlappedResult(hFile, &overrlp, &dw, true);
          ProcessBuffer(buffer, dw);
          ::WriteFile(hFile, buffer, dw, &dw, &overrlp);
        }
        delete[] buffer;
        processed = true;
      }
      ::CloseHandle(hFile);
    }
  }
  return processed;
}

int main()
{
  cout << "Please enter file name for process: ";
  string fileName;
  cin >> fileName;

  DWORD time;

  time = GetTickCount();
  cout << (ProcessFile(fileName, 8388608, Encrypt) ? "File encrypted" : "File not encrypted") << endl;
  cout << "Time " << GetTickCount() - time << "ms" << endl;

  cout << "Press any key for decrypt" << endl;
  _getch();

  time = GetTickCount();
  cout << (ProcessFile(fileName, 8388608, Decrypt) ? "File decrypted" : "File not decrypted") << endl;
  cout << "Time " << GetTickCount() - time << "ms" << endl;

  cout << "Press any key for exit" << endl;
  _getch();
  return 0;
}