mirror of
				https://github.com/postgres/postgres.git
				synced 2025-10-29 22:49:41 +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;
 |