Annotation of sys/arch/mvme88k/stand/wrtvid/wrtvid.c, Revision 1.1.1.1
1.1 nbrk 1: /* $OpenBSD: wrtvid.c,v 1.7 2007/06/17 00:28:57 deraadt Exp $ */
2:
3: /*
4: * Copyright (c) 1995 Dale Rahn <drahn@openbsd.org>
5: *
6: * Permission to use, copy, modify, and distribute this software for any
7: * purpose with or without fee is hereby granted, provided that the above
8: * copyright notice and this permission notice appear in all copies.
9: *
10: * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11: * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12: * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13: * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14: * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15: * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16: * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17: */
18:
19: #include <sys/types.h>
20: #include <sys/stat.h>
21: #include <sys/disklabel.h>
22: #include <unistd.h>
23: #include <fcntl.h>
24: #include <stdio.h>
25: #include <stdlib.h>
26: #include <string.h>
27:
28: void copy_exe(int, int);
29: void swabcfg(struct mvmedisklabel *);
30: void swabvid(struct mvmedisklabel *);
31:
32: int
33: main(argc, argv)
34: int argc;
35: char **argv;
36: {
37: struct mvmedisklabel *pcpul;
38: struct stat stat;
39: int exe_file;
40: int tape_vid;
41: int tape_exe;
42: unsigned int exe_addr;
43: char *filename;
44: char fileext[256];
45:
46: if (argc == 1)
47: filename = "a.out";
48: else
49: filename = argv[1];
50:
51: exe_file = open(filename, O_RDONLY,0444);
52: if (exe_file == -1) {
53: perror(filename);
54: exit(2);
55: }
56: snprintf(fileext, sizeof fileext, "%c%cboot", filename[4], filename[5]);
57: tape_vid = open(fileext, O_WRONLY|O_CREAT|O_TRUNC, 0644);
58: snprintf(fileext, sizeof fileext, "boot%c%c", filename[4], filename[5]);
59: tape_exe = open(fileext, O_WRONLY|O_CREAT|O_TRUNC,0644);
60:
61: pcpul = (struct mvmedisklabel *)malloc(sizeof(struct mvmedisklabel));
62: bzero(pcpul, sizeof(struct mvmedisklabel));
63:
64: pcpul->version = 1;
65: memcpy(pcpul->vid_id, "M88K", sizeof pcpul->vid_id);
66:
67: fstat(exe_file, &stat);
68: /* size in 256 byte blocks round up after a.out header removed */
69:
70: if (filename[5] == 't' ) {
71: pcpul->vid_oss = 1;
72: }else {
73: pcpul->vid_oss = 2;
74: }
75: pcpul->vid_osl = (((stat.st_size -0x20) +511) / 512) *2;
76:
77: lseek(exe_file, 0x14, SEEK_SET);
78: read(exe_file, &exe_addr, 4);
79:
80: /* check this, it may not work in both endian. */
81: /* No, it doesn't. Use a big endian machine for now. SPM */
82:
83: {
84: union {
85: struct s {
86: unsigned short s1;
87: unsigned short s2;
88: } s;
89: unsigned long l;
90: } a;
91: a.l = exe_addr;
92: pcpul->vid_osa_u = a.s.s1;
93: pcpul->vid_osa_l = a.s.s2;
94:
95: }
96: pcpul->vid_cas = 1;
97: pcpul->vid_cal = 1;
98: /* do not want to write past end of structure, not null terminated */
99: strncpy(pcpul->vid_mot, "MOTOROLA", 8);
100:
101: if (BYTE_ORDER != BIG_ENDIAN)
102: swabvid(pcpul);
103:
104: pcpul->cfg_rec = 0x100;
105: pcpul->cfg_psm = 0x200;
106:
107: if (BYTE_ORDER != BIG_ENDIAN)
108: swabcfg(pcpul);
109:
110: write(tape_vid, pcpul, sizeof(struct mvmedisklabel));
111:
112: free(pcpul);
113:
114: copy_exe(exe_file, tape_exe);
115: close(exe_file);
116: close(tape_vid);
117: close(tape_exe);
118: return (0);
119: }
120:
121: #define BUF_SIZ 512
122: void
123: copy_exe(exe_file, tape_exe)
124: int exe_file, tape_exe;
125: {
126: char *buf;
127: int cnt = 0;
128:
129: buf = (char *)malloc(BUF_SIZ);
130:
131: lseek (exe_file, 0x20, SEEK_SET);
132: while (BUF_SIZ == (cnt = read(exe_file, buf, BUF_SIZ))) {
133: write(tape_exe, buf, cnt);
134: }
135: bzero(&buf[cnt], BUF_SIZ-cnt);
136: write(tape_exe, buf, BUF_SIZ);
137: }
138:
139: void
140: swabvid(pcpul)
141: struct mvmedisklabel *pcpul;
142: {
143: swap32(pcpul->vid_oss);
144: swap16(pcpul->vid_osl);
145: #if 0
146: swap16(pcpul->vid_osa_u);
147: swap16(pcpul->vid_osa_l);
148: #endif
149: swap32(pcpul->vid_cas);
150: }
151:
152: void
153: swabcfg(pcpul)
154: struct mvmedisklabel *pcpul;
155: {
156: swap16(pcpul->cfg_atm);
157: swap16(pcpul->cfg_prm);
158: swap16(pcpul->cfg_atm);
159: swap16(pcpul->cfg_rec);
160: swap16(pcpul->cfg_trk);
161: swap16(pcpul->cfg_psm);
162: swap16(pcpul->cfg_shd);
163: swap16(pcpul->cfg_pcom);
164: swap16(pcpul->cfg_rwcc);
165: swap16(pcpul->cfg_ecc);
166: swap16(pcpul->cfg_eatm);
167: swap16(pcpul->cfg_eprm);
168: swap16(pcpul->cfg_eatw);
169: swap16(pcpul->cfg_rsvc1);
170: swap16(pcpul->cfg_rsvc2);
171: }
CVSweb