Changeset 3290


Ignore:
Timestamp:
11/05/08 01:04:35 (5 years ago)
Author:
bsittler
Message:

preliminary port of jylam and sam's test.cs to PHP using an early version of nico's caca.php; right now it looks in dirname($argv[0]) . "/.." for caca.php, which will need to be fixed once caca.php is installed in a php standard include directory

File:
1 edited

Legend:

Unmodified
Added
Removed

  • libcaca/trunk/caca-php/examples/test.php

    • Property svn:executable set to *
    r3289 r3290  
    1 /* 
    2  *  Test          .NET bindings test program 
    3  *  Copyright (c) 2006 Jean-Yves Lamoureux <jylam@lnxscene.org> 
    4  *                2007 Sam Hocevar <sam@zoy.org> 
    5  *                All Rights Reserved 
    6  * 
    7  *  $Id$ 
    8  * 
    9  *  This program is free software. It comes without any warranty, to 
    10  *  the extent permitted by applicable law. You can redistribute it 
    11  *  and/or modify it under the terms of the Do What The Fuck You Want 
    12  *  To Public License, Version 2, as published by Sam Hocevar. See 
    13  *  http://sam.zoy.org/wtfpl/COPYING for more details. 
    14  */ 
     1#!/usr/bin/php5 
     2<?php 
     3  /* 
     4   *  Test          PHP bindings test program 
     5   *  Copyright (c) 2008 Benjamin C. Wiley Sittler <bsittler@gmail.com> 
     6   * 
     7   *  This file is a Php port of "caca-sharp/test.cs" 
     8   *  which is:  
     9   *  Copyright (c) 2006 Jean-Yves Lamoureux <jylam@lnxscene.org> 
     10   *                2007 Sam Hocevar <sam@zoy.org> 
     11   *                All Rights Reserved 
     12   * 
     13   *  $Id$ 
     14   * 
     15   *  This program is free software. It comes without any warranty, to 
     16   *  the extent permitted by applicable law. You can redistribute it 
     17   *  and/or modify it under the terms of the Do What The Fuck You Want 
     18   *  To Public License, Version 2, as published by Sam Hocevar. See 
     19   *  http://sam.zoy.org/wtfpl/COPYING for more details. 
     20   */ 
    1521 
    16  
    17 using System; 
    18 using System.Drawing; 
    19 using System.Runtime.InteropServices; 
    20  
    21 using Caca; 
    22  
    23 class DemoCanvas : Canvas 
    24 { 
    25     private uint[,] image; 
    26  
    27     private DateTime startTime; 
    28     private Dither d; 
    29     private Canvas scroll; 
    30  
    31     public DemoCanvas() 
    32     { 
    33         startTime = DateTime.Now; 
    34  
    35         string message = " --- POWERED BY LIBCACA --- OLDSCHOOL TEXT EFFECTS ARE 100% PURE WIN"; 
    36  
    37         scroll = new Canvas(new Size(message.Length, 1)); 
    38         scroll.setColorAnsi(AnsiColor.WHITE, AnsiColor.TRANSPARENT); 
    39         scroll.putStr(new Point(0, 0), message); 
    40  
    41         Caca.Font f = new Caca.Font(Caca.Font.getList()[1]); 
    42         int w = f.Size.Width * message.Length; 
    43         int h = f.Size.Height; 
    44         image = new uint[w, h]; 
    45         d = new Dither(32, new Size(w, h), w * 4, 
    46                             0xff00, 0xff0000, 0xff000000, 0xff); 
    47         f.Render(scroll, image, image.GetLength(0) * 4); 
    48     } 
    49  
    50     public void Draw() 
    51     { 
    52         int barCount = 6; 
    53         double t = (DateTime.Now - startTime).TotalMilliseconds; 
    54  
    55         Clear(); 
    56  
    57         setColorAnsi(AnsiColor.WHITE, AnsiColor.BLACK); 
    58         for(int i = 0; i < barCount; i++) 
    59         { 
    60             double v = ((Math.Sin((t / 500.0) 
    61                           + (i / ((double)barCount))) + 1) / 2) * Size.Height; 
    62             Point p1 = new Point(0, (int)v); 
    63             Point p2 = new Point(Size.Width - 1, (int)v); 
    64  
    65             setColorAnsi((uint)(i + 9), AnsiColor.BLACK); 
    66             /* drawLine is already clipped, we don't care about overflows */ 
    67             drawLine(p1 + new Size(0, -2), p2 + new Size(0, -2), '-'); 
    68             drawLine(p1 + new Size(0, -1), p2 + new Size(0, -1), '*'); 
    69             drawLine(p1,                   p2,                   '#'); 
    70             drawLine(p1 + new Size(0,  1), p2 + new Size(0,  1), '*'); 
    71             drawLine(p1 + new Size(0,  2), p2 + new Size(0,  2), '-'); 
    72         } 
    73  
    74         int w = Size.Width; 
    75         int h = Size.Height; 
    76         int x = (int)(t / 10) % (12 * w); 
    77         int y = (int)(h * (2.0 + Math.Sin(t / 200.0)) / 4); 
    78         ditherBitmap(new Rectangle(- x, h / 2 - y, w * 12, y * 2), d, image); 
    79         ditherBitmap(new Rectangle(12 * w - x, h / 2 - y, w * 12, y * 2), d, image); 
    80  
    81         setColorAnsi(AnsiColor.WHITE, AnsiColor.BLUE); 
    82         putStr(new Point(-30, -2) + Size, " -=[ Powered by libcaca ]=- "); 
    83         setColorAnsi(AnsiColor.WHITE, AnsiColor.BLACK); 
    84     } 
     22if (php_sapi_name() != "cli") { 
     23        die("You have to run this program with php-cli!\n"); 
    8524} 
    8625 
    87 class DemoDisplay : Display 
     26include dirname($argv[0]) . '/../caca.php'; 
     27 
     28class DemoCanvas extends Canvas 
    8829{ 
    89     private DemoCanvas cv; 
     30        private $image; 
    9031 
    91     public DemoDisplay(DemoCanvas _cv) : base(_cv) 
    92     { 
    93         Title = "libcaca .NET Bindings test suite"; 
    94         DisplayTime = 20000; // Refresh every 20 ms 
    95         cv = _cv; 
    96     } 
     32        private $startTime; 
     33        private $d; 
     34        private $scroll; 
    9735 
    98     public void EventLoop() 
    99     { 
    100         Event ev; 
     36        function __construct() 
     37        { 
     38                parent::__construct(); 
     39                $this->startTime = gettimeofday(true); 
    10140 
    102         while((ev = getEvent(EventType.KEY_RELEASE, 10)).Type == 0) 
    103         { 
    104             cv.Draw(); 
     41                $message = " --- POWERED BY LIBCACA --- OLDSCHOOL TEXT EFFECTS ARE 100% PURE WIN"; 
    10542 
    106             Refresh(); 
    107         } 
     43                $this->scroll = new Canvas(strlen($message), 1); 
     44                $this->scroll->setColorAnsi(CACA_WHITE, CACA_TRANSPARENT); 
     45                $this->scroll->putStr(0, 0, $message); 
    10846 
    109         if(ev.KeyCh > 0x20 && ev.KeyCh < 0x7f) 
    110             Console.WriteLine("Key pressed: {0}", ev.KeyUtf8); 
    111         else 
    112             Console.WriteLine("Key pressed: 0x{0:x}", ev.KeyCh); 
    113     } 
     47                $fontList = Font::getList(); 
     48                $f = new Font($fontList[1]); 
     49                $w = $f->getWidth() * strlen($message); 
     50                $h = $f->getHeight(); 
     51                $this->image = imagecreatetruecolor($w, $h); 
     52                imagefilledrectangle($this->image, 0, 0, $w - 1, $h - 1, imagecolorallocatealpha($this->image, 0, 0, 0, 127)); 
     53                imagealphablending($this->image, false); 
     54                imagesavealpha($this->image, true); 
     55                $this->d = new Dither($this->image); 
     56                $f->Render($this->scroll, $this->image); 
     57                imagepng($this->image, "out.png"); 
     58        } 
     59 
     60        function Draw() 
     61        { 
     62                $barCount = 6; 
     63                $t = (gettimeofday(true) - $this->startTime) * 1000; 
     64 
     65                $this->Clear(); 
     66 
     67                $this->setColorAnsi(CACA_WHITE, CACA_BLACK); 
     68                for($i = 0; $i < $barCount; $i++) 
     69                { 
     70                        $v = ((sin(($t / 500.0) 
     71                                        + (1.0 * $i / $barCount)) + 1) / 2) * $this->getHeight(); 
     72                        $p1_x = 0; $p1_y = intval($v); 
     73                        $p2_x = $this->getWidth() - 1; $p2_y = intval($v); 
     74 
     75                        $this->setColorAnsi(($i + 9), CACA_BLACK); 
     76                        /* drawLine is already clipped, we don't care about overflows */ 
     77                        $this->drawLine($p1_x + 0, $p1_y - 2, $p2_x + 0, $p2_y - 2, ord('-')); 
     78                        $this->drawLine($p1_x + 0, $p1_y - 1, $p2_x + 0, $p2_y - 1, ord('*')); 
     79                        $this->drawLine($p1_x,     $p1_y,     $p2_x,     $p2_y,     ord('#')); 
     80                        $this->drawLine($p1_x + 0, $p1_y + 1, $p2_x + 0, $p2_y + 1, ord('*')); 
     81                        $this->drawLine($p1_x + 0, $p1_y + 2, $p2_x + 0, $p2_y + 2, ord('-')); 
     82                } 
     83 
     84                $w = $this->getWidth(); 
     85                $h = $this->getHeight(); 
     86                $x = intval(($t / 10) % (12 * $w)); 
     87                $y = intval($h * (2.0 + sin($t / 200.0)) / 4); 
     88                $this->d->bitmap($this, - $x, $h / 2 - $y, $w * 12, $y * 2); 
     89                $this->d->bitmap($this, 12 * $w - $x, $h / 2 - $y, $w * 12, $y * 2); 
     90   
     91                $this->setColorAnsi(CACA_WHITE, CACA_BLUE); 
     92                $this->putStr($this->getWidth() - 30, $this->getHeight() - 2, " -=[ Powered by libcaca ]=- "); 
     93                $this->setColorAnsi(CACA_WHITE, CACA_BLACK); 
     94        } 
     95} 
     96 
     97class DemoDisplay extends Display 
     98{ 
     99        private $cv; 
     100 
     101        function __construct(DemoCanvas $_cv) 
     102        { 
     103                parent::__construct($_cv); 
     104                $this->setTitle("libcaca PHP Bindings test suite"); 
     105                $this->setDisplayTime(20000); // Refresh every 20 ms 
     106                $this->cv = $_cv; 
     107        } 
     108 
     109        function EventLoop() 
     110        { 
     111                while(! ($ev = $this->getEvent(CACA_EVENT_KEY_RELEASE, 10))) 
     112                { 
     113                        $this->cv->Draw(); 
     114 
     115                        $this->Refresh(); 
     116                } 
     117 
     118                if($ev->getKeyCh() > 0x20 && $ev->getKeyCh() < 0x7f) 
     119                        printf("Key pressed: %c\n", $ev->getKeyCh()); 
     120                else 
     121                        printf("Key pressed: 0x%x\n", $ev->getKeyCh()); 
     122        } 
    114123} 
    115124 
    116125class Test 
    117126{ 
    118     public static void Main() 
    119     { 
    120         Console.WriteLine("libcaca {0} .NET test", Libcaca.getVersion()); 
    121         Console.WriteLine("(c) 2006 Jean-Yves Lamoureux <jylam@lnxscene.org>"); 
     127        static function Main() 
     128        { 
     129                printf("libcaca %s PHP test\n", caca_get_version()); 
     130                printf("(c) 2006 Jean-Yves Lamoureux <jylam@lnxscene.org>\n"); 
     131                printf("(c) 2007 Sam Hocevar <sam@zoy.org>\n"); 
     132                printf("(c) 2008 Benjamin C. Wiley Sittler <bsittler@gmail.com>\n"); 
    122133 
    123         /* Instanciate a caca canvas */ 
    124         DemoCanvas cv = new DemoCanvas(); 
     134                /* Instanciate a caca canvas */ 
     135                $cv = new DemoCanvas(); 
    125136 
    126         /* We have a proper canvas, let's display it using Caca */ 
    127         DemoDisplay dp = new DemoDisplay(cv); 
     137                /* We have a proper canvas, let's display it using Caca */ 
     138                $dp = new DemoDisplay($cv); 
    128139 
    129         /* Random number. This is a static method, 
    130            not to be used with previous instance */ 
    131         Console.WriteLine("A random number: {0}", Libcaca.Rand(0, 1337)); 
     140                /* Random number. This is a static method, 
     141                not to be used with previous instance */ 
     142                printf("A random number: %d\n", caca_rand(0, 1337)); 
    132143 
    133         dp.EventLoop(); 
    134     } 
     144                $dp->EventLoop(); 
     145        } 
    135146} 
    136147 
     148Test::Main(); 
     149 
     150?> 
Note: See TracChangeset for help on using the changeset viewer.