1 /* $NetBSD: upgrade.c,v 1.2 2014/08/03 16:09:38 martin 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 process_menu(MENU_noyes, NULL); 62 if (!yesno) 63 return; 64 65 get_ramsize(); 66 67 if (find_disks(msg_string(MSG_upgrade)) < 0) 68 return; 69 70 if (md_pre_update() < 0) 71 return; 72 73 if (mount_disks() != 0) 74 return; 75 76 77 /* 78 * Save X symlink, ... 79 */ 80 if (save_X("/usr/X11R6")) 81 return; 82 if (save_X("/usr/X11R7")) 83 return; 84 85 #ifdef AOUT2ELF 86 move_aout_libs(); 87 #endif 88 /* Do any md updating of the file systems ... e.g. bootblocks, 89 copy file systems ... */ 90 if (!md_update()) 91 return; 92 93 wrefresh(curscr); 94 wmove(stdscr, 0, 0); 95 wclear(stdscr); 96 wrefresh(stdscr); 97 98 /* Done with disks. Ready to get and unpack tarballs. */ 99 process_menu(MENU_distset, &retcode); 100 if (retcode == 0) 101 return; 102 if (get_and_unpack_sets(1, MSG_disksetupdoneupdate, 103 MSG_upgrcomplete, MSG_abortupgr) != 0) 104 return; 105 106 if (!md_post_extract() == 0) 107 return; 108 109 merge_X("/usr/X11R6"); 110 merge_X("/usr/X11R7"); 111 112 sanity_check(); 113 } 114 115 /* 116 * Save X symlink to X.old so it can be recovered later 117 */ 118 static int 119 save_X(const char *xroot) 120 { 121 char newx[MAXPATHLEN], oldx[MAXPATHLEN]; 122 123 strlcpy(newx, xroot, sizeof(newx)); 124 strlcat(newx, "/bin/X", sizeof(newx)); 125 strlcpy(oldx, newx, sizeof(oldx)); 126 strlcat(oldx, ".old", sizeof(oldx)); 127 128 /* Only care for X if it's a symlink */ 129 if (target_symlink_exists_p(newx)) { 130 if (target_symlink_exists_p(oldx)) { 131 msg_display(MSG_X_oldexists, xroot, xroot, xroot, 132 xroot, xroot, xroot, xroot, xroot, xroot, xroot, 133 xroot); 134 process_menu(MENU_ok, NULL); 135 return EEXIST; 136 } 137 138 #ifdef DEBUG 139 printf("saving %s as %s ...", newx, oldx); 140 #endif 141 142 /* Move target .../X to .../X.old. Abort on error. */ 143 mv_within_target_or_die(newx, oldx); 144 } 145 146 return 0; 147 } 148 149 /* 150 * Merge back saved target X files after unpacking the new 151 * sets has completed. 152 */ 153 static int 154 merge_X(const char *xroot) 155 { 156 char newx[MAXPATHLEN], oldx[MAXPATHLEN]; 157 158 strlcpy(newx, xroot, sizeof(newx)); 159 strlcat(newx, "/bin/X", sizeof(newx)); 160 strlcpy(oldx, newx, sizeof(oldx)); 161 strlcat(oldx, ".old", sizeof(oldx)); 162 163 if (target_symlink_exists_p(oldx)) { 164 /* Only move back X if it's a symlink - we don't want 165 * to restore old binaries */ 166 mv_within_target_or_die(oldx, newx); 167 } 168 169 return 0; 170 } 171 172 /* 173 * Unpacks sets, clobbering existing contents. 174 */ 175 void 176 do_reinstall_sets(void) 177 { 178 int retcode = 0; 179 180 unwind_mounts(); 181 msg_display(MSG_reinstallusure); 182 process_menu(MENU_noyes, NULL); 183 if (!yesno) 184 return; 185 186 if (find_disks(msg_string(MSG_reinstall)) < 0) 187 return; 188 189 if (mount_disks() != 0) 190 return; 191 192 /* Unpack the distribution. */ 193 process_menu(MENU_distset, &retcode); 194 if (retcode == 0) 195 return; 196 if (get_and_unpack_sets(0, NULL, MSG_unpackcomplete, MSG_abortunpack) != 0) 197 return; 198 199 sanity_check(); 200 } 201