summaryrefslogtreecommitdiff
path: root/test/get-range
diff options
context:
space:
mode:
Diffstat (limited to 'test/get-range')
-rwxr-xr-xtest/get-range29
1 files changed, 28 insertions, 1 deletions
diff --git a/test/get-range b/test/get-range
index 13e5533..1d4e12e 100755
--- a/test/get-range
+++ b/test/get-range
@@ -34,14 +34,41 @@ if(defined $dbh) {
} else {
print "Range: " . $low_cart . " - " . $high_cart . ", chunk size: " . $chunk_size . "\n";
}
+ my ($slot_low_cart, $slot_high_cart, $err) = RHRD::rddb::get_shows_next_free_slot($dbh);
+ if(!$slot_low_cart) {
+ print "$slot_high_cart: $err\n";
+ } else {
+ print " Next Free: " . $slot_low_cart . " - " . $slot_high_cart . "\n";
+ }
print "\nMusic Pools:\n";
- ($low_cart, $high_cart, $chunk_size) = RHRD::rddb::get_musicpool_cart_range($dbh);
+ ($low_cart, $high_cart, $chunk_size) = RHRD::rddb::get_musicpools_cart_range($dbh);
if(!$low_cart) {
print "$high_cart: $chunk_size\n";
} else {
print "Range: " . $low_cart . " - " . $high_cart . ", chunk size: " . $chunk_size . "\n";
}
+ ($slot_low_cart, $slot_high_cart, $err) = RHRD::rddb::get_musicpools_next_free_slot($dbh);
+ if(!$slot_low_cart) {
+ print "$slot_high_cart: $err\n";
+ } else {
+ print " Next Free: " . $slot_low_cart . " - " . $slot_high_cart . "\n";
+ }
+
+ print "\nJingles:\n";
+ ($low_cart, $high_cart, $chunk_size) = RHRD::rddb::get_jingles_cart_range($dbh);
+ if(!$low_cart) {
+ print "$high_cart: $chunk_size\n";
+ } else {
+ print "Range: " . $low_cart . " - " . $high_cart . ", chunk size: " . $chunk_size . "\n";
+ }
+ ($slot_low_cart, $slot_high_cart, $err) = RHRD::rddb::get_jingles_next_free_slot($dbh);
+ if(!$slot_low_cart) {
+ print "$slot_high_cart: $err\n";
+ } else {
+ print " Next Free: " . $slot_low_cart . " - " . $slot_high_cart . "\n";
+ }
+
RHRD::rddb::closedb($dbh);
} else {