NAME

Crypt::MP4Stream -- DRMS decoding of Apple style encrypted MP4 player files

DESCRIPTION

Perl port of the DeDRMS.cs program by Jon Lech Johansen

SYNOPSIS

use Crypt::MP4Stream;

my $mp4file = 'myfile'; my $outfile = 'mydecodedfile'; my $deDRMS = new Crypt::MP4Stream; $deDRMS->DeDRMS($mp4file, $outfile);

METHODS

new

my $cs = new Crypt::MP4Stream;

my $cs_conparam = Crypt::MP4Stream->new( strHome => '/winroot/Documents and Settings/administrator/Application Data', sPfix => '.', dirSep => '/' );

Create the decoding object. strHome is optional, the name of the directory containing the keyfile. sPfix is '.' for unix, otherwise generally nil. dirSep is the char that separates directories, generally / or \.

DeDRMS

my $cs = new Crypt::MP4Stream; $cs->DeDRMS('infilename', 'outfilename');

Decode infilename, write to outfilename. Reading slurps of an entire file, so output can overwrite the same file without a problem, we hope. Backup first.

NOTES
From Jon Lech Johansen:

    DeDRMS requires that you already have the user key file(s) for
    your files. The user key file(s) can be generated by playing
    your files with the VideoLAN Client [1][2].

    DeDRMS does not remove the UserID, name and email address.
    The purpose of DeDRMS is to enable Fair Use, not facilitate
    copyright infringement.

[1] http://www.videolan.org/vlc/ [videolan.org]
[2] http://wiki.videolan.org/tiki-read_article.php?art icleId=5 [videolan.org]

AUTHOR

Original C# version: Jon Lech Johansen <jon-vl@nanocrew.net> Perl version: William Herrera (wherrera@skylightview.com).

SUPPORT

Questions, feature requests and bug reports should go to wherrera@skylightview.com

COPYRIGHT

/*****************************************************************************
* DeDRMS.cs: DeDRMS 0.1
*****************************************************************************
* Copyright (C) 2004 Jon Lech Johansen <jon-vl@nanocrew.net>
*
* 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.
*****************************************************************************/

    Perl translation with portability modifications Copyright (C) 2004, by William Herrera. Any and all of Perl code modifications of the original also are under GPL copyright.

    This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

2 POD Errors

The following errors were encountered while parsing the POD:

Around line 170:

'=item' outside of any '=over'

Around line 186:

You forgot a '=back' before '=head1'