ГОСТ 3410 / Работа с длинными числами

@IS · Регистрация: 01.10.2008

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

Начал делать курсовик по реализации ЭЦП по ГОСТ 34.10 (и соответственно 34.11 и 28147

). В качестве среды разработки выбрал C++ Builder.
Возник вопрос: Как работать с большими числами размером в 256,512,1024 бит? Они, ведь, ни в один тип данных не лезут (int только 32 бита). В контрольком примере дано число 5789604461865809771178549250434395392663 4992332820282019728792003956564821041.
P.S Чужая реализация 3410-01 Но, есть сильное подозрение а то, что препода "кинули" - подсунили ему в место ГОСТ 3410-2001, забугорский ECDSA.
Мой курсовик:
Недостатки:
1) Результат проверки не совпадает с генерированой подписью. Проблема в математике.
2) Нет создания хэша функции по ГОСТ 3411
3) Нет вычисленя параметров ЭК.
4) Длительное время работы (прога не зависла - она считает)

@IS · 21.10.2008, 15:40 **[ТС]**

*bkmz, Вот нашел
http://slil.ru/26258183 - распознаный ГОСТ 34.10-94
http://slil.ru/26258197 - методичка какой-то конторы по шифрам

Добавлено через 7 минут 24 секунды
Еще пара вопросов:
1) Есть ли константа (или чего-то еще) с названием NULL?
2) Чем отличаются (__int64) T, от __int64 T;?
3) Макрос #define MakeLong (A,B) ((A)|((__int64)(B)<<m)); при его вызове выдает ошибки [C++ Error] Unit1_math.cpp(161): E2451 Undefined symbol 'B' - мол не знаю, что за B. Потом исправил на #define MakeLong ( A,int B) ((A)|((__int64)(B)<<m));. Выдает ошибку [C++ Error] Unit1_math.cpp(161): E2188 Expression syntax. Вот, код функции:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
void ShortDiv (int *C, const int A[],int x, int *pr, int n)
{
__int64 T=0;
int i;
 
if (x==0) return;
for (i=n-1; i>=0; i--)
{
        T=MakeLong(A[i], T);
        if (C!= NULL) C[i]= LoDigit (T/x);
        T%=x;
}
if (pr != NULL) *pr =  LoDigit(T);
}

@*bkmz · 21.10.2008, 16:10

IS, Ну все же там есть вещи которые настораживают.. например пункт 7 в процедуре A(Генерация простых чисел), где 2 возводится в 161 степень.
Методичка кокой-то конторы по шифрам - это вещь!!!

@Lord_Voodoo · 21.10.2008, 17:01

IS, 1) NULL есть
2) отличие в том, что в первом случае - это приведение переменно к типу __int64, а во втором - это объявление переменной
3) покажи текст, где ты макрос объявляешь, потому что вставил твой первый вариант, билдер нормально съел...

@IS · 21.10.2008, 17:15 **[ТС]**

Это?

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
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
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1_math.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
 
#define LoDigit(T) ((int)(T))
#define HiDigit(T) ((int)((T)>>m))
 
#define MaxDigit ((int)(-1));
#define MakeLong ( A,int B) ((A)|((__int64)(B)<<m));
 
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void Assign (int A[], const int B[], int n)
{
for (int i=0; i<n; i++) A[i]=B[i];
}
 
void AssignDigit( int A[],  int x, int n )
{
Zero(A,n);
A[0]=x;
};
 
void Zero (int A[], int n)
{
for (int i=0; i<n; i++) A[i]=0;
};
 
int IsZero (int A[], int n);
 
int Add (int C[], const int A[], const B[], int n)
{
__int64 T;
int d=0;
int i;
char m=32;
 
Form1->RichEdit1->Lines->Add("Операция сложение");
for (i=0; i<n; i++)
        {
        T=(__int64)A[i]+B[i]+d;
        C[i]=LoDigit (T);
        d=HiDigit(T);
        Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; d="+IntToStr(d)+ " sizeof(d)="+IntToStr(sizeof(HiDigit(T))));
        }
for (i=0; i<n; i++) Form1->LabeledEdit1->Text=Form1->LabeledEdit1->Text+IntToStr(A[i]);
for (i=0; i<n; i++) Form1->LabeledEdit2->Text=Form1->LabeledEdit2->Text+IntToStr(B[i]);
for (i=0; i<=2*n; i++) Form1->LabeledEdit3->Text=Form1->LabeledEdit3->Text+IntToStr(C[i])+";";
Form1->LabeledEdit4->Text=d;
return d;
};
 
int Sub (int C[], const int A[], const B[], int n)
{
__int64 T;
int d=0;
int i;
char m=32;
 
Form1->RichEdit1->Lines->Add("Операция вычитание");
for (i=0; i<n; i++)
        {
        T=(__int64)A[i]-B[i]-d;
        C[i]=LoDigit (T);
        d=HiDigit(T);
        d=(0-d);
        Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; d="+IntToStr(d)+ " sizeof(d)="+IntToStr(sizeof(HiDigit(T))));
        }
for (i=0; i<n; i++) Form1->LabeledEdit1->Text=Form1->LabeledEdit1->Text+IntToStr(A[i]);
for (i=0; i<n; i++) Form1->LabeledEdit2->Text=Form1->LabeledEdit2->Text+IntToStr(B[i]);
for (i=0; i<=2*n; i++) Form1->LabeledEdit3->Text=Form1->LabeledEdit3->Text+IntToStr(C[i])+";";
return d;
Form1->LabeledEdit4->Text=d;
};
 
int Cmp (const int A[], const B[], int n)
{
int i;
char m=32;
 
for (i=n-1; (i>=n)&&(A[i]==B[i]); i--);
if (i<0) return 0;
if (A[i]>B[i]) return +1;
return -1;
};
 
void Mul (int C[], const int A[], const B[], int n)
{
Form1->RichEdit1->Lines->Add("Умножение");
int i,j;
int d;
__int64 T;
AnsiString Buf;
 
Buf="";
for (i=0; i<n; i++) Buf+=IntToStr(C[i]);
Form1->RichEdit1->Lines->Add("С до обнуления="+Buf);
 
Zero(C,n);
 
Buf="";
for (i=0; i<n; i++) Buf+=IntToStr(C[i]);
Form1->RichEdit1->Lines->Add("С после обнуления="+Buf);
 
for (i=0; i<n; i++)
{
        d=0;
        for (j=0; j<n; j++)
        {
                T = (__int64)A[i]*B[j]+C[i+j]+d;
                C[i+j]=LoDigit (T);
                d= HiDigit (T);
                Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+" j=" + IntToStr (j)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i+j)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; d="+IntToStr(d)+ " sizeof(d)="+IntToStr(sizeof(HiDigit(T))));
        }
        C[i+j]=d;
        Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+" j=" + IntToStr (j)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i+j)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; d="+IntToStr(d)+ " sizeof(d)="+IntToStr(sizeof(HiDigit(T))));
}
for (i=0; i<n; i++) Form1->LabeledEdit1->Text=Form1->LabeledEdit1->Text+IntToStr(A[i]);
for (i=0; i<n; i++) Form1->LabeledEdit2->Text=Form1->LabeledEdit2->Text+IntToStr(B[i]);
for (i=0; i<=2*n; i++) Form1->LabeledEdit3->Text=Form1->LabeledEdit3->Text+IntToStr(C[i])+";";
}
 
void ShortMul (int C[], const int A[], int X, int n)
{
__int64 T=0;
int i;
 
Form1->RichEdit1->Lines->Add("Умножение длинного числа на цифру");
for(i=0;i<n;i++)
{
        T = (__int64)A[i]*X+(__int64)HiDigit(T);
        C[i] = LoDigit(T);
        Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; (__int64)A[i]="+IntToStr((__int64)A[i])+"; (__int64)HiDigit(T)="+IntToStr((__int64)HiDigit(T)));
}
C[n]=HiDigit(T);
for (i=0; i<n; i++) Form1->LabeledEdit1->Text=Form1->LabeledEdit1->Text+IntToStr(A[i]);
Form1->LabeledEdit2->Text=IntToStr(X);
for (i=0; i<2*n; i++) Form1->LabeledEdit3->Text=Form1->LabeledEdit3->Text+IntToStr(C[i])+";";
}
 
void ShortDiv (int *C, const int A[],int x, int *pr, int n)
{
__int64 T=0;
int i;
 
if (x==0) return;
for (i=n-1; i>=0; i--)
{
        T=MakeLong(A[i], T);
        if (C!= NULL) C[i]= LoDigit (T/x);
        T%=x;
}
if (pr != NULL) *pr =  LoDigit(T);
}
 
void Div (const int A[], const int B[], int *Q, int *R, int t, int n)
{
int q;
 
int U[Max_Size*2+2];
int V[Max_Size+1];
int W[Max_Size+1];
__int64 T;
int i,j,k;
int d;
 
if (R!=NULL) Zero(R,n);
if (Q!=NULL) Zero(Q,t);
 
for (i=n-1; (i>=0)&&(B[i]==0); i-);
n=i+1;
if (n==0) return;
for (k=t-1; (k>=0)&&(A[k]==0); k-);
t= k+1;
if (n>t)
{
        if (R!=NULL) Assign (R,A,t);
        return;
}
else if (n==1)
{
        ShortDiv(Q,A,B[0], R,t);
        return;
}
d= (int)(((__int64)MaxDigit+1)/((__int64)B[n-1]+1));
ShortMul (V,B,d,n);
ShortMul (U,A,d,t);
U[t+1] = 0;
// основной цикл
for (j=t;j>=n;j-)
{
        T = MakeLong (U[j-1],U[j]);
        if (U[j]==V[n-1]) q=MaxDigit;
        else q=(int)(T/V[n-1]);
        T %= V[n-1];
        if ((__int64)V[n-2]]*q > MakeLong ((int)T, U[j-2]))
        while ((__int64)V[n-2]*q > MakeLong (U[j-2],(int)(T-(__int64)q*V[n-1]))) q-;
        ShortMul (W,V,q,n);
        Sub(U+j-n,U+j-n, W, n+1);
        if (U[j+1])
        {
                U[j] += Add(U+j-n,U+j-n,V,n);
                q-;
        }
        if (Q!=NULL) Q[j-n] = q;
}
if R!=NULL) ShortDiv(R,U,d,NULL,n);
}
 
}
 
void ClearAllForm()
{
Form1->RichEdit1->Clear();
Form1->LabeledEdit1->Clear();
Form1->LabeledEdit2->Clear();
Form1->LabeledEdit3->Clear();
Form1->LabeledEdit4->Clear();
 
}
//------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ClearAllForm();
int a[]={2,2,9}, b[]={1,2,9},c[]={1,2,2,3};
Form1->LabeledEdit4->Text=IntToStr(Add(c,a,b,n));
 
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
ClearAllForm();
int a[]={2,2,8}, b[]={1,2,9},c[]={1,2,2,3};
Form1->LabeledEdit4->Text=IntToStr(Sub(c,a,b,n));
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button3Click(TObject *Sender)
{
ClearAllForm();
int a[]={2,2,9}, b[]={1,2,9};
Form1->LabeledEdit4->Text=IntToStr(Cmp(a,b,n));
}
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Form1->Label1->Caption="Длина машинного слова m="+IntToStr(m)+" Количество цифр n=" + IntToStr(n);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button4Click(TObject *Sender)
{
ClearAllForm();
int a[]={2,2,9}, b[]={1,2,9},c[]={1,2,3,4,5,6,7,8,9,1,2,3,4,5};
Mul (c,a,b,n);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button5Click(TObject *Sender)
{
ClearAllForm();
int x=2;
int a[]={2,2,9}, b[]={1,2,9},c[]={1,2,3,4,5,6,7,8,9,1,2,3,4,5};
ShortMul(c,a,x,n);
}
//---------------------------------------------------------------------------

Или в Unit1_math.h тоже надо что-то прописывать?

@Lord_Voodoo · 21.10.2008, 17:45

у меня прошел такой вариант:

Code
1
#define MakeLong (A,B) ((A)|((__int64)(B)<<m));

@IS · 21.10.2008, 19:15 **[ТС]**

Вы новый код использовали? У меня не работает

@*bkmz · 22.10.2008, 01:25

IS, У тебя 34.10-2001 (эллиптические кривые) или 34.10-94?

@IS · 22.10.2008, 08:16 **[ТС]**

*bkmz, у меня эллиптические кривые, гост 2001 года. Кстати, какая у тебя специальность?

Добавлено через 5 минут 12 секунд
WooDooMan, если нельзя устранить проблему с макросом #define MakeLong (A,B) ((A)|((__int64)(B)<<m));,то, может, его можно заменить аналогичным по смыслу кодом?
А в этом цикле:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
for (j=t;j>=n;j--) // было for (j=t;j>=n;j-)
{
        T = MakeLong (U[j-1],U[j]);
        if (U[j]==V[n-1]) q=MaxDigit;
        else q=(int)(T/V[n-1]);
        T %= V[n-1];
        if ((__int64)V[n-2]]*q > MakeLong ((int)T, U[j-2]))
        while ((__int64)V[n-2]*q > MakeLong (U[j-2],(int)(T-(__int64)q*V[n-1]))) q-;
        ShortMul (W,V,q,n);
        Sub(U+j-n,U+j-n, W, n+1);
        if (U[j+1])
        {
                U[j] += Add(U+j-n,U+j-n,V,n);
                q-;
        }
        if (Q!=NULL) Q[j-n] = q;
}

Ругается на T = MakeLong (U[j-1],U[j]);,говоря [C++ Error] Unit1_math.cpp(204): E2087 Illegal use of pointer.
И здесь тоже:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
for (j=t;j>=n;j--) // было for (j=t;j>=n;j-)
{
        //T = MakeLong (U[j-1],U[j]);
        if (U[j]==V[n-1]) q=MaxDigit  //было if (U[j]==V[n-1]) q=MaxDigit;
        else q=(int)(T/V[n-1]);
        T %= V[n-1];
        if ((__int64)V[n-2]*q > MakeLong ((int)T, U[j-2]))
                while ((__int64)V[n-2]*q > MakeLong (U[j-2],(int)(T-(__int64)q*V[n-1]))) q-;
        ShortMul (W,V,q,n);
        Sub(U+j-n,U+j-n, W, n+1);
        if (U[j+1])
        {
                U[j] += Add(U+j-n,U+j-n,V,n);
                q-;
        }
        if (Q!=NULL) Q[j-n] = q;
}

ругается [C++ Error] Unit1_math.cpp(208): E2087 Illegal use of pointer на строке ((__int64)V[n-2]*q > MakeLong ((int)T, U[j-2]))
Еще проблема. Не очень понятно, что хотели сделать авторы следующим циклом:

C++
1
2
3
for (i=n-1; (i>=0)&&(B[i]==0); i-);
n=i+1;
if (n==0) return;

меня интересует, что за i- (может это просто i--,хотя в других циклах авторы, так и пишут i--)? И, вообще, если так, это цикл без операторов.
И, что за постфиксная запись q-? в коде:

C++
1
2
3
4
        {
                U[j] += Add(U+j-n,U+j-n,V,n);
                q-;
        }

Другая проблема.

C++
1
d= (int)(((__int64)MaxDigit+1)/((__int64)B[n-1]+1));

говорит, что не хватает ) после MaxDigit. Но все скобки на месте, что ему не нравиться?
P.S Коды в книге приведены на языке C.

@Lord_Voodoo · 22.10.2008, 09:40

IS, прикрепи свой код в посте, а то я уже запутался, что там у тебя и где... а вообще можно просветить, что это за госты-то такие, вы где, товарисчи, учитесь?

@IS · 22.10.2008, 09:55 **[ТС]**

Последная версия кода:
Unit1_math.h

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
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
//---------------------------------------------------------------------------
 
#ifndef Unit1_mathH
#define Unit1_mathH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <ComCtrls.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:    // IDE-managed Components
        TLabeledEdit *LabeledEdit1;
        TLabeledEdit *LabeledEdit2;
        TLabeledEdit *LabeledEdit3;
        TButton *Button1;
        TRichEdit *RichEdit1;
        TButton *Button2;
        TButton *Button3;
        TLabeledEdit *LabeledEdit4;
        TLabel *Label1;
        TButton *Button4;
        TButton *Button5;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
        void __fastcall Button3Click(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall Button4Click(TObject *Sender);
        void __fastcall Button5Click(TObject *Sender);
private:    // User declarations
public:     // User declarations
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
int Mas[]={1,2,3,4,5,6,7,8,9,};
int n=3;
char m=32;
const int Max_Size=256;
 
void Assign (int A[], const int B[], int n);
 
void AssignDigit( int A[],  int x, int n );
 
void Zero (int A[], int n);
 
int IsZero (int A[], int n);
 
int Add (int C[], const int A[], const B[], int n);
 
int Sub (int C[], const int A[], const B[], int n);
 
int Cmp (const int A[], const B[], int n);
 
void Mul (int C[], const int A[], const B[], int n);
 
void ShortMul (int C[], const int A[], int X, int n);
 
void ShortDiv (int *C, const int A[],int x, int *pr, int n);
 
void Div (const int A[], const int B[], int *Q, int *R, int t, int n);
 
//---------------------------------------------------------------------------
#endif

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
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
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1_math.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
 
#define LoDigit(T) ((int)(T))
#define HiDigit(T) ((int)((T)>>m))
 
#define MaxDigit ((int)(-1));
#define MakeLong (A,B) ((A)|((__int64)(B)<<m));
 
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void Assign (int A[], const int B[], int n)
{
for (int i=0; i<n; i++) A[i]=B[i];
}
 
void AssignDigit( int A[],  int x, int n )
{
Zero(A,n);
A[0]=x;
};
 
void Zero (int A[], int n)
{
for (int i=0; i<n; i++) A[i]=0;
};
 
int IsZero (int A[], int n);
 
int Add (int C[], const int A[], const B[], int n)
{
__int64 T;
int d=0;
int i;
char m=32;
 
Form1->RichEdit1->Lines->Add("Операция сложение");
for (i=0; i<n; i++)
        {
        T=(__int64)A[i]+B[i]+d;
        C[i]=LoDigit (T);
        d=HiDigit(T);
        Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; d="+IntToStr(d)+ " sizeof(d)="+IntToStr(sizeof(HiDigit(T))));
        }
for (i=0; i<n; i++) Form1->LabeledEdit1->Text=Form1->LabeledEdit1->Text+IntToStr(A[i]);
for (i=0; i<n; i++) Form1->LabeledEdit2->Text=Form1->LabeledEdit2->Text+IntToStr(B[i]);
for (i=0; i<=2*n; i++) Form1->LabeledEdit3->Text=Form1->LabeledEdit3->Text+IntToStr(C[i])+";";
Form1->LabeledEdit4->Text=d;
return d;
};
 
int Sub (int C[], const int A[], const B[], int n)
{
__int64 T;
int d=0;
int i;
char m=32;
 
Form1->RichEdit1->Lines->Add("Операция вычитание");
for (i=0; i<n; i++)
        {
        T=(__int64)A[i]-B[i]-d;
        C[i]=LoDigit (T);
        d=HiDigit(T);
        d=(0-d);
        Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; d="+IntToStr(d)+ " sizeof(d)="+IntToStr(sizeof(HiDigit(T))));
        }
for (i=0; i<n; i++) Form1->LabeledEdit1->Text=Form1->LabeledEdit1->Text+IntToStr(A[i]);
for (i=0; i<n; i++) Form1->LabeledEdit2->Text=Form1->LabeledEdit2->Text+IntToStr(B[i]);
for (i=0; i<=2*n; i++) Form1->LabeledEdit3->Text=Form1->LabeledEdit3->Text+IntToStr(C[i])+";";
return d;
Form1->LabeledEdit4->Text=d;
};
 
int Cmp (const int A[], const B[], int n)
{
int i;
char m=32;
 
for (i=n-1; (i>=n)&&(A[i]==B[i]); i--);
if (i<0) return 0;
if (A[i]>B[i]) return +1;
return -1;
};
 
void Mul (int C[], const int A[], const B[], int n)
{
Form1->RichEdit1->Lines->Add("Умножение");
int i,j;
int d;
__int64 T;
AnsiString Buf;
 
Buf="";
for (i=0; i<n; i++) Buf+=IntToStr(C[i]);
Form1->RichEdit1->Lines->Add("С до обнуления="+Buf);
 
Zero(C,n);
 
Buf="";
for (i=0; i<n; i++) Buf+=IntToStr(C[i]);
Form1->RichEdit1->Lines->Add("С после обнуления="+Buf);
 
for (i=0; i<n; i++)
{
        d=0;
        for (j=0; j<n; j++)
        {
                T = (__int64)A[i]*B[j]+C[i+j]+d;
                C[i+j]=LoDigit (T);
                d= HiDigit (T);
                Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+" j=" + IntToStr (j)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i+j)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; d="+IntToStr(d)+ " sizeof(d)="+IntToStr(sizeof(HiDigit(T))));
        }
        C[i+j]=d;
        Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+" j=" + IntToStr (j)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i+j)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; d="+IntToStr(d)+ " sizeof(d)="+IntToStr(sizeof(HiDigit(T))));
}
for (i=0; i<n; i++) Form1->LabeledEdit1->Text=Form1->LabeledEdit1->Text+IntToStr(A[i]);
for (i=0; i<n; i++) Form1->LabeledEdit2->Text=Form1->LabeledEdit2->Text+IntToStr(B[i]);
for (i=0; i<=2*n; i++) Form1->LabeledEdit3->Text=Form1->LabeledEdit3->Text+IntToStr(C[i])+";";
}
 
void ShortMul (int C[], const int A[], int X, int n)
{
__int64 T=0;
int i;
 
Form1->RichEdit1->Lines->Add("Умножение длинного числа на цифру");
for(i=0;i<n;i++)
{
        T = (__int64)A[i]*X+(__int64)HiDigit(T);
        C[i] = LoDigit(T);
        Form1->RichEdit1->Lines->Add("i="+IntToStr(i)+"; T="+IntToStr(T)+ " sizeof(T)="+IntToStr(sizeof(T))+"; C["+IntToStr(i)+"]="+IntToStr(C[i])+" sizeof(C)="+IntToStr(sizeof(C[i]))+"; (__int64)A[i]="+IntToStr((__int64)A[i])+"; (__int64)HiDigit(T)="+IntToStr((__int64)HiDigit(T)));
}
C[n]=HiDigit(T);
for (i=0; i<n; i++) Form1->LabeledEdit1->Text=Form1->LabeledEdit1->Text+IntToStr(A[i]);
Form1->LabeledEdit2->Text=IntToStr(X);
for (i=0; i<2*n; i++) Form1->LabeledEdit3->Text=Form1->LabeledEdit3->Text+IntToStr(C[i])+";";
}
 
void ShortDiv (int *C, const int A[],int x, int *pr, int n)
{
__int64 T=0;
int i;
 
if (x==0) return;
for (i=n-1; i>=0; i--)
{
        //T=MakeLong(A,B);
        if (C!= NULL) C[i]= LoDigit (T/x);
        T%=x;
}
if (pr != NULL) *pr =  LoDigit(T);
}
 
void Div (const int A[], const int B[], int *Q, int *R, int t, int n)
{
int q;
 
int U[Max_Size*2+2];
int V[Max_Size+1];
int W[Max_Size+1];
__int64 T;
int i,j,k;
int d,dBuf;
 
if (R!=NULL) Zero(R,n);
if (Q!=NULL) Zero(Q,t);
 
for (i=n-1; (i>=0)&&(B[i]==0); i--); // было for (i=n-1; (i>=0)&&(B[i]==0); i-);
n=i+1;
if (n==0) return;
for (k=t-1; (k>=0)&&(A[k]==0); k--); //было for (k=t-1; (k>=0)&&(A[k]==0); k-);
t= k+1;
if (n>t)
{
        if (R!=NULL) Assign (R,A,t);
        return;
}
else if (n==1)
{
        ShortDiv(Q,A,B[0], R,t);
        return;
}
//d= (int)(((__int64)MaxDigit+1)/((__int64)B[n-1]+1));
ShortMul (V,B,d,n);
ShortMul (U,A,d,t);
U[t+1] = 0;
// основной цикл
for (j=t;j>=n;j--) // было for (j=t;j>=n;j-)
{
        //T = MakeLong (U[j-1],U[j]);
        if (U[j]==V[n-1]) q=MaxDigit  //было if (U[j]==V[n-1]) q=MaxDigit;
        else q=(int)(T/V[n-1]);
        T %= V[n-1];
        //if ((__int64)V[n-2]*q > MakeLong ((int)T, U[j-2]))
       //         while ((__int64)V[n-2]*q > MakeLong (U[j-2],(int)(T-(__int64)q*V[n-1]))) q-;
        ShortMul (W,V,q,n);
        Sub(U+j-n,U+j-n, W, n+1);
        if (U[j+1])
        {
                U[j] += Add(U+j-n,U+j-n,V,n);
                q--; // было q-;
        }
        if (Q!=NULL) Q[j-n] = q;
}
if (R!=NULL) ShortDiv(R,U,d,NULL,n);
}
 
void ClearAllForm()
{
Form1->RichEdit1->Clear();
Form1->LabeledEdit1->Clear();
Form1->LabeledEdit2->Clear();
Form1->LabeledEdit3->Clear();
Form1->LabeledEdit4->Clear();
 
}
//------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ClearAllForm();
int a[]={2,2,9}, b[]={1,2,9},c[]={1,2,2,3};
Form1->LabeledEdit4->Text=IntToStr(Add(c,a,b,n));
 
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
ClearAllForm();
int a[]={2,2,8}, b[]={1,2,9},c[]={1,2,2,3};
Form1->LabeledEdit4->Text=IntToStr(Sub(c,a,b,n));
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button3Click(TObject *Sender)
{
ClearAllForm();
int a[]={2,2,9}, b[]={1,2,9};
Form1->LabeledEdit4->Text=IntToStr(Cmp(a,b,n));
}
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Form1->Label1->Caption="Длина машинного слова m="+IntToStr(m)+" Количество цифр n=" + IntToStr(n);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button4Click(TObject *Sender)
{
ClearAllForm();
int a[]={2,2,9}, b[]={1,2,9},c[]={1,2,3,4,5,6,7,8,9,1,2,3,4,5};
Mul (c,a,b,n);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button5Click(TObject *Sender)
{
ClearAllForm();
int x=2;
int a[]={2,2,9}, b[]={1,2,9},c[]={1,2,3,4,5,6,7,8,9,1,2,3,4,5};
ShortMul(c,a,x,n);
}
//---------------------------------------------------------------------------

Добавлено через 1 минуту 56 секунд
О ГОСТе Р 34.10-2001:
Настоящий стандарт содержит описание процессов формирования и проверки электронной цифровой подписи (ЭЦП), реализуемой с использованием операций группы точек эллиптической кривой, определенной над конечным простым полем.
Стандарт разработан взамен ГОСТ Р 34.10-94. Необходимость разработки настоящего стандарта вызвана потребностью в повышении стойкости ЭЦП к несанкционированным изменениям. Стойкость ЭЦП основывается на сложности вычисления дискретного логарифма в группе точек эллиптической кривой, а также на стойкости используемой хэш-функции по ГОСТ Р 34.11.

@*bkmz · 22.10.2008, 10:06

Петербургский государственный университет путей сообщения,
специальность "090105 - Комплексное обеспечение информационной безопасности автоматизированных систем"

34.10 - государственный стандарт реализации электронно-цифровой подписи. (ныне действует версия 2001 года, хотя есть много систем где осталась версия 94 года, например Банк-Клиент).
34.11 - стандарт, описывающий HASH функцию. (Она нужна при выработке подписи, так как подписывается и проверяется именно ее значение)
28147 - старенький стандарт симметричного шифрования, нужен при работе функции хеширования.
----
Повторился про госты, ну не страшно.
IS, да у нас одинаковые специальности как я вижу!)

@Lord_Voodoo · 22.10.2008, 10:47

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

@IS · 23.10.2008, 10:19 **[ТС]**

WooDooMan, не помогло

. Может, какие-то настройки надо изменить?

Добавлено через 1 минуту 51 секунду
*bkmz, предмет по которому курсовик называется КМЗИ - криптографические методы защиты нформации?

@Lord_Voodoo · 23.10.2008, 10:28

не понимаю я ЧЕГО-то, у меня эти макросы нормально компилятся

@IS · 23.10.2008, 13:07 **[ТС]**

WooDooMan, Сможешь выложить свой проект?

@Lord_Voodoo · 23.10.2008, 13:29

прикрепи свой, а я его компильну

@IS · 23.10.2008, 14:03 **[ТС]**

WooDooMan, Спасибо, но уже не надо. Я плюнул на этот макрос и заменил его соответствующим текстом.
Например:

C++
1
T=(A[i])|((__int64)(T)<<m); //T=MakeLong(A,B);

@Lord_Voodoo · 23.10.2008, 14:19

IS, ну тоже вариант, лишь бы корректно работало)))

@*bkmz · 23.10.2008, 14:23

IS, да, именно так

@IS · 24.10.2008, 09:49 **[ТС]**

WooDooMan, скажите, как можно узнать, сколько элементов в массиве?

Новые блоги и статьи Все статьи Все блоги /
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .

@IS 13 / 13 / 2 Регистрация: 01.10.2008 Сообщений: 116

	ГОСТ 3410 / Работа с длинными числами 01.10.2008, 12:20. Показов 19308. Ответов 75 Метки нет (Все метки) Начал делать курсовик по реализации ЭЦП по ГОСТ 34.10 (и соответственно 34.11 и 28147 ). В качестве среды разработки выбрал C++ Builder. Возник вопрос: Как работать с большими числами размером в 256,512,1024 бит? Они, ведь, ни в один тип данных не лезут (int только 32 бита). В контрольком примере дано число 5789604461865809771178549250434395392663 4992332820282019728792003956564821041. P.S Чужая реализация 3410-01 Но, есть сильное подозрение а то, что препода "кинули" - подсунили ему в место ГОСТ 3410-2001, забугорский ECDSA. Мой курсовик: Недостатки: 1) Результат проверки не совпадает с генерированой подписью. Проблема в математике. 2) Нет создания хэша функции по ГОСТ 3411 3) Нет вычисленя параметров ЭК. 4) Длительное время работы (прога не зависла - она считает) 0

@*bkmz 1 / 1 / 0 Регистрация: 21.10.2008 Сообщений: 25
	21.10.2008, 16:10
	IS, Ну все же там есть вещи которые настораживают.. например пункт 7 в процедуре A(Генерация простых чисел), где 2 возводится в 161 степень. Методичка кокой-то конторы по шифрам - это вещь!!! 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.10.2008, 17:01
	IS, 1) NULL есть 2) отличие в том, что в первом случае - это приведение переменно к типу __int64, а во втором - это объявление переменной 3) покажи текст, где ты макрос объявляешь, потому что вставил твой первый вариант, билдер нормально съел... 0

@IS 13 / 13 / 2 Регистрация: 01.10.2008 Сообщений: 116
	21.10.2008, 19:15 [ТС]
	Вы новый код использовали? У меня не работает 0

@*bkmz 1 / 1 / 0 Регистрация: 21.10.2008 Сообщений: 25
	22.10.2008, 01:25
	IS, У тебя 34.10-2001 (эллиптические кривые) или 34.10-94? 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	22.10.2008, 09:40
	IS, прикрепи свой код в посте, а то я уже запутался, что там у тебя и где... а вообще можно просветить, что это за госты-то такие, вы где, товарисчи, учитесь? 0

@*bkmz 1 / 1 / 0 Регистрация: 21.10.2008 Сообщений: 25
	22.10.2008, 10:06
	Петербургский государственный университет путей сообщения, специальность "090105 - Комплексное обеспечение информационной безопасности автоматизированных систем" 34.10 - государственный стандарт реализации электронно-цифровой подписи. (ныне действует версия 2001 года, хотя есть много систем где осталась версия 94 года, например Банк-Клиент). 34.11 - стандарт, описывающий HASH функцию. (Она нужна при выработке подписи, так как подписывается и проверяется именно ее значение) 28147 - старенький стандарт симметричного шифрования, нужен при работе функции хеширования. ---- Повторился про госты, ну не страшно. IS, да у нас одинаковые специальности как я вижу!) 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	22.10.2008, 10:47
	точки с запятой после макросов ставить не надо 0

@IS 13 / 13 / 2 Регистрация: 01.10.2008 Сообщений: 116
	23.10.2008, 10:19 [ТС]
	WooDooMan, не помогло . Может, какие-то настройки надо изменить? Добавлено через 1 минуту 51 секунду *bkmz, предмет по которому курсовик называется КМЗИ - криптографические методы защиты нформации? 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	23.10.2008, 10:28
	не понимаю я ЧЕГО-то, у меня эти макросы нормально компилятся 0

@IS 13 / 13 / 2 Регистрация: 01.10.2008 Сообщений: 116
	23.10.2008, 13:07 [ТС]
	WooDooMan, Сможешь выложить свой проект? 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	23.10.2008, 13:29
	прикрепи свой, а я его компильну 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	23.10.2008, 14:19
	IS, ну тоже вариант, лишь бы корректно работало))) 0

@*bkmz 1 / 1 / 0 Регистрация: 21.10.2008 Сообщений: 25
	23.10.2008, 14:23
	IS, да, именно так 0

@IS 13 / 13 / 2 Регистрация: 01.10.2008 Сообщений: 116
	24.10.2008, 09:49 [ТС]
	WooDooMan, скажите, как можно узнать, сколько элементов в массиве? 0