#2 lsdvd incorrect Perl output

[Bernard Bou]

Perl output (as used by dvd::rip) produces ill-formed
result. This has to do with curly brace closing audio
section instead of square brace, I think (see attached
file for unabridged output):

# Error compiling lsdvd output: syntax error at (eval
77) line 488, at EOF:

our %lsdvd = (
..
track => [
{
...,
audio => [
...
{
ix => 32,
langcode => 'xx',
language => 'Unknown',
content => 'Undefined',
streamid => '0x3f',
},
}, # <<< LINE 488 : IT BREAKS HERE
{
ix => 2,
length => 11.170,
vts_id => 'DVDVIDEO-VTS',
vts => 2,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '16/9',
width => 720,
height => 576,
df => 'Letterbox',
angles => 1,
audio => [
{
ix => 1,
langcode => 'fr',
language => 'Francais',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 6,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 11.170,
startcell => 1,
},
subp => [
},
longest_track => 1,
);

[Bernard Bou]

perl output

[hajma]

Logged In: YES
user_id=1124079

same here I guess, see error message of dvdrip:

Error compiling lsdvd output: syntax error at (eval 78) line
40, at EOF
. Output was:
%lsdvd = (
device => '/mnt/mdk/ferdamravenec/',
title => 'unknown',
vmg_id => 'DVDVIDEO-VMG',
provider_id => '',
track => [
{
ix => 1,
length => 14.050,
vts_id => 'DVDVIDEO-VTS',
vts => 6,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'cs',
language => 'Czech',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 14.050,
startcell => 1,
},
subp => [
},
{
ix => 2,
length => 1490.050,
vts_id => 'DVDVIDEO-VTS',
vts => 1,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'cs',
language => 'Czech',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 1489.010,
startcell => 1,
},
{
ix => 2,
length => 1.040,
startcell => 2,
},
subp => [
},
{
ix => 3,
length => 1455.360,
vts_id => 'DVDVIDEO-VTS',
vts => 2,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'cs',
language => 'Czech',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 1454.020,
startcell => 1,
},
{
ix => 2,
length => 0.170,
startcell => 2,
},
subp => [
},
{
ix => 4,
length => 1442.360,
vts_id => 'DVDVIDEO-VTS',
vts => 3,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'cs',
language => 'Czech',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 1441.170,
startcell => 1,
},
{
ix => 2,
length => 0.020,
startcell => 2,
},
subp => [
},
{
ix => 5,
length => 1470.120,
vts_id => 'DVDVIDEO-VTS',
vts => 4,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'cs',
language => 'Czech',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 1469.200,
startcell => 1,
},
{
ix => 2,
length => 0.140,
startcell => 2,
},
subp => [
},
{
ix => 6,
length => 25.020,
vts_id => 'DVDVIDEO-VTS',
vts => 5,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'cs',
language => 'Czech',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 25.020,
startcell => 1,
},
subp => [
},
{
ix => 7,
length => 183.020,
vts_id => 'DVDVIDEO-VTS',
vts => 7,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'cs',
language => 'Czech',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 10.140,
startcell => 1,
},
{
ix => 2,
length => 15.360,
startcell => 2,
},
{
ix => 3,
length => 14.100,
startcell => 3,
},
{
ix => 4,
length => 14.100,
startcell => 4,
},
{
ix => 5,
length => 15.360,
startcell => 5,
},
{
ix => 6,
length => 15.360,
startcell => 6,
},
{
ix => 7,
length => 14.100,
startcell => 7,
},
{
ix => 8,
length => 14.010,
startcell => 8,
},
{
ix => 9,
length => 15.360,
startcell => 9,
},
{
ix => 10,
length => 14.000,
startcell => 10,
},
{
ix => 11,
length => 15.060,
startcell => 11,
},
{
ix => 12,
length => 21.170,
startcell => 12,
},
{
ix => 13,
length => 1.000,
startcell => 13,
},
subp => [
},
longest_track => 2,
);

[hajma]

Logged In: YES
user_id=1124079

hi, I solved the problem, it is caused by improper escaping
of the closing curly bracket. My solution is probably only a
workaround as it should be solved where the strings are
processed, but I don't have the knowledge to find it. At the
same time, it only solves the problem for perl output. And
it may mean that using perl output in shell scripts or other
apps may be broken.
However, Acidrip and dvd::rip work again.

[hajma@localhost ~]$ diff
/home/hajma/Desktop/lsdvd/original/ocode.c
/home/hajma/Desktop/lsdvd/lsdvd-0.16/ocode.c
45c45
< "},\n",
---
> "\},\n",

[Filip Miletic]

Logged In: YES
user_id=48189

Here's another one.

Error compiling lsdvd output: syntax error at (eval 77) line
115, at EOF
. Output was:
%lsdvd = (
device => '/dev/hdb',
title => 'LAJANJE_NA_ZVEZDE',
vmg_id => 'DVDVIDEO-VMG',
provider_id => '',
track => [
{
ix => 1,
length => 5721.170,
vts_id => 'DVDVIDEO-VTS',
vts => 1,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'en',
language => 'English',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 318.090,
startcell => 1,
},
{
ix => 2,
length => 268.170,
startcell => 2,
},
{
ix => 3,
length => 394.250,
startcell => 3,
},
{
ix => 4,
length => 381.080,
startcell => 4,
},
{
ix => 5,
length => 213.040,
startcell => 5,
},
{
ix => 6,
length => 578.240,
startcell => 6,
},
{
ix => 7,
length => 130.130,
startcell => 7,
},
{
ix => 8,
length => 257.130,
startcell => 8,
},
{
ix => 9,
length => 887.090,
startcell => 9,
},
{
ix => 10,
length => 413.010,
startcell => 10,
},
{
ix => 11,
length => 367.200,
startcell => 11,
},
{
ix => 12,
length => 205.290,
startcell => 12,
},
{
ix => 13,
length => 105.320,
startcell => 13,
},
{
ix => 14,
length => 836.330,
startcell => 14,
},
{
ix => 15,
length => 268.180,
startcell => 15,
},
{
ix => 16,
length => 94.330,
startcell => 16,
},
subp => [
},
{
ix => 2,
length => 0.090,
vts_id => 'DVDVIDEO-VTS',
vts => 2,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
chapter => [
{
ix => 1,
length => 0.090,
startcell => 1,
},
subp => [
},
{
ix => 3,
length => 108.200,
vts_id => 'DVDVIDEO-VTS',
vts => 3,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'en',
language => 'English',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 108.200,
startcell => 1,
},
subp => [
},
{
ix => 4,
length => 17.360,
vts_id => 'DVDVIDEO-VTS',
vts => 4,
ttn => 1,
fps => 25.00,
format => 'PAL',
aspect => '4/3',
width => 720,
height => 576,
df => '?',
angles => 1,
audio => [
{
ix => 1,
langcode => 'en',
language => 'English',
format => 'ac3',
frequency => 48000,
quantization => 'drc',
channels => 2,
ap_mode => 0,
content => 'Undefined',
streamid => '0x80',
},
chapter => [
{
ix => 1,
length => 17.360,
startcell => 1,
},
subp => [
},
longest_track => 1,
);

[Filip Miletic]

Logged In: YES
user_id=48189

I just submitted a patch that solves this problem. Get it at
http://sourceforge.net/tracker/index.php?func=detail&aid=1546992&group_id=133848&atid=823592
(and bug the author to apply it to MAIN).

f