File: [local] / sys / arch / mvme68k / stand / wrtvid / wrtvid.c (download)
Revision 1.1.1.1 (vendor branch), Tue Mar 4 16:07:37 2008 UTC (16 years, 6 months ago) by nbrk
Branch: OPENBSD_4_2_BASE, MAIN
CVS Tags: jornada-partial-support-wip, HEAD Changes since 1.1: +0 -0 lines
Import of OpenBSD 4.2 release kernel tree with initial code to support
Jornada 720/728, StrongARM 1110-based handheld PC.
At this point kernel roots on NFS and boots into vfs_mountroot() and traps.
What is supported:
- glass console, Jornada framebuffer (jfb) works in 16bpp direct color mode
(needs some palette tweaks for non black/white/blue colors, i think)
- saic, SA11x0 interrupt controller (needs cleanup)
- sacom, SA11x0 UART (supported only as boot console for now)
- SA11x0 GPIO controller fully supported (but can't handle multiple interrupt
handlers on one gpio pin)
- sassp, SSP port on SA11x0 that attaches spibus
- Jornada microcontroller (jmcu) to control kbd, battery, etc throught
the SPI bus (wskbd attaches on jmcu, but not tested)
- tod functions seem work
- initial code for SA-1111 (chip companion) : this is TODO
Next important steps, i think:
- gpio and intc on sa1111
- pcmcia support for sa11x0 (and sa1111 help logic)
- REAL root on nfs when we have PCMCIA support (we may use any of supported pccard NICs)
- root on wd0! (using already supported PCMCIA-ATA)
|
/* $OpenBSD: wrtvid.c,v 1.7 2007/06/17 00:28:56 deraadt Exp $ */
/*
* Copyright (c) 1995 Dale Rahn <drahn@openbsd.org>
*
* Permission to use, copy, modify, and distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/disklabel.h>
#include <fcntl.h>
#include <unistd.h>
#include <stdio.h>
#define __DBINTERFACE_PRIVATE
#include <db.h>
#define BUF_SIZ 512
static void
copy_exe(int exe_file, int tape_exe)
{
char *buf;
int cnt = 0;
buf = (char *)malloc(BUF_SIZ);
lseek (exe_file, 0x20, SEEK_SET);
while (BUF_SIZ == (cnt = read(exe_file, buf, BUF_SIZ)))
write(tape_exe, buf, cnt);
bzero(&buf[cnt], BUF_SIZ-cnt);
write(tape_exe, buf, BUF_SIZ);
}
static void
swabvid(struct mvmedisklabel *pcpul)
{
M_32_SWAP(pcpul->vid_oss);
M_16_SWAP(pcpul->vid_osl);
/*
M_16_SWAP(pcpul->vid_osa_u);
M_16_SWAP(pcpul->vid_osa_l);
*/
M_32_SWAP(pcpul->vid_cas);
}
static void
swabcfg(struct mvmedisklabel *pcpul)
{
M_16_SWAP(pcpul->cfg_atm);
M_16_SWAP(pcpul->cfg_prm);
M_16_SWAP(pcpul->cfg_atm);
M_16_SWAP(pcpul->cfg_rec);
M_16_SWAP(pcpul->cfg_trk);
M_16_SWAP(pcpul->cfg_psm);
M_16_SWAP(pcpul->cfg_shd);
M_16_SWAP(pcpul->cfg_pcom);
M_16_SWAP(pcpul->cfg_rwcc);
M_16_SWAP(pcpul->cfg_ecc);
M_16_SWAP(pcpul->cfg_eatm);
M_16_SWAP(pcpul->cfg_eprm);
M_16_SWAP(pcpul->cfg_eatw);
M_16_SWAP(pcpul->cfg_rsvc1);
M_16_SWAP(pcpul->cfg_rsvc2);
}
int
main(int argc, char *argv[])
{
struct mvmedisklabel *pcpul;
struct stat stat;
int exe_file;
int tape_vid;
int tape_exe;
unsigned int exe_addr;
unsigned short exe_addr_u;
unsigned short exe_addr_l;
char *filename;
char fileext[256];
char filebase[256];
if (argc == 0)
filename = "a.out";
else
filename = argv[1];
exe_file = open(filename, O_RDONLY,0444);
if (exe_file == -1) {
perror(filename);
exit(2);
}
snprintf(fileext, sizeof fileext, "%c%cboot", filename[4], filename[5]);
tape_vid = open(fileext, O_WRONLY|O_CREAT|O_TRUNC, 0644);
snprintf(fileext, sizeof fileext, "boot%c%c", filename[4], filename[5]);
tape_exe = open(fileext, O_WRONLY|O_CREAT|O_TRUNC,0644);
pcpul = (struct mvmedisklabel *)malloc(sizeof(struct mvmedisklabel));
bzero(pcpul, sizeof(struct mvmedisklabel));
memcpy(pcpul->vid_id, "NBSD", sizeof pcpul->vid_id);
fstat(exe_file, &stat);
/* size in 256 byte blocks round up after a.out header removed */
if (filename[5] == 't' ) {
pcpul->vid_oss = 1;
} else {
pcpul->vid_oss = 2;
}
pcpul->vid_osl = (((stat.st_size -0x20) +511) / 512) *2;
lseek(exe_file, 0x14, SEEK_SET);
read(exe_file, &exe_addr, 4);
/* check this, it may not work in both endian. */
{
union {
struct s {
unsigned short s1;
unsigned short s2;
} s;
unsigned long l;
} a;
a.l = exe_addr;
pcpul->vid_osa_u = a.s.s1;
pcpul->vid_osa_l = a.s.s2;
}
pcpul->vid_cas = 1;
pcpul->vid_cal = 1;
/* do not want to write past end of structure, not null terminated */
strncpy(pcpul->vid_mot, "MOTOROLA", 8);
if (BYTE_ORDER != BIG_ENDIAN)
swabvid(pcpul);
pcpul->cfg_rec = 0x100;
pcpul->cfg_psm = 0x200;
if (BYTE_ORDER != BIG_ENDIAN)
swabcfg(pcpul);
write(tape_vid, pcpul, sizeof(struct mvmedisklabel));
free(pcpul);
copy_exe(exe_file, tape_exe);
close(exe_file);
close(tape_vid);
close(tape_exe);
return (0);
}