TT#185000 increase sound/voicemails sample rate to 16k

* sample rate was downscaled to 8k by sox for all sound files,
  it's now set to 16k for better audio quality

Change-Id: I7447e08ed90147ec98e110419cc4c068b8299848

lib/NGCP/Panel/Utils/Sounds.pm

@@ -20,26 +20,26 @@ sub transcode_file {
 
     SWITCH: for ($target_codec) {
         /^PCMA$/ && do {
-            @conv_args = ($tmpfile, qw/--type raw --bits 8 --channels 1 -e a-law - rate 8k/);
+            @conv_args = ($tmpfile, qw/--type raw --bits 16 --channels 1 -e a-law - rate 16k/);
             last SWITCH;
         };
         /^WAV$/ && do {
             if ($source_codec eq 'PCMA') {
                 # this can actually only come from inside
                 # certain files will be stored as PCMA (for handles with name "music_on_hold")
-                @conv_args = ( qw/-A --rate 8k --channels 1 --type raw/, $tmpfile, "--type", "wav", "-");
+                @conv_args = ( qw/-A --rate 16k --channels 1 --type raw/, $tmpfile, "--type", "wav", "-");
             }
             else {
-                @conv_args = ($tmpfile, qw/--type wav --bits 16 - rate 8k/);
+                @conv_args = ($tmpfile, qw/--type wav --bits 16 - rate 16k/);
             }
             last SWITCH;
         };
         /^MP3$/ && do {
-            @conv_args = ($tmpfile, qw/--type mp3 --bits 16 - rate 8k/);
+            @conv_args = ($tmpfile, qw/--type mp3 --bits 16 - rate 16k/);
             last SWITCH;
         };
         /^OGG$/ && do {
-            @conv_args = ($tmpfile, qw/--type ogg --bits 16 - rate 8k/);
+            @conv_args = ($tmpfile, qw/--type ogg --bits 16 - rate 16k/);
             last SWITCH;
         };
         # default

lib/NGCP/Panel/Utils/Subscriber.pm

@@ -2377,7 +2377,7 @@ sub convert_voicemailgreeting{
     #    die('Wrong mime-type '.$mime_type.' for the voicemail greeting. Must be a audio file in the "wav" format');
     #    return;
     #}
-    my @cmd = ( $filepath, '-e', 'gsm', '-b', '16', '-r', '8000', '-c', '1', $filepath_converted);
+    my @cmd = ( $filepath, '-e', 'gsm', '-b', '16', '-r', '16000', '-c', '1', $filepath_converted);
     my $output = '';
     $c->log->debug("cmd=".join(" ", 'sox', @cmd));
     eval {