Algoritam MD5 u Matlabu

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Hitno mi je potraban izvorni kod algoritma MD5 u Matlabu.

Unapred hvala!

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Dobar dan, kako ste? Ja sam jelovikpro, i novi sam clan ovde. Dal neko ima vremena, i zna gde mogu da nadjem link do nekog primera implementacije MD5 hash algoritma u MATLAB-u? Unapred hvala.

Pogledaj ovde: [Link mogu videti samo ulogovani korisnici]

Imas i ovde primer (nije kompletan): [Link mogu videti samo ulogovani korisnici]

Za kraj, imas na Wikipediji pseudo kod, pa ako poznajes MATLAB mozes da probas sam da odradis nesto.

Pozdrav i dobrodosao.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Hvala soxxx!!!

Ali, kod sa prvog linka sam detaljno prekucao i ne radi, ne znam zasto... (a i taj kod nije tacan,pise tako) a drugi link je trenutno neaktivan pa cu pokusati kasnije. U svakom slucaj hvala!

Za slucaj da neko ima bilo kakav predlog svaka pomoc mi je dobrodosla...

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Mislim da je ovo fajl koji nije dostupan na tom sajtu, vidi dal je to to:

1. fname=input('Input File (in ASCII format)? ','s');
2. hash_foutname=input('Output File for md5 Hash? ','s');
3. t1=clock;
4. %Open the input file and get the first line of data
5. fid=fopen(fname);
6. M = fread(fid);
7. fclose(fid);
10. ini=dec2bin(M(1),8);
12. for ii = 2:length(M)
13.   ini=cat(2,ini,dec2bin(M(ii),8));
14. end
16. s2=length(ini)/8;
17. block_temp = [ ini, ...
18.                '1', ...
19.                num2str(zeros(mod(448-1-s2*8,512),1))' ...
20.               dec2bin(s2*8,64) ];
21.           nb=length(block_temp)/512;
22. block = reshape(block_temp,512,nb)';
24. for i=1:64
25.     T(i)=cellstr(dec2hex(floor(2^32*abs(sin(i))),8));
26. end
28.  
29. for b=1:nb
30. H = [ '01','23','45','67';...
31.     '89','ab','cd','ef';...
32.     'fe','dc','ba','98';...
33.     '76','54','32','10'];
34. H1=H;
35.  
36. inp=reshape(block(b,:),32,16)';
38. %disp('round1');
39. %Round1
40. shift=7;
41. for i=1:16
42.  
43.    
44. a=tarr(H(1,:));
45. b=tarr(H(2,:));     
46. c=tarr(H(3,:));     
47. d=tarr(H(4,:));
50.   a=d;
51.   d=c;
52.   c=b;
53.  
54. t1= bin2dec2(f('round1',b,c,d));
55. t2= bin2dec2(tarr(T(i)));
56. t3= bin2dec2(inp(i,:));
57. t4=b;
58. anst=dec2bin(mod(t1+t2+t3+t4,2^32),32);
59. ans=cls(anst,shift);
60. b=dec2bin(mod(bin2dec2(ans)+bin2dec2(b),2^32),32);
62. if shift==22
63.   shift=7;
64. else shift=shift+5;
65. end
66. H=updateH(H,a,b,c,d);
68. end
71. %Round2
72. shift=5;shi=0;
73. for i=17:32
74. %disp('round2');
75. a=tarr(H(1,:));
76. b=tarr(H(2,:));     
77. c=tarr(H(3,:));     
78. d=tarr(H(4,:));
79.    
81.   a=d;
82.   d=c;
83.   c=b;
84.  
85. t1= bin2dec2(f('round2',b,c,d));
86. t2= bin2dec2(tarr(T(i)));
87. itemp=mod((1+5*i),16)+1;
88. t3= bin2dec2(inp(itemp,:));
89. t4=b;
90. anst=dec2bin(mod(t1+t2+t3+t4,2^32),32);
91. ans=cls(anst,shift);
92. b=dec2bin(mod(bin2dec2(ans)+bin2dec2(b),2^32),32);
94. shi=shi+1;
95. if shift==20
96.   shift=5;shi=0;
97. else shift=shift+3+shi;
98. end
99. H=updateH(H,a,b,c,d);
101. end
102. count=1;
104. %Round3
106. for i=33:48
107. %disp('round3');     
108. a=tarr(H(1,:));
109. b=tarr(H(2,:));     
110. c=tarr(H(3,:));     
111. d=tarr(H(4,:));
112.    
114.   a=d;
115.   d=c;
116.   c=b;
117.  
118. t1= bin2dec2(f('round3',b,c,d));
119. t2= bin2dec2(tarr(T(i)));
120. itemp=mod((5+3*i),16)+1;
121. t3= bin2dec2(inp(itemp,:));
122. t4=b;
123. anst=dec2bin(mod(t1+t2+t3+t4,2^32),32);
124. if count==1
125.   shift=4;
126. elseif count==2
127.       shift=11;
128. elseif count==3
129.           shift==16;
130. elseif count==4
131.               shift=23;
132.           end
133. ans=cls(anst,shift);
134. b=dec2bin(mod(bin2dec2(ans)+bin2dec2(b),2^32),32);
136. H=updateH(H,a,b,c,d);
138. if count==4
139.   count=0;
140. end
142. count=count+1;
144.       end
146. %Round4
148. shift=6;shi=0;
149. for i=49:64
150. %   disp('round4');
151. a=tarr(H(1,:));
152. b=tarr(H(2,:));     
153. c=tarr(H(3,:));     
154. d=tarr(H(4,:));
155.  
157.   a=d;
158.   d=c;
159.   c=b;
160.  
161. t1= bin2dec2(f('round4',b,c,d));
162. t2= bin2dec2(tarr(T(i)));
163. itemp=mod(7*i,16)+1;
164. t3= bin2dec2(inp(itemp,:));
165. t4=b;
166. anst=dec2bin(mod(t1+t2+t3+t4,2^32),32);
168. ans=cls(anst,shift);
170. shi=shi+1;
171. if shift==21
172.   shift=6;shi=0;
173. else shift=shift+3+shi;
174. end
176. b=dec2bin(mod(bin2dec2(ans)+bin2dec2(b),2^32),32);
180. H=updateH(H,a,b,c,d);
183. end
186. H1=calculate_new_md5(H1,a,b,c,d);
188. end
189. disp(H1);
190. t2=clock;
191. timedur=t2-t1;
192. etime(clock,timedur)
194. fid=fopen(hash_foutname,'w+');
195. fprintf(fid,'%s',H1(1,:));
196. fprintf(fid,'%s',H1(2,:));
197. fprintf(fid,'%s',H1(3,:));
198. fprintf(fid,'%s',H1(4,:));
200. fclose(fid);

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Soxxx, mnogo hvala na pomoci i izvini za cimanje ali...

i dalje nije aktivan link
[Link mogu videti samo ulogovani korisnici]
pa cu pokusati kasnije, mozda proradi...

kod
[Link mogu videti samo ulogovani korisnici]
(iako nije tacan) meni i dalje izbacuje gresku. Pokusao sam i u kombinaciji sa ovim kodom koji si mi naknadno poslao ali nista...

E sada, ucitao sam samo ovaj zadnji kod koji si mi poslao i nema
sintaksnih gresaka ali nakon pokretanja Matlab mi izbacuje ovo

Input File (in ASCII format)? The quick brown fox jumped over the lazy dog's back
Output File for md5 Hash? e38ca1d920c4b8b8d3946b2c72f01680
??? Error using ==> fread
Invalid file identifier. Use fopen to generate a valid file identifier.

Error in ==> drugi at 6
M = fread(fid);

Mozda ja u startu gresim ali ne znam u cemu je problem, pa ako mozda znas u cemu je fora, pomagaj...

P.S Ja radim u 64b Matlabu a ovo je za 32 bita racunare ; mozda je problem u tome?

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Ne bratanac, neznam u cemu je problem. Ono sto sam ti poslao sam nasao pukim googlanjem.
Izgleda da je fajl koji sam okacio ispravan, ali dali zahteva jos nesto, ili se negde treba uklopiti - neznam. Ja sam mislio da ti barem malo poznajes MATLAB, i da ce ti to pomoci da brze savladas problem, a ne da ti dam neko gotovo resenje.