dvd_css.c 28 KB
Newer Older
1 2 3 4
/*****************************************************************************
 * dvd_css.c: Functions for DVD authentification and unscrambling
 *****************************************************************************
 * Copyright (C) 1999-2001 VideoLAN
Sam Hocevar's avatar
 
Sam Hocevar committed
5
 * $Id: dvd_css.c,v 1.19 2001/04/02 23:30:41 sam Exp $
6 7 8
 *
 * Author: Stphane Borel <stef@via.ecp.fr>
 *
9 10 11
 * based on:
 *  - css-auth by Derek Fawcus <derek@spider.com>
 *  - DVD CSS ioctls example program by Andrew T. Veliath <andrewtv@usa.net>
Sam Hocevar's avatar
 
Sam Hocevar committed
12
 *  - The Divide and conquer attack by Frank A. Stevenson <frank@funcom.com>
13 14 15 16
 *  - DeCSSPlus by Ethan Hawke
 *  - DecVOB
 *  see http://www.lemuria.org/DeCSS/ by Tom Vogt for more information.
 * 
17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
 *****************************************************************************/

/*****************************************************************************
 * Preamble
 *****************************************************************************/
35 36
#include "defs.h"

37
#include <stdio.h>
38
#include <stdlib.h>
39 40 41 42
#include <unistd.h>
#include <string.h>

#include "common.h"
Sam Hocevar's avatar
 
Sam Hocevar committed
43

44
#include "intf_msg.h"
Sam Hocevar's avatar
 
Sam Hocevar committed
45

46
#include "dvd_css.h"
Sam Hocevar's avatar
 
Sam Hocevar committed
47 48 49
#ifdef HAVE_CSS
#include "dvd_csstables.h"
#endif /* HAVE_CSS */
Sam Hocevar's avatar
 
Sam Hocevar committed
50
#include "dvd_ioctl.h"
51
#include "dvd_ifo.h"
Sam Hocevar's avatar
 
Sam Hocevar committed
52

53
#include "input_dvd.h"
54 55

/*****************************************************************************
Sam Hocevar's avatar
 
Sam Hocevar committed
56
 * Local prototypes
57
 *****************************************************************************/
Sam Hocevar's avatar
 
Sam Hocevar committed
58
#ifdef HAVE_CSS
Sam Hocevar's avatar
 
Sam Hocevar committed
59
static int  CSSGetASF    ( css_t *p_css );
Sam Hocevar's avatar
 
Sam Hocevar committed
60 61 62 63 64 65
static void CSSCryptKey  ( int i_key_type, int i_varient,
                           u8 const * pi_challenge, u8* pi_key );
static int  CSSCracker   ( int i_start, unsigned char * p_crypted,
                           unsigned char * p_decrypted,
                           dvd_key_t * p_sector_key, dvd_key_t * p_key );
#endif /* HAVE_CSS */
66 67

/*****************************************************************************
Sam Hocevar's avatar
 
Sam Hocevar committed
68
 * CSSTest : check if the disc is encrypted or not
69
 *****************************************************************************/
Sam Hocevar's avatar
 
Sam Hocevar committed
70
int CSSTest( int i_fd )
71
{
Sam Hocevar's avatar
 
Sam Hocevar committed
72
    int i_ret, i_copyright;
73

Sam Hocevar's avatar
 
Sam Hocevar committed
74
    i_ret = dvd_ReadCopyright( i_fd, 0 /* i_layer */, &i_copyright );
75

Sam Hocevar's avatar
 
Sam Hocevar committed
76
    if( i_ret < 0 )
77
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
78
        return i_ret;
79
    }
80

Sam Hocevar's avatar
 
Sam Hocevar committed
81
    return i_copyright;
82 83 84
}

/*****************************************************************************
Sam Hocevar's avatar
 
Sam Hocevar committed
85 86 87 88 89
 * CSSInit : CSS Structure initialisation and DVD authentication.
 *****************************************************************************
 * It simulates the mutual authentication between logical unit and host.
 * Since we don't need the disc key to find the title key, we just run the
 * basic unavoidable commands to authenticate device and disc.
90
 *****************************************************************************/
Sam Hocevar's avatar
 
Sam Hocevar committed
91
int CSSInit( css_t * p_css )
92
{
Sam Hocevar's avatar
 
Sam Hocevar committed
93 94
#ifdef HAVE_CSS
    /* structures defined in cdrom.h or dvdio.h */
Sam Hocevar's avatar
 
Sam Hocevar committed
95 96 97
    char p_buffer[2048 + 4 + 1];
    int  i_ret = -1;
    int  i;
98

Sam Hocevar's avatar
 
Sam Hocevar committed
99
    p_css->i_agid = 0;
100

Sam Hocevar's avatar
 
Sam Hocevar committed
101 102
    /* Test authentication success */
    switch( CSSGetASF( p_css ) )
103
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
104 105
        case -1:
            return -1;
106

Sam Hocevar's avatar
 
Sam Hocevar committed
107 108
        case 1:
            return 0;
109

Sam Hocevar's avatar
 
Sam Hocevar committed
110 111
        case 0:
            intf_WarnMsg( 3, "css info: authenticating" );
112 113
    }

Sam Hocevar's avatar
 
Sam Hocevar committed
114 115
    /* Init sequence, request AGID */
    for( i = 1; i < 4 ; ++i )
116
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
117 118 119 120 121
        intf_WarnMsg( 3, "css info: requesting AGID %d", i );

        i_ret = dvd_LUSendAgid( p_css );

        if( i_ret != -1 )
122
        {
Sam Hocevar's avatar
 
Sam Hocevar committed
123
            /* No error during ioctl: we know the device is authenticated */
Sam Hocevar's avatar
 
Sam Hocevar committed
124
            break;
125
        }
126

Sam Hocevar's avatar
 
Sam Hocevar committed
127
        intf_ErrMsg( "css error: AGID N/A, invalidating" );
Sam Hocevar's avatar
 
Sam Hocevar committed
128 129 130

        p_css->i_agid = 0;
        dvd_InvalidateAgid( p_css );
Sam Hocevar's avatar
 
Sam Hocevar committed
131
    }
132

Sam Hocevar's avatar
 
Sam Hocevar committed
133
    /* Unable to authenticate without AGID */
Sam Hocevar's avatar
 
Sam Hocevar committed
134
    if( i_ret == -1 )
135
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
136
        intf_ErrMsg( "css error: could not get AGID" );
Sam Hocevar's avatar
 
Sam Hocevar committed
137
        return -1;
138
    }
139

Sam Hocevar's avatar
 
Sam Hocevar committed
140
    for( i = 0 ; i < 10; ++i )
141
    {
142
        p_css->disc.pi_challenge[i] = i;
143
    }
144

Sam Hocevar's avatar
 
Sam Hocevar committed
145 146 147
    /* Get challenge from host */
    for( i = 0 ; i < 10 ; ++i )
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
148
        p_buffer[9-i] = p_css->disc.pi_challenge[i];
149
    }
150

Sam Hocevar's avatar
 
Sam Hocevar committed
151
    /* Send challenge to LU */
Sam Hocevar's avatar
 
Sam Hocevar committed
152
    if( dvd_HostSendChallenge( p_css, p_buffer ) < 0 )
153
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
154
        intf_ErrMsg( "css error: failed sending challenge to LU" );
Sam Hocevar's avatar
 
Sam Hocevar committed
155
        return -1;
156
    }
157

Sam Hocevar's avatar
 
Sam Hocevar committed
158
    /* Get key1 from LU */
Sam Hocevar's avatar
 
Sam Hocevar committed
159
    if( dvd_LUSendKey1( p_css, p_buffer ) < 0)
160
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
161
        intf_ErrMsg( "css error: failed getting key1 from LU" );
Sam Hocevar's avatar
 
Sam Hocevar committed
162
        return -1;
163
    }
164

Sam Hocevar's avatar
 
Sam Hocevar committed
165 166
    /* Send key1 to host */
    for( i = 0 ; i < KEY_SIZE ; i++ )
167
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
168
        p_css->disc.pi_key1[i] = p_buffer[4-i];
169 170 171 172
    }

    for( i = 0 ; i < 32 ; ++i )
    {
173 174
        CSSCryptKey( 0, i, p_css->disc.pi_challenge,
                           p_css->disc.pi_key_check );
175

176 177
        if( memcmp( p_css->disc.pi_key_check,
                    p_css->disc.pi_key1, KEY_SIZE ) == 0 )
178
        {
Sam Hocevar's avatar
 
Sam Hocevar committed
179
            intf_WarnMsg( 3, "css info: drive authentic, using variant %d", i);
180
            p_css->disc.i_varient = i;
181 182 183 184 185 186
            break;
        }
    }

    if( i == 32 )
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
187
        intf_ErrMsg( "css error: drive would not authenticate" );
Sam Hocevar's avatar
 
Sam Hocevar committed
188
        return -1;
189
    }
190 191

    /* Get challenge from LU */
Sam Hocevar's avatar
 
Sam Hocevar committed
192
    if( dvd_LUSendChallenge( p_css, p_buffer ) < 0 )
193
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
194
        intf_ErrMsg( "css error: failed getting challenge from LU" );
Sam Hocevar's avatar
 
Sam Hocevar committed
195
        return -1;
196 197
    }

198
    /* Send challenge to host */
199
    for( i = 0 ; i < 10 ; ++i )
200
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
201
        p_css->disc.pi_challenge[i] = p_buffer[9-i];
202 203
    }

204
    CSSCryptKey( 1, p_css->disc.i_varient, p_css->disc.pi_challenge,
Sam Hocevar's avatar
 
Sam Hocevar committed
205
                                               p_css->disc.pi_key2 );
206

207
    /* Get key2 from host */
208
    for( i = 0 ; i < KEY_SIZE ; ++i )
209
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
210
        p_buffer[4-i] = p_css->disc.pi_key2[i];
211
    }
212

213
    /* Send key2 to LU */
Sam Hocevar's avatar
 
Sam Hocevar committed
214
    if( dvd_HostSendKey2( p_css, p_buffer ) < 0 )
215
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
216 217
        intf_ErrMsg( "css error: failed sending key2 to LU" );
        return -1;
218
    }
219

Sam Hocevar's avatar
 
Sam Hocevar committed
220
    intf_WarnMsg( 3, "css info: authentication established" );
221

222 223
    memcpy( p_css->disc.pi_challenge, p_css->disc.pi_key1, KEY_SIZE );
    memcpy( p_css->disc.pi_challenge+KEY_SIZE, p_css->disc.pi_key2, KEY_SIZE );
Sam Hocevar's avatar
 
Sam Hocevar committed
224 225
    CSSCryptKey( 2, p_css->disc.i_varient, p_css->disc.pi_challenge,
                                               p_css->disc.pi_key_check );
226

Sam Hocevar's avatar
 
Sam Hocevar committed
227
    intf_WarnMsg( 1, "css info: received Session Key" );
228

229
    if( p_css->i_agid < 0 )
230
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
231
        return -1;
232
    }
233

234
    /* Test authentication success */
Sam Hocevar's avatar
 
Sam Hocevar committed
235
    switch( CSSGetASF( p_css ) )
236
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
237 238 239 240 241 242 243 244
        case -1:
            return -1;

        case 1:
            return 0;

        case 0:
            intf_WarnMsg( 3, "css info: getting disc key" );
245
    }
246

247
    /* Get encrypted disc key */
Sam Hocevar's avatar
 
Sam Hocevar committed
248
    if( dvd_ReadKey( p_css, p_buffer ) < 0 )
249
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
250
        intf_ErrMsg( "css error: could not read Disc Key" );
Sam Hocevar's avatar
 
Sam Hocevar committed
251
        return -1;
252
    }
Sam Hocevar's avatar
 
Sam Hocevar committed
253

254
    /* Unencrypt disc key using bus key */
Sam Hocevar's avatar
 
Sam Hocevar committed
255
    for( i = 0 ; i < 2048 ; i++ )
256
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
257
        p_buffer[ i ] ^= p_css->disc.pi_key_check[ 4 - (i % KEY_SIZE) ];
258
    }
Sam Hocevar's avatar
 
Sam Hocevar committed
259 260
    memcpy( p_css->disc.pi_key_check, p_buffer, 2048 );

261
    /* Test authentication success */
Sam Hocevar's avatar
 
Sam Hocevar committed
262
    switch( CSSGetASF( p_css ) )
263
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
264 265 266 267 268 269
        case -1:
        case 0:
            return -1;

        case 1:
            return 0;
270
    }
Sam Hocevar's avatar
 
Sam Hocevar committed
271

Sam Hocevar's avatar
 
Sam Hocevar committed
272
    return 0;
Sam Hocevar's avatar
 
Sam Hocevar committed
273

Sam Hocevar's avatar
 
Sam Hocevar committed
274 275 276
#else /* HAVE_CSS */
    intf_ErrMsg( "css error: CSS decryption is disabled in this module" );

Sam Hocevar's avatar
 
Sam Hocevar committed
277 278
    return -1;

Sam Hocevar's avatar
 
Sam Hocevar committed
279
#endif /* HAVE_CSS */
280 281 282 283 284 285 286 287 288
}

/*****************************************************************************
 * CSSEnd : frees css structure
 *****************************************************************************/
void CSSEnd( css_t * p_css )
{
#ifdef HAVE_CSS
    free( p_css );
Sam Hocevar's avatar
 
Sam Hocevar committed
289 290 291
#else /* HAVE_CSS */
    ;
#endif /* HAVE_CSS */
292 293 294
}

/*****************************************************************************
Stéphane Borel's avatar
 
Stéphane Borel committed
295
 * CSSGetKey : get title key.
Sam Hocevar's avatar
 
Sam Hocevar committed
296
 *****************************************************************************
297
 * The DVD should have been opened and authenticated before.
298
 *****************************************************************************/
Stéphane Borel's avatar
 
Stéphane Borel committed
299
int CSSGetKey( css_t * p_css )
300
{
Sam Hocevar's avatar
 
Sam Hocevar committed
301
#ifdef HAVE_CSS
302 303 304 305
    /*
     * Title key cracking method from Ethan Hawke,
     * with Frank A. Stevenson algorithm.
     * Does not use any player key table and ioctls.
306
     */
Stéphane Borel's avatar
 
Stéphane Borel committed
307 308 309
    u8          pi_buf[0x800];
    dvd_key_t   pi_key;
    title_key_t p_title_key[10];
310 311 312
    off_t       i_pos;
    boolean_t   b_encrypted;
    boolean_t   b_stop_scanning;
313
    int         i_title;
314 315 316
    int         i_bytes_read;
    int         i_best_plen;
    int         i_best_p;
317 318 319
    int         i_registered_keys;
    int         i_total_keys_found;
    int         i_highest;
320
    int         i,j,k;
321

Stéphane Borel's avatar
 
Stéphane Borel committed
322 323 324 325 326 327 328 329 330 331 332
    memset( p_title_key, 0, 10 );
    memset( &pi_key, 0, 10 );
    b_encrypted = 0;
    b_stop_scanning = 0;
    i_registered_keys = 0 ;
    i_total_keys_found = 0 ;
    i_highest = 0;

    /* Position of the title on the disc */
    i_title = p_css->i_title;
    i_pos = p_css->i_title_pos;
333

334 335
//fprintf( stderr, "CSS %d start pos: %lld\n", i_title, i_pos );

Stéphane Borel's avatar
 
Stéphane Borel committed
336 337 338
    do {
    i_pos = lseek( p_css->i_fd, i_pos, SEEK_SET );
    i_bytes_read = read( p_css->i_fd, pi_buf, 0x800 );
339

Stéphane Borel's avatar
 
Stéphane Borel committed
340 341 342 343 344 345
    /* PES_scrambling_control */
    if( pi_buf[0x14] & 0x30 )
    {
        b_encrypted = 1;
        i_best_plen = 0;
        i_best_p = 0;
346

Stéphane Borel's avatar
 
Stéphane Borel committed
347 348 349 350
        for( i = 2 ; i < 0x30 ; i++ )
        {
            for( j = i ; ( j < 0x80 ) &&
                   ( pi_buf[0x7F - (j%i)] == pi_buf[0x7F-j] ) ; j++ );
351
            {
Stéphane Borel's avatar
 
Stéphane Borel committed
352
                if( ( j > i_best_plen ) && ( j > i ) )
353
                {
Stéphane Borel's avatar
 
Stéphane Borel committed
354 355
                    i_best_plen = j;
                    i_best_p = i;
356
                }
357
            }
Stéphane Borel's avatar
 
Stéphane Borel committed
358
        }
359

Stéphane Borel's avatar
 
Stéphane Borel committed
360 361 362 363 364 365 366
        if( ( i_best_plen > 20 ) && ( i_best_plen / i_best_p >= 2) )
        {
            i = CSSCracker( 0,  &pi_buf[0x80],
                    &pi_buf[0x80 - ( i_best_plen / i_best_p) *i_best_p],
                    (dvd_key_t*)&pi_buf[0x54],
                    &pi_key );
            while( i>=0 )
367
            {
Stéphane Borel's avatar
 
Stéphane Borel committed
368 369
                k = 0;
                for( j=0 ; j<i_registered_keys ; j++ )
370
                {
Stéphane Borel's avatar
 
Stéphane Borel committed
371 372
                    if( memcmp( &(p_title_key[j].pi_key),
                                &pi_key, sizeof(dvd_key_t) ) == 0 )
373
                    {
Stéphane Borel's avatar
 
Stéphane Borel committed
374
                        p_title_key[j].i_occ++;
375
                        i_total_keys_found++;
Stéphane Borel's avatar
 
Stéphane Borel committed
376
                        k = 1;
377
                    }
378 379
                }

Sam Hocevar's avatar
 
Sam Hocevar committed
380 381 382 383 384 385 386 387 388 389 390 391
                if( k == 0 )
                {
                    memcpy( &(p_title_key[i_registered_keys].pi_key),
                                            &pi_key, sizeof(dvd_key_t) );
                    p_title_key[i_registered_keys++].i_occ = 1;
                    i_total_keys_found++;
                }
                i = CSSCracker( i, &pi_buf[0x80],
                    &pi_buf[0x80 - ( i_best_plen / i_best_p) *i_best_p],
                    (dvd_key_t*)&pi_buf[0x54], &pi_key);
            }

Sam Hocevar's avatar
 
Sam Hocevar committed
392
            /* Stop search if we find one occurence of the key 
Sam Hocevar's avatar
 
Sam Hocevar committed
393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542
             * I have never found a DVD for which it is not enough
             * but we should take care of that */
            if( i_registered_keys == 1 && p_title_key[0].i_occ >= 1 )
            {
                b_stop_scanning = 1;
            }
        }
    }

    i_pos += i_bytes_read;
    } while( i_bytes_read == 0x800 && !b_stop_scanning);

    if( b_stop_scanning)
    {
        intf_WarnMsg( 1,
            "css info: found enough occurencies of the same key." );
    }

    if( !b_encrypted )
    {
        intf_WarnMsg( 3, "css warning: this file was _NOT_ encrypted!" );
        return(0);
    }

    if( b_encrypted && i_registered_keys == 0 )
    {
        intf_ErrMsg( "css error: unable to determine keys from file" );
        return(1);
    }

    for( i = 0 ; i < i_registered_keys - 1 ; i++ )
    {
        for( j = i + 1 ; j < i_registered_keys ; j++ )
        {
            if( p_title_key[j].i_occ > p_title_key[i].i_occ )
            {
                memcpy( &pi_key, &(p_title_key[j].pi_key), sizeof(dvd_key_t) );
                k = p_title_key[j].i_occ;

                memcpy( &(p_title_key[j].pi_key),
                        &(p_title_key[i].pi_key), sizeof(dvd_key_t) );
                p_title_key[j].i_occ = p_title_key[i].i_occ;

                memcpy( &(p_title_key[i].pi_key),&pi_key, sizeof(dvd_key_t) );
                p_title_key[i].i_occ = k;
            }
        }
    }

#ifdef STATS
    intf_WarnMsg( 1, "css info: key(s) & key probability" );
    intf_WarnMsg( 1, "----------------------------------" );
#endif
    for( i=0 ; i<i_registered_keys ; i++ )
    {
#ifdef STATS
        intf_WarnMsg( 1, "%d) %02X %02X %02X %02X %02X - %3.2f%%", i,
                      p_title_key[i].pi_key[0], p_title_key[i].pi_key[1],
                      p_title_key[i].pi_key[2], p_title_key[i].pi_key[3],
                      p_title_key[i].pi_key[4],
                      p_title_key[i].i_occ * 100.0 / i_total_keys_found );
#endif
        if( p_title_key[i_highest].i_occ * 100.0 / i_total_keys_found
                           <= p_title_key[i].i_occ*100.0 / i_total_keys_found )
        {
            i_highest = i;
        }
    }


    /* The "find the key with the highest probability" code
     * is untested, as I haven't been able to find a VOB that
     * produces multiple keys (RT)
     */
    intf_WarnMsg( 3, "css info: title %d, key %02X %02X %02X %02X %02X",
                  i_title, p_title_key[i_highest].pi_key[0],
                           p_title_key[i_highest].pi_key[1],
                           p_title_key[i_highest].pi_key[2],
                           p_title_key[i_highest].pi_key[3],
                           p_title_key[i_highest].pi_key[4] );

    memcpy( p_css->pi_title_key,
            p_title_key[i_highest].pi_key, KEY_SIZE );

    return 0;
#else /* HAVE_CSS */
    return 1;
#endif /* HAVE_CSS */
}

/*****************************************************************************
 * CSSDescrambleSector
 *****************************************************************************
 * sec : sector to descramble
 * key : title key for this sector
 *****************************************************************************/
int CSSDescrambleSector( dvd_key_t pi_key, u8* pi_sec )
{
#ifdef HAVE_CSS
    unsigned int    i_t1, i_t2, i_t3, i_t4, i_t5, i_t6;
    u8*             pi_end = pi_sec + 0x800;

    /* PES_scrambling_control */
    if( pi_sec[0x14] & 0x30)
    {
        i_t1 = ((pi_key)[0] ^ pi_sec[0x54]) | 0x100;
        i_t2 = (pi_key)[1] ^ pi_sec[0x55];
        i_t3 = (((pi_key)[2]) | ((pi_key)[3] << 8) |
               ((pi_key)[4] << 16)) ^ ((pi_sec[0x56]) |
               (pi_sec[0x57] << 8) | (pi_sec[0x58] << 16));
        i_t4 = i_t3 & 7;
        i_t3 = i_t3 * 2 + 8 - i_t4;
        pi_sec += 0x80;
        i_t5 = 0;

        while( pi_sec != pi_end )
        {
            i_t4 = pi_css_tab2[i_t2] ^ pi_css_tab3[i_t1];
            i_t2 = i_t1>>1;
            i_t1 = ( ( i_t1 & 1 ) << 8 ) ^ i_t4;
            i_t4 = pi_css_tab5[i_t4];
            i_t6 = ((((((( i_t3 >> 3 ) ^ i_t3 ) >> 1 ) ^
                                         i_t3 ) >> 8 ) ^ i_t3 ) >> 5) & 0xff;
            i_t3 = (i_t3 << 8 ) | i_t6;
            i_t6 = pi_css_tab4[i_t6];
            i_t5 += i_t6 + i_t4;
            *pi_sec++ = pi_css_tab1[*pi_sec] ^( i_t5 & 0xff );
            i_t5 >>= 8;
        }
    }

    return 0;
#else /* HAVE_CSS */
    return 1;
#endif /* HAVE_CSS */
}

#ifdef HAVE_CSS
/*
 * Following functions are local
 */

/*****************************************************************************
 * CSSGetASF : Get Authentification success flag
 *****************************************************************************
 * Returns :
 *  -1 on ioctl error,
 *  0 if the device needs to be authenticated,
 *  1 either.
 *****************************************************************************/
Sam Hocevar's avatar
 
Sam Hocevar committed
543
static int CSSGetASF( css_t *p_css )
Sam Hocevar's avatar
 
Sam Hocevar committed
544
{
Sam Hocevar's avatar
 
Sam Hocevar committed
545
    int i_oldagid = p_css->i_agid, i_asf = 0;
Sam Hocevar's avatar
 
Sam Hocevar committed
546

Sam Hocevar's avatar
 
Sam Hocevar committed
547
    for( p_css->i_agid = 0 ; p_css->i_agid < 4 ; p_css->i_agid++ )
Sam Hocevar's avatar
 
Sam Hocevar committed
548
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
549
        if( dvd_LUSendASF( p_css, &i_asf ) == 0 )
Sam Hocevar's avatar
 
Sam Hocevar committed
550
        {
Sam Hocevar's avatar
 
Sam Hocevar committed
551 552 553 554
            intf_WarnMsg( 3, "css info: %sauthenticated", i_asf ? "":"not " );

            p_css->i_agid = i_oldagid;
            return i_asf;
Sam Hocevar's avatar
 
Sam Hocevar committed
555 556 557 558 559
        }
    }

    /* The ioctl process has failed */
    intf_ErrMsg( "css error: GetASF fatal error" );
Sam Hocevar's avatar
 
Sam Hocevar committed
560 561

    p_css->i_agid = i_oldagid;
Sam Hocevar's avatar
 
Sam Hocevar committed
562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688
    return -1;
}

/*****************************************************************************
 * CSSCryptKey : shuffles bits and unencrypt keys.
 *****************************************************************************
 * Used during authentication and disc key negociation in CSSInit.
 * i_key_type : 0->key1, 1->key2, 2->buskey.
 * i_varient : between 0 and 31.
 *****************************************************************************/
static void CSSCryptKey( int i_key_type, int i_varient,
                         u8 const * pi_challenge, u8* pi_key )
{
    /* Permutation table for challenge */
    u8      ppi_perm_challenge[3][10] =
            { { 1, 3, 0, 7, 5, 2, 9, 6, 4, 8 },
              { 6, 1, 9, 3, 8, 5, 7, 4, 0, 2 },
              { 4, 0, 3, 5, 7, 2, 8, 6, 1, 9 } };

    /* Permutation table for varient table for key2 and buskey */
    u8      ppi_perm_varient[2][32] =
            { { 0x0a, 0x08, 0x0e, 0x0c, 0x0b, 0x09, 0x0f, 0x0d,
                0x1a, 0x18, 0x1e, 0x1c, 0x1b, 0x19, 0x1f, 0x1d,
                0x02, 0x00, 0x06, 0x04, 0x03, 0x01, 0x07, 0x05,
                0x12, 0x10, 0x16, 0x14, 0x13, 0x11, 0x17, 0x15 },
              { 0x12, 0x1a, 0x16, 0x1e, 0x02, 0x0a, 0x06, 0x0e,
                0x10, 0x18, 0x14, 0x1c, 0x00, 0x08, 0x04, 0x0c,
                0x13, 0x1b, 0x17, 0x1f, 0x03, 0x0b, 0x07, 0x0f,
                0x11, 0x19, 0x15, 0x1d, 0x01, 0x09, 0x05, 0x0d } };

    u8      pi_varients[32] =
            {   0xB7, 0x74, 0x85, 0xD0, 0xCC, 0xDB, 0xCA, 0x73,
                0x03, 0xFE, 0x31, 0x03, 0x52, 0xE0, 0xB7, 0x42,
                0x63, 0x16, 0xF2, 0x2A, 0x79, 0x52, 0xFF, 0x1B,
                0x7A, 0x11, 0xCA, 0x1A, 0x9B, 0x40, 0xAD, 0x01 };

    /* The "secret" key */
    u8      pi_secret[5] = { 0x55, 0xD6, 0xC4, 0xC5, 0x28 };

    u8      pi_bits[30];
    u8      pi_scratch[10];
    u8      pi_tmp1[5];
    u8      pi_tmp2[5];
    u8      i_lfsr0_o;  /* 1 bit used */
    u8      i_lfsr1_o;  /* 1 bit used */
    u32     i_lfsr0;
    u32     i_lfsr1;
    u8      i_css_varient;
    u8      i_cse;
    u8      i_index;
    u8      i_combined;
    u8      i_carry;
    u8      i_val = 0;
    int     i_term = 0;
    int     i_bit;
    int     i;

    for (i = 9; i >= 0; --i)
        pi_scratch[i] = pi_challenge[ppi_perm_challenge[i_key_type][i]];

    i_css_varient = ( i_key_type == 0 ) ? i_varient :
                    ppi_perm_varient[i_key_type-1][i_varient];

    /*
     * This encryption engine implements one of 32 variations
     * one the same theme depending upon the choice in the
     * varient parameter (0 - 31).
     *
     * The algorithm itself manipulates a 40 bit input into
     * a 40 bit output.
     * The parameter 'input' is 80 bits.  It consists of
     * the 40 bit input value that is to be encrypted followed
     * by a 40 bit seed value for the pseudo random number
     * generators.
     */

    /* Feed the secret into the input values such that
     * we alter the seed to the LFSR's used above,  then
     * generate the bits to play with.
     */
    for( i = 5 ; --i >= 0 ; )
    {
        pi_tmp1[i] = pi_scratch[5 + i] ^ pi_secret[i] ^ pi_crypt_tab2[i];
    }

    /*
     * We use two LFSR's (seeded from some of the input data bytes) to
     * generate two streams of pseudo-random bits.  These two bit streams
     * are then combined by simply adding with carry to generate a final
     * sequence of pseudo-random bits which is stored in the buffer that
     * 'output' points to the end of - len is the size of this buffer.
     *
     * The first LFSR is of degree 25,  and has a polynomial of:
     * x^13 + x^5 + x^4 + x^1 + 1
     *
     * The second LSFR is of degree 17,  and has a (primitive) polynomial of:
     * x^15 + x^1 + 1
     *
     * I don't know if these polynomials are primitive modulo 2,  and thus
     * represent maximal-period LFSR's.
     *
     *
     * Note that we take the output of each LFSR from the new shifted in
     * bit,  not the old shifted out bit.  Thus for ease of use the LFSR's
     * are implemented in bit reversed order.
     *
     */
    
    /* In order to ensure that the LFSR works we need to ensure that the
     * initial values are non-zero.  Thus when we initialise them from
     * the seed,  we ensure that a bit is set.
     */
    i_lfsr0 = ( pi_tmp1[0] << 17 ) | ( pi_tmp1[1] << 9 ) |
              (( pi_tmp1[2] & ~7 ) << 1 ) | 8 | ( pi_tmp1[2] & 7 );
    i_lfsr1 = ( pi_tmp1[3] << 9 ) | 0x100 | pi_tmp1[4];

    i_index = sizeof(pi_bits);
    i_carry = 0;

    do
    {
        for( i_bit = 0, i_val = 0 ; i_bit < 8 ; ++i_bit )
        {

            i_lfsr0_o = ( ( i_lfsr0 >> 24 ) ^ ( i_lfsr0 >> 21 ) ^
                        ( i_lfsr0 >> 20 ) ^ ( i_lfsr0 >> 12 ) ) & 1;
            i_lfsr0 = ( i_lfsr0 << 1 ) | i_lfsr0_o;
Stéphane Borel's avatar
 
Stéphane Borel committed
689

Sam Hocevar's avatar
 
Sam Hocevar committed
690 691 692 693 694 695 696
            i_lfsr1_o = ( ( i_lfsr1 >> 16 ) ^ ( i_lfsr1 >> 2 ) ) & 1;
            i_lfsr1 = ( i_lfsr1 << 1 ) | i_lfsr1_o;

            i_combined = !i_lfsr1_o + i_carry + !i_lfsr0_o;
            /* taking bit 1 */
            i_carry = ( i_combined >> 1 ) & 1;
            i_val |= ( i_combined & 1 ) << i_bit;
697
        }
Sam Hocevar's avatar
 
Sam Hocevar committed
698 699 700
    
        pi_bits[--i_index] = i_val;
    } while( i_index > 0 );
701

Sam Hocevar's avatar
 
Sam Hocevar committed
702 703 704 705 706
    /* This term is used throughout the following to
     * select one of 32 different variations on the
     * algorithm.
     */
    i_cse = pi_varients[i_css_varient] ^ pi_crypt_tab2[i_css_varient];
707

Sam Hocevar's avatar
 
Sam Hocevar committed
708 709 710 711 712 713
    /* Now the actual blocks doing the encryption.  Each
     * of these works on 40 bits at a time and are quite
     * similar.
     */
    i_index = 0;
    for( i = 5, i_term = 0 ; --i >= 0 ; i_term = pi_scratch[i] )
Stéphane Borel's avatar
 
Stéphane Borel committed
714
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
715 716 717 718
        i_index = pi_bits[25 + i] ^ pi_scratch[i];
        i_index = pi_crypt_tab1[i_index] ^ ~pi_crypt_tab2[i_index] ^ i_cse;

        pi_tmp1[i] = pi_crypt_tab2[i_index] ^ pi_crypt_tab3[i_index] ^ i_term;
Stéphane Borel's avatar
 
Stéphane Borel committed
719
    }
Sam Hocevar's avatar
 
Sam Hocevar committed
720
    pi_tmp1[4] ^= pi_tmp1[0];
721

Sam Hocevar's avatar
 
Sam Hocevar committed
722
    for( i = 5, i_term = 0 ; --i >= 0 ; i_term = pi_tmp1[i] )
Stéphane Borel's avatar
 
Stéphane Borel committed
723
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
724 725 726 727
        i_index = pi_bits[20 + i] ^ pi_tmp1[i];
        i_index = pi_crypt_tab1[i_index] ^ ~pi_crypt_tab2[i_index] ^ i_cse;

        pi_tmp2[i] = pi_crypt_tab2[i_index] ^ pi_crypt_tab3[i_index] ^ i_term;
Stéphane Borel's avatar
 
Stéphane Borel committed
728
    }
Sam Hocevar's avatar
 
Sam Hocevar committed
729
    pi_tmp2[4] ^= pi_tmp2[0];
730

Sam Hocevar's avatar
 
Sam Hocevar committed
731
    for( i = 5, i_term = 0 ; --i >= 0 ; i_term = pi_tmp2[i] )
Stéphane Borel's avatar
 
Stéphane Borel committed
732
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
733 734 735 736 737
        i_index = pi_bits[15 + i] ^ pi_tmp2[i];
        i_index = pi_crypt_tab1[i_index] ^ ~pi_crypt_tab2[i_index] ^ i_cse;
        i_index = pi_crypt_tab2[i_index] ^ pi_crypt_tab3[i_index] ^ i_term;

        pi_tmp1[i] = pi_crypt_tab0[i_index] ^ pi_crypt_tab2[i_index];
Stéphane Borel's avatar
 
Stéphane Borel committed
738
    }
Sam Hocevar's avatar
 
Sam Hocevar committed
739
    pi_tmp1[4] ^= pi_tmp1[0];
740

Sam Hocevar's avatar
 
Sam Hocevar committed
741
    for( i = 5, i_term = 0 ; --i >= 0 ; i_term = pi_tmp1[i] )
Stéphane Borel's avatar
 
Stéphane Borel committed
742
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
743 744
        i_index = pi_bits[10 + i] ^ pi_tmp1[i];
        i_index = pi_crypt_tab1[i_index] ^ ~pi_crypt_tab2[i_index] ^ i_cse;
745

Sam Hocevar's avatar
 
Sam Hocevar committed
746
        i_index = pi_crypt_tab2[i_index] ^ pi_crypt_tab3[i_index] ^ i_term;
747

Sam Hocevar's avatar
 
Sam Hocevar committed
748
        pi_tmp2[i] = pi_crypt_tab0[i_index] ^ pi_crypt_tab2[i_index];
Stéphane Borel's avatar
 
Stéphane Borel committed
749
    }
Sam Hocevar's avatar
 
Sam Hocevar committed
750
    pi_tmp2[4] ^= pi_tmp2[0];
751

Sam Hocevar's avatar
 
Sam Hocevar committed
752
    for( i = 5, i_term = 0 ; --i >= 0 ; i_term = pi_tmp2[i] )
Stéphane Borel's avatar
 
Stéphane Borel committed
753
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
754 755
        i_index = pi_bits[5 + i] ^ pi_tmp2[i];
        i_index = pi_crypt_tab1[i_index] ^ ~pi_crypt_tab2[i_index] ^ i_cse;
756

Sam Hocevar's avatar
 
Sam Hocevar committed
757 758 759
        pi_tmp1[i] = pi_crypt_tab2[i_index] ^ pi_crypt_tab3[i_index] ^ i_term;
    }
    pi_tmp1[4] ^= pi_tmp1[0];
760

Sam Hocevar's avatar
 
Sam Hocevar committed
761 762 763 764
    for(i = 5, i_term = 0 ; --i >= 0 ; i_term = pi_tmp1[i] )
    {
        i_index = pi_bits[i] ^ pi_tmp1[i];
        i_index = pi_crypt_tab1[i_index] ^ ~pi_crypt_tab2[i_index] ^ i_cse;
Stéphane Borel's avatar
 
Stéphane Borel committed
765

Sam Hocevar's avatar
 
Sam Hocevar committed
766 767
        pi_key[i] = pi_crypt_tab2[i_index] ^ pi_crypt_tab3[i_index] ^ i_term;
    }
768

Sam Hocevar's avatar
 
Sam Hocevar committed
769
    return;
770 771 772
}

/*****************************************************************************
Sam Hocevar's avatar
 
Sam Hocevar committed
773 774 775
 * CSSCracker : title key decryption by cracking
 *****************************************************************************
 * This function is called by CSSGetKeys to find a key
776
 *****************************************************************************/
Sam Hocevar's avatar
 
Sam Hocevar committed
777 778 779 780 781
static int CSSCracker( int i_start,
                       unsigned char * p_crypted,
                       unsigned char * p_decrypted,
                       dvd_key_t * p_sector_key,
                       dvd_key_t * p_key )
782
{
Sam Hocevar's avatar
 
Sam Hocevar committed
783 784 785 786 787 788
    unsigned char pi_buffer[10];
    unsigned int i_t1, i_t2, i_t3, i_t4, i_t5, i_t6;
    unsigned int i_try;
    unsigned int i_candidate;
    unsigned int i, j;
    int i_exit = -1;
789

Sam Hocevar's avatar
 
Sam Hocevar committed
790 791

    for( i = 0 ; i < 10 ; i++ )
792
    {
Sam Hocevar's avatar
 
Sam Hocevar committed
793 794 795 796 797 798 799 800
        pi_buffer[i] = pi_css_tab1[p_crypted[i]] ^ p_decrypted[i];
    }

    for( i_try = i_start ; i_try < 0x10000 ; i_try++ )
    {
        i_t1 = i_try >> 8 | 0x100;
        i_t2 = i_try & 0xff;
        i_t3 = 0;               /* not needed */
801 802
        i_t5 = 0;

Sam Hocevar's avatar
 
Sam Hocevar committed
803 804
        /* iterate cipher 4 times to reconstruct LFSR2 */
        for( i = 0 ; i < 4 ; i++ )
805
        {
Sam Hocevar's avatar
 
Sam Hocevar committed
806
            /* advance LFSR1 normaly */
807
            i_t4 = pi_css_tab2[i_t2] ^ pi_css_tab3[i_t1];
Sam Hocevar's avatar
 
Sam Hocevar committed
808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835
            i_t2 = i_t1 >> 1;
            i_t1 = ( ( i_t1 & 1 ) << 8 ) ^ i_t4;
            i_t4 = pi_css_tab5[i_t4];
            /* deduce i_t6 & i_t5 */
            i_t6 = pi_buffer[i];
            if( i_t5 )
            {
                i_t6 = ( i_t6 + 0xff ) & 0x0ff;
            }
            if( i_t6 < i_t4 )
            {
                i_t6 += 0x100;
            }
            i_t6 -= i_t4;
            i_t5 += i_t6 + i_t4;
            i_t6 = pi_css_tab4[ i_t6 ];
            /* feed / advance i_t3 / i_t5 */
            i_t3 = ( i_t3 << 8 ) | i_t6;
            i_t5 >>= 8;
        }

        i_candidate = i_t3;

        /* iterate 6 more times to validate candidate key */
        for( ; i < 10 ; i++ )
        {
            i_t4 = pi_css_tab2[i_t2] ^ pi_css_tab3[i_t1];
            i_t2 = i_t1 >> 1;
836 837 838
            i_t1 = ( ( i_t1 & 1 ) << 8 ) ^ i_t4;
            i_t4 = pi_css_tab5[i_t4];
            i_t6 = ((((((( i_t3 >> 3 ) ^ i_t3 ) >> 1 ) ^
Sam Hocevar's avatar
 
Sam Hocevar committed
839 840
                                         i_t3 ) >> 8 ) ^ i_t3 ) >> 5 ) & 0xff;
            i_t3 = ( i_t3 << 8 ) | i_t6;
841 842
            i_t6 = pi_css_tab4[i_t6];
            i_t5 += i_t6 + i_t4;
Sam Hocevar's avatar
 
Sam Hocevar committed
843 844 845 846 847
            if( ( i_t5 & 0xff ) != pi_buffer[i] )
            {
                break;
            }

848
            i_t5 >>= 8;
849
        }
Sam Hocevar's avatar
 
Sam Hocevar committed
850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896

        if( i == 10 )
        {
            /* Do 4 backwards steps of iterating t3 to deduce initial state */
            i_t3 = i_candidate;
            for( i = 0 ; i < 4 ; i++ )
            {
                i_t1 = i_t3 & 0xff;
                i_t3 = ( i_t3 >> 8 );
                /* easy to code, and fast enough bruteforce
                 * search for byte shifted in */
                for( j = 0 ; j < 256 ; j++ )
                {
                    i_t3 = ( i_t3 & 0x1ffff) | ( j << 17 );
                    i_t6 = ((((((( i_t3 >> 3 ) ^ i_t3 ) >> 1 ) ^
                                   i_t3 ) >> 8 ) ^ i_t3 ) >> 5 ) & 0xff;
                    if( i_t6 == i_t1 )
                    {
                        break;
                    }
                }
            }

            i_t4 = ( i_t3 >> 1 ) - 4;
            for( i_t5 = 0 ; i_t5 < 8; i_t5++ )
            {
                if( ( ( i_t4 + i_t5 ) * 2 + 8 - ( (i_t4 + i_t5 ) & 7 ) )
                                                                      == i_t3 )
                {
                    (*p_key)[0] = i_try>>8;
                    (*p_key)[1] = i_try & 0xFF;
                    (*p_key)[2] = ( ( i_t4 + i_t5 ) >> 0) & 0xFF;
                    (*p_key)[3] = ( ( i_t4 + i_t5 ) >> 8) & 0xFF;
                    (*p_key)[4] = ( ( i_t4 + i_t5 ) >> 16) & 0xFF;
                    i_exit = i_try + 1;
                }
            }
        }
    }

    if( i_exit >= 0 )
    {
        (*p_key)[0] ^= (*p_sector_key)[0];
        (*p_key)[1] ^= (*p_sector_key)[1];
        (*p_key)[2] ^= (*p_sector_key)[2];
        (*p_key)[3] ^= (*p_sector_key)[3];
        (*p_key)[4] ^= (*p_sector_key)[4];
897 898
    }

Sam Hocevar's avatar
 
Sam Hocevar committed
899
    return i_exit;
900
}
Sam Hocevar's avatar
 
Sam Hocevar committed
901
#endif /* HAVE_CSS */
Sam Hocevar's avatar
 
Sam Hocevar committed
902