projects / dbsrgits/DBIx-Class.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw
Fix _resolve_collapse to always consider the entire chain of parent ids
[dbsrgits/DBIx-Class.git] / t / resultset / rowparser_internals.t
diff --git a/t/resultset/rowparser_internals.t b/t/resultset/rowparser_internals.t
index 7a03287..60bf1ba 100644 (file)
--- a/t/resultset/rowparser_internals.t
+++ b/t/resultset/rowparser_internals.t
@@ -37,9 +37,9 @@ is_same_src (
 );
 
 $infmap = [qw/
+  single_track.cd.artist.cds.tracks.title
   single_track.cd.artist.artistid
   year
-  single_track.cd.artist.cds.tracks.title
   single_track.cd.artist.cds.cdid
   title
   artist
@@ -49,17 +49,17 @@ is_same_src (
     inflate_map => $infmap,
   }),
   '$_ = [
-    { artist => $_->[5], title => $_->[4], year => $_->[1] },
+    { artist => $_->[5], title => $_->[4], year => $_->[2] },
     { single_track => [
       undef,
       { cd => [
         undef,
         { artist => [
-          { artistid => $_->[0] },
+          { artistid => $_->[1] },
           { cds => [
             { cdid => $_->[3] },
             { tracks => [
-              { title => $_->[2] }
+              { title => $_->[0] }
             ] },
           ] },
         ] },
@@ -70,41 +70,40 @@ is_same_src (
 );
 
 is_deeply (
-  $schema->source('CD')->_resolve_collapse({ as => {map { $infmap->[$_] => $_ } 0 .. $#$infmap} }),
+  ($schema->source('CD')->_resolve_collapse({ as => {map { $infmap->[$_] => $_ } 0 .. $#$infmap} })),
   {
     -node_index => 1,
-    -node_id => [ 4, 5 ],
-    -branch_id => [ 0, 2, 3, 4, 5 ],
+    -idcols_current_node => [ 4, 5 ],
+    -idcols_extra_from_children => [ 0, 3 ],
 
     single_track => {
       -node_index => 2,
-      -node_id => [ 4, 5],
-      -branch_id => [ 0, 2, 3, 4, 5],
+      -idcols_current_node => [ 4, 5 ],
+      -idcols_extra_from_children => [ 0, 3 ],
       -is_optional => 1,
       -is_single => 1,
 
       cd => {
         -node_index => 3,
-        -node_id => [ 4, 5 ],
-        -branch_id => [ 0, 2, 3, 4, 5 ],
+        -idcols_current_node => [ 4, 5 ],
+        -idcols_extra_from_children => [ 0, 3 ],
         -is_single => 1,
 
         artist => {
           -node_index => 4,
-          -node_id => [ 0 ],
-          -branch_id => [ 0, 2, 3 ],
+          -idcols_current_node => [ 4, 5 ],
+          -idcols_extra_from_children => [ 0, 3 ],
           -is_single => 1,
 
           cds => {
             -node_index => 5,
-            -node_id => [ 3 ],
-            -branch_id => [ 2, 3 ],
+            -idcols_current_node => [ 3, 4, 5 ],
+            -idcols_extra_from_children => [ 0 ],
             -is_optional => 1,
 
             tracks => {
               -node_index => 6,
-              -node_id => [ 2, 3 ],
-              -branch_id => [ 2, 3 ],
+              -idcols_current_node => [ 0, 3, 4, 5 ],
               -is_optional => 1,
             },
           },
@@ -129,24 +128,31 @@ is_same_src (
     ) {
 
       $cur_row_ids[$_] = defined $cur_row->[$_] ? $cur_row->[$_] : "\xFF\xFFN\xFFU\xFFL\xFFL\xFF\xFF"
-        for (0, 2, 3, 4, 5);
+        for (0, 3, 4, 5);
 
-      # a present cref implies lazy prefetch, implies a supplied stash in $_[2]
+      # a present cref in $_[1] implies lazy prefetch, implies a supplied stash in $_[2]
       $_[1] and $result_pos and unshift(@{$_[2]}, $cur_row) and last
         if $is_new_res = ! $collapse_idx[1]{$cur_row_ids[4]}{$cur_row_ids[5]};
 
-      $collapse_idx[1]{$cur_row_ids[4]}{$cur_row_ids[5]} ||= [{ artist => $cur_row->[5], title => $cur_row->[4], year => $cur_row->[1] }];
+      # the rowdata itself for root node
+      $collapse_idx[1]{$cur_row_ids[4]}{$cur_row_ids[5]} ||= [{ artist => $cur_row->[5], title => $cur_row->[4], year => $cur_row->[2] }];
+
+      # prefetch data of single_track (placed in root)
       $collapse_idx[1]{$cur_row_ids[4]}{$cur_row_ids[5]}[1]{single_track} ||= $collapse_idx[2]{$cur_row_ids[4]}{$cur_row_ids[5]};
+
+      # prefetch data of cd (placed in single_track)
       $collapse_idx[2]{$cur_row_ids[4]}{$cur_row_ids[5]}[1]{cd} ||= $collapse_idx[3]{$cur_row_ids[4]}{$cur_row_ids[5]};
-      $collapse_idx[3]{$cur_row_ids[4]}{$cur_row_ids[5]}[1]{artist} ||= $collapse_idx[4]{$cur_row_ids[0]} ||= [{ artistid => $cur_row->[0] }];
 
-      $collapse_idx[4]{$cur_row_ids[0]}[1]{cds} ||= [];
-      push @{$collapse_idx[4]{$cur_row_ids[0]}[1]{cds}}, $collapse_idx[5]{$cur_row_ids[3]} ||= [{ cdid => $cur_row->[3] }]
-        unless $collapse_idx[5]{$cur_row_ids[3]};
+      # prefetch data of artist ( placed in single_track->cd)
+      $collapse_idx[3]{$cur_row_ids[4]}{$cur_row_ids[5]}[1]{artist} ||= $collapse_idx[4]{$cur_row_ids[4]}{$cur_row_ids[5]} ||= [{ artistid => $cur_row->[1] }];
+
+      # prefetch data of cds (if available)
+      push @{$collapse_idx[4]{$cur_row_ids[4]}{$cur_row_ids[5]}[1]{cds}}, $collapse_idx[5]{$cur_row_ids[3]}{$cur_row_ids[4]}{$cur_row_ids[5]} ||= [{ cdid => $cur_row->[3] }]
+        unless $collapse_idx[5]{$cur_row_ids[3]}{$cur_row_ids[4]}{$cur_row_ids[5]};
 
-      $collapse_idx[5]{$cur_row_ids[3]}[1]{tracks} ||= [];
-      push @{$collapse_idx[5]{$cur_row_ids[3]}[1]{tracks}}, $collapse_idx[6]{$cur_row_ids[2]}{$cur_row_ids[3]} ||= [{ title => $cur_row->[2] }]
-        unless $collapse_idx[6]{$cur_row_ids[2]}{$cur_row_ids[3]};
+      # prefetch data of tracks (if available)
+      push @{$collapse_idx[5]{$cur_row_ids[3]}{$cur_row_ids[4]}{$cur_row_ids[5]}[1]{tracks}}, $collapse_idx[6]{$cur_row_ids[0]}{$cur_row_ids[3]}{$cur_row_ids[4]}{$cur_row_ids[5]} ||= [{ title => $cur_row->[0] }]
+        unless $collapse_idx[6]{$cur_row_ids[0]}{$cur_row_ids[3]}{$cur_row_ids[4]}{$cur_row_ids[5]};
 
       $_[0][$result_pos++] = $collapse_idx[1]{$cur_row_ids[4]}{$cur_row_ids[5]}
         if $is_new_res;
@@ -173,37 +179,36 @@ is_deeply (
   $schema->source('CD')->_resolve_collapse({ as => {map { $infmap->[$_] => $_ } 0 .. $#$infmap} }),
   {
     -node_index => 1,
-    -node_id => [ 1 ], # existing_single_track.cd.artist.artistid
-    -branch_id => [ 0, 1, 5, 6, 8 ],
+    -idcols_current_node => [ 1 ], # existing_single_track.cd.artist.artistid
+    -idcols_extra_from_children => [ 0, 5, 6, 8 ],
 
     existing_single_track => {
       -node_index => 2,
-      -node_id => [ 1 ], # existing_single_track.cd.artist.artistid
-      -branch_id => [ 1, 6, 8 ],
+      -idcols_current_node => [ 1 ], # existing_single_track.cd.artist.artistid
+      -idcols_extra_from_children => [ 6, 8 ],
       -is_single => 1,
 
       cd => {
         -node_index => 3,
-        -node_id => [ 1 ], # existing_single_track.cd.artist.artistid
-        -branch_id => [ 1, 6, 8 ],
+        -idcols_current_node => [ 1 ], # existing_single_track.cd.artist.artistid
+        -idcols_extra_from_children => [ 6, 8 ],
         -is_single => 1,
 
         artist => {
           -node_index => 4,
-          -node_id => [ 1 ], # existing_single_track.cd.artist.artistid
-          -branch_id => [ 1, 6, 8 ],
+          -idcols_current_node => [ 1 ], # existing_single_track.cd.artist.artistid
+          -idcols_extra_from_children => [ 6, 8 ],
           -is_single => 1,
 
           cds => {
             -node_index => 5,
-            -node_id => [ 6 ], # existing_single_track.cd.artist.cds.cdid
-            -branch_id => [ 6, 8 ],
+            -idcols_current_node => [ 1, 6 ], # existing_single_track.cd.artist.cds.cdid
+            -idcols_extra_from_children => [ 8 ],
             -is_optional => 1,
 
             tracks => {
               -node_index => 6,
-              -node_id => [ 6, 8 ], # existing_single_track.cd.artist.cds.cdid, existing_single_track.cd.artist.cds.tracks.title
-              -branch_id => [ 6, 8 ],
+              -idcols_current_node => [ 1, 6, 8 ], # existing_single_track.cd.artist.cds.cdid, existing_single_track.cd.artist.cds.tracks.title
               -is_optional => 1,
             }
           }
@@ -212,21 +217,20 @@ is_deeply (
     },
     tracks => {
       -node_index => 7,
-      -node_id => [ 1, 5 ], # existing_single_track.cd.artist.artistid, tracks.title
-      -branch_id => [ 0, 1, 5 ],
+      -idcols_current_node => [ 1, 5 ], # existing_single_track.cd.artist.artistid, tracks.title
+      -idcols_extra_from_children => [ 0 ],
       -is_optional => 1,
 
       lyrics => {
         -node_index => 8,
-        -node_id => [ 1, 5 ], # existing_single_track.cd.artist.artistid, tracks.title
-        -branch_id => [ 0, 1, 5 ],
+        -idcols_current_node => [ 1, 5 ], # existing_single_track.cd.artist.artistid, tracks.title
+        -idcols_extra_from_children => [ 0 ],
         -is_single => 1,
         -is_optional => 1,
 
         lyric_versions => {
           -node_index => 9,
-          -node_id => [ 0, 1, 5 ], # tracks.lyrics.lyric_versions.text, existing_single_track.cd.artist.artistid, tracks.title
-          -branch_id => [ 0, 1, 5 ],
+          -idcols_current_node => [ 0, 1, 5 ], # tracks.lyrics.lyric_versions.text, existing_single_track.cd.artist.artistid, tracks.title
           -is_optional => 1,
         },
       },
@@ -261,21 +265,17 @@ is_same_src (
       $collapse_idx[2]{$cur_row_ids[1]}[1]{cd} ||= $collapse_idx[3]{$cur_row_ids[1]};
       $collapse_idx[3]{$cur_row_ids[1]}[1]{artist} ||= $collapse_idx[4]{$cur_row_ids[1]} ||= [{ artistid => $cur_row->[1] }];
 
-      $collapse_idx[4]{$cur_row_ids[1]}[1]{cds} ||= [];
-      push @{ $collapse_idx[4]{$cur_row_ids[1]}[1]{cds} }, $collapse_idx[5]{$cur_row_ids[6]} ||= [{ cdid => $cur_row->[6], genreid => $cur_row->[9], year => $cur_row->[2] }]
-        unless $collapse_idx[5]{$cur_row_ids[6]};
+      push @{ $collapse_idx[4]{$cur_row_ids[1]}[1]{cds} }, $collapse_idx[5]{$cur_row_ids[1]}{$cur_row_ids[6]} ||= [{ cdid => $cur_row->[6], genreid => $cur_row->[9], year => $cur_row->[2] }]
+        unless $collapse_idx[5]{$cur_row_ids[1]}{$cur_row_ids[6]};
 
-      $collapse_idx[5]{$cur_row_ids[6]}[1]{tracks} ||= [];
-      push @{ $collapse_idx[5]{$cur_row_ids[6]}[1]{tracks} }, $collapse_idx[6]{$cur_row_ids[6]}{$cur_row_ids[8]} ||= [{ title => $cur_row->[8] }]
-        unless $collapse_idx[6]{$cur_row_ids[6]}{$cur_row_ids[8]};
+      push @{ $collapse_idx[5]{$cur_row_ids[1]}{$cur_row_ids[6]}[1]{tracks} }, $collapse_idx[6]{$cur_row_ids[1]}{$cur_row_ids[6]}{$cur_row_ids[8]} ||= [{ title => $cur_row->[8] }]
+        unless $collapse_idx[6]{$cur_row_ids[1]}{$cur_row_ids[6]}{$cur_row_ids[8]};
 
-      $collapse_idx[1]{$cur_row_ids[1]}[1]{tracks} ||= [];
       push @{ $collapse_idx[1]{$cur_row_ids[1]}[1]{tracks} }, $collapse_idx[7]{$cur_row_ids[1]}{$cur_row_ids[5]} ||= [{ title => $cur_row->[5] }]
         unless $collapse_idx[7]{$cur_row_ids[1]}{$cur_row_ids[5]};
 
       $collapse_idx[7]{$cur_row_ids[1]}{$cur_row_ids[5]}[1]{lyrics} ||= $collapse_idx[8]{$cur_row_ids[1]}{$cur_row_ids[5] };
 
-      $collapse_idx[8]{$cur_row_ids[1]}{$cur_row_ids[5]}[1]{lyric_versions} ||= [];
       push @{ $collapse_idx[8]{$cur_row_ids[1]}{$cur_row_ids[5]}[1]{lyric_versions} }, $collapse_idx[9]{$cur_row_ids[0]}{$cur_row_ids[1]}{$cur_row_ids[5]} ||= [{ text => $cur_row->[0] }]
         unless $collapse_idx[9]{$cur_row_ids[0]}{$cur_row_ids[1]}{$cur_row_ids[5]};
 
The Perl ORM (dbsrgits@git.shadowcat.co.uk:DBIx-Class.git)