LSP_lab2_ver2

#define _CRT_SECURE_NO_WARNINGS
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <time.h>
//#include "stdafx.h"


#pragma pack(push, 2)
typedef struct {
    char signature[2];
    int size;
    short emptyField1;
    short emptyField2;
    int data;
    int lengthHead;
    int width;
    int heidth;
    short countColorPlace;
    short bit;
    char methodArch[4];
    int lengthRastrMas;
    int gorisResolution;
    int vertResolution;
    int countColorPic;
    int countMainColor;
} head_bmp;
#pragma pack(pop)

char nameFile[] = "1.bmp";

int saveImg(char *buf, head_bmp head, int width, int heigth, int comp)
{
    FILE *f;
    f = fopen("1_1_1.bmp", "wb");

    fwrite(&head, sizeof(char)*54, 1, f);
    fseek(f, head.data, SEEK_SET);
    fwrite(buf, sizeof(char)* ((3 * width*heigth) + (comp*heigth)), 1, f);
    fclose(f);

    return 0;
}

char* reflectGorisA(char *buffer, int width, int heigth, int comp)
{
    __asm
    {
     mov EAX, 1h;
    _for1:
     PUSH EAX;
     MOV EAX, width;
     IMUL EAX, 3;
     ADD EAX, comp;
     PUSH EBX;              //сохраняем EBX
     MOV EBX, EAX;
     POP EDX;
     POP EAX;
     PUSH EAX;
     PUSH EDX;
     SUB EAX, 1h;
     IMUL EAX, EDX;
     POP EBX;             //Восстанавливаем EBX
     POP EAX;
     ADD EAX, 1h;

    }

    return buffer;
}
char* reflectGoris(char *buffer, int width, int heigth, int comp)
{
    int i, j, index, w;
    char t;


    for (i = 1; i <= heigth; i = i + 1)
    {
        index = 3 * (i - 1)*width + (i - 1)*comp;
        w = (int)3 * floor(width / 2);
        for (j = 0; j <= w; j = j + 3)
        {

            t = buffer[index + j];
            buffer[index + j] = buffer[3 * i*width - j - 3 + (i - 1)*comp];
            buffer[3 * i*width - j - 3 + (i - 1)*comp] = t;

            t = buffer[index + j + 1];
            buffer[index + j + 1] = buffer[3 * i*width - j - 2 + (i - 1)*comp];
            buffer[3 * i*width - j - 2 + (i - 1)*comp] = t;

            t = buffer[index + j + 2];
            buffer[index + j + 2] = buffer[3 * i*width - j - 1 + (i - 1)*comp];
            buffer[3 * i*width - j - 1 + (i - 1)*comp] = t;
        }
    }
    return buffer;
}
int main()
{
    clock_t time;
    head_bmp imgHead;
    FILE* f;
    char *buffer;
    int comp;

    time = clock();
    if ((f = fopen("1.bmp", "rb")) == NULL)
    {
        printf("Ошибочка вышла: файла не существует");
        return -1;
    }

    fread(&imgHead, sizeof(char)*54, 1, f);
    if (imgHead.signature[0] == 0x42 && imgHead.signature[1] == 0x4d)
    {

        if (imgHead.bit == 24)
        {
            comp = (4 - (3 * imgHead.width) % 4);
            buffer = (char*)malloc(sizeof(char)* ((3 * imgHead.width*imgHead.heidth) + (comp*imgHead.heidth)));

            fseek(f, imgHead.data, SEEK_SET);
            fread(buffer, sizeof(char)* ((3 * imgHead.width*imgHead.heidth) + (comp*imgHead.heidth)), 1, f);

            buffer = reflectGoris(buffer, imgHead.width, imgHead.heidth, comp);

            buffer = reflectGorisA(buffer, imgHead.width, imgHead.heidth, comp);

            saveImg(buffer, imgHead, imgHead.width, imgHead.heidth, comp);

            __asm
            {
                mov EAX, comp;
                PUSH EAX;
                mov EAX, imgHead.heidth;
                PUSH EAX;
                mov EAX, imgHead.width;
                PUSH EAX;
                mov EAX, buffer;
                PUSH EAX;
            }


        }
        else
        {
            printf("Ошибочка вышла: глубина цвета должна быть равна 24");

        }
    }

    else
    {
        printf("Ошибочка вышла: файл неверного формата");

    }

    fclose(f);
    time = clock() - time;

    fprintf(stderr, "%fc", (double)time / CLOCKS_PER_SEC);
    scanf(&buffer);

    return 0;
}