Міністерство освіти та науки України
Національний університет “Львівська політехніка”
Кафедра електронних обчислювальних машин
Звіт
до лабораторної роботи №1
Львів
2007 р.
Мета роботи
Ознайомитись з використанням хеш функцій для цифрового підпису на прикладі алгоритму MD5.
Теоретичні відомості
Для обчислення хеш функції MD5 необхідно виконати наступні кроки:
1.Вирівняти довжину вхідного потоку до величини рівної 448 по модулю 512.Це виконується шляхом доповнення вхідного потоку спочатку однією одиницею, а все решта нулями.
2.Доповнення вирівняного вхідного потоку довжиною початкового вхідного потоку.В молодші 64 біта записується довжина потоку, причому спочатку йде молодший байт довжини.Таким чином отримуємо потік даних кратний 512.
3.Ініціалізуєм MD буфер.
A = 0x67452301
B = 0xEFCDAB89
C = 0x98BADCFE
D = 0x10325476
4.Виконуєм алгоритм MD5.
В алгоритмі використовуємо чотири наступні допоміжні функції
F(x, y, z) = (x & y) | (~x & z)G(x, y, z) = (x & z) | (y & ~z)H(x, y, z) = x ^ y ^ zI(x, y, z) = y ^ (x | ~z)
Таблиця на основі функції синуса
T[i] = int(4294967296 * abs(sin(i)))
де і=[1..64]
Алгоритм MD5 для одного блоку довжиною 512.
AA = A BB = B CC = C DD = D // прохі 1 // нехай [abcd k s i] позначає операцію // a = b + ((a + F(b, c, d) + X[k] + T[i]) <<< s) // виконати 16 наступних операцій [ABCD 0 7 1] [DABC 1 12 2] [CDAB 2 17 3] [BCDA 3 22 4] [ABCD 4 7 5] [DABC 5 12 6] [CDAB 6 17 7] [BCDA 7 22 8] [ABCD 8 7 9] [DABC 9 12 10] [CDAB 10 17 11] [BCDA 11 22 12] [ABCD 12 7 13] [DABC 13 12 14] [CDAB 14 17 15] [BCDA 15 22 16]
// прохід 2 // нехай [abcd k s i] позначає операцію // a = b + ((a + G(b, c, d) + X[k] + T[i]) <<< s) // виконати 16 наступних операцій [ABCD 1 5 17] [DABC 6 9 18] [CDAB 11 14 19] [BCDA 0 20 20] [ABCD 5 5 21] [DABC 10 9 22] [CDAB 15 14 23] [BCDA 4 20 24] [ABCD 9 5 25] [DABC 14 9 26] [CDAB 3 14 27] [BCDA 8 20 28] [ABCD 13 5 29] [DABC 2 9 30] [CDAB 7 14 31] [BCDA 12 20 32]
// прохід 3 // нехай [abcd k s i] позначає операцію // a = b + ((a + H(b, c, d) + X[k] + T[i]) <<< s) // виконати 16 наступних операцій [ABCD 5 4 33] [DABC 8 11 34] [CDAB 11 16 35] [BCDA 14 23 36] [ABCD 1 4 37] [DABC 4 11 38] [CDAB 7 16 39] [BCDA 10 23 40] [ABCD 13 4 41] [DABC 0 11 42] [CDAB 3 16 43] [BCDA 6 23 44] [ABCD 9 4 45] [DABC 12 11 46] [CDAB 15 16 47] [BCDA 2 23 48]
// прохід 4 // нехай [abcd k s i] позначаєі операцію // a = b + ((a + I(b, c, d) + X[k] + T[i]) <<< s) // виконати 16 наступних операцій [ABCD 0 6 49] [DABC 7 10 50] [CDAB 14 15 51] [BCDA 5 21 52] [ABCD 12 6 53] [DABC 3 10 54] [CDAB 10 15 55] [BCDA 1 21 56] [ABCD 8 6 57] [DABC 15 10 58] [CDAB 6 15 59] [BCDA 13 21 60] [ABCD 4 6 61] [DABC 11 10 62] [CDAB 2 15 63] [BCDA 9 21 64] A += AA B += BB C += CC D += DD
5.Об’єднати значення регістрів A,B,C,D при чому А молодші розряди, a D старші розряди.
Текст прогорами
//---------------------------------------------------------------------------
#include <vcl.h>
#include <string.h>
#include <stdlib.h>
#include <math.h>
#include "functions.h"
#pragma hdrstop
#include "interface.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
char s[512];
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
extern char s[512];
char str[2];
char m[448],d[64];
int a,i,z,z1;
int k;
Button2->Enabled=true;
Button1->Enabled=false;
Edit8->Enabled=false;
Edit1->Text="67452301";
Edit2->Text="efcdab89";
Edit3->Text="98badcfe";
Edit4->Text="10325476";
Button2->Tag=0;
strcpy(m,Edit8->Text.c_str());
a=strlen(m)*8;
k=a/4;
for(i=0;i<k;i=i+2) {
z=m[i/2];
z1=z/16;
itoa(z1,str,16);
s[i]=str[0];
z1=z%16;
itoa(z1,str,16);
s[i+1]=str[0];
z=atoi(str);
}
s[k]='8';
for(i=k+1;i<112;i++)
s[i]='0';
s[112]='\0';
for(i=0;i<16;i++)
d[i]='0';
z1=a%16;
itoa(z1,str,16);
d[1]=str[0];
z1=a/16;
itoa(z1,str,16);
d[0]=str[0];
d[16]='\0';
for(i=112;i<128;i++)
s[i]=d[i-112];
s[128]='\0';
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ExitClick(TObject *Sender)
{
int i=0;
unsigned long t[64];
double x;
for(i=0;i<64;i++) {
x = sin(i+1);
t[i]=4294967296L * (x>0 ? x:-x);
}
exit(1);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
extern char s[512];
char ss[10],f[10],xk[10],cop[10];
char a[10],b[10],c[10],d[10],res[40];
unsigned long aa,bb,fun,x,t,cc,pp;
double si;
int i,j,os,sh,cil,pr,len;
for(i=0;i<16;i++)
{
os=i%4;
switch(os) {
case 0:
strcpy(a,Edit1->Text.c_str());
strcpy(b,Edit2->Text.c_str());
strcpy(c,Edit3->Text.c_str());
strcpy(d,Edit4->Text.c_str());
break;
case 1:
strcpy(a,Edit4->Text.c_str());
strcpy(b,Edit1->Text.c_str());
strcpy(c,Edit2->Text.c_str());
strcpy(d,Edit3->Text.c_str());
break;
case 2:
strcpy(a,Edit3->Text.c_str());
strcpy(b,Edit4->Text.c_str());
strcpy(c,Edit1->Text.c_str());
strcpy(d,Edit2->Text.c_str());
break;
case 3:
strcpy(a,Edit2->Text.c_str());
strcpy(b,Edit3->Text.c_str());
strcpy(c,Edit4->Text.c_str());
strcpy(d,Edit1->Text.c_str());
break;
}
switch(Button2->Tag) {
case 0:
strcpy(f,ff( b,c,d));
if(i==0) sh=7;
if(i==1) sh=12;
if(i==2) sh=17;
if(i==3) sh=22;
for(j=0;j<8;j++)
xk[j]=s[(15-i)*8+j];
break;
case 1:
strcpy(f,fg( b,c,d));
if(i==0) sh=5;
if(i==1) sh=9;
if(i==2) sh=14;
if(i==3) sh=20;
for(j=0;j<8;j++)
xk[j]=s[((1+5*(15-i))%16)*8+j];
break;
case 2:
strcpy(f,fh( b,c,d));
if(i==0) sh=4;
if(i==1) sh=11;
if(i==2) sh=16;
if(i==3) sh=23;
for(j=0;j<8;j++)
xk[j]=s[((5+3*(15-i))%16)*8+j];
break;
case 3:
strcpy(f,fi( b,c,d));
if(i==0) sh=6;
if(i==1) sh=10;
if(i==2) sh=15;
if(i==3) sh=21;
for(j=0;j<8;j++)
xk[j]=s[((7*(15-i))%16)*8+j];
break;
}
xk[8]='\0';
aa=conv(a);
bb=conv(b);
fun=conv(f);
x=conv(xk);
si = sin(Button2->Tag*16+i+1);
t=4294967296L * (si>0 ? si:-si);
cc=aa+fun+x+t;
itoa(cc,ss,16);
strcpy(cop,ss);
cil=sh/4;
for(j=0;j<8;j++)
{
if(cil>(7-j)) ss[j]=cop[cil+j-8];
else ss[j]=cop[j+cil];
}
if(sh%4!=0){
strcpy(cop,ss);
switch(sh%4) {
case 1: cil=7;break;
case 2: cil=3;break;
case 3: cil=1;break;
}
for(j=0;j<8;j++)
{
if(j==7)
{
if(cop[j]>'9') pr=cop[j]-87;
else pr=cop[j]-48;
pr=pr*2*(sh%4<3 ? sh%4: 4)%16;
if(cop[0]>'9') pp=cop[0]-87;
else pp=cop[0]-48;
pp=pp/(2*(sh%4>1 ? 4-sh%4:4));
pr=pr+pp;
}
else
{
if(cop[j]>'9') pr=cop[j]-87;
else pr=cop[j]-48;
pr=pr*2*(sh%4<3 ? sh%4: 4)%16;
if(cop[j+1]>'9') pp=cop[j+1]-87;
else pp=cop[j+1]-48;
pp=pp/(2*(sh%4>1 ? 4-sh%4:4));
pr=pr+pp;
}
if(pr>9) ss[j]=pr+87;
else ss[j]=pr+48;
}
}
cc=conv(ss);
aa=cc+bb;
itoa(aa,a,16);
switch(os) {
case 0:
Edit1->Text=a;
break;
case 1:
Edit4->Text=a;
break;
case 2:
Edit3->Text=a;
break;
case 3:
Edit2->Text=a;
break;
}
}
Button2->Tag++;
if(Button2->Tag==4)
{
aa=conv(Edit1->Text.c_str());
bb=conv(Edit2->Text.c_str());
cc=conv(Edit3->Text.c_str());
pp=conv(Edit4->Text.c_str());
aa=aa+1732584193;
bb=bb+4023233417;
cc=cc+2562383102;
pp=pp+271733878;
itoa(aa,a,16);
len=strlen(a);
if(len<8) {
for(i=7;i>=0;i--)
a[i]=a[i-1];
a[0]='0';
}
itoa(bb,b,16);
len=strlen(b);
if(len<8) {
for(i=7;i>=0;i--)
b[i]=b[i-1];
b[0]='0';
}
itoa(cc,c,16);
len=strlen(c);
if(len<8) {
for(i=7;i>=0;i--)
c[i]=c[i-1];
c[0]='0';
}
itoa(pp,d,16);
len=strlen(d);
if(len<8) {
for(i=7;i>=0;i--)
d[i]=d[i-1];
d[0]='0';
}
strcpy(res,d);
strcat(res,c);
strcat(res,b);
strcat(res,a);
Edit5->Text=res;
Button2->Enabled=false;
}
}
//---------------------------------------------------------------------------
Висновок
Під час виконання лабораторної роботи я ознайомився з принципами використання хеш функцій.