mirror of
				https://github.com/postgres/postgres.git
				synced 2025-11-03 09:13:20 +03:00 
			
		
		
		
	Dagfinn Ilmari Mannsåker, reviewed by Shubham Khanna. Some subtractions by me. Discussion: http://postgr.es/m/87le9fmi01.fsf@wibble.ilmari.org
		
			
				
	
	
		
			52 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			SQL
		
	
	
	
	
	
			
		
		
	
	
			52 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			SQL
		
	
	
	
	
	
--
 | 
						|
-- PGP compression support
 | 
						|
--
 | 
						|
 | 
						|
select pgp_sym_decrypt(dearmor('
 | 
						|
-----BEGIN PGP MESSAGE-----
 | 
						|
 | 
						|
ww0ECQMCsci6AdHnELlh0kQB4jFcVwHMJg0Bulop7m3Mi36s15TAhBo0AnzIrRFrdLVCkKohsS6+
 | 
						|
DMcmR53SXfLoDJOv/M8uKj3QSq7oWNIp95pxfA==
 | 
						|
=tbSn
 | 
						|
-----END PGP MESSAGE-----
 | 
						|
'), 'key', 'expect-compress-algo=1');
 | 
						|
 | 
						|
select pgp_sym_decrypt(
 | 
						|
	pgp_sym_encrypt('Secret message', 'key', 'compress-algo=0'),
 | 
						|
	'key', 'expect-compress-algo=0');
 | 
						|
 | 
						|
select pgp_sym_decrypt(
 | 
						|
	pgp_sym_encrypt('Secret message', 'key', 'compress-algo=1'),
 | 
						|
	'key', 'expect-compress-algo=1');
 | 
						|
 | 
						|
select pgp_sym_decrypt(
 | 
						|
	pgp_sym_encrypt('Secret message', 'key', 'compress-algo=2'),
 | 
						|
	'key', 'expect-compress-algo=2');
 | 
						|
 | 
						|
-- level=0 should turn compression off
 | 
						|
select pgp_sym_decrypt(
 | 
						|
	pgp_sym_encrypt('Secret message', 'key',
 | 
						|
			'compress-algo=2, compress-level=0'),
 | 
						|
	'key', 'expect-compress-algo=0');
 | 
						|
 | 
						|
-- check corner case involving an input string of 16kB, as per bug #16476.
 | 
						|
SELECT setseed(0);
 | 
						|
WITH random_string AS
 | 
						|
(
 | 
						|
  -- This generates a random string of 16366 bytes.  This is chosen
 | 
						|
  -- as random so that it does not get compressed, and the decompression
 | 
						|
  -- would work on a string with the same length as the origin, making the
 | 
						|
  -- test behavior more predictable.  lpad() ensures that the generated
 | 
						|
  -- hexadecimal value is completed by extra zero characters if random()
 | 
						|
  -- has generated a value strictly lower than 16.
 | 
						|
  SELECT string_agg(decode(lpad(to_hex((random()*256)::int), 2, '0'), 'hex'), '') as bytes
 | 
						|
    FROM generate_series(0, 16365)
 | 
						|
)
 | 
						|
SELECT bytes =
 | 
						|
    pgp_sym_decrypt_bytea(
 | 
						|
      pgp_sym_encrypt_bytea(bytes, 'key',
 | 
						|
                            'compress-algo=1,compress-level=1'),
 | 
						|
                            'key', 'expect-compress-algo=1')
 | 
						|
    AS is_same
 | 
						|
  FROM random_string;
 |