OSDN Git Service

568e282fb0ec8bcd6839380fb4fcdbfd3b710610
[portsreinstall/current.git] / lib / libreinstall.sh
1 #!/bin/sh -e
2 # ==============================================================================
3 # portsreinstall library script
4 # - Reinstallation processes -
5 # Copyright (C) 2013-2018 Mamoru Sakaue, MwGhennndo, All Rights Reserved.
6 # This software is distributed under the 2-Clause BSD License.
7 # ==============================================================================
8
9 # ============= Variables =============
10 # The following variables are available only within reinstall_exec and functions invoked by it.
11 REINSTALL_PKGTAG=       # Tag indicating version changes by reinstallation of the current port
12 REINSTALL_ORIGPKGTAG=   # Tag indicating the flavored port origin and version changes by reinstallation of the current port
13 REINSTALL_CURRENTPKG=   # Currently installed package name of the current port
14 REINSTALL_ORIGIN=       # Flavored port origin of the current port
15 REINSTALL_DBNODE_DIR=   # Path of the "requires" section of the temporary database for the current port
16 REINSTALL_IS_CURRENTPKG_LATEST= # Currently installed package name of the current port
17 REINSTALL_DBSUFFIX=     # Database suffix for the evaluation method of dependencies
18
19 # ============= Skip reinstallation by showing messages =============
20 reinstall_skip ()
21 {
22         local message
23         message=$1
24         message_echo "($message)"
25         message_target_relations "$REINSTALL_ORIGIN"
26         message_echo
27         fileedit_rm_a_line "$REINSTALL_ORIGIN" "${DBDIR}/stage.loop_list/reinst_todo.remain"
28 }
29
30 # ============= Check whether a package is forbidden due to conflict =============
31 reinstall_quick_chk_forbidden_conflicts ()
32 {
33         local pkg pkg_regexp_esc
34         pkg=$1
35         pkg_regexp_esc=`str_escape_regexp "$pkg"`
36         grep -qE "^$pkg_regexp_esc:" "${DBDIR}/forbidden_conflicts" 2> /dev/null
37 }
38
39 # ============= Check whether a package is forbidden due to conflict =============
40 reinstall_chk_forbidden_conflicts ()
41 {
42         local pkg tmp_forbidden pkg_regexp_esc
43         pkg=$1
44         tmp_forbidden=${TMPDIR}/reinstall_chk_forbidden_conflicts:forbidden
45         pkg_regexp_esc=`str_escape_regexp "$pkg"`
46         grep -E "^$pkg_regexp_esc:" "${DBDIR}/forbidden_conflicts" > $tmp_forbidden 2> /dev/null || return
47         pkg_info_e `cut -d : -f 3 "$tmp_forbidden"`
48 }
49
50 # ============= Restore a package if it is temporarily deinstalled =============
51 reinstall_restore_if_temporarily_deinstalled ()
52 {
53         local tmp_delete
54         [ $opt_fetch_only = no -a $opt_dry_run = no ] || return 0
55         [ -n "$REINSTALL_CURRENTPKG" ] && return
56         tmp_list=${TMPDIR}/reinstall_restore_if_temporarily_deinstalled
57         rm -rf "$tmp_list".*
58         [ -e "$REINSTALL_FROMNODE_DIR/backedup_pkgfile" ] || return 0
59         while read backup_pkg
60         do
61                 [ -z "$backup_pkg" -o ! -e "$backup_pkg" ] && continue
62                 echo "$backup_pkg" >> $tmp_list.backedup
63                 pkg=`pkgsys_pkgarc_to_pkgname "$backup_pkg"`
64                 if reinstall_chk_forbidden_conflicts "$pkg"
65                 then
66                         echo "$backup_pkg" >> $tmp_list.avoid
67                 else
68                         echo "$backup_pkg" >> $tmp_list.restore
69                 fi
70         done < $REINSTALL_FROMNODE_DIR/backedup_pkgfile
71         [ -e "$tmp_list.backedup" ] || return 0
72         message_echo "INFO: This port is temporarily deinstalled, so restoration will be attempted."
73         if [ -e "$tmp_list.avoid" ]
74         then
75                 message_echo "INFO: The following backup(s) are avoided because of conflict with installed packages."
76                 message_cat < $tmp_list.avoid
77         fi
78         if [ -e "$tmp_list.restore" ]
79         then
80                 message_echo "INFO: The following backup(s) will be restored."
81                 message_cat < $tmp_list.restore
82                 while read backup_pkg
83                 do
84                         pkg_add_fF "$backup_pkg" || echo "$backup_pkg" >> $tmp_list.failed
85                 done < $tmp_list.restore
86                 if [ -e "$tmp_list.failed" ]
87                 then
88                         message_echo "WARNING: Failed to restore the following backup, but continuing anyway." >&2
89                         message_cat < $tmp_list.failed
90                 fi
91         fi
92         :
93 }
94
95 # ============= Skip reinstallation by showing messages if a flavored origin is in a list =============
96 reinstall_skip_if_in_a_list ()
97 {
98         local message list mode
99         message=$1
100         list=$2
101         mode=$3
102         grep -q -Fx "$REINSTALL_ORIGIN" "${DBDIR}/$list" 2> /dev/null || return
103         [ "x$mode" = xrestore ] && reinstall_restore_if_temporarily_deinstalled
104         reinstall_skip "$message" || :
105 }
106
107 # ============= Get the make arguments =============
108 reinstall_setup_make_args ()
109 {
110         local mode
111         mode=$1
112         {
113                 for key in LOCALBASE LINUXBASE PORT_DBDIR PORTSDIR DISTDIR PACKAGES PKGREPOSITORY
114                 do
115                         eval echo $key=\$$key
116                 done
117                 [ $opt_avoid_vulner = yes ] || echo 'DISABLE_VULNERABILITIES=yes'
118                 case $mode in
119                 anymode )
120                         ;;
121                 '' | distinct )
122                         [ $opt_batch_ports_only = yes ] && echo 'BATCH=yes'
123                         [ $opt_interactive_ports_only = yes ] && echo 'INTERACTIVE=yes'
124                         ;;
125                 esac
126                 if [ $opt_apply_default_config = yes ]
127                 then
128                         pkgsys_is_dialog4ports_used && echo 'NO_DIALOG=yes'
129                 fi
130                 cat "${DBDIR}/requires/$REINSTALL_ORIGIN/MARG.conf" 2> /dev/null || :
131                 flavor=`pkgsys_get_flavor_from_origin "$REINSTALL_ORIGIN"`
132                 [ -z "$flavor" ] || echo "FLAVOR=$flavor"
133         } | tr '\n' ' '
134 }
135
136 # ============= Get the make environment variables =============
137 reinstall_setup_make_envs ()
138 {
139         cat "${DBDIR}/requires/$REINSTALL_ORIGIN/MENV.conf" 2> /dev/null | tr '\n' ' '
140 }
141
142 # ============= Common comand to execute make command =============
143 _reinstall_make_common ()
144 {
145         local mode port_path MAKE_ARGS MAKE_ENVS
146         mode=$1
147         shift
148         MAKE_ARGS=`reinstall_setup_make_args $mode`
149         MAKE_ENVS=`reinstall_setup_make_envs`
150         port_path=`pkgsys_get_portpath_from_origin "$REINSTALL_ORIGIN"`
151         fs_fix_unionfs_image_if_hidden "$port_path"
152         env $MAKE_ENVS make -C "$port_path" "$@" $MAKE_ARGS
153 }
154
155 # ============= Execute make command without restricting for BATCH or INTERACTIVE ports =============
156 reinstall_make_anymode ()
157 {
158         _reinstall_make_common anymode "$@"
159 }
160
161 # ============= Execute make command =============
162 reinstall_make ()
163 {
164         _reinstall_make_common '' "$@"
165 }
166
167 # ============= Error process during reinstallation =============
168 reinstall_errproc ()
169 {
170         local position msg port_path
171         position=$1
172         msg=$2
173         database_build_update_pkgname "$REINSTALL_ORIGIN" > /dev/null
174         message_echo "ERROR: In $position." >&2
175         message_echo "The port/package in concern is $REINSTALL_ORIGPKGTAG." >&2
176         [ -n "$msg" ] && message_echo "($msg)" >&2
177         message_echo >&2
178         port_path=`pkgsys_get_portpath_from_origin "$REINSTALL_ORIGIN"`
179         { fs_fix_unionfs_image_if_hidden "$port_path" \
180                 && pkgsys_chk_ports_tree_implementation; } || exit 1
181         mkdir -p "${DBDIR}/notes/$REINSTALL_ORIGIN"
182         echo "$position" > ${DBDIR}/notes/$REINSTALL_ORIGIN/note_failtre
183         database_record_failure "$REINSTALL_ORIGIN" noclean
184         fileedit_rm_a_line "$REINSTALL_ORIGIN" "${DBDIR}/stage.loop_list/reinst_todo.remain"
185         message_report_failure_for_a_port "$REINSTALL_ORIGIN"
186 }
187
188 # ============= Check the latest stage for a port =============
189 reinstall_chk_stage ()
190 {
191         local stagetag
192         stagetag=$1
193         [ -e "${DBDIR}/status.ports/$REINSTALL_ORIGIN/$stagetag" ]
194 }
195
196 # ============= Check completion of a stage for a port =============
197 reinstall_chk_stage_complete ()
198 {
199         local stagetag
200         stagetag=$1
201         [ -e "${DBDIR}/status.ports/$REINSTALL_ORIGIN/complete/$stagetag" ]
202 }
203
204 # ============= Register the latest stage for a port =============
205 reinstall_register_stage ()
206 {
207         local stagetag parentdir
208         stagetag=$1
209         parentdir=${DBDIR}/status.ports/$REINSTALL_ORIGIN
210         mkdir -p "$parentdir"
211         touch "$parentdir/$stagetag"
212 }
213
214 # ============= Register completion of a stage for a port =============
215 reinstall_register_stage_complete ()
216 {
217         local stagetag parentdir
218         stagetag=$1
219         parentdir=${DBDIR}/status.ports/$REINSTALL_ORIGIN/complete
220         mkdir -p "$parentdir"
221         touch "$parentdir/$stagetag"
222 }
223
224 # ============= Deregister the latest stage for a port =============
225 reinstall_deregister_stage ()
226 {
227         local stagetag
228         stagetag=$1
229         rm -f "${DBDIR}/status.ports/$REINSTALL_ORIGIN/$stagetag"
230 }
231
232 # ============= Deregister completion of a stage for a port =============
233 reinstall_deregister_stage_complete ()
234 {
235         local stagetag
236         stagetag=$1
237         rm -f "${DBDIR}/status.ports/$REINSTALL_ORIGIN/complete/$stagetag"
238 }
239
240 # ============= Back up and delete conflict =============
241 # Package names of conflict are given via stdin. 
242 reinstall_backup_and_delete_conflicts ()
243 {
244         local pkg origin origin_regexp_esc backup_pkgdir backup_pkg
245         message_echo "INFO: Deinstalling conflicting packages for $REINSTALL_ORIGPKGTAG."
246         while read pkg
247         do
248                 origin=`pkg_info_flavored_origin "$pkg"`
249                 message_echo "INFO: Backing up and deleting a conflict, $origin ($pkg)."
250                 origin_regexp_esc=`str_escape_regexp "$origin"`
251                 if [ -d "${DBDIR}/requires/$origin" ]
252                 then
253                         backup_pkgdir=${DBDIR}/backup_packages
254                 else
255                         backup_pkgdir=${PKGREPOSITORY}
256                 fi
257                 mkdir -p "$backup_pkgdir"
258                 if backup_pkg=`pkgsys_get_backup_pkg "$origin"`
259                 then
260                         message_echo "INFO: backup package already exists as $backup_pkg"
261                 elif ! backup_pkg=`pkgsys_create_backup_pkg "$pkg" "$backup_pkgdir"`
262                 then
263                         message_echo "WARNING: Failed to create the backup package, the conflict is kept installed." >&2
264                         continue
265                 fi
266                 grep -v -E "^${origin_regexp_esc}[[:space:]]" "${DBDIR}/deleted_conflicts" \
267                         > ${DBDIR}/deleted_conflicts.tmp 2> /dev/null || :
268                 printf '%s\t%s\n' "$origin" "$pkg" >> ${DBDIR}/deleted_conflicts.tmp
269                 mv "${DBDIR}/deleted_conflicts.tmp" "${DBDIR}/deleted_conflicts"
270                 pkg_delete_f "$pkg" || \
271                 {
272                         message_echo "WARNING: Failed to deinstall $pkg by $PKGSYS_CMD_PKG_DELETE." >&2
273                 }
274         done
275         cat "${DBDIR}/deleted_conflicts" 2> /dev/null | sort -u > ${DBDIR}/deleted_conflicts.tmp
276         mv "${DBDIR}/deleted_conflicts.tmp" "${DBDIR}/deleted_conflicts"
277 }
278
279 # ============= Back up and delete remaining actual install conflict (for installation by package) =============
280 reinstall_backup_and_delete_remaining_install_conflicts__by_pkg ()
281 {
282         local pkg tmp_conflicts
283         pkg=$1
284         tmp_conflicts=${TMPDIR}/reinstall_backup_and_delete_remaining_install_conflicts__by_pkg
285         message_echo "(Checking installation conflict...)"
286         pkgsys_get_conflicting_installed_pkgs install "$REINSTALL_ORIGIN" > $tmp_conflicts.pkgs || :
287         while read pkg_conflict
288         do
289                 fileedit_add_a_line_if_new "$pkg_conflict:$REINSTALL_ORIGIN:$pkg" \
290                         "${DBDIR}/forbidden_conflicts"
291         done < $tmp_conflicts.pkgs
292         reinstall_backup_and_delete_conflicts < $tmp_conflicts.pkgs
293 }
294
295 # ============= Back up and delete remaining actual install conflict (for installation by port) =============
296 reinstall_backup_and_delete_remaining_install_conflicts ()
297 {
298         local stagedir tmp_conflicts db_conflict
299         tmp_conflicts=${TMPDIR}/reinstall_backup_and_delete_remaining_install_conflicts
300         db_conflict=$REINSTALL_DBNODE_DIR/possible_additional_conflist.csv
301         message_echo "(Checking installation conflict...)"
302         rm -rf "$db_conflict.tmp" "$tmp_conflicts".*
303         stagedir=`database_query_get_makevar_val "$REINSTALL_ORIGIN" STAGEDIR`
304         pkgsys_get_conflicting_installed_pkgs install "$REINSTALL_ORIGIN" > $tmp_conflicts.pkgs || :
305         ( set -e
306                 cd "$stagedir"
307                 find . -not -type d
308         ) | sed 's|^\.||' | while read filepath
309         do
310                 [ ! -e "$filepath" ] && continue
311                 pkg=`pkg_which "$filepath" || :`
312                 [ -z "$pkg" ] && continue
313                 grep -qFx "$pkg" "$tmp_conflicts.pkgs" && continue
314                 origin=`pkg_info_flavored_origin "$pkg"`
315                 [ x"$origin" = x"$REINSTALL_ORIGIN" ] && continue
316                 printf '%s\t%s\n' "$pkg" "$filepath" >> $db_conflict.tmp
317         done
318         if [ -e "$db_conflict.tmp" ]
319         then
320                 while read pkg filepath
321                 do
322                         message_echo "INFO: Possible additional conflict with $pkg: $filepath"
323                 done < $db_conflict.tmp
324                 message_echo "INFO: The possible additional conflict packages will be escaped just in case."
325                 mv "$db_conflict.tmp" "$db_conflict"
326                 cut -f 1 "$db_conflict" >> $tmp_conflicts.pkgs
327         else
328                 rm -f "$db_conflict.tmp" "$db_conflict"
329         fi
330         while read pkg_conflict
331         do
332                 fileedit_add_a_line_if_new "$pkg_conflict:$REINSTALL_ORIGIN:$REINSTALL_NEWPKGNAME" \
333                         "${DBDIR}/forbidden_conflicts"
334         done < $tmp_conflicts.pkgs
335         reinstall_backup_and_delete_conflicts < $tmp_conflicts.pkgs
336 }
337
338 # ============= Remove needless possible additional conflict =============
339 # Use after installation of the target port and before restoration of its possible additional conflict.
340 reinstall_remove_needless_possible_conflict ()
341 {
342         local db_conflict db_forbidden suffix tmp_db
343         db_conflict=$REINSTALL_DBNODE_DIR/possible_additional_conflist.csv
344         db_forbidden=${DBDIR}/forbidden_conflicts
345         tmp_db=${TMPDIR}/reinstall_remove_needless_possible_conflict:db
346         [ -e "$db_conflict" ] || return 0
347         if [ ! -e "$db_forbidden" ]
348         then
349                 rm -fr "$db_conflict"
350                 return
351         fi
352         rm -rf "$db_conflict".*
353         touch $db_conflict.tmp
354         while read pkg filepath
355         do
356                 if which -s "$filepath"
357                 then
358                         echo printf '%s\t%s\n' "$pkg" "$filepath" >> $db_conflict.tmp
359                         message_echo "WARNING: Unregistered additional conflict with $pkg: $filepath" >&2
360                 else
361                         message_echo "INFO: The above notice of the possible additional conflict was needless: $pkg: $filepath"
362                 fi
363         done < $db_conflict
364         cut -f 1 "$db_conflict" | sort -u > $tmp_db.conflict_pkg.old
365         cut -f 1 "$db_conflict.tmp" | sort -u > $tmp_db.conflict_pkg.new
366         suffix=`echo ":$REINSTALL_ORIGIN:$REINSTALL_NEWPKGNAME" | str_escape_replaceval_filter`
367         grep -vFx -f "$tmp_db.conflict_pkg.new" "$tmp_db.conflict_pkg.old" | \
368                 sed -E "s/$/$suffix/" > $tmp_db.conflict_pkg.needless.filter
369         grep -vFx -f "$tmp_db.conflict_pkg.needless.filter" "$db_forbidden" > $db_forbidden.tmp || :
370         mv "$db_forbidden.tmp" "$db_forbidden"
371         mv "$db_conflict.tmp" "$db_conflict"
372         [ `wc -l < $db_conflict` -gt 0 ] || rm "$db_conflict"
373 }
374
375 # ============= Restoration of backed up conflict =============
376 reinstall_restore_conflicts ()
377 {
378         local origin_current tmpsrc
379         origin_current=$1
380         [ $opt_fetch_only = no -a $opt_dry_run = no ] || return 0
381         [ -e "${DBDIR}/deleted_conflicts" ] || return 0
382         tmpsrc=${TMPDIR}/reinstall_restore_conflicts::deleted_conflicts
383         cp "${DBDIR}/deleted_conflicts" "$tmpsrc"
384         while read origin pkg
385         do
386                 pkg_regexp_esc=`str_escape_regexp "$pkg"`
387                 origins_init=`database_query_initial_orgins "$origin" | grep -vFx "$origin" || :`
388                 origin_replace=`echo "$origin" \
389                         | sed -E -f "${DBDIR}/REPLACE.complete_sed_pattern"`
390                 [ "x$origin_replace" = "x$origin" ] && origin_replace=
391                 is_to_dereg_from_list=no
392                 if [ -n "$origin_current" -a "x$origin" = "x$origin_current" ] || \
393                         pkg_info_e "$pkg" || pkgsys_exists_from_orig "$origin"
394                 then
395                         is_to_dereg_from_list=yes
396                 else
397                         for origin_orig in $origins_init $origin_replace
398                         do
399                                 if [ -n "$origin_orig" ] && pkgsys_exists_from_orig "$origin_orig"
400                                 then
401                                         is_to_dereg_from_list=yes
402                                         break
403                                 fi
404                         done
405                 fi
406                 if pkgsys_chk_conflict_by_a_pkg install "$REINSTALL_ORIGIN" "$pkg"
407                 then
408                         fileedit_add_a_line_if_new "$pkg:$REINSTALL_ORIGIN:$REINSTALL_NEWPKGNAME" "${DBDIR}/forbidden_conflicts"
409                         is_skipped=yes
410                 elif reinstall_chk_forbidden_conflicts "$pkg"
411                 then
412                         is_skipped=yes
413                 else
414                         is_skipped=no
415                 fi
416                 if [ $is_skipped = yes ]
417                 then
418                         message_echo "INFO: Restoration of a conflict, $origin ($pkg), is avoided because it conflicts with installed packages."
419                 fi
420                 if [ $is_to_dereg_from_list = yes ]
421                 then
422                         pkg_current=
423                         origin_current=
424                         for origin_trial in $origin $origins_init $origin_replace
425                         do
426                                 pkg_trial=`pkgsys_get_installed_pkg_from_origin "$origin_trial" || :`
427                                 [ -z "$pkg_trial" ] && continue
428                                 pkg_current="$pkg_current, $pkg_trial"
429                                 origin_current="$origin_current, $origin_trial"
430                         done
431                         pkg_current=`expr "$pkg_current" : ', \(.*\)'` || pkg_current=none
432                         origin_current=`expr "$origin_current" : ', \(.*\)'` || origin_current=none
433                         pkgname_msg=$pkg
434                         origin_msg=$origin
435                         [ "x$pkg_current" = "x$pkg" ] || pkgname_msg="$pkg => $pkg_current"
436                         [ "x$origin_current" = "x$origin" ] || origin_msg="$origin => $origin_current"
437                         if [ $is_skipped = yes ]
438                         then
439                                 message_echo "WARNING: Conflicting package is installed: $origin_msg ($pkgname_msg)"
440                         else
441                                 message_echo "INFO: $origin_msg ($pkgname_msg) is already restored."
442                                 grep -v -E "[[:space:]]$pkg_regexp_esc$" "${DBDIR}/deleted_conflicts" \
443                                         > ${DBDIR}/deleted_conflicts.tmp || :
444                                 mv "${DBDIR}/deleted_conflicts.tmp" "${DBDIR}/deleted_conflicts"
445                         fi
446                         continue
447                 fi
448                 [ $is_skipped = yes ] && continue
449                 if grep -q -Fx -e "$origin" -e "$origin_replace" "${DBDIR}/taboo.all.list" 2> /dev/null
450                 then
451                         message_echo "INFO: Restoration of a conflict, $origin ($pkg), is avoided because it is taboo."
452                         continue
453                 fi
454                 message_echo "INFO: Restoring a former conflict, $origin ($pkg)."
455                 if ! backup_pkg=`pkgsys_get_backup_pkg "$origin"`
456                 then
457                         message_echo "WARNING: No backup exists, gave up." >&2
458                         continue
459                 fi
460                 if pkg_add_fF "$backup_pkg"
461                 then
462                         grep -v -E "[[:space:]]$pkg_regexp_esc$" "${DBDIR}/deleted_conflicts" \
463                                 > ${DBDIR}/deleted_conflicts.tmp || :
464                         mv "${DBDIR}/deleted_conflicts.tmp" "${DBDIR}/deleted_conflicts"
465                 else
466                         message_echo "WARNING: Failed to restore. Note that your system may experience troubles by this error." >&2
467                 fi
468         done < $tmpsrc
469 }
470
471 # ============= Check whether the all non-looped requirements are installed =============
472 reinstall_are_requirements_ready ()
473 {
474         [ -e "$REINSTALL_DBNODE_DIR/requirements.all.direct" ] || return 0
475         while read origin
476         do
477                 pkgsys_exists_from_orig "$origin" || return 1
478         done < $REINSTALL_DBNODE_DIR/requirements.all.direct
479 }
480
481 # ============= Get the all non-looped requirements ready for a port by restarting them if deinstalled =============
482 reinstall_chk_and_restore_requirements ()
483 {
484         local tmp_restore tmp_isfailed
485         tmp_restore=${TMPDIR}/reinstall_setup_requirements:restore
486         tmp_isfailed=${TMPDIR}/reinstall_setup_requirements:isfailed
487         cp /dev/null "$tmp_restore"
488         rm -f "$tmp_isfailed"
489         cat "$REINSTALL_DBNODE_DIR/requirements.all.direct" 2> /dev/null \
490                 | while read origin
491         do
492                 pkgsys_exists_from_orig "$origin" && continue
493                 if grep -q -Fx "$origin" "${DBDIR}/taboo.all.list" 2> /dev/null
494                 then
495                         message_echo "INFO: Restoration of a requirement [$origin] is avoided because it is set taboo."
496                         touch "$tmp_isfailed"
497                         break
498                 fi
499                 origins_init=`database_query_initial_orgins "$origin" | grep -vFx "$origin" || :`
500                 origin_replace=`echo "$origin" \
501                         | sed -E -f "${DBDIR}/REPLACE.complete_sed_pattern"`
502                 [ "x$origin_replace" = "x$origin" ] && origin_replace=
503                 is_installed=no
504                 for origin_orig in $origins_init $origin_replace
505                 do
506                         [ "x$origin_orig" = "x$origin" ] && continue
507                         if pkgsys_exists_from_orig "$origin_orig"
508                         then
509                                 is_installed=yes
510                                 break
511                         fi
512                         if grep -q -Fx "$origin_orig" "${DBDIR}/taboo.all.list" 2> /dev/null
513                         then
514                                 message_echo "INFO: Restoration of a requirement [$origin_orig] is avoided because it is set taboo."
515                                 touch "$tmp_isfailed"
516                                 is_installed=taboo
517                                 break
518                         fi
519                 done
520                 [ $is_installed = yes ] && continue
521                 [ $is_installed = taboo ] && break
522                 for origin_orig in $origin $origins_init $origin_replace
523                 do
524                         pkgarc=`pkgsys_get_backup_pkg "$origin_orig"` && break
525                 done
526                 if [ -z "$pkgarc" ]
527                 then
528                         if grep -q -Fx "$origin" "${DBDIR}/failed.list" 2> /dev/null
529                         then
530                                 touch "$tmp_isfailed"
531                                 break
532                         fi
533                         continue
534                 fi
535                 printf '%s\t%s\n' "$origin_orig" "$pkgarc" >> $tmp_restore
536         done
537         [ -e "$tmp_isfailed" ] && return 1
538         while read origin pkgarc
539         do
540                 pkg=`pkgsys_pkgarc_to_pkgname "$pkgarc"`
541                 pkg_regexp_esc=`str_escape_regexp "$pkg"`
542                 if reinstall_chk_forbidden_conflicts "$pkg"
543                 then
544                         message_echo "INFO: Restoration of a requirement [$origin ($pkg)] is avoided because it conflicts with installed packages."
545                         continue
546                 fi
547                 message_echo "INFO: Restoring a backed-up requirement [$origin ($pkg)]."
548                 if pkg_add_fF "$pkgarc"
549                 then
550                         grep -v -E "[[:space:]]$pkg_regexp_esc$" "${DBDIR}/deleted_conflicts" \
551                                 > ${DBDIR}/deleted_conflicts.tmp 2> /dev/null || :
552                         mv "${DBDIR}/deleted_conflicts.tmp" "${DBDIR}/deleted_conflicts"
553                 else
554                         message_echo "WARNING: Failed to restore by the backed-up package." >&2
555                 fi
556                 
557         done < $tmp_restore
558         :
559 }
560
561 # ============= Back-up of the currently installed package =============
562 reinstall_pkg_backup ()
563 {
564         local backup_pkg pkg
565         reinstall_chk_stage_complete PKG_BACKUP && return
566         pkg=`echo "$REINSTALL_CURRENTPKG" | tr ' ' '\n' | grep -v '^$' | tail -n 1`
567         if [ -n "$pkg" ]
568         then
569                 message_echo "-- (Creating temporary backup package for $REINSTALL_ORIGPKGTAG)"
570                 if backup_pkg=`pkgsys_create_backup_pkg "$pkg" "${DBDIR}/backup_packages"`
571                 then
572                         fileedit_add_a_line_if_new "$pkg" "$REINSTALL_FROMNODE_DIR/backedup_version"
573                         fileedit_add_a_line_if_new "$backup_pkg" "$REINSTALL_FROMNODE_DIR/backedup_pkgfile"
574                 else
575                         message_echo "WARNING: Failed to create the backup package, but ignored by hoping success." >&2
576                         return 1
577                 fi
578         fi
579         reinstall_register_stage_complete PKG_BACKUP
580 }
581
582 # ============= Deinstallation of the currently installed package =============
583 reinstall_deinstall ()
584 {
585         local tmp_installedpkg installed_pkgs
586         tmp_installedpkg=${TMPDIR}/reinstall_deinstall:installedpkg
587         pkgsys_get_installed_pkg_from_origin "$REINSTALL_ORIGIN" > $tmp_installedpkg
588         [ `wc -l < $tmp_installedpkg` -gt 0 ] || return 0
589         installed_pkgs=`tr '\n' ' ' < $tmp_installedpkg | sed 's/ *$//'`
590         if pkgsys_is_necessary_pkgtool "$REINSTALL_ORIGIN"
591         then
592                 message_echo "INFO: Deinstalling $installed_pkgs by $PKGSYS_CMD_PKG_DELETE."
593                 pkg_delete_f $installed_pkgs || \
594                 {
595                         message_echo "WARNING: Failed to deinstall." >&2
596                 }
597         else
598                 while read pkg
599                 do
600                         message_echo "INFO: Deinstalling $pkg by $PKGSYS_CMD_PKG_DELETE." >&2
601                         pkg_delete_f "$pkg" || \
602                         {
603                                 message_echo "WARNING: Failed to deinstall." >&2
604                         }
605                 done < $tmp_installedpkg
606         fi
607         message_echo "-- (Trying to deinstall by ports to make sure. This may cause negligible warnings.)"
608         reinstall_make deinstall || \
609         {
610                 message_echo "WARNING: Failed to deinstall $REINSTALL_CURRENTPKG by make deinstall." >&2
611         }
612 }
613
614 # ============= Deinstallation of installed packages for old ports of the current one =============
615 reinstall_deinstall_old_ports ()
616 {
617         [ -e "$REINSTALL_FROMNODE_DIR/old_origs" ] || return 0
618         while read origin_old
619         do
620                 pkgsys_get_installed_pkg_from_origin "$origin_old"
621         done < $REINSTALL_FROMNODE_DIR/old_origs | reinstall_backup_and_delete_conflicts
622 }
623
624 # ============= Recovery after failure of installation of the new package =============
625 reinstall_failed_install_recover ()
626 {
627         local backedup_version backup_pkg
628         reinstall_chk_stage_complete FAILED_INSTALL.RECOVER && return
629         message_echo "INFO: Trying to deinstall the failed/terminated installation (Ignore failures)."
630         if [ -n "$REINSTALL_CURRENTPKG" ]
631         then
632                 pkg_delete_f "$REINSTALL_CURRENTPKG" || :
633         fi
634         message_echo "INFO: Trying to deinstall by ports to make sure (This may cause negligible warnings)."
635         reinstall_make deinstall || :
636         backedup_version=`cat "$REINSTALL_FROMNODE_DIR/backedup_version" 2> /dev/null || :`
637         if grep -q -Fx "$REINSTALL_ORIGIN" "${DBDIR}/taboo.all.list" 2> /dev/null
638         then
639                 message_echo "INFO: Restoration of the backup of $backedup_version is avoided because it is taboo."
640         elif [ -n "$backedup_version" ]
641         then
642                 if reinstall_chk_forbidden_conflicts "$backedup_version"
643                 then
644                         message_echo "INFO: Restoration of the backup of $backedup_version, is avoided because it conflicts with installed packages."
645                 else
646                         message_echo "INFO: Restoring the backup of $backedup_version."
647                         if [ -e "$REINSTALL_FROMNODE_DIR/backedup_pkgfile" ]
648                         then
649                                 while read backup_pkg
650                                 do
651                                         if [ ! -e "$backup_pkg" ]
652                                         then
653                                                 message_echo "WARNING: The backup file $backup_pkg doesn't exist, gave up." >&2
654                                         elif ! pkg_add_fF "$backup_pkg"
655                                         then
656                                                 message_echo "WARNING: Failed to restore $backedup_version. Note that your system may experience troubles by this error." >&2
657                                         fi
658                                 done < $REINSTALL_FROMNODE_DIR/backedup_pkgfile
659                         else
660                                 message_echo "WARNING: No backup was saved, gave up." >&2
661                         fi
662                 fi
663         fi
664         reinstall_register_stage_complete FAILED_INSTALL.RECOVER
665 }
666
667 # ============= Report an installation success to the all dependents =============
668 reinstall_tell_update_to_depandents ()
669 {
670         local tag level dbsuffix
671         pkgsys_is_pkgtool "$REINSTALL_ORIGIN" && return
672         reinstall_chk_stage_complete TELL_UPDATE_TO_DEPANDENTSL && return
673         for tag in all run build none
674         do
675                 for level in full direct
676                 do
677                         dbsuffix=${tag}.${level}
678                         {
679                                 cat "$REINSTALL_DBNODE_DIR/dependents.$dbsuffix" "$REINSTALL_DBNODE_DIR/dependents.$dbsuffix.orig"
680                                 [ -e "$REINSTALL_DBNODE_DIR/succeeded_once" ] || cat "$REINSTALL_DBNODE_DIR/ignored_dependents.$tag" "$REINSTALL_DBNODE_DIR/ignored_dependents.$tag.orig"
681                         } 2> /dev/null \
682                                 | sort -u \
683                                 | while read origin_dependent
684                         do
685                                 [ -d "${DBDIR}/requires/$origin_dependent" ] || continue
686                                 touch "${DBDIR}/requires/$origin_dependent/need_reinstall_due_to_upgraded_requirements.$dbsuffix"
687                                 fileedit_rm_a_line "$origin_dependent" \
688                                         "${DBDIR}/success.$dbsuffix.list"
689                                 fileedit_rm_a_line "$origin_dependent" \
690                                         "${DBDIR}/todo_after_requirements_succeed.$dbsuffix.list"
691                         done
692                 done
693         done
694         reinstall_register_stage_complete TELL_UPDATE_TO_DEPANDENTS
695 }
696
697 # ============= Closing operations after an installation success =============
698 reinstall_closing_operations_after_successful_install ()
699 {
700         local tag level
701         reinstall_chk_stage_complete CLOSING_OPERATIONS_AFTER_SUCCESSFUL_INSTALL && return
702         database_build_update_pkgname "$REINSTALL_ORIGIN" > /dev/null
703         database_build_update_pkgtag "$REINSTALL_ORIGIN"
704         for tag in all run build none
705         do
706                 for level in full direct
707                 do
708                         rm -f "$REINSTALL_DBNODE_DIR/need_reinstall_due_to_upgraded_requirements.${tag}.${level}"
709                         [ -e "$REINSTALL_DBNODE_DIR/failed_requirements.${tag}.${level}" ] || continue
710                         cp "$REINSTALL_DBNODE_DIR/failed_requirements.${tag}.${level}" \
711                                 "$REINSTALL_DBNODE_DIR/failed_requirements.${tag}.${level}.previous"
712                 done
713         done
714         {
715                 echo "$REINSTALL_ORIGIN"
716                 database_query_initial_orgins "$REINSTALL_ORIGIN"
717         } | sort -u | while read initial_orig
718         do
719                 initial_orig_regexp=`str_escape_regexp "$initial_orig"`
720                 grep -E "^${initial_orig_regexp}[[:space:]]" "${DBDIR}/deleted_conflicts" 2> /dev/null \
721                         | cut -f 2 | while read initial_pkg
722                 do
723                         pkg_regexp=`str_escape_regexp "$initial_pkg"`
724                         grep -v -E "^${pkg_regexp}:" "${DBDIR}/forbidden_conflicts" \
725                                 > ${DBDIR}/forbidden_conflicts.tmp 2> /dev/null || :
726                         mv "${DBDIR}/forbidden_conflicts.tmp" "${DBDIR}/forbidden_conflicts"
727                 done
728                 grep -v -E "^${initial_orig_regexp}[[:space:]]" "${DBDIR}/deleted_conflicts" \
729                         > ${DBDIR}/deleted_conflicts.tmp 2> /dev/null || :
730                 mv "${DBDIR}/deleted_conflicts.tmp" "${DBDIR}/deleted_conflicts"
731                 pkgsys_delete_backup_pkg "$initial_orig"
732         done
733         rm -f "$REINSTALL_FROMNODE_DIR/backedup_pkgfile"
734         reinstall_deregister_stage in_postinstall
735         database_record_success "$REINSTALL_ORIGIN"
736         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
737         message_echo "===>  Done successfully"
738         reinstall_register_stage_complete CLOSING_OPERATIONS_AFTER_SUCCESSFUL_INSTALL
739 }
740
741 # ============= Fetch missing distfiles of a port without sanity check =============
742 reinstall_fetch_missing_distfiles ()
743 {
744         local port_path tmp_fetch
745         port_path=`pkgsys_get_portpath_from_origin "$REINSTALL_ORIGIN"` || return
746         tmp_fetch=${TMPDIR}/reinstall_fetch_missing_distfiles:fetch.sh
747         tmp_missing_fetch=${TMPDIR}/reinstall_fetch_missing_distfiles:missing_fetch.sh
748         rm -rf "$tmp_fetch.pre"
749         reinstall_make_anymode fetch-list 2> /dev/null > $tmp_fetch.src || return
750         grep '^SHA256[[:space:]]' "$port_path/distinfo" | \
751                 sed -E 's/^SHA256[[:space:]]+\(([^)]*)\).*/\1/' | \
752                 while read relative_distfile_path
753         do
754                 if ! { testhash=`( cd "${DISTDIR}" && sha256 "$relative_distfile_path" ) 2> /dev/null` && \
755                         grep -qxF "$testhash" "$port_path/distinfo"; }
756                 then
757                         relative_distfile_path_ptn=`str_escape_regexp "|| echo \"$relative_distfile_path\" not fetched; }"`
758                         if grep -E "$relative_distfile_path_ptn$" "$tmp_fetch.src"
759                         then
760                                 subdir_distfile=`dirname "$relative_distfile_path"`
761                                 [ "x$subdir_distfile" = x. ] || echo "mkdir -p \"${DISTDIR}/$subdir_distfile\"" >> $tmp_fetch.pre
762                         fi
763                 fi
764         done | grep -v '^[[:space:]]*$' > $tmp_fetch.main || :
765         [ -e "$tmp_fetch.pre" ] && sort -u "$tmp_fetch.pre"
766         cat "$tmp_fetch.main"
767 }
768
769 # ============= Execute a command by recording the standard output and error output into a file in case of error =============
770 reinstall_execcmd_tee_errlog ()
771 {
772         local func tmp_err
773         func=$1
774         tmp_err=${TMPDIR}/reinstall_execcmd_tee_errlog::error
775         rm -f "$tmp_err"
776         { {
777                 $func
778         } 2>&1 || touch "$tmp_err"; } | tee "$REINSTALL_DBNODE_DIR/error.log"
779         [ -e "$tmp_err" ] && return 1
780         rm -f "$REINSTALL_DBNODE_DIR/error.log"
781         return
782 }
783
784 # ============= Execute a command to output to stdout by recording the error output into a file in case of error =============
785 reinstall_execcmd_getstdout_errlog ()
786 {
787         local func
788         func=$1
789         if $func 2> $REINSTALL_DBNODE_DIR/error.log
790         then
791                 rm -f "$REINSTALL_DBNODE_DIR/error.log"
792                 return
793         fi
794         cat "$REINSTALL_DBNODE_DIR/error.log" >&2
795         return 1
796 }
797
798 # ============= Reinstallation for a flavored origin =============
799 reinstall_exec ()
800 {
801         ( set -e
802         REINSTALL_ORIGIN=$1
803         REINSTALL_DBNODE_DIR=${DBDIR}/requires/$REINSTALL_ORIGIN
804         REINSTALL_FROMNODE_DIR=${DBDIR}/moved_from/$REINSTALL_ORIGIN
805         REINSTALL_CURRENTPKG=`database_build_update_pkgname "$REINSTALL_ORIGIN" | tr '\n' ' ' | sed 's/ *$//'`
806         REINSTALL_IS_CURRENTPKG_LATEST=no
807         database_build_is_currentpkg_latest "$REINSTALL_ORIGIN" && REINSTALL_IS_CURRENTPKG_LATEST=yes
808         database_build_update_pkgtag "$REINSTALL_ORIGIN"
809         REINSTALL_PKGTAG=`cat "$REINSTALL_FROMNODE_DIR/pkgtag"`
810         REINSTALL_ORIGPKGTAG="$REINSTALL_ORIGIN ($REINSTALL_PKGTAG)"
811         REINSTALL_DBSUFFIX=`options_get_dependency_type`.`options_get_dependency_level`
812         REINSTALL_NEWPKGNAME=`database_build_get_new_pkgname "$REINSTALL_ORIGIN"`
813         REINSTALL_IS_FROZEN=no
814         grep -qFx "$REINSTALL_ORIGIN" "${DBDIR}/freeze.all.list" 2> /dev/null && REINSTALL_IS_FROZEN=yes
815         message_stage_title "$PROGRAM_STEP_COUNTER $REINSTALL_ORIGPKGTAG"
816         database_query_get_target_attributes currentorigin "$REINSTALL_ORIGIN"
817         if [ -z "${currentorigin_is_all}" -a -z "${currentorigin_is_relevant}" ]
818         then
819                 reinstall_skip 'Skipped because being irrelevant'
820                 return
821         fi
822         reinstall_skip_if_in_a_list 'Skipped because being a leaf port' leaf_ports_to_delete && return
823         rm -f "$REINSTALL_DBNODE_DIR/this_is_skipped_build_requirement"
824         if expr "$REINSTALL_CURRENTPKG" : '.* .*' > /dev/null
825         then
826                 message_echo "WARNING: Multiple packages are registered for this port. Reinstallation is needed to fix it." >&2
827         elif grep -q -Fx "$REINSTALL_ORIGIN" "${DBDIR}/damaged_package" 2> /dev/null
828         then
829                 message_echo "WARNING: Installed files have invalid checksums for this port. Reinstallation is needed to fix it." >&2
830         else
831                 if [ -e "${DBDIR}/target_all" ]
832                 then
833                         if [ $REINSTALL_IS_CURRENTPKG_LATEST = yes ]
834                         then
835                                 reinstall_restore_if_temporarily_deinstalled
836                                 reinstall_skip 'Skipped because being already latest' "$REINSTALL_ORIGIN"
837                                 return
838                         fi
839                 elif [ ! -e "$REINSTALL_DBNODE_DIR/conf_updated" ]
840                 then
841                         if [ -e "$nodedir/installed_by_pkg" ] && database_query_is_default_conf "$REINSTALL_ORIGIN" quiet
842                         then
843                                 reinstall_restore_if_temporarily_deinstalled
844                                 reinstall_skip 'Skipped because already upgraded with a prebuilt package'
845                                 return
846                         fi
847                         reinstall_skip_if_in_a_list 'Skipped because the reinstallation has been already completed' \
848                                 "success.${REINSTALL_DBSUFFIX}.list" restore && return
849                         if [ $opt_skip_unchanged = yes ]
850                         then
851                                 if [ ! -e "$REINSTALL_DBNODE_DIR/necessary_upgrade.${REINSTALL_DBSUFFIX}" ]
852                                 then
853                                         reinstall_restore_if_temporarily_deinstalled
854                                         if [ -e "$REINSTALL_FROMNODE_DIR/installed_version" ]
855                                         then
856                                                 reinstall_skip 'Skipped because being already latest as well as the all requirements'
857                                         else
858                                                 touch "$REINSTALL_DBNODE_DIR/this_is_skipped_build_requirement"
859                                                 reinstall_skip 'Skipped because being an only-build-time dependency of already latest packages'
860                                         fi
861                                         return
862                                 fi
863                         fi
864                         if [ \( $opt_skip_unchanged = no -a -e "$REINSTALL_DBNODE_DIR/succeeded_once" \) \
865                                 -o \( $opt_skip_unchanged = yes -a $REINSTALL_IS_CURRENTPKG_LATEST = yes \) ]
866                         then
867                                 if [ ! -e "$REINSTALL_DBNODE_DIR/need_reinstall_due_to_upgraded_requirements.${REINSTALL_DBSUFFIX}" ]
868                                 then
869                                         if ! database_query_is_necessary_upgrade "$REINSTALL_ORIGIN"
870                                         then
871                                                 reinstall_restore_if_temporarily_deinstalled
872                                                 fileedit_add_a_line_if_new "$REINSTALL_ORIGIN" \
873                                                         "${DBDIR}/todo_after_requirements_succeed.${REINSTALL_DBSUFFIX}.list"
874                                                 reinstall_skip 'Skipped because being already latest or failed as well as the all requirements'
875                                                 return
876                                         fi
877                                 fi
878                         fi
879                 fi
880                 reinstall_skip_if_in_a_list 'Marked to be manually-done' manually_done.list restore && return
881         fi
882         reinstall_skip_if_in_a_list 'Skipped because being a hold package' conf/HOLD:PORTS.parsed restore && return
883         if database_query_is_a_port_suppressed "$REINSTALL_ORIGIN"
884         then
885                 reinstall_restore_if_temporarily_deinstalled
886                 reinstall_skip 'Skipped because being suppressed'
887                 return
888         fi
889         reinstall_skip_if_in_a_list 'Ignored because being taboo' taboo.all.list && return
890         if [ $opt_fetch_only = no ] && \
891                 ! reinstall_are_requirements_ready && \
892                 ! reinstall_chk_and_restore_requirements
893         then
894                 reinstall_restore_if_temporarily_deinstalled
895                 for tag in all run build none
896                 do
897                         for level in full direct
898                         do
899                                 fileedit_add_a_line_if_new "$REINSTALL_ORIGIN" \
900                                         "${DBDIR}/todo_after_requirements_succeed.${tag}.${level}.list"
901                         done
902                 done
903                 reinstall_skip 'Skipped because the requirements cannot be ready'
904                 return
905         fi
906         if [ -e "$REINSTALL_FROMNODE_DIR/installed_version" ]
907         then
908                 insttarget=reinstall
909                 instdesc='a reinstallation'
910         else
911                 insttarget=install
912                 instdesc='an installation'
913         fi
914         temp_set_msg_current_stage "$instdesc process for $REINSTALL_ORIGPKGTAG $PROGRAM_STEP_COUNTER"
915         message_target_relations "$REINSTALL_ORIGIN"
916         message_echo "------- Starting $instdesc process --------"
917         if ! reinstall_chk_stage_complete CHECK_SANITY
918         then
919                 message_echo "Sanity Check..."
920                 _reinstall_exec__tmpcmd () { reinstall_make_anymode check-sanity; }
921                 if ! check_sanity_msg=`reinstall_execcmd_getstdout_errlog _reinstall_exec__tmpcmd`
922                 then
923                         echo "$check_sanity_msg"
924                         reinstall_restore_if_temporarily_deinstalled
925                         reinstall_errproc 'check sanity'
926                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
927                         if [ $opt_fetch_only = yes ]
928                         then
929                                 if [ $opt_inst_by_pkg_if_can = yes ]
930                                 then
931                                         if ! reinstall_chk_stage_complete FAILOVER_FETCH_PKG && \
932                                                 database_query_is_default_conf "$REINSTALL_ORIGIN"
933                                         then
934                                                 message_echo "INFO: The configuration of this port is default, so use of a prebuilt package is attempted."
935                                                 func_pkg_inst_remote_verify_fetch=pkg_inst_remote_verify_fetch
936                                                 func_pkg_inst_verify_pkg=pkg_inst_verify_pkg
937                                                 if [ $opt_use_legacy_pkg_for_missing_pkgng = yes ]
938                                                 then
939                                                         func_pkg_inst_remote_verify_fetch=pkg_inst_remote_wild_verify_fetch
940                                                         func_pkg_inst_verify_pkg=pkg_inst_wild_verify_pkg
941                                                 fi
942                                                 if ! $func_pkg_inst_verify_pkg "$REINSTALL_NEWPKGNAME"
943                                                 then
944                                                         message_echo "Trying to fetch the package because of the fetch only mode..."
945                                                         if $func_pkg_inst_remote_verify_fetch "$REINSTALL_NEWPKGNAME"
946                                                         then
947                                                                 reinstall_register_stage_complete FAILOVER_FETCH_PKG
948                                                         else
949                                                                 message_echo "WARNING: Failed to fetch package for $REINSTALL_NEWPKGNAME"
950                                                         fi
951                                                 fi
952                                         fi
953                                 fi
954                                 if ! reinstall_chk_stage_complete FAILOVER_FETCH
955                                 then
956                                         tmp_fetch_missing=${TMPDIR}/reinstall_exec:fetch.sh
957                                         reinstall_fetch_missing_distfiles > $tmp_fetch_missing
958                                         if [ `wc -l < $tmp_fetch_missing` -gt 0 ]
959                                         then
960                                                 message_echo "Trying to fetch the distfiles because of the fetch only mode..."
961                                                 tmp_fetch_dir=${TMPDIR}/reinstall_exec:fetch_dir
962                                                 rm -rf "$tmp_fetch_dir"
963                                                 mkdir -p "$tmp_fetch_dir"
964                                                 if ( cd "$tmp_fetch_dir" && sh "$tmp_fetch_missing" )
965                                                 then
966                                                         reinstall_register_stage_complete FAILOVER_FETCH
967                                                 else
968                                                         message_echo "WARNING: Failed to fetch distfiles"
969                                                 fi
970                                         fi
971                                 fi
972                                 message_fetch_only
973                         fi
974                         return
975                 fi
976                 message_echo
977                 reinstall_register_stage_complete CHECK_SANITY
978         fi
979         if [ $opt_dry_run = yes ]
980         then
981                 message_dry_run
982                 temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
983                 return
984         fi
985         if [ $REINSTALL_IS_FROZEN = yes ] || [ $opt_inst_by_pkg_if_can = yes ] && database_query_is_default_conf "$REINSTALL_ORIGIN"
986         then
987                 if [ $REINSTALL_IS_FROZEN = yes ]
988                 then
989                         pkg=`pkg_get_remote_repository_version "$REINSTALL_ORIGIN" || :`
990                 else
991                         pkg=$REINSTALL_NEWPKGNAME
992                 fi
993                 message_echo "INFO: The configuration of this port is default, so use of a prebuilt package is attempted."
994                 if reinstall_chk_stage in_bypkg
995                 then
996                         message_echo "(Restarting the previously terminated (re)installation-by-package process...)"
997                 else
998                         reinstall_register_stage in_bypkg
999                 fi
1000                 if ! reinstall_chk_stage_complete INSTALL_BY_PKG
1001                 then
1002                         if ! reinstall_chk_stage FAILED_INSTALL_BY_PKG
1003                         then
1004                                 if [ $opt_fetch_only = no -a "x$PKGSYS_USE_PKGNG" = xyes ] \
1005                                         && pkgsys_is_necessary_pkgtool "$REINSTALL_ORIGIN"
1006                                 then
1007                                         if reinstall_deinstall && pkg_is_tool_available && pkg_info_e "$pkg"
1008                                         then
1009                                                 reinstall_register_stage_complete INSTALL_BY_PKG
1010                                         else
1011                                                 reinstall_register_stage FAILED_INSTALL_BY_PKG
1012                                         fi
1013                                 else
1014                                         func_pkg_inst_remote_verify_fetch=pkg_inst_remote_verify_fetch
1015                                         func_pkg_inst_remote=pkg_inst_remote
1016                                         if [ $opt_use_legacy_pkg_for_missing_pkgng = yes ]
1017                                         then
1018                                                 func_pkg_inst_remote_verify_fetch=pkg_inst_remote_wild_verify_fetch
1019                                                 func_pkg_inst_remote=pkg_inst_remote_wild
1020                                         fi
1021                                         if $func_pkg_inst_remote_verify_fetch "$pkg"
1022                                         then
1023                                                 if [ $opt_fetch_only = yes ]
1024                                                 then
1025                                                         message_fetch_only
1026                                                 else
1027                                                         reinstall_backup_and_delete_remaining_install_conflicts__by_pkg "$pkg"
1028                                                         reinstall_pkg_backup || :
1029                                                         reinstall_register_stage in_add_pkg
1030                                                         reinstall_deinstall_old_ports
1031                                                         reinstall_deinstall
1032                                                         if $func_pkg_inst_remote "$pkg"
1033                                                         then
1034                                                                 if database_query_dependency_matching "$REINSTALL_ORIGIN"
1035                                                                 then
1036                                                                         reinstall_register_stage_complete INSTALL_BY_PKG
1037                                                                 else
1038                                                                         message_echo "INFO: The requirements of the package mismatch the configuration."
1039                                                                         message_echo "INFO: The installed package will be deleted and installation by port will be attempted instead."
1040                                                                         pkg_delete_f "$pkg" || :
1041                                                                         reinstall_register_stage FAILED_INSTALL_BY_PKG
1042                                                                 fi
1043                                                         else
1044                                                                 reinstall_register_stage FAILED_INSTALL_BY_PKG
1045                                                         fi
1046                                                         if pkgsys_is_necessary_pkgtool "$REINSTALL_ORIGIN"
1047                                                         then
1048                                                                 pkg_is_tool_available || pkg_rescue_tools
1049                                                         fi
1050                                                 fi
1051                                         else
1052                                                 reinstall_register_stage FAILED_INSTALL_BY_PKG
1053                                         fi
1054                                 fi
1055                         fi
1056                         if [ $opt_fetch_only = no ]
1057                         then
1058                                 if reinstall_chk_stage FAILED_INSTALL_BY_PKG && \
1059                                         reinstall_chk_stage in_add_pkg
1060                                 then
1061                                         reinstall_failed_install_recover
1062                                 fi
1063                         fi
1064                 fi
1065                 if [ $opt_fetch_only = no ] && reinstall_chk_stage_complete INSTALL_BY_PKG
1066                 then
1067                         touch "$REINSTALL_DBNODE_DIR/installed_timestamp"
1068                         touch "$REINSTALL_DBNODE_DIR/installed_by_pkg"
1069                         reinstall_deregister_stage in_bypkg
1070                         reinstall_tell_update_to_depandents
1071                         reinstall_closing_operations_after_successful_install
1072                         message_echo
1073                         return
1074                 fi
1075                 reinstall_deregister_stage in_bypkg
1076                 if [ $opt_fetch_only = yes ]
1077                 then
1078                         message_echo "INFO: Continue to fetch distfiles in case of installation by port."
1079                 else
1080                         message_echo "WARNING: (Re)installation-by-package is unsuccessful, so retrying by using port." >&2
1081                 fi
1082         fi
1083         if [ $REINSTALL_IS_FROZEN = yes ]
1084         then
1085                 message_echo "(Port to freeze)"
1086                 _reinstall_exec__tmpcmd () { pkg_get_remote_repository_version "$REINSTALL_ORIGIN"; }
1087                 if ! pkg=`reinstall_execcmd_getstdout_errlog _reinstall_exec__tmpcmd` || [ -z "$pkg" ]
1088                 then
1089                         reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1090                         reinstall_restore_if_temporarily_deinstalled
1091                         reinstall_errproc 'freezing'
1092                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1093                         reinstall_skip "ERROR: Failed to get the repository version."
1094                         return
1095                 fi
1096                 pkg_current=`pkgsys_get_installed_pkg_from_origin "$REINSTALL_ORIGIN"`
1097                 if [ "x$pkg" = "x$pkg_current" ]
1098                 then
1099                         message_echo "INFO: The latest repository version $pkg installed, deemed success."
1100                         message_echo "WARNING: This action may cause problems due to the version/option mismatch." >&2
1101                         reinstall_tell_update_to_depandents
1102                         reinstall_closing_operations_after_successful_install
1103                         message_echo
1104                         return
1105                 fi
1106                 message_echo "INFO: The latest repository version $pkg will be installed."
1107                 reinstall_pkg_backup || :
1108                 reinstall_deinstall_old_ports
1109                 reinstall_deinstall
1110                 reinstall_backup_and_delete_remaining_install_conflicts__by_pkg "$pkg"
1111                 _reinstall_exec__tmpcmd () { pkg_inst_remote "$pkg"; }
1112                 if reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1113                 then
1114                         message_echo "INFO: Deemed success."
1115                         message_echo "WARNING: This action may cause problems due to the version/option mismatch." >&2
1116                         reinstall_tell_update_to_depandents
1117                         reinstall_closing_operations_after_successful_install
1118                         message_echo
1119                         return
1120                 fi
1121                 message_echo "ERROR: Failed install the version in the repository for a port to freeze. Dependents are locked." >&2
1122                 reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1123                 reinstall_restore_if_temporarily_deinstalled
1124                 reinstall_errproc 'freezing'
1125                 temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1126                 reinstall_skip 'Skipped because being a port to freeze.'
1127                 return
1128         fi
1129         if grep -qFx "$REINSTALL_DBNODE_DIR/requirements.all.full" "${DBDIR}/freeze.all.list" 2> /dev/null
1130         then
1131                 reinstall_restore_conflicts
1132                 {
1133                         pkgsys_get_conflicting_installed_pkgs build "$REINSTALL_ORIGIN" || :
1134                         pkgsys_get_conflicting_installed_pkgs install "$REINSTALL_ORIGIN" || :
1135                 } | reinstall_backup_and_delete_conflicts
1136                 if ! database_query_are_requirements_not_locked "$REINSTALL_ORIGIN"
1137                 then
1138                         reinstall_skip 'Skipped because of missing requirements to freeze.'
1139                         return
1140                 fi
1141         fi
1142         if [ $opt_fetch_only = no ]
1143         then
1144                 if reinstall_chk_stage in_prebuild
1145                 then
1146                         message_echo "(Restarting the previously terminated pre-build process...)"
1147                 else
1148                         reinstall_restore_conflicts
1149                         reinstall_register_stage in_prebuild
1150                 fi
1151         fi
1152         if [ $opt_fetch_only = no  -a -e "$REINSTALL_DBNODE_DIR/BEFOREBUILD.conf" ] && \
1153                 ! reinstall_chk_stage_complete BEFOREBUILD
1154         then
1155                 message_echo "-- BEFOREBUILD operations (start)"
1156                 _reinstall_exec__tmpcmd () { sh -e "$REINSTALL_DBNODE_DIR/BEFOREBUILD.conf"; }
1157                 if ! reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1158                 then
1159                         reinstall_restore_if_temporarily_deinstalled
1160                         reinstall_errproc 'BEFOREBUILD operations'
1161                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1162                         return
1163                 fi
1164                 message_echo "-- BEFOREBUILD operations (end)"
1165                 reinstall_register_stage_complete BEFOREBUILD
1166         fi
1167         if [ $opt_fetch_only = no ] && ! reinstall_chk_stage_complete CLEAN_BEFORE_BUILD
1168         then
1169                 _reinstall_exec__tmpcmd () { reinstall_make_anymode clean; }
1170                 if ! reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1171                 then
1172                         reinstall_restore_if_temporarily_deinstalled
1173                         reinstall_errproc 'clean before build'
1174                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1175                         return
1176                 fi
1177                 message_echo
1178                 reinstall_register_stage_complete CLEAN_BEFORE_BUILD
1179         fi
1180         if ! reinstall_chk_stage_complete FETCH
1181         then
1182                 if ! reinstall_chk_stage FAILED_FETCH
1183                 then
1184                         reinstall_make_anymode checksum || \
1185                                 reinstall_register_stage FAILED_FETCH
1186                 fi
1187                 if reinstall_chk_stage FAILED_FETCH
1188                 then
1189                         if ! reinstall_chk_stage_complete FAILED_FETCH.RETRIAL_1
1190                         then
1191                                 message_echo "INFO: Refetching distfiles for $REINSTALL_ORIGPKGTAG."
1192                                 {
1193                                         reinstall_make_anymode fetch FETCH_ARGS=-Ap &&
1194                                                 reinstall_make_anymode checksum
1195                                 } || reinstall_register_stage FAILED_REFETCH_1
1196                                 reinstall_register_stage_complete FAILED_FETCH.RETRIAL_1
1197                         fi
1198                         if reinstall_chk_stage FAILED_REFETCH_1
1199                         then
1200                                 if ! reinstall_chk_stage_complete FAILED_FETCH.RETRIAL_2.DISTCLEAN
1201                                 then
1202                                         message_echo "INFO: Cleaning distfiles for the second refetch for $REINSTALL_ORIGPKGTAG."
1203                                         reinstall_make_anymode distclean || :
1204                                         reinstall_register_stage_complete FAILED_FETCH.RETRIAL_2.DISTCLEAN
1205                                 fi
1206                                 if ! reinstall_chk_stage_complete FAILED_FETCH.RETRIAL_2
1207                                 then
1208                                         message_echo "INFO: Refetching distfiles as the second retrial for $REINSTALL_ORIGPKGTAG."
1209                                         _reinstall_exec__tmpcmd () { reinstall_make_anymode fetch FETCH_ARGS=-Ap; }
1210                                         if ! reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1211                                         then
1212                                                 reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1213                                                 reinstall_restore_if_temporarily_deinstalled
1214                                                 reinstall_errproc 'fetch'
1215                                                 temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1216                                                 return
1217                                         fi
1218                                         _reinstall_exec__tmpcmd () { reinstall_make_anymode checksum; }
1219                                         if ! reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1220                                         then
1221                                                 reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1222                                                 reinstall_restore_if_temporarily_deinstalled
1223                                                 reinstall_errproc 'checksum'
1224                                                 temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1225                                                 return
1226                                         fi
1227                                         reinstall_register_stage_complete FAILED_FETCH.RETRIAL_2
1228                                 fi
1229                         fi
1230                 fi
1231                 reinstall_register_stage_complete FETCH
1232         fi
1233         if [ $opt_fetch_only = yes ]
1234         then
1235                 message_fetch_only
1236                 return
1237         fi
1238         reinstall_deregister_stage in_prebuild
1239         if [ $opt_batch_ports_only = yes -o $opt_interactive_ports_only = yes ]
1240         then
1241                 to_skip=no
1242                 case `database_query_get_makevar_val "$REINSTALL_ORIGIN" IS_INTERACTIVE` in
1243                         yes )   msg_is_interactive='interactive'
1244                                 [ $opt_batch_ports_only = yes ] && to_skip=yes
1245                                 ;;
1246                         '' )    msg_is_interactive='not interactive'
1247                                 [ $opt_interactive_ports_only = yes ] && to_skip=yes
1248                                 ;;
1249                 esac
1250                 if [ $to_skip = yes ]
1251                 then
1252                         reinstall_restore_if_temporarily_deinstalled
1253                         database_build_update_pkgname "$REINSTALL_ORIGIN" > /dev/null
1254                         message_echo "INFO: Further processes for this port are skipped because it is $msg_is_interactive."
1255                         message_echo
1256                         fileedit_rm_a_line "$REINSTALL_ORIGIN" "${DBDIR}/stage.loop_list/reinst_todo.remain"
1257                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1258                         return
1259                 fi
1260         fi
1261         if reinstall_chk_stage in_build
1262         then
1263                 message_echo "(Restarting the previously terminated build process...)"
1264                 flag_restarted_build=yes
1265         else
1266                 reinstall_register_stage in_build
1267                 flag_restarted_build=no
1268         fi
1269         if reinstall_chk_stage in_retrial_build
1270         then
1271                 message_echo "(Restarting the previously terminated retrial build process...)"
1272                 build_args='MAKE_JOBS_UNSAFE=yes'
1273         else
1274                 build_args=
1275         fi
1276         if ! reinstall_chk_stage_complete BUILD
1277         then
1278                 pkgsys_get_conflicting_installed_pkgs build "$REINSTALL_ORIGIN" \
1279                         | reinstall_backup_and_delete_conflicts
1280                 message_echo "Checking whether any required package is missing..."
1281                 sed 's/@.*//' "$REINSTALL_DBNODE_DIR/requirements.all.full" \
1282                         > ${TMPDIR}/reinstall_exec::requirements.all_but_test.unflavored || :
1283                 if reinstall_make missing 2> /dev/null \
1284                         | grep -Fx -f "${TMPDIR}/reinstall_exec::requirements.all_but_test.unflavored" \
1285                         > ${TMPDIR}/reinstall_exec::missing_requirements
1286                 then
1287                         message_echo "Found missing requirements:"
1288                         message_cat < ${TMPDIR}/reinstall_exec::missing_requirements
1289                         {
1290                                 echo "Found missing requirements:"
1291                                 cat "${TMPDIR}/reinstall_exec::missing_requirements"
1292                         } > "$REINSTALL_DBNODE_DIR/error.log"
1293                         reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1294                         reinstall_restore_if_temporarily_deinstalled
1295                         reinstall_errproc 'check of missing packages'
1296                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1297                         return
1298                 fi
1299                 if ! reinstall_make build $build_args
1300                 then
1301                         reinstall_register_stage in_retrial_build
1302                         [ $flag_restarted_build = yes ] && message_echo "INFO: This failure may be due to restarting from a terminated build."
1303                         is_build_env_modified=no
1304                         if pkgsys_get_conflicting_installed_pkgs install "$REINSTALL_ORIGIN" \
1305                                 > ${TMPDIR}/reinstall_exec::conflicts_install
1306                         then
1307                                 message_echo "INFO: Install-only conflicts are deinstalled for retrial because they may have effects on build."
1308                                 reinstall_backup_and_delete_conflicts < ${TMPDIR}/reinstall_exec::conflicts_install
1309                                 is_build_env_modified=yes
1310                         fi
1311                         if pkgsys_exists_from_orig "$REINSTALL_ORIGIN"
1312                         then
1313                                 message_echo "INFO: The currently installed package for this port is deinstalled for retrial because it may have effects on build."
1314                                 reinstall_pkg_backup || :
1315                                 reinstall_deinstall_old_ports
1316                                 reinstall_deinstall
1317                                 is_build_env_modified=yes
1318                         fi
1319                         reinstall_deregister_stage_complete CLEAN_BEFORE_BUILD
1320                         message_echo "INFO: Retrying the build process after cleaning for $REINSTALL_ORIGPKGTAG."
1321                         _reinstall_exec__tmpcmd () { reinstall_make clean; }
1322                         if ! reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1323                         then
1324                                 if pkgsys_is_necessary_pkgtool "$REINSTALL_ORIGIN"
1325                                 then
1326                                         pkg_is_tool_available || pkg_rescue_tools
1327                                 fi
1328                                 reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1329                                 reinstall_restore_if_temporarily_deinstalled
1330                                 reinstall_errproc 'build and clean after build failure'
1331                                 temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1332                                 return
1333                         fi
1334                         reinstall_register_stage_complete CLEAN_BEFORE_BUILD
1335                         _reinstall_exec__tmpcmd () { reinstall_make build MAKE_JOBS_UNSAFE=yes; }
1336                         if ! reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1337                         then
1338                                 if pkgsys_is_necessary_pkgtool "$REINSTALL_ORIGIN"
1339                                 then
1340                                         pkg_is_tool_available || pkg_rescue_tools
1341                                 fi
1342                                 reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1343                                 reinstall_restore_if_temporarily_deinstalled
1344                                 reinstall_errproc 'retrial of build after failure'
1345                                 temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1346                                 return
1347                         fi
1348                         reinstall_deregister_stage in_retrial_build
1349                 fi
1350                 if pkgsys_is_necessary_pkgtool "$REINSTALL_ORIGIN"
1351                 then
1352                         pkg_is_tool_available || pkg_rescue_tools
1353                 fi
1354                 reinstall_register_stage_complete BUILD
1355         fi
1356         reinstall_deregister_stage in_retrial_build
1357         reinstall_deregister_stage in_build
1358         if reinstall_chk_stage in_stage
1359         then
1360                 message_echo "(Restarting the previously terminated staging process...)"
1361         else
1362                 reinstall_register_stage in_stage
1363         fi
1364         if ! reinstall_chk_stage_complete STAGE
1365         then
1366                 _reinstall_exec__tmpcmd () { reinstall_make stage; }
1367                 if ! reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1368                 then
1369                         reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1370                         reinstall_restore_if_temporarily_deinstalled
1371                         reinstall_errproc 'STAGE operations'
1372                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1373                         return
1374                 fi
1375                 reinstall_register_stage_complete STAGE
1376         fi
1377         reinstall_deregister_stage in_stage
1378         if reinstall_chk_stage in_install
1379         then
1380                 message_echo "(Restarting the previously terminated installation process...)"
1381         else
1382                 reinstall_register_stage in_install
1383         fi
1384         reinstall_pkg_backup || :
1385         if [ -e "$REINSTALL_DBNODE_DIR/BEFOREDEINSTALL.conf" ] && ! reinstall_chk_stage_complete BEFOREDEINSTALL
1386         then
1387                 message_echo "-- BEFOREDEINSTALL operations (start)"
1388                 _reinstall_exec__tmpcmd () { sh -e "$REINSTALL_DBNODE_DIR/BEFOREDEINSTALL.conf"; }
1389                 if ! reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1390                 then
1391                         reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1392                         reinstall_restore_if_temporarily_deinstalled
1393                         reinstall_errproc 'BEFOREDEINSTALL operations'
1394                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1395                         return
1396                 fi
1397                 message_echo "-- BEFOREDEINSTALL operations (end)"
1398                 reinstall_register_stage_complete BEFOREDEINSTALL
1399         fi
1400         if ! reinstall_chk_stage_complete INSTALL
1401         then
1402                 if pkgsys_is_necessary_pkgtool "$REINSTALL_ORIGIN"
1403                 then
1404                         reinstall_backup_and_delete_remaining_install_conflicts
1405                         reinstall_deinstall_old_ports
1406                         reinstall_deinstall
1407                 else
1408                         reinstall_deinstall_old_ports
1409                         reinstall_deinstall
1410                         reinstall_backup_and_delete_remaining_install_conflicts
1411                 fi
1412                 if ! reinstall_chk_stage FAILED_INSTALL
1413                 then
1414                         if reinstall_make $insttarget || \
1415                                 {
1416                                         message_echo "INFO: Cleaning up for retrial."
1417                                         reinstall_make deinstall \
1418                                                 || message_echo "WARNING: Continuing by hoping a success." >&2
1419                                         message_echo "INFO: Retrying the installation."
1420                                         _reinstall_exec__tmpcmd () { reinstall_make $insttarget MAKE_JOBS_UNSAFE=yes; }
1421                                         reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1422                                 }
1423                         then
1424                                 touch "$REINSTALL_DBNODE_DIR/installed_timestamp"
1425                                 reinstall_register_stage_complete INSTALL
1426                         else
1427                                 reinstall_register_stage FAILED_INSTALL
1428                         fi
1429                 fi
1430                 if reinstall_chk_stage FAILED_INSTALL
1431                 then
1432                         if pkgsys_is_necessary_pkgtool "$REINSTALL_ORIGIN"
1433                         then
1434                                 pkg_is_tool_available || pkg_rescue_tools
1435                         else
1436                                 reinstall_failed_install_recover
1437                         fi
1438                         if [ -e "$REINSTALL_DBNODE_DIR/AFTERINSTALL.conf" ] && \
1439                                 ! reinstall_chk_stage_complete FAILED_INSTALL.AFTERINSTALL
1440                         then
1441                                 message_echo "-- AFTERINSTALL operations (start)"
1442                                 if ! sh -e "$REINSTALL_DBNODE_DIR/AFTERINSTALL.conf"
1443                                 then
1444                                         message_echo "WARNING: Failed in AFTERINSTALL operations." >&2
1445                                         message_echo "---- (The process is continued anyway)"
1446                                 fi
1447                                 message_echo "-- AFTERINSTALL operations (end)"
1448                                 reinstall_register_stage_complete FAILED_INSTALL.AFTERINSTALL
1449                         fi
1450                         reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1451                         reinstall_restore_if_temporarily_deinstalled
1452                         reinstall_errproc 'install'
1453                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1454                         return
1455                 fi
1456         fi
1457         reinstall_remove_needless_possible_conflict
1458         reinstall_restore_if_temporarily_deinstalled
1459         if ! reinstall_chk_stage_complete UPDATE_CONFLICTS
1460         then
1461                 pkg_info_qL "$REINSTALL_NEWPKGNAME" > ${TMPDIR}/reinstall_exec:currently_installed_files
1462                 cat "${DBDIR}/backup_pkgarcs.lst" 2> /dev/null \
1463                         | while read origin_bak pkgpath_bak
1464                 do
1465                         pkg_bak=`pkgsys_pkgarc_to_pkgname "$pkgpath_bak"`
1466                         if [ "$origin_bak" = "$REINSTALL_ORIGIN" ]
1467                         then
1468                                 [ "$pkg_bak" = "$REINSTALL_NEWPKGNAME" ] && continue
1469                         elif reinstall_quick_chk_forbidden_conflicts "$pkg_bak"
1470                         then
1471                                 continue
1472                         elif ! pkgsys_chk_match_to_restored_files_by_backup_pkg \
1473                                 "$origin_bak" "${TMPDIR}/reinstall_exec:currently_installed_files"
1474                         then
1475                                 continue
1476                         fi
1477                         fileedit_add_a_line_if_new "$pkg_bak:$REINSTALL_ORIGIN:$REINSTALL_NEWPKGNAME" \
1478                                 "${DBDIR}/forbidden_conflicts"
1479                 done
1480                 reinstall_register_stage_complete UPDATE_CONFLICTS
1481         fi
1482         if [ -e "$REINSTALL_DBNODE_DIR/AFTERINSTALL.conf" ] && ! reinstall_chk_stage_complete AFTERINSTALL
1483         then
1484                 message_echo "-- AFTERINSTALL operations (start)"
1485                 _reinstall_exec__tmpcmd () { sh -e "$REINSTALL_DBNODE_DIR/AFTERINSTALL.conf"; }
1486                 if ! reinstall_execcmd_tee_errlog _reinstall_exec__tmpcmd
1487                 then
1488                         reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1489                         reinstall_errproc 'AFTERINSTALL operations'
1490                         temp_set_msg_current_stage "${_MSG_CURRENT_STAGE_general}"
1491                         return
1492                 fi
1493                 message_echo "-- AFTERINSTALL operations (end)"
1494                 reinstall_register_stage_complete AFTERINSTALL
1495         fi
1496         reinstall_deregister_stage in_install
1497         reinstall_register_stage in_postinstall
1498         reinstall_restore_conflicts "$REINSTALL_ORIGIN"
1499         if ! reinstall_chk_stage_complete CLEAN_AFTER_INSTALL
1500         then
1501                 if ! reinstall_make clean
1502                 then
1503                         message_echo "WARNING: Failed to clean $REINSTALL_ORIGPKGTAG." >&2
1504                 fi
1505                 reinstall_register_stage_complete CLEAN_AFTER_INSTALL
1506         fi
1507         reinstall_tell_update_to_depandents
1508         reinstall_closing_operations_after_successful_install
1509         message_echo
1510         )
1511 }