Check-in [a87740a9d2]

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:eliminar el ultimo registro de descarga no era efectivo y los errores de descarga del listado no eran detectados.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:a87740a9d21c3451f451c3c2190b4c8e46115ca7
User & Date: suse 2016-05-12 05:37:23
Context
2016-05-14
05:42
renombra complemento continue_full a continuefull check-in: ae878bbf19 user: suse tags: trunk
2016-05-12
05:37
eliminar el ultimo registro de descarga no era efectivo y los errores de descarga del listado no eran detectados. check-in: a87740a9d2 user: suse tags: trunk
2016-05-07
17:48
mejora un mensaje de advertencia check-in: 63a43922a3 user: suse tags: trunk
Changes

Changes to sync_void.

15
16
17
18
19
20
21

22
23
24
25
26

27
28
29
30
31
32
33
...
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
...
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
	echo "$1"
}


get_list() {
	c=`basename "$CURRENT"`


	wget --header='Accept-Encoding: gzip' -O - $CURRENT |
		gzip -dc > $c.new || error fallo la descarga del listado

	[ -e $c ] && mv $c $c.old
	mv $c.new $c

	# cachea de inmediato el parseo y ademas reordena entradas
	# para permitir reaccion inmediata al comando -e
	parse_list | sort > "$c.list"

	dbs=`awk '/href=.('$ARCH')-repodata/ {
			match($0, ">(.*)</a>", a);
			print(a[1])
................................................................................
	for f in `$1`; do
		let i+=1
		if [ "$search" ]; then
			if [ "$search" != "$f" ]; then
				let skips+=1
				continue
			fi
			log "reanudando desde la previa ejecucion"
			log "`eval $4 $((i*100/lines))`"
			search=""
		fi

		if eval $2; then
			[ "$3" ] && echo "$f" > "$3" # last
			[ "$4" ] && (eval $4 $((i*100/lines))) # progress
................................................................................
		isaccepted "$f" || du_format_line "$f"
	done | less
	;;
-d|-D|-p|-P|-s|-S)
	op=$1
	clear_last() {
		log "eliminando ultimo registro para el modo $op"
		case $1 in
		-d|-D) rm -f all.last;;
		-p|-P) rm -f xbps.last;;
		-s|-S) rm -f sig.last;;
		esac
	}
	if [ "$2" = full ]; then
		$0 -L && clear_last







>
|
|


<
>







 







|







 







|







15
16
17
18
19
20
21
22
23
24
25
26

27
28
29
30
31
32
33
34
...
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
...
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
	echo "$1"
}


get_list() {
	c=`basename "$CURRENT"`

	rm -f $c.gz
	wget --header='Accept-Encoding: gzip' -O $c.gz $CURRENT ||
		error fallo la descarga del listado

	[ -e $c ] && mv $c $c.old

	gzip -d $c.gz
	# cachea de inmediato el parseo y ademas reordena entradas
	# para permitir reaccion inmediata al comando -e
	parse_list | sort > "$c.list"

	dbs=`awk '/href=.('$ARCH')-repodata/ {
			match($0, ">(.*)</a>", a);
			print(a[1])
................................................................................
	for f in `$1`; do
		let i+=1
		if [ "$search" ]; then
			if [ "$search" != "$f" ]; then
				let skips+=1
				continue
			fi
			log "reanudando desde la previa ejecucion (desde $f, skips:$skips)"
			log "`eval $4 $((i*100/lines))`"
			search=""
		fi

		if eval $2; then
			[ "$3" ] && echo "$f" > "$3" # last
			[ "$4" ] && (eval $4 $((i*100/lines))) # progress
................................................................................
		isaccepted "$f" || du_format_line "$f"
	done | less
	;;
-d|-D|-p|-P|-s|-S)
	op=$1
	clear_last() {
		log "eliminando ultimo registro para el modo $op"
		case $op in
		-d|-D) rm -f all.last;;
		-p|-P) rm -f xbps.last;;
		-s|-S) rm -f sig.last;;
		esac
	}
	if [ "$2" = full ]; then
		$0 -L && clear_last