Чтение данных из бинарного файла

@Dostik · Регистрация: 31.05.2011

Студворк — интернет-сервис помощи студентам

Всем добрый день, разбираюсь с чтением бинарных файлов, застрял на том что чтение не производится нужным образом, приведу кусок кода который использовался через WinAPI :

C++
1
2
3
4
5
6
7
f_per=CreateFile("fpereval.dat",GENERIC_READ,FILE_SHARE_READ|FILE_SHARE_WRITE,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
 if (f_per==INVALID_HANDLE_VALUE) {}
                     else {
                SetFilePointer(f_per,(sizeof(str_pereval)*(k-1)),NULL,FILE_BEGIN);
                ReadFile(f_per,&mp,(sizeof(str_pereval)),&writed_per,NULL);
                CloseHandle(f_per);
                          };

Далее я обращаюсь

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
void __fastcall TForm1::Calc_res_Val()
{
 for (int k=0; k<8; k++)
 {
  res_v[k]=1.-(per[k].Pm/res_val_m[k])-(per[k].Pp/res_val_p[k]);
  if (res_v[k]>0.)
   {
    res_m[k]=res_val_m[k] * res_v[k];
    res_p[k]=res_val_p[k] * res_v[k];
    }
     else {res_m[k]=0.; res_p[k]=0.;}
 
  }
}

С помощью tezaurismosis за что ему спасибо, была переделана значительная часть кода:

C++
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
Void Calc_Res_Val ()
{
    HANDLE f_per;
    unsigned long writed_per;
array<double>^ res_val_m = gcnew array<double>{2700.,2100.,1300.,1000.,30000.,30000.,30000.,20000.};
array<double>^ res_val_p = gcnew array<double>{3500.,3000.,2200.,2000.,40000.,40000.,40000.,30000.};
array<Single>^res_m = gcnew array<Single>(8);
array<Single>^res_p = gcnew array<Single>(8);
array<str_pereval>^ per = gcnew array<str_pereval>(8);
str_pereval^ gg = gcnew str_pereval ();
 
     f_per=CreateFile("fpereval.dat",GENERIC_READ,FILE_SHARE_READ,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
 if (f_per==INVALID_HANDLE_VALUE) {MessageBox::Show ("Нет файла");}
 
      else     {
                SetFilePointer(f_per,0,NULL,FILE_BEGIN);
                ReadFile(f_per,&per,(sizeof(str_pereval)*8),&writed_per,NULL);
                CloseHandle(f_per);
               }; 
 
 for (int k=0; k<8; k++)
 {
gg->res_v[k]=1.-(per[k].Pm/res_val_m[k])-(per[k].Pp/res_val_p[k]);
  if (gg->res_v[k]>0.)
   {
    res_m[k]=res_val_m[k] * gg->res_v[k];
    res_p[k]=res_val_p[k] * gg->res_v[k];
    }
     else {res_m[k]=0.; res_p[k]=0.;}
  }
 
 }

но на выходе я получил ошибку:

Кликните здесь для просмотра всего текста

Помощник отладки управляемого кода "FatalExecutionEngineError" обнаружил неполадку в "C:\Users\Ethernet\Documents\Visual Studio 2012\Projects\mfc\Debug\mfc.exe".

Дополнительные сведения: The runtime has encountered a fatal error. The address of the error was at 0x6718df03, on thread 0x168c. The error code is 0xc0000005. This error may be a bug in the CLR or in the unsafe or non-verifiable portions of user code. Common sources of this bug include user marshaling errors for COM-interop or PInvoke, which may corrupt the stack.
Если для этого исключения имеется обработчик, выполнение программы может быть продолжено безопасно.

Так же с подсказки tezaurismosis, направив меня в сторону System::IO::File::ReadAllLines, я написал код:

C++
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
public: value class str_pereval
{
public:
    int nk;                
    int N_vn,N_vv;         
    Single d_vn,d_vv;       
    DateTime^ t_n;         
    DateTime^ t_k;         
    Single L;               
    Single P,Pm,Pp;         
    Single kal_n,kal_v;     
    array<Single>^ res_v;           
    array<Single>^ frez;         
    array<int>^ irez;
 
    str_pereval(int size) {
        frez = gcnew array<float>(size);
        irez = gcnew array<int>(size);
    }
 
        };
array<str_pereval>^ per = gcnew array<str_pereval>(8);
str_pereval^ gg = gcnew str_pereval ();
 
String^ f_per = "fpereval.dat";
 
BinaryReader^ binr = gcnew BinaryReader(File::Open(f_per,FileMode::Open)); 
 
{
             // пока не достигнут конец файла
                // считываем каждое значение из файла
    while (binr->PeekChar() > -1)
             {
                    array<str_pereval>^ per = gcnew array<str_pereval>(8);
               
               
                for (int k=0; k<4;k++){
                        per[k].N_vv = binr->ReadInt32();}

но на выходе я не получаю нужных мне данных, просто мусор, помогите разобраться с чтением бинарных файлов, смещение по файлу, и т.д., всем спасибо

@tezaurismosis · 29.10.2015, 18:26

Dostik, хотя бы кусок fpereval.dat не дадите? И ещё значения, которые должны оттуда получить. Тестировать нужно на чём-то

@Dostik · 30.10.2015, 09:16 **[ТС]**

tezaurismosis, Доброе утро, извиняюсь моя ошибка, прикладываю файл fpereval.rar
Данные которые нужно получить:

C++
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
for (int i=0;i<4;i++)
 {     //в скобках описание что должны получить из файла
per[i].nk;    //( 1,2,3,4)
per[i].t_n;  // дата/ время ( 29.10.15 / 10:59;  28.10.15 / 18:05; 30.10.15 / 6:45; 29.10.15 / 10:59 )
per[i].P;    //  ( 830,2727; 1406,7128; 0 ; 830,2727)
per[i].Pm; // (0,0,0,0)
per[i].Pp; //  ( 830,2727; 1406,7128; 0 ; 830,2727)
res_v[j]; // (0.762;0.531;1;0.584)
per[i].d_vv;     //  ( 492; 485,399; 491,35; 501,0)   
per[i].d_vn;    //   (492; 484,75; 491,60;  502,64)
per[i].N_vv;   //    (105; 57; 104; 123)       
per[i].N_vn;  //     (134; 66 ; 92;  151)  
}
 
 
for (int j=4;j<8;j++)
 {
 per[j].nk;     // (1;2;3;4)
 per[j].t_n;   // (12.10.15 / 8:02; 22.10.15 / 10:37; 7.10.15 / 8:22; 7.10.15 / 8:22;)
 per[j].P      // (20599,30;5967,92;28045,44; 28045,44)  
 per[j].Pm; // (1877,11;699,38;5579,77;5580,77)
 per[j].Pp  // (20599,30;5967,92;28045,44; 28045,44)
 res_v[j]; // (0.469;0.844;0.252;-0.02)
 per[j].N_vv;   // (54;0;39;9)
 per[j].N_vn;  // (52;0;8;15)
  }

@Dostik · 30.10.2015, 11:08 **[ТС]**

Немного разобравшись, пришел к такому выводу, файл читается в хаотичном порядке, тоесть - если i в цикле = 0

C++
1
2
3
4
for (int i=0;i<4;i++)
 {     //в скобках описание что должны получить из файла
per[i].N_vv;   //    (105; 57; 104; 123)       
}

(для примера, отладка по данному значению N_vv) я должен был получить 105, на выходе я получаю 1, тоесть данные per[i].nk;, если продолжить цикл и i = 1 то на выходе я получаю 134 а это данные уже per[i].N_vn;, продолжаем дальше цикл i = 2 и вот оно наше значение 105, значение цикла i = 3, на выходе получаю мусор 1140195328, нужно делать смещение, как это реализовать еще не нашел и не знаю, пока жду ответа поищу на просторах googl'a, спасибо всем кто заглянул

Добавлено через 39 минут
Со смещением тоже вроде как разобрался, можно делать следующим образом

C++
1
2
3
for (int k=0; k<4;k++){
                        per[k].N_vv = binr->ReadInt32();
                         int c = per[k].N_vv >> 1;   }

пока разбираюсь как сместить что бы было как тут

C++
1
2
3
4
5
6
7
8
f_per=CreateFile("fpereval.dat",GENERIC_READ,FILE_SHARE_READ,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
 if (f_per==INVALID_HANDLE_VALUE) { }
 
      else     {
                SetFilePointer(f_per,0,NULL,FILE_BEGIN);
                ReadFile(f_per,&per,(sizeof(str_pereval)*8),&writed_per,NULL);
                CloseHandle(f_per);
               };

Добавлено через 21 минуту
Опять таки если исходи из этого куска

C++
1
2
3
4
5
6
7
8
f_per=CreateFile("fpereval.dat",GENERIC_READ,FILE_SHARE_READ,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
 if (f_per==INVALID_HANDLE_VALUE) { }
 
      else     {
                SetFilePointer(f_per,0,NULL,FILE_BEGIN);
                ReadFile(f_per,&per,(sizeof(str_pereval)*8),&writed_per,NULL);
                CloseHandle(f_per);
               };

то мы смещаемся в строке и складываем все значения в &per значения храним в массиве от 0 до 7, пускай в нашем примере мы будем хранить данные от 0 до 3, массив заполняется всеми значениями из структуры.
Данные приведены выше, тогда получается правильно, данные заполняются построчно, итого в 1-й строке мы получаем значения которые я писал выше:

Сообщение от Dostik

для примера, отладка по данному значению N_vv) я должен был получить 105, на выходе я получаю 1, тоесть данные per[i].nk;, если продолжить цикл и i = 1 то на выходе я получаю 134 а это данные уже per[i].N_vn;, продолжаем дальше цикл i = 2 и вот оно наше значение 105

Единственное что не понятно, это то откуда берется мусор, и как заполнить правильно массив для всех значений как положено

@Dostik · 30.10.2015, 11:20 **[ТС]**

выложу правильность последовательности хранения данных:

Кликните здесь для просмотра всего текста

Название: 3.jpg
Просмотров: 31

Размер: 24.3 Кб

@Dostik · 30.10.2015, 11:23 **[ТС]**

соответственно, как я понял для начала нужно прочитать файл, а потом отсортировать данные в нужные мне переменные

Новые блоги и статьи Все статьи Все блоги /
Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .	Использование значений реквизитов справочника в документе, с определенными условиями и правами Maks 07.04.2026 1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .

@tezaurismosis Администратор 9674 / 4826 / 763 Регистрация: 17.04.2012 Сообщений: 9,664 Записей в блоге: 14
	29.10.2015, 18:26
	Dostik, хотя бы кусок `fpereval.dat` не дадите? И ещё значения, которые должны оттуда получить. Тестировать нужно на чём-то 1

@Dostik 38 / 38 / 4 Регистрация: 31.05.2011 Сообщений: 580
	30.10.2015, 11:20 [ТС]
	выложу правильность последовательности хранения данных: Кликните здесь для просмотра всего текста 0

@Dostik 38 / 38 / 4 Регистрация: 31.05.2011 Сообщений: 580
	30.10.2015, 11:23 [ТС]
	соответственно, как я понял для начала нужно прочитать файл, а потом отсортировать данные в нужные мне переменные 0