Oracle
 sql >> Baza danych >  >> RDS >> Oracle

Jak sprawdzić, czy plik jest obrazem przy użyciu PL/SQL?

W tym poście na blogu udostępniam funkcję, za pomocą której można sprawdzić, czy plik jest plikiem graficznym, czy nie używa PL/SQL. Program sprawdzi plik, odczytując jego nagłówek, a nie nazwę rozszerzenia pliku. Obecnie funkcja może zidentyfikować trzy typy obrazów, którymi są JPG, PNG i GIF.

Funkcja PL/SQL do sprawdzania, czy plik jest plikiem obrazu

Następująca funkcja PL/SQL odczyta nagłówek pliku, a następnie zwróci typ obrazu w typie danych varchar2. Funkcja get_image_type przyjmuje dwa argumenty i są one następujące:

  1. Obiekt katalogu Oracle (jako i_dir) Dowiedz się, jak utworzyć obiekt Oracle Directory.
  2. Nazwa pliku (jako i_file) plik powinien istnieć w katalogu.
CREATE OR REPLACE FUNCTION get_image_type (i_dir    IN VARCHAR2,
                                           i_file   IN VARCHAR2)
   RETURN VARCHAR2
AS
   l_bfile       BFILE;
   l_blob        BLOB;
   l_file_type   VARCHAR2 (50);
BEGIN
   DBMS_LOB.createtemporary (l_blob, FALSE);
   l_bfile := BFILENAME (i_dir, i_file);
   DBMS_LOB.fileopen (l_bfile, DBMS_LOB.file_readonly);
   DBMS_LOB.loadfromfile (l_blob, l_bfile, DBMS_LOB.getlength (l_bfile));
   DBMS_LOB.fileclose (l_bfile);

   IF RAWTOHEX (DBMS_LOB.SUBSTR (l_blob, 8, 1)) = '89504E470D0A1A0A'
   THEN
      l_file_type := 'PNG';
   ELSIF DBMS_LOB.SUBSTR (l_blob, 3, 1) = '474946'
   THEN
      l_file_type := 'GIF';
   ELSIF RAWTOHEX (DBMS_LOB.SUBSTR (l_blob, 3, 1)) = 'FFD8FF'
   THEN
      l_file_type := 'JPG';
   ELSE
      l_file_type := 'The file is not an image.';
   END IF;

   RETURN l_file_type;
EXCEPTION
   WHEN OTHERS
   THEN
      IF DBMS_LOB.fileisopen (l_bfile) = 1
      THEN
         DBMS_LOB.fileclose (l_bfile);
      END IF;

      DBMS_LOB.freetemporary (l_blob);
      RETURN 'The file does not exists.';
END get_image_type;

Test

W poniższym programie PL/SQL zmień obiekt katalogu MY_FILES Oracle na swój obiekt katalogu i zmień nazwę pliku na plik dostępny w lokalizacji katalogu MY_FILES.

SET SERVEROUTPUT ON;

DECLARE
   i_image_type   VARCHAR2 (50);
BEGIN
   i_image_type := get_image_type ('MY_FILES', 'oracle-logo-gif-to-use.gif');

   IF i_image_type IN ('JPG', 'GIF', 'PNG')
   THEN
      DBMS_OUTPUT.put_line ('The file is a valid ' || i_image_type || ' image.');
   ELSE
      DBMS_OUTPUT.put_line (i_image_type);
   END IF;
END;
/

Wyjście

The file is a valid GIF image.
PL/SQL procedure successfully completed.

Zobacz też:

  • Jak wstawić plik do tabeli Oracle za pomocą PL/SQL?
  1. Database
  2.   
  3. Mysql
  4.   
  5. Oracle
  6.   
  7. Sqlserver
  8.   
  9. PostgreSQL
  10.   
  11. Access
  12.   
  13. SQLite
  14.   
  15. MariaDB
  1. Tabela przestawna z wartościami niekardynalnymi

  2. Podziel adres IPv4 na 4 liczby w Oracle sql

  3. Jak przyciąć TABLE w Oracle

  4. Oracle Regexp do zastąpienia \n,\r i \t spacją

  5. Oracle PL/SQL:Sprawdź, czy BLOB lub CLOB jest pusty