summaryrefslogtreecommitdiff
path: root/fullpkg-ng
blob: 3f4425823bb6faed340a8e2212ad193d606fb878 (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
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
#!/bin/bash
# TO TEST: (on find_deps)
# * Detect pkgnames by provides, replaces, etc. instead of dir tree

source /etc/makepkg.conf
source /etc/abs.conf
source /etc/libretools.conf
source /usr/bin/libremessages

[ -r $XDG_CONFIG_HOME/libretools/libretools.conf ] && \
    source $XDG_CONFIG_HOME/libretools/libretools.conf

## START FUNCTIONS ##

function usage {
    echo "cd to a dir containing a PKGBUILD and run:"
    echo "$0 [options]"
    printf "This script will check dependencies, build them if possible "
    printf "and stage the packages on it's repo."
    echo
    echo "OPTIONS:"
    echo " -h           : this message."
    echo " -a absdir    : set absdir as ABSROOT."
    echo " -b           : do not check deps but build. Needs -d"
    echo " -c           : check deps only, do not build."
    echo " -d build_dir : use this dir to build. Defaults to mktemp."
    echo " -n           : don't update pacman db."
    echo " -m max_level : check deps until this level"
    echo " -r \"command\" : use this instead of \"$FULLBUILDCMD\""
    # printf " -f pkgname  : build even when a package has been built. "
    # printf " Use it as many times as needed\n"
    echo
}

# Queue Management
# * Always get the queue list from the server
# * Add/Remove from queue
# * Check if a package is listed

# TODO
# * Check for concurrence # @ fauno: What do you mean?

# Get the queue list from the server
get_queue() {
    rsync -e ssh -aq $PARABOLAHOST:mips64el/queue $queue_file >/dev/null 2>&1 || {
        error "Failed to retrieve queue list"
        return 1
    }
}

# Put the queue list on the server
put_queue() {
    rsync -e ssh -aq $queue_file $PARABOLAHOST:mips64el/queue >/dev/null 2>&1 || {
        error "Failed to put queue list"
        return 1
    }
}

# Add packages to the queue
update_queue() {
    get_queue
    echo "$(basename $PWD):$PACKAGER" >> $queue_file
    put_queue || return $?
}

# Remove a package from the queue
remove_queue() {
    get_queue

    grep -vw "^$(basename $PWD)" $queue_file > $queue_file.2
    mv $queue_file.2 $queue_file

    put_queue && return 0 || return $?
}

# Checks if a package is listed
check_queue() {
    get_queue

    local packager=$(grep -w "$(basename $PWD)" ${queue_file} | cut -d ':' -f2)

    [ -n $packager -a "$packager" != "$PACKAGER" ] && {
        warning "$(basename $PWD) is being packaged by $packager. Please wait."
        return 1
    }

    return 0
}

# END Queue Management #

guess_repo() {
    basename $(dirname $(pwd))
}

# Usage: cleanup [ $(basename $PWD) ] from PKGBUILD dir
# cleans the build_dir
function cleanup {
    if [ ! -d $build_dir ]; then
	return 1
    elif [ -d $build_dir -a ${#@} -gt 0 ]; then
	for _dir in $@; do
	    rm -rf $build_dir/$_dir/
	done
    else
	rm -rf $build_dir
    fi
}

# Check PKGBUILD and find non built or outdated deps
# on ABSROOT which should be abslibre-misp64el
function find_deps {
    ## Check this level.
    source PKGBUILD
    local repo=${repo:-$(guess_repo)}

    # If package is built exit
    # TODO?: If this package is in force_build: skip this step
    if is_built "${pkgbase:-${pkgname[0]}}>=${pkgver}-${pkgrel}"; then
	exit 0
    fi

    # Tell which packages are deeper in deps (even if they are on build_dir)
    # so we can build them first.
    echo "${level}:$(basename $PWD)" >> "${build_dir}/BUILDORDER"

    # if pkgbuild directory is on build_dir, do not copy and exit
    if [ -d "${build_dir}/$(basename $PWD)" ]; then
	exit 0
    else
	cp -r ../$(basename $PWD) ${build_dir}/
	# Info to eval later
	echo "repo=$repo" > "${build_dir}/$(basename $PWD)/.INFO"
    fi
    
    msg2 "${pkgbase:-${pkgname[0]}}>=${pkgver}-${pkgrel}"

    ## Check next levels
    # Clean version checking
    deps=$(echo "${depends[@]} ${makedepends[@]}" | \
	sed "s/[=<>]\+[^ ]\+//g" | \
	tr ' ' "\n" | \
	sort -u)
    declare -i next_level=$level+1
    
    for _dep in ${deps[@]}; do
	for _repo in ${REPOS[@]}; do
	    # try to find $_dep on each repo from dirname
	    if [ -e "$ABSROOT/${_repo}/$_dep/PKGBUILD" ]; then
		pushd "$ABSROOT/${_repo}/$_dep" > /dev/null
		$0 -c -d ${build_dir} -l ${next_level}
		# Circular deps must fail
		[ $? -eq 20 ] && return 20
		popd > /dev/null
		break 1 # found, go to next dep
	    # if search pkgname in repo doesn't work
	    # this should find pkgsplits
	    elif _dir=$(find "$ABSROOT/${_repo}" -type f -name PKGBUILD -print0 | \
		"xargs" -0 -e grep -HEw "pkgname|pkgbase" | grep $_dep 2>&1) \
		[ -n "$_dir" ]; then
		pushd $(dirname $(echo $_dir | cut -d: -f1)) > /dev/null
		$0 -c -d ${build_dir} -l ${next_level}
		# Circular deps must fail
		[ $? -eq 20 ] && return 20
		popd > /dev/null
		break 1 # found, go to next dep
	    else
		echo "dep_not_found:$_dep:$_repo" >> $build_dir/log
	    fi
	done
    done
    unset next_level dir
    # unset PKGBUILD variables
    unset pkgname pkgver pkgrel epoch pkgdesc arch url license groups depends \
	makedepens checkdepends optdepends provides conflicts replaces backup \
	options install changelog source noextract md5sums build check package
}

function _pkg_build () {
    pushd ${build_dir}  > /dev/null
    # packages to build are on $buildorder
    # greater levels must be built first
    build_packages=($(sort -gr $buildorder | cut -d: -f2))
    while [ ${#build_packages[@]} -ge 1 ]; do
	build_packages=($(sort -gr $buildorder | cut -d: -f2))
	pushd $build_dir/${build_packages[0]} > /dev/null
	source PKGBUILD 
	msg2 "${pkgbase:-${pkgname[0]}} $pkgver-$pkgrel"
	# Add mips64el
	if ! grep mips64el PKGBUILD >/dev/null; then
	    plain "Adding mips64el arch"
	    sed -i "s/^\(arch=([^)anym]\+\))/\1 'mips64el')/" "PKGBUILD"
	fi
        # Check if pkg is being built
	msg2 "Checking build queue"
	check_queue || {
	    echo "someone_is_building:$(basename $PWD)" >> $build_dir/log
	    grep -vwh "$(basename $PWD)" $buildorder > $buildorder.2
	    mv $buildorder.2 $buildorder
	    continue
	}
	# Let everybody know we're building this.
	msg2 "Updating build queue"
	update_queue || {
	    warning "Couldn't update the queue, let your partners know about this."
	}
	msg2 "Checking for non free deps"
	pkgbuild-check-nonfree || {
	    # pkgbuild-check-nonfree fails with 15 if there are nonfree deps,
	    # fails with something else if blacklist can't be retrieved
	    if [ $? -eq 15 ]; then
		# log they have nonfree deps and so didn't build
		echo "nonfree:$(basename $PWD)" >> $build_dir/log
		# take out package from $buildorder
		grep -vwh "$(basename $PWD)" $buildorder > $buildorder.2
		mv $buildorder.2 $buildorder
		# continue building next package
		continue
	    fi
	}
	msg2 "Building $(basename $PWD)"
	# this buildcmd is on libretools.conf
	$FULLBUILDCMD; r=$?
	case $r in
	    0) plain "The build was succesful."
		source .INFO && [ -n $repo ] && {
		    librestage $repo || {
			echo "unstaged:$(basename $PWD)" >> $build_dir/log
		    }
		}
		echo "built:$(basename $PWD)" >> $build_dir/log
		cleanup "$(basename $PWD)" 
		;;
	    1) error "There were errors while trying to build the package." 
		echo "failed:$(basename $PWD)" >> $build_dir/log
		;;
	    2) error "The build failed."
		echo "failed:$(basename $PWD)" >> $build_dir/log
		;;
	esac
	# Package was built or failed: take it out of $buildorder
	grep -vwh "${build_packages[0]}" $buildorder > $buildorder.2
	mv $buildorder.2 $buildorder
	# Take package out from queue
	remove_queue
	popd > /dev/null
    done
    pkgs=$(cat $build_dir/log | grep "nonfree:") && {
	error "Those packages contain nonfree deps:"
	echo ${pkgs[@]} | cut -d: -f2
    }
    pkgs=$(cat $build_dir/log | grep "built:") && {
	error "Those packages were built and installed:"
	echo ${pkgs[@]} | cut -d: -f2
	msg "Uploading packages to the server"
    }
    pkgs=$(cat $build_dir/log | grep "failed:") && {
	error "Those packages failed to build:"
	echo ${pkgs[@]} | cut -d: -f2
    }
    pkgs=$(cat $build_dir/log | grep "unstaged:") && {
	error "Those packages couldn't be staged because of missing reponame:"
	echo ${pkgs[@]} | cut -d: -f2
    }
    popd > /dev/null
}
## END FUNCTIONS ##

force_build=""
level=0
noupdate='n'
build_only='n'
check_deps_only='n'
do_cleanup='n'
max_level=21
while getopts 'ha:bcCd:l:nm:r:' arg; do
    case $arg in
	h) usage; exit 0 ;;
	a) ABSROOT="$OPTARG" ;;
	b) build_only='y' ;;
	c) check_deps_only='y' ;;
	C) do_cleanup='y';;
	# f) force_build+="-f pkgname " ;;
	d) build_dir="$OPTARG" ;;
	# hidden option to know what to build first.
	# if $level > 0 it will not build
	l) level=$OPTARG ;;
	n) noupdate='y';;
	m) max_level=$OPTARG ;;
	r) FULLBUILDCMD="$OPTARG" ;;
    esac
done

# Only on level 0
[ $level -eq 0 ] && {
    # if build_dir exist use it, else make a build_dir
    build_dir=${build_dir:-$(mktemp -d /tmp/fullpkg.XXXXXX)}
    # cleanup if the option was used.
    [ $do_cleanup == 'y' ] && {
	cleanup
	[ $build_only == 'y' ] && exit 0
    }
    # set queue_file and ban_file
    mkdir -p $XDG_CONFIG_HOME/libretools
    queue_file=$XDG_CONFIG_HOME/libretools/queue
    ban_file=$XDG_CONFIG_HOME/libretools/ban
    # make files for log and buildorder
    touch $build_dir/{log,BUILDORDER}
    buildorder=$build_dir/BUILDORDER

    [ $noupdate = 'n' ] && {
	msg "Updating pacman db and packages"
	sudo pacman -Syu --noconfirm
    }
    # Build only
    [ $build_only == 'y' ] && {
	# Exit loop on Ctrl+C
	trap "break" INT
        # Remove from queue package being built on error
	trap "remove_queue" EXIT INT QUIT TERM KILL
	_pkg_build
	exit 0
    }
    msg "Checking dependencies"
}

[ ! -r PKGBUILD ] && {
    error "This isn't a build directory"
    usage && exit 1
}

## if $level = 20 there is highly likely there are circular deps
[ $level -eq $max_level -o $level -gt $max_level ] && exit 20


find_deps || { 
    # if find_deps finds circular deps
    # it should exit with status 20
    [ $? -eq 20 ] && {
	# only show message on level 0
	[ $level -eq 0 ] && error "Check for circular deps on $build_dir/BUILDORDER";
    }
    exit 20
}

# levels greater than 0 must only check deps
[ $check_deps_only = 'y' -o $level -gt 0 ] && exit 0

# check BUILDORDER to not include banned deps and
[ $level -eq 0 -a -d $build_dir ] && {
    # Check for banned deps
    if [ -w $ban_file -a -r $ban_file ]; then
	chmod o+rw $ban_file || error "Ban file is not readable/writable ($ban_file)"
    else
	rsync -e ssh -aq $PARABOLAHOST:mips64el/ban >/dev/null 2>&1 || {
	    warning "Failed to get ban list" && [ -r $ban_file ] && {
	        # continue if download failed but local copy
		search=$(cat $ban_file | tr "\n" "|")
		echo ${@} | tr " " "\n" | egrep -w "$search" $buildorder >> $build_dir/banned
		echo ${@} | tr " " "\n" | egrep -vw "$search" $buildorder > $buildorder.2
		mv $buildorder.2 $buildorder
		unset search
	    }
	}
    fi
}

## START Building
msg "Building packages:"

[ ! -w $queue_file ] && error "can't write queue file"
# Exit loop on Ctrl+C
trap "break" INT
# Remove from queue package being built on error
trap "remove_queue" EXIT INT QUIT TERM KILL
_pkg_build

echo
msg2 "Check if your system works fine and librerelease if it does"

exit 0