1 /* $NetBSD: upgrade.c,v 1.6 2015/08/28 12:04:08 joerg Exp $ */ 2 3 /* 4 * Copyright 1997 Piermont Information Systems Inc. 5 * All rights reserved. 6 * 7 * Written by Philip A. Nelson for Piermont Information Systems Inc. 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 3. The name of Piermont Information Systems Inc. may not be used to endorse 18 * or promote products derived from this software without specific prior 19 * written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS'' 22 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE 25 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 31 * THE POSSIBILITY OF SUCH DAMAGE. 32 * 33 */ 34 35 /* upgrade.c -- upgrade an installation. */ 36 37 #include <sys/param.h> 38 #include <stdio.h> 39 #include <curses.h> 40 #include <errno.h> 41 #include "defs.h" 42 #include "msg_defs.h" 43 #include "menu_defs.h" 44 45 /* 46 * local prototypes 47 */ 48 static int save_X(const char *); 49 static int merge_X(const char *); 50 51 /* 52 * Do the system upgrade. 53 */ 54 void 55 do_upgrade(void) 56 { 57 int retcode = 0; 58 partman_go = 0; 59 60 msg_display(MSG_upgradeusure); 61 if (!ask_noyes(NULL)) 62 return; 63 64 get_ramsize(); 65 66 if (find_disks(msg_string(MSG_upgrade)) < 0) 67 return; 68 69 if (set_swap_if_low_ram(pm->diskdev, NULL) < 0) 70 return; 71 72 if (md_pre_update() < 0) 73 return; 74 75 if (mount_disks() != 0) 76 return; 77 78 79 /* 80 * Save X symlink, ... 81 */ 82 if (save_X("/usr/X11R6")) 83 return; 84 if (save_X("/usr/X11R7")) 85 return; 86 87 #ifdef AOUT2ELF 88 move_aout_libs(); 89 #endif 90 /* Do any md updating of the file systems ... e.g. bootblocks, 91 copy file systems ... */ 92 if (!md_update()) 93 return; 94 95 wrefresh(curscr); 96 wmove(stdscr, 0, 0); 97 wclear(stdscr); 98 wrefresh(stdscr); 99 100 /* Done with disks. Ready to get and unpack tarballs. */ 101 process_menu(MENU_distset, &retcode); 102 if (retcode == 0) 103 return; 104 if (get_and_unpack_sets(1, MSG_disksetupdoneupdate, 105 MSG_upgrcomplete, MSG_abortupgr) != 0) 106 return; 107 108 if (md_post_extract()) 109 return; 110 111 merge_X("/usr/X11R6"); 112 merge_X("/usr/X11R7"); 113 114 sanity_check(); 115 } 116 117 /* 118 * Save X symlink to X.old so it can be recovered later 119 */ 120 static int 121 save_X(const char *xroot) 122 { 123 char newx[MAXPATHLEN], oldx[MAXPATHLEN]; 124 125 strlcpy(newx, xroot, sizeof(newx)); 126 strlcat(newx, "/bin/X", sizeof(newx)); 127 strlcpy(oldx, newx, sizeof(oldx)); 128 strlcat(oldx, ".old", sizeof(oldx)); 129 130 /* Only care for X if it's a symlink */ 131 if (target_symlink_exists_p(newx)) { 132 if (target_symlink_exists_p(oldx)) { 133 msg_display(MSG_X_oldexists, xroot, xroot, xroot, 134 xroot, xroot, xroot, xroot, xroot, xroot, xroot, 135 xroot); 136 process_menu(MENU_ok, NULL); 137 return EEXIST; 138 } 139 140 #ifdef DEBUG 141 printf("saving %s as %s ...", newx, oldx); 142 #endif 143 144 /* Move target .../X to .../X.old. Abort on error. */ 145 mv_within_target_or_die(newx, oldx); 146 } 147 148 return 0; 149 } 150 151 /* 152 * Merge back saved target X files after unpacking the new 153 * sets has completed. 154 */ 155 static int 156 merge_X(const char *xroot) 157 { 158 char newx[MAXPATHLEN], oldx[MAXPATHLEN]; 159 160 strlcpy(newx, xroot, sizeof(newx)); 161 strlcat(newx, "/bin/X", sizeof(newx)); 162 strlcpy(oldx, newx, sizeof(oldx)); 163 strlcat(oldx, ".old", sizeof(oldx)); 164 165 if (target_symlink_exists_p(oldx)) { 166 /* Only move back X if it's a symlink - we don't want 167 * to restore old binaries */ 168 mv_within_target_or_die(oldx, newx); 169 } 170 171 return 0; 172 } 173 174 /* 175 * Unpacks sets, clobbering existing contents. 176 */ 177 void 178 do_reinstall_sets(void) 179 { 180 int retcode = 0; 181 182 unwind_mounts(); 183 msg_display(MSG_reinstallusure); 184 if (!ask_noyes(NULL)) 185 return; 186 187 if (find_disks(msg_string(MSG_reinstall)) < 0) 188 return; 189 190 if (mount_disks() != 0) 191 return; 192 193 /* Unpack the distribution. */ 194 process_menu(MENU_distset, &retcode); 195 if (retcode == 0) 196 return; 197 if (get_and_unpack_sets(0, NULL, MSG_unpackcomplete, MSG_abortunpack) != 0) 198 return; 199 200 sanity_check(); 201 } 202