File: check_digest.inc

package info (click to toggle)
mariadb 1%3A11.8.2-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, trixie
  • size: 765,428 kB
  • sloc: ansic: 2,382,827; cpp: 1,803,532; asm: 378,315; perl: 63,176; sh: 46,496; pascal: 40,776; java: 39,363; yacc: 20,428; python: 19,506; sql: 17,864; xml: 12,463; ruby: 8,544; makefile: 6,059; cs: 5,855; ada: 1,700; lex: 1,193; javascript: 1,039; objc: 80; tcl: 73; awk: 46; php: 22
file content (34 lines) | stat: -rw-r--r-- 797 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
#
# check_digest() checks digests validity from performance_schema.events_statements_summary_by_digest
#

--disable_query_log
create table test._digests(d varchar(32) primary key);

delimiter ~~;
create function test.check_digest(digest varchar(255))
returns tinyint
not deterministic
begin
  declare digest_exists tinyint;
  if length(digest) != 32 or conv(digest, 16, 10) = 0 then
    return 0;
  end if;
  select exists (select d from test._digests where d = digest) into digest_exists;
  if digest_exists then
    return 0;
  end if;
  #insert into test._digests values (digest);
  return 1;
end~~

create procedure test.reset_digests()
begin
  delete from test._digests;
end~~
delimiter ;~~

--disable_result_log
call sys.ps_truncate_all_tables(false);
--enable_result_log
--enable_query_log