41 lines
1.1 KiB
41 lines
1.1 KiB
use strict;
|
|
use warnings;
|
|
|
|
use Test::More;
|
|
use Test::Collection;
|
|
use Test::FakeData;
|
|
use Data::Dumper;
|
|
|
|
my $test_machine = Test::Collection->new(
|
|
name => 'conversations',
|
|
);
|
|
|
|
my $fake_data = Test::FakeData->new;
|
|
$fake_data->set_data_from_script({
|
|
conversations => {
|
|
data => {
|
|
customer_id => sub { return shift->get_id('customers',@_); },
|
|
subscriber_id => sub { return shift->get_id('subscribers',@_); },
|
|
},
|
|
},
|
|
});
|
|
$test_machine->DATA_ITEM_STORE($fake_data->process('conversations'));
|
|
|
|
my @TYPES = qw/call voicemail fax sms xmpp/;
|
|
|
|
foreach my $owner_param ( map {'?'.$_.'='.$test_machine->DATA_ITEM->{$_}}
|
|
qw/customer_id subscriber_id/
|
|
) {
|
|
foreach my $type_params ('', map {'&type='.$_} @TYPES) {
|
|
foreach my $sort_params ('', map {'&order_by='.$_} qw/type timestamp/) {
|
|
my $uri = '/api/conversations/'.$owner_param.$type_params.$sort_params;
|
|
my ($res, $content, $req) = $test_machine->request_get($uri);
|
|
$test_machine->http_code_msg(200, "check $uri", $res, $content);
|
|
}
|
|
}
|
|
}
|
|
|
|
done_testing;
|
|
|
|
# vim: set tabstop=4 expandtab:
|