require ./linux.fs

0 VALUE fb         \ Filedeskriptor für Grafikgerät
0 VALUE console    \ Filedeskriptor für Konsolengerät
0 VALUE video-mem  \ Zeiger zum Grafikspeicher (von +GRAPHICS gesetzt)

: +grafik ( -- )  \ Grafikmodus initialisieren;
   \ Daraufhin ist der Grafikspeicher über video-mem adressierbar
   s" /dev/fb0" R/W OPEN-FILE THROW fileno TO fb
   0   fb   0   320 240 * 4 *
   PROT_READ PROT_WRITE OR   MAP_SHARED   mmap TO video-mem
   video-mem 0< ABORT" mmap fehlgeschlagen!"
   s" /dev/tty" R/W OPEN-FILE THROW fileno TO console
   console KDSETMODE KD_GRAPHICS ioctl
   0< ABORT" ioctl KDSETMODE fehlgeschlagen!" ;
: -grafik  ( -- ) \ Zurück zum Textmodus
   console KDSETMODE KD_TEXT ioctl
   0< ABORT" ioctl KDSETMODE fehlgeschlagen!" ;