1 /* $NetBSD: wrtvid.c,v 1.8 2008/04/28 20:23:29 martin Exp $ */ 2 3 /*- 4 * Copyright (c) 2002 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Steve C. Woodford. 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 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 #include <sys/types.h> 33 #include <sys/stat.h> 34 #include <fcntl.h> 35 #include <stdio.h> 36 #include <stdlib.h> 37 #include <string.h> 38 39 /* mvme68k's boot block is 512 bytes long */ 40 #define SIZEOF_VID 0x200 41 42 /* The first field is effectively the vendor string, in this case NBSD */ 43 #define VID_ID_OFF 0x000 44 #define VID_ID "NBSD" 45 #define VID_ID_LEN 4 46 47 /* Start block for the 1st stage bootstrap code */ 48 #define VID_OSS_OFF 0x014 49 #define VID_OSS_TAPE 1 50 #define VID_OSS_DISK 2 51 52 /* Length, in 256-byte logical blocks, of the 1st stage bootstrap */ 53 #define VID_OSL_OFF 0x018 54 55 /* Start address of the bootstrap */ 56 #define VID_OSA_OFF 0x01e 57 #define VID_OSA 0x003f0000 58 59 /* Block number of config area */ 60 #define VID_CAS_OFF 0x093 61 #define VID_CAS 1 62 63 /* Length, in 256-byte logical blocks, of config area */ 64 #define VID_CAL_OFF 0x094 65 #define VID_CAL 1 66 67 /* Magic `MOTOROLA' string */ 68 #define VID_MOT_OFF 0x0f8 69 #define VID_MOT "MOTOROLA" 70 #define VID_MOT_LEN 8 71 72 /* Logical block size, in bytes */ 73 #define CFG_REC_OFF 0x10a 74 #define CFG_REC 0x100 75 76 /* Physical sector size, in bytes */ 77 #define CFG_PSM_OFF 0x11e 78 #define CFG_PSM 0x200 79 80 81 /* 82 * Write a big-endian 32-bit value at the specified address 83 */ 84 static void 85 write32(uint8_t *vp, uint32_t value) 86 { 87 88 *vp++ = (uint8_t)((value >> 24) & 0xff); 89 *vp++ = (uint8_t)((value >> 16) & 0xff); 90 *vp++ = (uint8_t)((value >> 8) & 0xff); 91 *vp = (uint8_t)(value & 0xff); 92 } 93 94 /* 95 * Write a big-endian 16-bit value at the specified address 96 */ 97 static void 98 write16(uint8_t *vp, uint16_t value) 99 { 100 101 *vp++ = (uint8_t)((value >> 8) & 0xff); 102 *vp = (uint8_t)(value & 0xff); 103 } 104 105 int 106 main(int argc, char **argv) 107 { 108 struct stat st; 109 uint16_t len; 110 uint8_t *vid; 111 char *fn; 112 int is_disk; 113 int fd; 114 115 if (argc != 2) { 116 usage: 117 fprintf(stderr, "%s: <bootsd|bootst>\n", argv[0]); 118 exit(1); 119 } 120 121 if (strcmp(argv[1], "bootsd") == 0) { 122 is_disk = 1; 123 fn = "sdboot"; 124 } else 125 if (strcmp(argv[1], "bootst") == 0) { 126 is_disk = 0; 127 fn = "stboot"; 128 } else 129 goto usage; 130 131 if (stat(argv[1], &st) < 0) { 132 perror(argv[1]); 133 exit(1); 134 } 135 136 /* How many 256-byte logical blocks (rounded up) */ 137 len = (uint16_t)((st.st_size + 255) / 256); 138 139 /* For tapes, round up to 8k */ 140 if (is_disk == 0) { 141 len += (8192 / 256) - 1; 142 len &= ~((8192 / 256) -1); 143 } 144 145 if ((vid = malloc(SIZEOF_VID)) == NULL) { 146 perror(argv[0]); 147 exit(1); 148 } 149 150 /* Generate the VID and CFG data */ 151 memset(vid, 0, SIZEOF_VID); 152 memcpy(&vid[VID_ID_OFF], VID_ID, VID_ID_LEN); 153 write32(&vid[VID_OSS_OFF], is_disk ? VID_OSS_DISK : VID_OSS_TAPE); 154 write16(&vid[VID_OSL_OFF], len); 155 write32(&vid[VID_OSA_OFF], VID_OSA); 156 vid[VID_CAS_OFF] = VID_CAS; 157 vid[VID_CAL_OFF] = VID_CAL; 158 memcpy(&vid[VID_MOT_OFF], VID_MOT, VID_MOT_LEN); 159 write16(&vid[CFG_REC_OFF], CFG_REC); 160 write16(&vid[CFG_PSM_OFF], CFG_PSM); 161 162 /* Create and write it out */ 163 if ((fd = open(fn, O_WRONLY | O_CREAT | O_TRUNC, 0644)) < 0) { 164 perror(fn); 165 exit(1); 166 } 167 168 if (write(fd, vid, SIZEOF_VID) != SIZEOF_VID) { 169 perror(fn); 170 exit(1); 171 } 172 173 close(fd); 174 free(vid); 175 176 return 0; 177 } 178