xref: /netbsd-src/usr.sbin/sysinst/arch/ews4800mips/md.c (revision 4204f81037ec1430b81b70ee975f04b277901e24)
1 /*	$NetBSD: md.c,v 1.8 2022/01/29 16:01:18 martin Exp $	*/
2 
3 /*
4  * Copyright 1997 Piermont Information Systems Inc.
5  * All rights reserved.
6  *
7  * Based on code written by Philip A. Nelson for Piermont Information
8  * Systems Inc.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. The name of Piermont Information Systems Inc. may not be used to endorse
19  *    or promote products derived from this software without specific prior
20  *    written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS''
23  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE
26  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
27  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
28  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
29  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
30  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
31  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
32  * THE POSSIBILITY OF SUCH DAMAGE.
33  */
34 
35 /* md.c -- ews4800mips machine specific routines */
36 
37 #include <sys/types.h>
38 #include <sys/ioctl.h>
39 #include <sys/param.h>
40 #include <stdio.h>
41 #include <curses.h>
42 #include <unistd.h>
43 #include <fcntl.h>
44 #include <util.h>
45 
46 #include "defs.h"
47 #include "md.h"
48 #include "msg_defs.h"
49 #include "menu_defs.h"
50 
51 static int ews4800mips_boot_offset(void);
52 
53 void
md_init(void)54 md_init(void)
55 {
56 }
57 
58 void
md_init_set_status(int flags)59 md_init_set_status(int flags)
60 {
61 	(void)flags;
62 }
63 
64 bool
md_get_info(struct install_partition_desc * install)65 md_get_info(struct install_partition_desc *install)
66 {
67 	struct disklabel disklabel;
68 	int fd;
69 	char dev_name[100];
70 
71 	snprintf(dev_name, 100, "/dev/r%s%c", pm->diskdev, 'a' + getrawpartition());
72 
73 	fd = open(dev_name, O_RDONLY, 0);
74 	if (fd < 0) {
75 		endwin();
76 		fprintf (stderr, "Can't open %s\n", dev_name);
77 		exit(1);
78 	}
79 	if (ioctl(fd, DIOCGDINFO, &disklabel) == -1) {
80 		endwin();
81 		fprintf (stderr, "Can't read disklabel on %s.\n", dev_name);
82 		close(fd);
83 		exit(1);
84 	}
85 	close(fd);
86 
87 	pm->dlcyl = disklabel.d_ncylinders;
88 	pm->dlhead = disklabel.d_ntracks;
89 	pm->dlsec = disklabel.d_nsectors;
90 	pm->sectorsize = disklabel.d_secsize;
91 	pm->dlcylsize = disklabel.d_secpercyl;
92 
93 	/*
94 	 * Compute whole disk size. Take max of (pm->dlcyl*pm->dlhead*pm->dlsec)
95 	 * and secperunit,  just in case the disk is already labelled.
96 	 * (If our new label's RAW_PART size ends up smaller than the
97 	 * in-core RAW_PART size  value, updating the label will fail.)
98 	 */
99 	pm->dlsize = pm->dlcyl * pm->dlhead * pm->dlsec;
100 	if (disklabel.d_secperunit > pm->dlsize)
101 		pm->dlsize = disklabel.d_secperunit;
102 
103 	return true;
104 }
105 
106 /*
107  * md back-end code for menu-driven BSD disklabel editor.
108  */
109 int
md_make_bsd_partitions(struct install_partition_desc * install)110 md_make_bsd_partitions(struct install_partition_desc *install)
111 {
112 
113 	return make_bsd_partitions(install);
114 }
115 
116 /*
117  * any additional partition validation
118  */
119 bool
md_check_partitions(struct install_partition_desc * install)120 md_check_partitions(struct install_partition_desc *install)
121 {
122 	return true;
123 }
124 
125 /*
126  * hook called before writing new disklabel.
127  */
128 bool
md_pre_disklabel(struct install_partition_desc * install,struct disk_partitions * parts)129 md_pre_disklabel(struct install_partition_desc *install,
130     struct disk_partitions *parts)
131 {
132 	part_id part;
133 	struct disk_part_info info;
134 	daddr_t boot_offset = ews4800mips_boot_offset();
135 
136 	/* make sure the boot partition is at the right offset */
137 	for (part = 0; part < parts->num_part; part++) {
138 		if (!parts->pscheme->get_part_info(parts, part, &info))
139 			continue;
140 		if (info.flags & (PTI_SEC_CONTAINER|PTI_WHOLE_DISK|
141 		    PTI_PSCHEME_INTERNAL|PTI_RAW_PART))
142 			continue;
143 		if (info.fs_type != PART_BOOT_TYPE)
144 			continue;
145 		if (info.start == boot_offset)
146 			continue;
147 		info.start = boot_offset;
148 		parts->pscheme->set_part_info(parts, part, &info, NULL);
149 	}
150 
151 	return true;
152 }
153 
154 /*
155  * hook called after writing disklabel to new target disk.
156  */
157 bool
md_post_disklabel(struct install_partition_desc * install,struct disk_partitions * parts)158 md_post_disklabel(struct install_partition_desc *install,
159     struct disk_partitions *parts)
160 {
161 	return true;
162 }
163 
164 /*
165  * hook called after upgrade() or install() has finished setting
166  * up the target disk but immediately before the user is given the
167  * ``disks are now set up'' message.
168  *
169  * On the ews4800mips, we use this opportunity to install the boot blocks.
170  */
171 int
md_post_newfs(struct install_partition_desc * install)172 md_post_newfs(struct install_partition_desc *install)
173 {
174 	int flags;
175 
176 	flags = RUN_DISPLAY | RUN_FATAL;
177 	cp_to_target("/usr/mdec/boot", "/stand/boot");
178 	run_program(flags, "/usr/sbin/installboot /dev/r%s%c %s",
179 	    pm->diskdev, 'a' + getrawpartition(),
180 	    "/usr/mdec/bootxx_bfs");
181 
182 	return 0;
183 }
184 
185 int
md_post_extract(struct install_partition_desc * install,bool upgrade)186 md_post_extract(struct install_partition_desc *install, bool upgrade)
187 {
188 	return 0;
189 }
190 
191 void
md_cleanup_install(struct install_partition_desc * install)192 md_cleanup_install(struct install_partition_desc *install)
193 {
194 #ifndef DEBUG
195 	enable_rc_conf();
196 #endif
197 }
198 
199 int
md_pre_update(struct install_partition_desc * install)200 md_pre_update(struct install_partition_desc *install)
201 {
202 	return 1;
203 }
204 
205 /* Upgrade support */
206 int
md_update(struct install_partition_desc * install)207 md_update(struct install_partition_desc *install)
208 {
209 	md_post_newfs(install);
210 	return 1;
211 }
212 
213 static int
ews4800mips_boot_offset(void)214 ews4800mips_boot_offset(void)
215 {
216 	return pm->dlcylsize;
217 }
218 
219 /*
220  * used in bsddisklabel.c as BOOT_SIZE
221  */
222 int
ews4800mips_boot_size(void)223 ews4800mips_boot_size(void)
224 {
225 	int i;
226 
227 	/*
228 	 * pm->dlcylsize	: PDINFO block
229 	 * pm->dlcylsize	: 100 block
230 	 */
231 	i = pm->dlcylsize + 100;
232 	if (i >= 1024) /* XXX bsddisklabel.c hack. convert to byte count. */
233 		i = pm->dlcylsize * pm->sectorsize * 2;
234 
235 	return i;
236 }
237 
238 /*
239  * used in bsddisklabel.c as SYSVBFS_SIZE
240  */
241 int
ews4800mips_sysvbfs_size(void)242 ews4800mips_sysvbfs_size(void)
243 {
244 	return (8 * 1024 * 1024) / 512;	/* 8MB */
245 }
246 
247 int
md_pre_mount(struct install_partition_desc * install,size_t ndx)248 md_pre_mount(struct install_partition_desc *install, size_t ndx)
249 {
250 	return 0;
251 }
252 
253 bool
md_parts_use_wholedisk(struct disk_partitions * parts)254 md_parts_use_wholedisk(struct disk_partitions *parts)
255 {
256 	struct disk_part_info boot_part = {
257 		.size = PART_BOOT / 512,
258 		.fs_type = PART_BOOT_TYPE,
259 	};
260 
261 	boot_part.nat_type = parts->pscheme->get_fs_part_type(
262 	    PT_root, boot_part.fs_type, boot_part.fs_sub_type);
263 
264 	return parts_use_wholedisk(parts, 1, &boot_part);
265 }
266 
267 #ifdef HAVE_GPT
268 bool
md_gpt_post_write(struct disk_partitions * parts,part_id root_id,bool root_is_new,part_id efi_id,bool efi_is_new)269 md_gpt_post_write(struct disk_partitions *parts, part_id root_id,
270     bool root_is_new, part_id efi_id, bool efi_is_new)
271 {
272 	/* no GPT boot support, nothing needs to be done here */
273 	return true;
274 }
275 #endif
276 
277