Visit our newest sister site!
Hundreds of free aircraft flight manuals
Civilian • Historical • Military • Declassified • FREE!


TUCoPS :: Crypto :: decsspls.c

DeCSSPlus Alleged to be an improvement on the controversial DeCSS code






#include <stdlib.h>

#include <stdio.h>

#include <string.h>

#include "DeCSS.h"



#define MaxKeys 1000



typedef struct

	{

		int				occ;

		DVD40bitKey		key;

	} KeyOcc;



void Syntax(void)

{

	printf("SYNTAX ERROR: Wrong number of parameters.\n");

	printf(" DeCSSplus VOBInputFile [VOBOutputFile] [/p[ause]] [/v{0..9}] [/o[utput]] [/s]\n");

	printf("   /p : Pause at the end of execution\n");

	printf("   /v : Verbosity level 0..9\n");

	printf("   /o : Use VOBInputFile as output if no output file given\n");

	printf("   /s : Scan entier file. Default is to stop after having found 20 times the same key.\n\n");

	printf(" Please make sure the file is _readable_. Use a DVD-player to\n");

	printf(" remove the sector protection\n\n");

}



int main( int argc, char* argv[] ) {



int				paramPause = 0;

int				paramVerbose = 1;

int				paramOutput = 0;

int				paramScanAll = 0;

char			*paramInputFile = NULL;

char			*paramOutputFile = NULL;



FILE			*in,*out;

unsigned char	buf[0x800];

DVD40bitKey		MyKey;

int				pos,BytesRead,BytesWritten,BestPLen,BestP,i,j,k,encrypted=0,filsize;

KeyOcc			PosKey[MaxKeys];

int				RegisteredKeys = 0, TotalKeysFound = 0, StopScanning = 0;



	if (paramVerbose>=1)

	{

		printf(" DeCSSplus v1.0 - Decrypt without knowing the key - (c) 2000 Ethan Hawke\n");

		printf("-------------------------------------------------------------------------\n");

	}



	if (argc<2)

	{

		Syntax();

		if (paramPause)

		{

			printf("Press ENTER key to continue ...\n");

			getchar();

		}

		return(1);

	}

	i=1;

	while (i<argc)

	{

		if (strncmp(argv[i],"/",1)==0)

		{

			if (strncmp(argv[i],"/p",2)==0) paramPause = 1;

			else if (strncmp(argv[i],"/v",2)==0) paramVerbose = atoi((argv[i])+2);

			else if (strncmp(argv[i],"/s",2)==0) paramScanAll = 1;

			else if (strncmp(argv[i],"/o",2)==0) paramOutput = 1;

			else

			{

				Syntax();

				if (paramPause)

				{

					printf("Press ENTER key to continue ...\n");

					getchar();

				}

				return(1);

			}

		}

		else

		{

			if (!paramInputFile) paramInputFile = argv[i];

			else if (!paramOutputFile) { paramOutputFile = argv[i]; paramOutput = 1; }

			else

			{

				Syntax();

				if (paramPause)

				{

					printf("Press ENTER key to continue ...\n");

					getchar();

				}

				return(1);

			}

		}

		i++;

	}



	if (in = fopen(paramInputFile,"rb"))

	{

		pos = 0;

		fseek(in,0,SEEK_END);

		filsize = ftell(in);

		fseek(in,0,SEEK_SET);



		do

		{

			if (paramVerbose>=1 && filsize>1024*1024) printf("%.2f of file read & found %i keys...\r",pos*100.0/filsize,TotalKeysFound);

			BytesRead = fread(buf,1,0x800,in);

			if (buf[0x14] & 0x30) // PES_scrambling_control

			{

				encrypted = 1;

				BestPLen = 0;

				BestP = 0;

				for(i=2;i<0x30;i++)

				{

					for(j=i;(j<0x80) && (buf[0x7F-(j%i)]==buf[0x7F-j]);j++);

					if ((j>BestPLen) && (j>i))

					{

						BestPLen = j;

						BestP = i;

					}

				}

				if ((BestPLen>20) && (BestPLen/BestP>=2))

				{

					i = CSScrackerDVD(0,&buf[0x80],&buf[0x80-(BestPLen/BestP)*BestP],(DVD40bitKey*)&buf[0x54],&MyKey);

					while (i>=0)

					{

						k = 0;

						for(j=0;j<RegisteredKeys;j++)

							if (memcmp(&(PosKey[j].key),&MyKey,sizeof(DVD40bitKey))==0)

							{

								PosKey[j].occ++;

								TotalKeysFound++;

								k = 1;

							}

						if (k==0)

						{

							memcpy(&(PosKey[RegisteredKeys].key),&MyKey,sizeof(DVD40bitKey));

							PosKey[RegisteredKeys++].occ = 1;

							TotalKeysFound++;

						}



						if (paramVerbose>=2) printf("\nOfs:%08X - Key: %02X %02X %02X %02X %02X\n",pos,MyKey[0],MyKey[1],MyKey[2],MyKey[3],MyKey[4]);

						i = CSScrackerDVD(i,&buf[0x80],&buf[0x80-(BestPLen/BestP)*BestP],(DVD40bitKey*)&buf[0x54],&MyKey);

					}

					if (RegisteredKeys==1 && PosKey[0].occ>=20) StopScanning = 1;

				}

			}

			

			pos += BytesRead;

		} while (BytesRead==0x800 && !StopScanning);



		fclose(in);

		if (paramVerbose>=1 && StopScanning) printf("Found enough occurancies of the same key. Scan stopped.");

		if (paramVerbose>=1) printf("\n\n");

	}

	else

	{

		printf("FILE ERROR: File could not be opened. [Check if file is readable]\n");

		if (paramPause)

		{

			printf("Press ENTER key to continue ...\n");

			getchar();

		}

		return(1);

	}



	if (!encrypted)

	{

		printf("This file was _NOT_ encrypted!\n");

		if (paramPause)

		{

			printf("Press ENTER key to continue ...\n");

			getchar();

		}

		return(0);

	}



	if (encrypted && RegisteredKeys==0)

	{

		printf("Sorry... No keys found to this encrypted file.\n");

		if (paramPause)

		{

			printf("Press ENTER key to continue ...\n");

			getchar();

		}

		return(1);

	}



	for(i=0;i<RegisteredKeys-1;i++)

		for(j=i+1;j<RegisteredKeys;j++)

			if (PosKey[j].occ>PosKey[i].occ)

			{

				memcpy(&MyKey,&(PosKey[j].key),sizeof(DVD40bitKey));

				k = PosKey[j].occ;

				memcpy(&(PosKey[j].key),&(PosKey[i].key),sizeof(DVD40bitKey));

				PosKey[j].occ = PosKey[i].occ;

				memcpy(&(PosKey[i].key),&MyKey,sizeof(DVD40bitKey));

				PosKey[i].occ = k;

			}



	if (paramVerbose>=1)

	{

		printf(" Key(s) & key probability\n--------------------------\n");

		for(i=0;i<RegisteredKeys;i++)

			printf(" %02X %02X %02X %02X %02X - %3.2f%%\n",PosKey[i].key[0],PosKey[i].key[1],PosKey[i].key[2],PosKey[i].key[3],PosKey[i].key[4],PosKey[i].occ*100.0/TotalKeysFound);

		printf("\n");

	}



	if (paramOutput)

	{



		if (RegisteredKeys>1)

		{

			printf(" Which stream key do you want to use (ex. 13 47 8A BC EF): ");

			if (scanf("%2X %2X %2X %2X %2X",&(MyKey[0]),&(MyKey[1]),&(MyKey[2]),&(MyKey[3]),&(MyKey[4]))!=5)

			{

				printf("\nNot a valid key.\n");

				if (paramPause)

				{

					printf("Press ENTER key to continue ...\n");

					getchar();

				}

				return(1);

			}

			if (paramVerbose>=2) printf("Using key %02X %02X %02X %02X %02X\n",MyKey[0],MyKey[1],MyKey[2],MyKey[3],MyKey[4]);

		}

		else

			memcpy(&(MyKey),&(PosKey[0].key),sizeof(DVD40bitKey));



		if (paramOutputFile)

		{

			if (in = fopen(paramInputFile,"rb"))

			{

				if (out = fopen(paramOutputFile,"wb"))

				{

					pos = 0;

					do

					{

						if (paramVerbose>=1 && filsize>1024*1024) printf("%.2f of file read/written...\r",pos*100.0/filsize);

						BytesRead = fread(&buf,1,0x800,in);

						if (buf[0x14] & 0x30) // PES_scrambling_control

						{

							CSSdescrambleSector(&MyKey,(unsigned char*)&buf);

							buf[0x14] &= 0x8F;

						}

						BytesWritten = fwrite(&buf,1,BytesRead,out);

						if (BytesWritten!=BytesRead)

						{

							printf("Could not write to output file.\n");

							if (paramPause)

							{

								printf("Press ENTER key to continue ...\n");

								getchar();

							}

							return(1);

						}

						pos += BytesRead;

					} while (BytesRead==0x800);

				}

				else

				{

					printf("\n File could not be opened for Write.\n");

					if (paramPause)

					{

						printf("Press ENTER key to continue ...\n");

						getchar();

					}

					return(1);

				}

			}

			else

			{

				printf("\n File could not be opened for Read/Write.\n");

				if (paramPause)

				{

					printf("Press ENTER key to continue ...\n");

					getchar();

				}

				return(1);

			}

		}

		else

		{

			if (in = fopen(paramInputFile,"r+b"))

			{

				pos = 0;

				do

				{

					if (paramVerbose>=1 && filsize>1024*1024) printf("%.2f of file read/written...\r",pos*100.0/filsize);

					fseek(in,pos,SEEK_SET);

					BytesRead = fread(&buf,1,0x800,in);

					if (buf[0x14] & 0x30) // PES_scrambling_control

					{

						CSSdescrambleSector(&MyKey,(unsigned char*)&buf);

						buf[0x14] &= 0x8F;

					}

					fseek(in,pos,SEEK_SET);

					fwrite(&buf,1,BytesRead,in);				

					pos += BytesRead;

				} while (BytesRead==0x800);

			}

			else

			{

				printf("\n File could not be opened for Read/Write.\n");

				if (paramPause)

				{

					printf("Press ENTER key to continue ...\n");

					getchar();

				}

				return(1);

			}

		}



	}



	if (paramPause)

	{

		printf("Press ENTER key to continue ...\n");

		getchar();

	}

	return(0);

}



TUCoPS is optimized to look best in Firefox® on a widescreen monitor (1440x900 or better).
Site design & layout copyright © 1986-2014 AOH