Need to find empty audio files

Question

Need to find WAV audio files that are empty, i.e., recorded with no audio input signal.

Answer 1

Follow the next steps:
1) Create a DIRECTORY object
Example:
CREATE DIRECTORY audio_files_cat AS
'audio_files_cat';2) Create a table (audio_file_table) with blob column (audio_file_blob)
3) Fill file names (audio_file_name)
3)Create a procedure to load files into your table
Example:
CREATE OR REPLACE PROCEDURE load_audio_files(p_dir IN VARCHAR2)
IS
v_file BFILE;
v_filename VARCHAR2(40);
v_rec_number NUMBER;
v_file_exists BOOLEAN;
CURSOR audio_files_csr IS
   SELECT audio_file_name
   FROM audio_file_table
   FOR UPDATE;
BEGIN
DBMS_OUTPUT.PUT_LINE('LOADING LOCATORS TO AUDIO FILES...');
FOR rec IN audio_files_csr
LOOP
  v_filename := rec.audio_file_name || '.DSS';
  v_file := BFILENAME(p_dir, v_filename);
  v_file_exists := (DBMS_LOB.FILEEXISTS(v_file) = 1);
  IF v_file_exists THEN
   DBMS_LOB.FILEOPEN(v_file);
   UPDATE audio_file_table
      SET audio_file_blob= v_file
    WHERE CURRENT OF audio_files_csr;
    DBMS_OUTPUT.PUT_LINE('Set Locator to file: '||v_filename|| ' Size: ' || DBMS_LOB.GETLENGTH(v_file));
    DBMS_LOB.FILECLOSE(v_file);
    v_rec_number := product_csr%ROWCOUNT;
  ELSE
   DBMS_OUTPUT.PUT_LINE('File ' || v_filename ||' does not exist');
  END IF;
END LOOP;
DBMS_OUTPUT.PUT_LINE('TOTAL FILES UPDATED: ' ||v_rec_number);
EXCEPTION
WHEN OTHERS THEN
  DBMS_LOB.FILECLOSE(v_file);
  DBMS_OUTPUT.PUT_LINE('Error: '|| to_char(SQLCODE) ||SQLERRM);
END load_audio_files;Regards