fork download
copy 
  1. #include <stdio.h>
  2. #include <string.h>
  3. #include <time.h>
  4.  
  5. #define mystr "My own utility. Copyright (C) 2007-2010 hpgl, Russia"
  6.  
  7. #define allow595B
  8. #define allowA95B
  9. #define allow2A7B
  10.  
  11. #define fSVCTAG 0
  12. #define fHDDSN 1
  13. #define fHDDold 2
  14. #define t595B 0
  15. #define tD35B 1
  16. #define tA95B 2
  17. #define t2A7B 3
  18.  
  19. #ifdef allow595B
  20. #define f595B
  21. #endif
  22. #ifdef allowA95B
  23. #define f595B
  24. #endif
  25. #ifdef allow2A7B
  26. #define f595B
  27. #endif
  28.  
  29. char bSuffix[]="595BD35BA95B2A7B";
  30.  
  31. char scancods[]="\00\0331234567890-=\010\011qwertyuiop[]\015\377asdfghjkl;'`\377\\zxcvbnm,./";
  32. char encscans[]={0x05,0x10,0x13,0x09,0x32,0x03,0x25,0x11,0x1F,0x17,0x06,0x15, \
  33.                  0x30,0x19,0x26,0x22,0x0A,0x02,0x2C,0x2F,0x16,0x14,0x07,0x18, \
  34.                  0x24,0x23,0x31,0x20,0x1E,0x08,0x2D,0x21,0x04,0x0B,0x12,0x2E};
  35.  
  36. #ifdef allow2A7B
  37. char chartabl2A7B[72]="012345679abcdefghijklmnopqrstuvwxyz0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ0";
  38. #endif
  39.  
  40. unsigned int MD5magic[64]={
  41. 0xd76aa478, 0xe8c7b756, 0x242070db, 0xc1bdceee,
  42. 0xf57c0faf, 0x4787c62a, 0xa8304613, 0xfd469501,
  43. 0x698098d8, 0x8b44f7af, 0xffff5bb1, 0x895cd7be,
  44. 0x6b901122, 0xfd987193, 0xa679438e, 0x49b40821,
  45. 0xf61e2562, 0xc040b340, 0x265e5a51, 0xe9b6c7aa,
  46. 0xd62f105d, 0x02441453, 0xd8a1e681, 0xe7d3fbc8,
  47. 0x21e1cde6, 0xc33707d6, 0xf4d50d87, 0x455a14ed,
  48. 0xa9e3e905, 0xfcefa3f8, 0x676f02d9, 0x8d2a4c8a,
  49. 0xfffa3942, 0x8771f681, 0x6d9d6122, 0xfde5380c,
  50. 0xa4beea44, 0x4bdecfa9, 0xf6bb4b60, 0xbebfbc70,
  51. 0x289b7ec6, 0xeaa127fa, 0xd4ef3085, 0x4881d05,
  52. 0xd9d4d039, 0xe6db99e5, 0x1fa27cf8, 0xc4ac5665,
  53. 0xf4292244, 0x432aff97, 0xab9423a7, 0xfc93a039,
  54. 0x655b59c3, 0x8f0ccc92, 0xffeff47d, 0x85845dd1,
  55. 0x6fa87e4f, 0xfe2ce6e0, 0xa3014314, 0x4e0811a1,
  56. 0xf7537e82, 0xbd3af235, 0x2ad7d2bb, 0xeb86d391};
  57.  
  58. unsigned char inData[23],outData[16];
  59. char buf1output[32], buf1input[20];
  60. char bug4;
  61.  
  62. void calcsuffix(char bfunc, char btype, char *outbuf);
  63.  
  64. void initData(void) {
  65. 	*(int *)(&outData[0]) =0x67452301;
  66. 	*(int *)(&outData[4]) =0xEFCDAB89;
  67. 	*(int *)(&outData[8]) =0x98BADCFE;
  68. 	*(int *)(&outData[12])=0x10325476;
  69. }
  70.  
  71. typedef int (encfuncT1) (int num1, int num2, int num3);
  72.  
  73. #ifdef f595B
  74. int enc0F2(int num1, int num2, int num3) {return (((~num3 ^ num2) & num1) ^ ~num3);}
  75. int enc0F4(int num1, int num2, int num3) {return (( ~num2 ^ num1) ^ num3); }
  76. int enc0F5(int num1, int num2, int num3) {return (( ~num1 | ~num3) ^ num2); }
  77. #endif
  78. int enc1F2(int num1, int num2, int num3) {return ((( num3 ^ num2) & num1) ^ num3);}
  79. int enc1F4(int num1, int num2, int num3) {return (( num2 ^ num1) ^ num3); }
  80. int enc1F5(int num1, int num2, int num3) {return (( num1 | ~num3) ^ num2); }
  81. int encF3 (int num1, int num2, int num3) {return ((( num1 ^ num2) & num3) ^ num2);}
  82.  
  83. typedef int (encfuncT2)(encfuncT1 func, int num1, int num2, int num3, int key);
  84.  
  85. int enc1F1 (encfuncT1 func, int num1, int num2, int num3, int key)
  86. {
  87. 	return func(num1,num2,num3)+key;
  88. }
  89.  
  90. #ifdef f595B
  91. int enc0F1 (encfuncT1 func, int num1, int num2, int num3, int key)
  92. {
  93. 	return func(num1,num2,num3)-key;
  94. }
  95. #endif
  96.  
  97. unsigned int rol(unsigned int t, int bitsrot)
  98. {
  99. 	return (t >> (32-bitsrot)) | (t << bitsrot);
  100. }
  101.  
  102. void blockEncodeF(int *outdata, int *encblock, encfuncT2 func1,
  103.                   encfuncT1 func2, encfuncT1 func3, encfuncT1 func4, encfuncT1 func5 )
  104. {
  105. 	char S[4][4] = {{ 7, 12, 17, 22 },{ 5, 9, 14, 20 },{ 4, 11, 16, 23 },{ 6, 10, 15, 21 }};
  106. 	int A,B,C,D,t,i;
  107.  
  108. 	A=outdata[0];
  109. 	B=outdata[1];
  110. 	C=outdata[2];
  111. 	D=outdata[3];
  112.  
  113. 	for (i=0;i<64;i++) { 		t=MD5magic[i]; 		switch (i>>4) {
  114. 			case 0: t=A+func1(func2,B,C,D, t+encblock[(i) & 15]); break;
  115. 			case 1: t=A+func1(func3,B,C,D, t+encblock[(i*5+1) & 15]); break;
  116. 			case 2: t=A+func1(func4,B,C,D, t+encblock[(i*3+5) & 15]); break;
  117. 			case 3: t=A+func1(func5,B,C,D, t+encblock[(i*7) & 15]); break;
  118. 		}
  119. 		A=D; D=C; C=B; B+=rol(t,S[i>>4][i&3]);
  120. 	};
  121.  
  122. 	outdata[0]+=A;
  123. 	outdata[1]+=B;
  124. 	outdata[2]+=C;
  125. 	outdata[3]+=D;
  126. }
  127.  
  128. void blockEncode(char *outdata, int *encblock, char btype) {
  129. 	if (btype==tD35B)
  130. 		blockEncodeF((int *)outdata,encblock,enc1F1,enc1F2,encF3,enc1F4,enc1F5);
  131. #ifdef f595B
  132. 	else
  133. 		blockEncodeF((int *)outdata,encblock,enc0F1,enc0F2,encF3,enc0F4,enc0F5);
  134. #endif
  135. }
  136.  
  137. void encode(char *inbuf,int cnt,char btype) {
  138. 	int encBlock[16];
  139. 	char *ptr;
  140. 	initData();
  141. 	memcpy(encBlock,inbuf,cnt);
  142. 	ptr=&((char *)encBlock)[cnt];
  143. 	*ptr++=0x80;
  144. 	memset(ptr,0,64-1-cnt);
  145. 	encBlock[16-2]=((unsigned int)cnt << 3);
  146. 	blockEncode(outData,encBlock,btype);
  147. }
  148.  
  149. void psw(char bfunc, char btype, char *outbuf) {
  150. 	int cnt,i,lenpsw,r;
  151. 	if (bfunc==fHDDold) {
  152. 		memcpy(inData,buf1input,11);
  153. //		calcsuffix(bfunc,btype,outbuf);
  154. 		for (cnt=0;cnt<8;cnt++) 			outbuf[cnt]= scancods[ outbuf[cnt] ]; 	} else { 		memset(inData,0,sizeof(inData)); 		if (bfunc==fSVCTAG) cnt=7; 		else cnt=11; 		if ((bfunc==fHDDSN) && (btype==tA95B)) 			memcpy(inData,&buf1input[3],cnt-3); 		else 			memcpy(inData,buf1input,cnt); 		if (btype==t595B) memcpy(&inData[cnt],&bSuffix[0],4); else 		if (btype==tD35B) memcpy(&inData[cnt],&bSuffix[4],4); else 		if (btype==tA95B) memcpy(&inData[cnt],&bSuffix[0],4); else 		if (btype==t2A7B) memcpy(&inData[cnt],&bSuffix[12],4); 		cnt += 4; 		inData[cnt] = inData[4] & 0x1F; 		inData[cnt+1] = ((inData[4] >> 5) | (((inData[3] >> 5) | (inData[3] << 3)) & 0xF1) & 0x1F); 		inData[cnt+2] = ((inData[3] >> 2) & 0x1F);
  155. 		inData[cnt+3] = (inData[3] >> 7) | ((inData[2] << 1) & 0x1F); 		inData[cnt+4] = (inData[2] >> 4) | ((inData[1] << 4) & 0x1F); 		inData[cnt+5] = (inData[1] >> 1) & 0x1F;
  156. 		inData[cnt+6] = (inData[1] >> 6) | ((inData[0] << 2) & 0x1F); 		inData[cnt+7] = (inData[0] >> 3) & 0x1F;
  157. 		for (i=cnt;i<8+cnt;i++) {
  158. 			r = 0xAA;
  159. 			if (inData[i] & 1)
  160. 				r ^= inData[4];
  161. 			if (inData[i] & 2)
  162. 				r ^= inData[3];
  163. 			if (inData[i] & 4)
  164. 				r ^= inData[2];
  165. 			if (inData[i] & 8)
  166. 				r ^= inData[1];
  167. 			if (inData[i] & 16)
  168. 				r ^= inData[0];
  169. 			inData[i] = encscans[r % sizeof(encscans)];
  170. 		}
  171. 		cnt = 23;
  172. 		encode(inData,cnt,btype);
  173. 		r = outData[0] % 9;
  174. 		lenpsw = 0;
  175. 		for (cnt=0;cnt<16;cnt++) {
  176. 			if ((r <= cnt) && (lenpsw<8)) { 				buf1output[lenpsw++] = scancods[encscans[outData[cnt] % sizeof(encscans)]]; 			} 		} 	} } int main(int argc, char *argv[]) { 	unsigned char len,len1,bfunc,eol=1,echo=0, *minus,s2[20]; 	signed char btype; int argn=0; 	if (argc>1)
  177. 		echo=1;
  178.  
  179. 	if (!echo)
  180. 		fputs("" mystr "\n" \
  181. 		  "Short service tag should be right padded with '*' up to length 7 chars\n" \
  182. 		  "HDD serial number is right 11 chars from real HDDSerNum left padded with '*'\n" \
  183. 		  "Some BIOSes has left pad HDD serial number with spaces instead '*'\n",stdout);
  184.  
  185. 	while (!feof(stdin)) {
  186. 		if ((argc<=1) && argn) break; 		fputs("Input: #",stdout); 		if (argc>1) {
  187. 			strncpy(buf1input,argv[++argn],sizeof(buf1input));argc--;
  188. 		}
  189. 		else {
  190. 			if (!eol) while (!feof(stdin) && (fgetc(stdin)!='\n')); eol=0;
  191. 			if (fgets(buf1input,16+1+1,stdin)==NULL) {
  192. 				if (echo) fputs("\n",stdout);
  193. 				break;
  194. 			}
  195. 		}
  196. 		len=strlen(buf1input);
  197. 		if (len && (buf1input[len-1]=='\n')) {len--;eol=1;buf1input[len]=0;}
  198. 		if (echo) {fputs(buf1input,stdout);fputs("\n",stdout);}
  199. 		minus=strchr(buf1input,'-');
  200. 		if (len==11) {
  201. 			if (minus!=NULL) {
  202. 				fputs("- Incorrect input\n",stdout);
  203. 				continue;
  204. 			}
  205. 			bfunc=fHDDold;
  206. 			fputs("By HDD serial number for older BIOS: ",stdout);
  207. 		} else {
  208. 			if (len==0) break;
  209. 			if (minus==NULL) {
  210. 				fputs("- No BIOS type found in input string, must be followed by -595B and other registered\n",stdout);
  211. 				continue;
  212. 			}
  213. 			len1=minus-(unsigned char*)buf1input;
  214.  
  215. 			btype=-1;
  216. #ifdef allow595B
  217. 			if (strncmp(&buf1input[len1+1],&bSuffix[0],4)==0) btype=t595B;
  218. 			else
  219. #endif
  220. 			if (strncmp(&buf1input[len1+1],&bSuffix[4],4)==0) btype=tD35B;
  221. 			else
  222. #ifdef allowA95B
  223. 			if (strncmp(&buf1input[len1+1],&bSuffix[8],4)==0) btype=tA95B;
  224. 			else
  225. #endif
  226. #ifdef allow2A7B
  227. 			if (strncmp(&buf1input[len1+1],&bSuffix[12],4)==0) btype=t2A7B;
  228. #endif
  229. 			if (btype<0) {
  230. 				fputs("- Invalid service tag in input string, allowed only -D35B and other registered\n",stdout);
  231. 				continue;
  232. 			}
  233. 			struct tm *time1; time_t timer1=time(NULL);
  234. 			time1=gmtime(&timer1);
  235. 			strftime(s2,sizeof(s2),"%d.%m.%Y %H:%M",time1);
  236. 			fputs(s2,stdout);
  237. 			fputs(" DELL ",stdout);
  238.  
  239. 			if (len1==7) {
  240. 				bfunc=fSVCTAG;
  241. 				fputs("service tag: ",stdout);
  242. 				fputs(buf1input,stdout);
  243. 			} else
  244. 			if (len1==11) {
  245. 				bfunc=fHDDSN;
  246. 				fputs("HDD serial number: ",stdout);
  247. 				fputs(buf1input,stdout);
  248. 			}
  249. 			else {
  250. 				fputs("- Incorrect input, must be 7 chars service tag or 11 chars HDD serial number\n",stdout);
  251. 				continue;
  252. 			}
  253. 		}
  254. 		psw(bfunc,btype,buf1output);
  255. 		fputs(" password: ",stdout);
  256. 		fputs(buf1output,stdout);
  257. 		if (bug4) fputs(" !bug4 warning - password may not work!",stdout);
  258.  
  259. 		if (btype==t595B) if (bfunc==fSVCTAG) { //to check if A95B bug
  260. 			char mpw1[20];
  261. 			strcpy(mpw1,buf1output);
  262. 			psw(bfunc,tA95B,buf1output);
  263. 			if (strcmp(mpw1,buf1output)!=0) {
  264. 				fputs(" passwordA95B: ",stdout);
  265. 				fputs(buf1output,stdout);
  266. 			}
  267. 		}
  268. 		fputs("\n",stdout);
  269. 	}
  270. 	return 0;
  271. }
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
Standard input is empty
compilation info 
Visual Basic.Net Compiler version 0.0.0.5914 (Mono 2.4.2 - r)
Copyright (C) 2004-2008 Rolf Bjarne Kvinge. All rights reserved.


/home/7wcRjf/prog.vb (1,10) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (2,9) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (3,9) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (5,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (7,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (8,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (9,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (11,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (12,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (13,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (14,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (15,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (16,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (17,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (19,7) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (20,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (21,7) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (22,7) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (23,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (24,7) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (25,7) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (26,8) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (27,7) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (29,5) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (29,14) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (29,34) : Error VBNC30037: Symbol is not valid.
/home/7wcRjf/prog.vb (31,5) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (31,15) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (31,94) : Error VBNC30037: Symbol is not valid.
/home/7wcRjf/prog.vb (32,5) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (32,15) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (33,19) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (34,19) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (34,78) : Error VBNC30037: Symbol is not valid.
/home/7wcRjf/prog.vb (36,7) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (37,5) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (37,19) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (37,19) : Error VBNC30034: An escaped identifier must end with ']'.
/home/7wcRjf/prog.vb (37,21) : Error VBNC30037: Symbol is not valid.
/home/7wcRjf/prog.vb (38,7) : Error VBNC99999: Expected 'If', 'ElseIf', 'Else', 'Const' or 'Region'.
/home/7wcRjf/prog.vb (40,9) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (40,23) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (40,23) : Error VBNC30034: An escaped identifier must end with ']'.
/home/7wcRjf/prog.vb (40,25) : Error VBNC30037: Symbol is not valid.
/home/7wcRjf/prog.vb (41,2) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (42,2) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (43,2) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (44,2) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (45,2) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (46,2) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (47,2) : Error VBNC30203: Not valid as identifier.
/home/7wcRjf/prog.vb (47,2) : Error VBNC30041: Too many errors.
Exception of type 'vbnc.TooManyErrorsException' was thrown.
  at vbnc.Report.ShowMessage (Boolean SaveIt, vbnc.Message Message) [0x00080] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/General/Report.vb:342 
  at vbnc.Report.ShowMessage (Messages Message, Span Location, System.String[] Parameters) [0x00000] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/General/Report.vb:259 
  at vbnc.Report.ShowMessage (Messages Message, System.String[] Parameters) [0x00054] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/General/Report.vb:269 
  at vbnc.Compiler.Compile () [0x005a3] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/General/Compiler.vb:651 
  at vbnc.Compiler.Compile (System.String[] CommandLine) [0x00057] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/General/Compiler.vb:279 
  at vbnc.Main.Main (System.String[] CmdArgs) [0x0000f] in /var/tmp/portage/dev-lang/mono-basic-2.4.2/work/mono-basic-2.4.2/vbnc/vbnc/source/General/Main.vb:55 
Failed compilation took 00:00:00.5893870
stdout
copy 
Standard output is empty
https://ideone.com/hqzPn
language:
VB.NET (mono-3.10)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!