URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [rtos/] [ecos-3.0/] [packages/] [devs/] [framebuf/] [synth/] [current/] [host/] [framebuf.tdf] - Rev 791
Go to most recent revision | Compare with Previous | Blame | View Log
# Target definition file fragment for framebuffer devices.
#
# The main support available is for controlled creation
# of the Tk frames in which the eCos framebuffer data will
# be displayed. By default the main framebuf.tcl script will
# create the
proc my_framebuf_create_frame { id magnification depth little_endian width height viewport_width viewport_height stride number_pages format} {
toplevel .ecosfb$id
wm title .ecosfb$id "eCos FB[set id]: $width*$height*\#depth"
wm iconbitmap .ecosfb$id $framebuf::image_framebuf_icon
wm iconmask .ecosfb$id $framebuf::image_framebufmask_icon
wm protocol .ecosfb$id ""
frame .ecosfb$id.frame -container 1 -height [expr $magnification * $viewport_height] -width [expr $magnification * $viewport_width]
pack .ecosfb$id.frame -side top -expand 0
return .ecosfb$id.frame
}
synth_device framebuf {
# Customize how the eCos framebuffer appears on the X display.
# The argument should be a function which takes a long list of
# arguments, as above, and returns a Tk frame id. Spawning the
# C program is still the responsibility of the main framebuf.tcl
# script.
create_frame_proc my_framebuf_create_frame
# Optional magnification for all four permitted framebuffer
# devices. Magnification can be 1, 2, 3 or 4
# fb0_magnification 2
# fb1_magnification 4
# fb2_magnification 3
# fb4_magnification 1
}
Go to most recent revision | Compare with Previous | Blame | View Log