OpenEuphoria

2. Re: Linux eubins and console colours

• Posted by ChrisB (moderator) Feb 10, 2010
• 1550 views

Something that I didn't notice before.

Running this code

#!/home/crylex/euphoria/bin/eui 
--test terminal colours - seems to be working on some terminals, but not others 
 
include std/graphics.e 
include std/graphcst.e 
include std/text.e 
include std/console.e 
 
integer ESC = 27 
 
integer key 
 
sequence colour_names = {"BLACK", 
                        "GREEN", 
                        "MAGENTA", 
                        "WHITE", 
                        "GRAY", 
                        "BRIGHT_GREEN", 
                        "BRIGHT_MAGENTA", 
                        "BRIGHT_WHITE", 
                        "BLUE", 
                        "CYAN", 
                        "RED", 
                        "BROWN", 
                        "BRIGHT_BLUE", 
                        "BRIGHT_CYAN", 
                        "BRIGHT_RED", 
                        "YELLOW"} 
sequence colour_values =  
                        {BLACK, 
                         GREEN, 
                         MAGENTA, 
                         WHITE, 
                         GRAY, 
                         BRIGHT_GREEN, 
                         BRIGHT_MAGENTA, 
                         BRIGHT_WHITE, 
                         BLUE, 
                         CYAN, 
                         RED, 
                         BROWN, 
                         BRIGHT_BLUE, 
                         BRIGHT_CYAN, 
                         BRIGHT_RED, 
                         YELLOW 
                        } 
 
integer fgrnd = 1, bgrnd = 1 
sequence fgn = "", bgn = "" 
integer blink_on = 0 
 
 
while 1 do 
        text_color(WHITE) 
        bk_color(BLACK) 
 
        clear_screen() 
        position(1,1) 
        puts(1,"This tests the screen colour capabilities of the terminal\n") 
        puts(1, "F - advance foreground colour\n") 
        puts(1, "B - advance background colour\n") 
 
 
        --get fg and bg names 
        fgn = "" bgn = "" 
        for i = 1 to 16 do 
                if colour_values[i] = fgrnd then 
                        fgn = colour_names[i] 
                end if 
        end for 
 
        for i = 1 to 16 do 
                if colour_values[i] = bgrnd then 
                        bgn = colour_names[i] 
                end if 
        end for 
 
        position(5,1) 
	text_color(WHITE) 
	bk_color(BLACK) 
 
        printf(1, "%-10s %-20s %-10s\n", {"", "Name", "Value"}) 
        printf(1, "%-10s %-20s %-10d\n", {"Fore", fgn, fgrnd}) 
        printf(1, "%-10s %-20s %-10d\n", {"Back", bgn, bgrnd}) 
        printf(1, "%-10s %d\n\n\n\n", {"Blink", blink_on}) 
 
        text_color(fgrnd + (blink_on * 16) ) 
        bk_color(bgrnd) 
 
        puts(1, "----------------------------------------------\n") 
        puts(1, "This is an example of what it would look like!\n") 
        puts(1, "----------------------------------------------\n") 
 
        key = wait_key() 
        if key = ESC then exit end if 
         
        if upper(key) = 'B' then 
              bgrnd += 1 
              if bgrnd = 17 then bgrnd = 1 end if 
        end if 
        if upper(key) = 'F' then 
              fgrnd += 1 
              if fgrnd = 17 then fgrnd = 1 end if 
        end if 
        if upper(key) = 'L' then 
              blink_on = (blink_on - 1) * -1 
        end if 
 
end while 

with r3061, on consoles that work, the background shows the bright colours, but with r2067 the background does not show the bright colours, just the normal colours (so BRIGHT_BLUE comes out as BLUE for instance)

Chris

4. Re: Linux eubins and console colours

• Posted by ChrisB (moderator) Feb 10, 2010
• 1538 views

Hi Derek

http://jeremy.cowgar.com/eubins/linux/eu40-3082.tar.gz

has a file size of 119 bytes (see the top of this post). Are the bins stored in a different place now?

Cheers

Chris

6. Re: Linux eubins and console colours

• Posted by mattlewis (admin) Feb 10, 2010
• 1544 views

There were some changes to configure and the makefile, so you probably just need to re-run configure and it should be back on track.

Matt

8. Re: Linux eubins and console colours

• Posted by DerekParnell (admin) Feb 10, 2010
• 1532 views

It seems that newer consoles use the AIX ANSI Escape sequences for bright colors but older ones (and MS-DOS) use the bold mode to brighten the colors.

Newer:  \e[91m 
 
Older: \e[1;31m 

I made the recent change just use the 'bold' method but we probably should implement a better option later.

10. Re: Linux eubins and console colours

• Posted by jeremy (admin) Feb 11, 2010
• 1542 views

My script does:

#!/bin/sh 
 
export EUDIR=/home/jeremy/eubuild/eu 
export PATH=$EUDIR/bin:$PATH 
 
cd $EUDIR 
svn status --show-updates | grep \\* 
if [ $? -eq 1 ]; then 
  exit 
fi 
 
svn up --force 
REV=`svn info|grep Revision|cut -d " " -f 2` 
 
cd $EUDIR/source 
pwd 
make clean distclean 
./configure --build build 
echo EUBIN=$EUDIR/bin >> Makefile.eu 
make 
mkdir eu40-$REV 
cd build 
cp eui euc eub eu.a ../eu40-$REV 
cp eui euc eub eu.a ../../bin 
cd .. 
tar czf $HOME/webs/jeremy.cowgar.com/htdocs/eubins/linux/eu40-$REV.tar.gz eu40-$REV 
rm -r eu40-$REV 
 
cd $EUDIR/tests 
../bin/eutest -log 
../bin/eutest -process-log -html > $REV.html 
mv $REV.html $HOME/webs/jeremy.cowgar.com/htdocs/eubins/unittesting 

Would that of not handled it?

Jeremy

12. Re: Linux eubins and console colours

• Posted by mattlewis (admin) Feb 13, 2010
• 1501 views

gcc: /home/jeremy/eubuild/eu/source/build/intobj/back/be_callc.o: No such file or directory 

make[1]: Entering directory `/home/jeremy/eubuild/eu/source' 
gcc -c -w -DEUNIX  -DELINUX -fsigned-char -Os -O3 -ffast-math -fno-defer-pop  be_callc.c -obe_callc.o 
gcc -S -w -DEUNIX  -DELINUX -fsigned-char -Os -O3 -ffast-math -fno-defer-pop  be_callc.c -obe_callc.s 

I've never actually used the --build configure option explicitly before. I just committed (svn:3089) an update for the Makefile, so the eubins should get back on track now.

Matt

14. Re: Linux eubins and console colours

• Posted by ChrisB (moderator) Feb 15, 2010
• 1316 views

Ta

Chris