Send patches - preferably formatted by git format-patch - to patches at archlinux32 dot org.
summaryrefslogtreecommitdiff
path: root/bin/cleanup
blob: 56d88cbc7d4673f8d266d8a86964480767c2bd3c (plain)
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
#!/bin/sh

# clean up unnecessary data

# shellcheck disable=SC2119,SC2120

# shellcheck source=../lib/load-configuration
. "${0%/*}/../lib/load-configuration"

# we only clean if run interactive or if no one is logged in
if ! tty -s && \
  [ -n "$(users)" ]; then
  >&2 echo 'Skipping clean up.'
  exit
fi

if [ -s "${work_dir}/build-master-sanity" ]; then
  >&2 echo 'Build master is not sane.'
  exit
fi

# remove logs where package is not broken/locked anymore

{
  find "${build_log_directory}/error" -maxdepth 1 -type f -printf 'file %f\n'
  # shellcheck disable=SC2016
  printf 'SELECT "mysql",`failed_builds`.`log_file` FROM `failed_builds`;\n' | \
    mysql_run_query | \
    tr '\t' ' '
} | \
  sort -k2,2 -k1,1 | \
  uniq -uf 1 | \
  sed -n '
    s/^file //
    T
    p
  ' | \
  while read -r file; do
    rm "${build_log_directory}/error/${file}"
  done

# only keep 10 newest logs per failed package and fail_reason

# shellcheck disable=SC2016
{
  printf 'SELECT'
  printf ' CONCAT(`failed_builds`.`reason`,"-",`failed_builds`.`build_assignment`),'
  printf '`failed_builds`.`id`,'
  printf '`failed_builds`.`log_file`'
  printf ' FROM `failed_builds`'
  printf ' WHERE `log_file_exists`'
  printf ' ORDER BY'
  printf ' `failed_builds`.`reason`,'
  printf '`failed_builds`.`build_assignment`,'
  printf '`failed_builds`.`date` DESC;\n'
} | \
  mysql_run_query | \
  {
    count=0
    old_group=''
    while read -r group id log_file; do
      if [ "${group}" != "${old_group}" ]; then
        count=0
        old_group="${group}"
      fi
      if [ ${count} -ge 10 ]; then
        rm "${build_log_directory}/error/${log_file}"
        printf '%s,' "${id}"
      fi
      count=$((count+1))
    done
  } | \
  sed '
    s/,$/);\n/
    s/^/DELETE FROM `failed_builds` WHERE `failed_builds`.`id` IN (/
  ' | \
  mysql_run_query

# only keep namcap logs of last 2 weeks for succeeded packages
find "${build_log_directory}/success" -maxdepth 1 -type f -mtime +14 \
  -not -exec zgrep -q '^+.*ELF file .* has text relocations' '{}' \; \
  -delete

exit 0