init()関数でターゲットおよびLCDを初期化します。
loadimg()関数がLCD表示を行う関数で、付録基板のGDBスタブ領域（0x20000）から一画面分のデータを決めうちで読み出して、LCDへ転送します。
実行例:
OK
init()
Init ColdFire Ports
Init LCD Driver (Philips PCF8833)
OK
loadimg()
Load Image to LCD from 0x20000 (takes long time...)
.....
OK
しかし、この最後のLCDへの転送が非常に遅くて、数十分のオーダの時間が掛かります。コード自体はもう少し最適化できると思いますし、CodeWarriorでユーザドライバというのも考えたのですが、そこまでの気力はありませんでした。
// LCD Display for Interface magazine's ColdFire Board
//
// * Silent-C (very slow...)
// * Nokia 6100 breakout board from Sparkfun electronics
//
// Taipapa
// Pin assignment
// 55 (AN0) <-> #CS (brown)
// 54 (AN1) <-> SCK (green)
// 53 (AN2) <-> DIO (blue)
// 52 (AN3) <-> #RESET (yellow)
char *ispbar = 0x40000000;
char *panpar = 0x4010006a;
char *ddran = 0x40100022;
char *portan = 0x4010000a;
// set signals
sigs(char cs, char sck, char dio, char reset)
{
char v;
v = ((reset<<3) | (dio << 2) | (sck << 1) | cs);
*portan = v;
}
// set signals, assume reset=1 and cs=0
sigs2(char sck, char dio)
{
*portan = (8 + (dio<<2) + (sck<<1));
}
// send 1 byte to LCD
// 0: command, 1: data
send(char cmd, char val)
{
int i;
char bit;
sigs(0, 0, 0, 1);
sigs2(0, cmd);
sigs2(1, cmd);
for(i=0; i<8; i++) {
bit = (val >> (7-i)) & 1;
sigs2(0, bit);
sigs2(1, bit);
}
sigs(1, 0, 0, 1);
}
// Initialization for Philips PCF8833
lcdinit()
{
PrStr("Init LCD Driver (Philips PCF8833)\r\n");
send(0, 0x11); // SLPOUT
send(0, 0x20); // INVON
send(0, 0x3A); // COLMOD
send(1, 0x3);
send(0, 0x36); // MADCTL
send(1, 0xc8);
send(0, 0x25); // SETCON
send(1, 0x30);
send(0, 0x29); // DISPON
}
// Initialization for ColdFire board
sysinit()
{
PrStr("Init ColdFire Ports\r\n");
// AN for digital out
*panpar = 0x0;
// AN for output
*ddran = 0xf;
// #RESET and #CS
sigs(1, 0, 0, 1);
}
init()
{
sysinit();
lcdinit();
}
loadimg()
{
int i;
char *p = 0x20000; // GDB stub area!!
PrStr("Load Image to LCD from 0x20000 (takes long time...)\r\n");
send(0, 0x2b); // PASET
send(1, 0);
send(1, 131);
send(0, 0x2a); // CASET
send(1, 0);
send(1, 131);
send(0, 0x2c); // RAMWR
for(i=0; i<26136; i++) {
if ((i & 0xff) == 0) {
PrStr(".");
}
send(1, *p);
p++;
}
send(0, 0); // NOP
}
以下、132x132のJPEGファイルをLCD転送用に変換する使い捨てスクリプトです。
これにJPEGファイルを食わせると、result.binというバイナリファイルが出来ます。それをCOLDFIRE.BINにリネームしてtftpでボードに転送すると、tftpサーバ側で自動的に0x20000からの領域に転送してくれます(転送後、PrHex(*0x20000)などで確認できます)。
スクリプト自体は、最近別の目的で作ったpythonスクリプトの流用で、ウィンドウを開くわけでもないのにGtkのPixmapを経由して変換を行うという、へなちょこスクリプトです。まあ使えれば良いのさ、ということにしておきます。
#!/usr/bin/env python
# JPEG to xfer format converter for Nokia 6100 LCD
# USAGE: nomia6001img.py jpg-file
# * Jpeg-file must be 132x132 jpeg file.
# * Output file is "result.bin"
import sys
import gobject
import math
try:
import pygtk
pygtk.require("2.0")
except:
pass
try:
import gtk
import gtk.glade
except:
sys.exit(1)
buf = gtk.gdk.pixbuf_new_from_file(sys.argv[1])
x = buf.get_width()
y = buf.get_height()
# Size check
print "x =",x, "y =", y;
if (x!=132 or y!=132):
print "Size mismatch"
exit(1)
# Create pixmap
pix = gtk.gdk.Pixmap(None, x, y, 24)
vis = gtk.gdk.Visual(24, gtk.gdk.VISUAL_TRUE_COLOR);
cm = gtk.gdk.Colormap(vis, False)
pix.set_colormap(cm);
pix.draw_pixbuf(None, buf, 0, 0, 0, 0)
# Output result.bin
img = pix.get_image(0, 0, x, y)
f = open("result.bin", "wb")
for j in xrange(y):
for i in xrange(x/2):
p = img.get_pixel(i*2, j)
col = cm.query_color(p)
print "r1:", col.red, "g1:", col.green, "b1:", col.blue
r1 = col.red >> 12
g1 = col.green >> 12
b1 = col.blue >> 12
p = img.get_pixel(i*2+1, j)
col = cm.query_color(p)
print "r2:", col.red, "g2:", col.green, "b2:", col.blue
r2 = col.red >> 12
g2 = col.green >> 12
b2 = col.blue >> 12
# format is bgr
byte1 = b1 << 4 | g1
byte2 = r1 << 4 | b2
byte3 = g2 << 4 | r2
f.write(chr(byte1))
f.write(chr(byte2))
f.write(chr(byte3))
f.close
