Le blog de Jean David TECHER, un Réunionnais à Saint-Priest/Lyon

Aller au contenu | Aller au menu | Aller à la recherche


< 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 >

samedi 26 avril 2008

Encodage de fichier wmv et mov en flv etflv-player

C'est sur ma Ubuntu Feisty Studio que j'ai fait les conversions wmv--> flv.

Installation des Win32 Codecs sous Ubuntu Studio

Il me manquait les win32codecs. Pour les installer, il suffit de suivre les directives de http://doc.ubuntu-fr.org/w32codecs. Ce qui donne donc pour l'installation:
cd
wget http://www1.mplayerhq.hu/MPlayer/releases/codecs/essential-20061022.tar.bz2
mkdir /usr/lib/win32
tar xvjf  essential-20061022.tar.bz2
cp essential-20061022/* /usr/lib/win32/

Encodage en flv

Pour encoder des fichiers flv:

for i in *.wmv;
do video=$(basename ${i} .wmv); 
mencoder $i -forceidx -lavfopts i_certify_that_my_video_stream_does_not_use_b_frames -of lavf  \
-oac mp3lame -lameopts abr:br=56 -srate 22050 -ovc lavc -lavcopts \
vcodec=flv:vbitrate=500:mbd=2:mv0:trell:v4mv:cbp:last_pred=3 -vf scale=320:240 -o flv/${video}.flv; \
done
La ligne video=$(basename ${i} .wmv); est super pratique car elle permet de récupérer le nom d'un fichier sans le suffixe de l'extension. Au moins maintenant j'ai le son avec la vidéo

Le lecteur Flash flv-player

Les lecteurs Fash ne manquent pas sur internet. Un que j'ai de suite adopté c'est flv-player dont le site est http://flv-player.net/players/maxi/generator/ qui est très bien car il fourni un générateur de code qu'il suffti ensuite de copier dans son blog

Générerdes imagettes du film

Il faut avoir php compilé avec l'extension ffmpeg-php. Le script suivant que l'on invoque en ligne de commande par
php -q test_ffmepg.php
est disponible dans les sources de ffmpeg-php Je l'ai un peu arrangé à ma sauce histoire d'avoir 12 images en sortie. SOn contenu est le suivant
<?
/*
 * This test script is not part of the automatic regression tests. It serves
 * as a simple manual test script and an example of the syntax for calling
 * the ffmpeg-php functions
 *
 * To run it from the command line type 'php -q ffmpeg_test.php 'or from a
 * browser * copy this file into your web root and point your browser at it.
 */

$extension = "php_ffmpeg";
$extension_soname = $extension . "." . PHP_SHLIB_SUFFIX;
$extension_fullname = PHP_EXTENSION_DIR . "/" . $extension_soname;

// load extension
//if (!extension_loaded($extension)) {
//    dl($extension_soname) or die("Can't load extension $extension_fullname\n");
//}
if ( extension_loaded('ffmpeg') != 1)
{
    switch (PHP_OS)
    {
     case "WINNT": $php_suffix = ".dll";
                    break;

     default:  $php_suffix = ".so";
               break;
    }
  dl("ffmpeg.".PHP_SHLIB_SUFFIX);
}
if (php_sapi_name() != 'cgi') {
    echo '<pre>';
}

printf("ffmpeg-php version string: %s\n", FFMPEG_PHP_VERSION_STRING);
printf("libavcodec build number: %d\n", LIBAVCODEC_BUILD_NUMBER);
printf("libavcodec version number: %d\n", LIBAVCODEC_VERSION_NUMBER);
printf("libavcodec build number: %d\n", LIBAVCODEC_BUILD_NUMBER);

print_class_methods("ffmpeg_movie");
print_class_methods("ffmpeg_frame");
print_class_methods("ffmpeg_animated_gif");

// get an array for movies from the test media directory
$movies = getDirFiles('/var/www/videos/jana/videos');//dirname(__FILE__) . '/tests/test_media');

echo "--------------------\n\n";
foreach($movies as $movie) {
    $mov = new ffmpeg_movie($movie);
    printf("file name = %s\n", $mov->getFileName());
    printf("duration = %s seconds\n", $mov->getDuration());
    printf("frame count = %s\n", $mov->getFrameCount());
    printf("frame rate = %0.3f fps\n", $mov->getFrameRate());
    printf("comment = %s\n", $mov->getComment());
    printf("title = %s\n", $mov->getTitle());
    printf("author = %s\n", $mov->getAuthor());
    printf("copyright = %s\n", $mov->getCopyright());
    printf("get bit rate = %d\n", $mov->getBitRate());
    printf("has audio = %s\n", $mov->hasAudio() == 0 ? 'No' : 'Yes');
    if ($mov->hasAudio()) {
        printf("get audio codec = %s\n", $mov->getAudioCodec());
        printf("get audio bit rate = %d\n", $mov->getAudioBitRate());
        printf("get audio sample rate = %d \n", $mov->getAudioSampleRate());
        printf("get audio channels = %s\n", $mov->getAudioChannels());
    }
    printf("has video = %s\n", $mov->hasVideo() == 0 ? 'No' : 'Yes');
    if ($mov->hasVideo()) {
        printf("frame height = %d pixels\n", $mov->getFrameHeight());
        printf("frame width = %d pixels\n", $mov->getFrameWidth());
        printf("get video codec = %s\n", $mov->getVideoCodec());
        printf("get video bit rate = %d\n", $mov->getVideoBitRate());
        printf("get pixel format = %s\n", $mov->getPixelFormat());
        printf("get pixel aspect ratio = %s\n", $mov->getPixelAspectRatio());
        printf("get frame = %s\n", is_object($mov->getFrame(10)) ? 'true' : 'false');
        printf("get frame number = %d\n", $mov->getFrameNumber());
    }

$duration =intval( $mov->getFrameCount()/12.0);
for($IterFrame=1;$IterFrame<13;$IterFrame++){
$frame = $duration * $IterFrame;
$filename = $mov->getFileName();
$imgfilename =  dirname($filename)."/../images_max/".str_replace(".flv","_".$IterFrame."_.png",basename($filename));

$ff_frame = $mov->getFrame($frame);
if ($ff_frame) {
    $gd_image = $ff_frame->toGDImage();
    if ($gd_image) {
        $imgtmp = $imgfilename."tmp";
        printf("Génération de  l'image = %s...", $imgfilename);
        imagepng($gd_image,$imgtmp);
        resize_png($imgtmp, $imgfilename,184,144);
        imagedestroy($gd_image);
        printf("...[OK]\n");
       unlink($imgtmp);
    }
}
}


    echo "\n--------------------\n\n";
}

if (php_sapi_name() != 'cgi') {
    echo '</pre>';
}

/* FUNCTIONS */
function print_class_methods($class) {
    echo "\nMethods available in class '$class':\n";
    $methods = get_class_methods($class);
    if (is_array($methods)) {
        foreach($methods as $method) {
            echo $method . "\n";
        }
    } else {
        echo "No Methods Defined\n";
    }
}

function getDirFiles($dirPath)
{
    if ($handle = opendir($dirPath))
    {
        while (false !== ($file = readdir($handle))) {
            $fullpath = $dirPath . '/' . $file;
            if (!is_dir($fullpath) && $file != "CVS" && $file != "." && $file != "..")
                $filesArr[] = trim($fullpath);
        }
        closedir($handle);
    }

    return $filesArr;
}


function resize_png($src,$dst,$dstw,$dsth) {
    list($width, $height, $type, $attr) = getimagesize($src);
    $im = imagecreatefrompng($src);
    $tim = imagecreatetruecolor($dstw,$dsth);
    imagecopyresampled($tim,$im,0,0,0,0,$dstw,$dsth,$width,$height);
//    $tim = ImageTrueColorToPalette2($tim,false,255);
    imagepng($tim,$dst);
}
?>

dimanche 20 avril 2008

Mauvais temps sur Juan Les Pins et test de l'interface cliente en C de LIRC

Dimance aprem', il pleuvait comme pas possible sur Juan Les Pins, impossible de sortir, obligé de rester à la villa. Ludo (à Montpellier) m'avait appelé l'après-midi< pour me dire que le temps était aussi pourri sur Montpellier...Il fait pas beau..../p>

Du coup, j'en ai profité pour programmer peu notamment pour tester la librairie cliente de LIRC 0.8.1 vu que je l'avais ramené avec moi ma télécommande ATI Remote Wonder I de Montpellier.

Sur le site de LIRC, il y a un petit programme fourni à http://www.lirc.org/html/technical.html (Section The lirc_client library)

Je voulais afficher seulement les touches numériques de ma télécommande, pour se faire il faut le fichier de configuration suivant (par exemple)

Le fichier .lircrc

begin	
	prog   = irexec
	button = 0
	config = 0
	mode   = tvtime
end
begin	
	prog   = irexec
	button = 1
	config = 1
	mode   = tvtime
end
begin	
	prog   = irexec
	button = 2
	config = 2
	mode   = tvtime
end
begin	
	prog   = irexec
	button = 3
	config = 3
	mode   = tvtime
end
begin	
	prog   = irexec
	button = 4
	config = 4
	mode   = tvtime
end
begin	
	prog   = irexec
	button = 5
	config = 5
	mode   = tvtime
end
begin	
	prog   = irexec
	button = 6
	config = 6
	mode   = tvtime
end
begin	
	prog   = irexec
	button = 7
	config = 7
	mode   = tvtime
end
begin	
	prog   = irexec
	button = 8
	config = 8
	mode   = tvtime
end
begin	
	prog   = irexec
	button = 9
	config = 9
	mode   = tvtime
end
begin	
	prog   = irexec
	button = power
	config = exit
	mode   = tvtime
end

le programme pg_lirc

Le programme suivant que j'ai arrangé à ma sauce pour quitter proprement en appuyant sur la touche "Power" de la télécommande
#ifdef HAVE_CONFIG_H
# include <config.h>
#endif

#include <errno.h>
#include <unistd.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <lirc/lirc_client.h>

char *progname;

int main(int argc, char *argv[])
{
	struct lirc_config *config;
		char *code;
		char *c;
		int ret,done=1;
	progname=argv[0];
	if(argc>2)
	{
		fprintf(stderr,"Usage: %s <config file>\n",progname);
		exit(EXIT_FAILURE);
	}
	if(lirc_init("irexec",1)==-1) exit(EXIT_FAILURE);

	if(lirc_readconfig(argc==2 ? argv[1]:NULL,&config,NULL)==0)
	{
		while((done)*(lirc_nextcode(&code)==0))
		{
			if(code==NULL) continue;
			while( ((ret=lirc_code2char(config,code,&c))==0) * (c!=NULL) )
			{
				if((done=strcmp(c,"exit"))) printf("%s\n",c);
			}
                        free(code);
		}
		lirc_freeconfig(config);
	}

	lirc_deinit();
	exit(EXIT_SUCCESS);
}

Compilation

Rien de plus simple que
gcc -D_HAVE_CONFIG_H-Wall -O3 -o pg_lirc pg_lirc.c -llirc_client

Exemple d'utilisation

En lançant
./pg_lirc /homeold/davidold/.lircrc
en en appuyant respectivement sur les touches [1],[3],[7],[8],[6] puis [Power] (touche rouge), on obtient
root@bremko:~/toot# ./pg_lirc /homeold/davidold/.lircrc
1
3
7
8
6
root@bremko:~/toot#

samedi 19 avril 2008

Changer l'heure du système

Depuis qu'on est passé à l'heure d'été, j'avais complètemement oublié de changer l'heure sur mon portable. La commande suivante suffit amplement

date -s HH:MM:SS
Par exemple date -s 14:36:48 Maintenant mon portable est à l'heure

mercredi 16 avril 2008

Test de PostgreSQL 8.3 sur fonction en C pour extraire les 'e' d'une chaîne de caractères

Les fonctionnalités en C ont quelques peu changé depuis le temps! Faisons donc un petit test sur une fonctionnalité extract_e() qui enlève tous les 'e' contenues dans une chaîne de caractère de type text. Commençons donc par créer une petite table pour nos tests. Je profite ici d'utiliser la structure de requête INSERT INTO ... RETURNING ... apparu depuis la 8.2

BEGIN TRANSACTION;
-- Déclaration de la fonction extract_e en tant que module C
SET search_path = public;
CREATE OR REPLACE FUNCTION extract_e(text) RETURNS text
     AS 'MODULE_PATHNAME', 'extract_e'
     LANGUAGE 'C' IMMUTABLE STRICT;
-- table de test
DROP TABLE IF EXISTS test;
CREATE TABLE test(id serial,data text)WITH OIDS;
INSERT INTO test(data) VALUES 
('david'),
('maman je t''aime'),
('Isabelle tu es la plus belle de toutes'),
('La vie vaut parfois le coup d''être vécue!'),
(NULL),
('Isidore dort dans la chambre')
RETURNING id,data,length(data),extract_e(data),length(extract_e(data));
END TRANSACTION;
qui me renverra
 id |                   data                    | length |               extract_e               | length 
----+-------------------------------------------+--------+---------------------------------------+--------
  1 | david                                     |      5 | david                                 |      5
  2 | maman je t'aime                           |     15 | maman j t'aim                         |     13
  3 | Isabelle tu es la plus belle de toutes    |     38 | Isabll tu s la plus bll d touts       |     31
  4 | La vie vaut aussi le coup d'être vécue! |     41 | La vi vaut aussi l coup d'êtr vécu! |     37
  5 |                                           |        |                                       |       
  6 | Isidore dort dans la chambre              |     28 | Isidor dort dans la chambr            |     26
(6 rows)

Le progamme extract_e.c

#include "postgres.h" 
#include "fmgr.h" 

#ifdef PG_MODULE_MAGIC
PG_MODULE_MAGIC;
#endif

#ifndef SET_VARSIZE
#define SET_VARSIZE(n,s) VARATT_SIZEP(n) = s; 
#endif 

#define VARDATALENGTH(s) VARSIZE(s)-VARHDRSZ;

Datum extract_e( PG_FUNCTION_ARGS );
int GetNb_e(text *);
text* Chaine_WithOut_E(text *,int);


// chaine sans les 'e'
text* Chaine_WithOut_E(text *chaine_In,int Nb_e){
  int i=0,j,t=0,len=VARDATALENGTH(chaine_In);
  text* chaine_Out=(text*)palloc(len-Nb_e+VARHDRSZ);
  SET_VARSIZE(chaine_Out,len-Nb_e+VARHDRSZ);
  while(i<len){j=(!(*(VARDATA(chaine_In)+i)=='e'))?(*(VARDATA(chaine_Out)+t++)=*(VARDATA(chaine_In)+i++)):i++;}
  return chaine_Out;
}

// Retourne le nombre de lettres 'e' de chaine
int GetNb_e(text *chaine){
  int pos,nb,len=VARDATALENGTH(chaine);
   nb=pos=0;
  while(pos<len){nb+=(*(VARDATA(chaine)+pos++)=='e');}
  return nb;
}

PG_FUNCTION_INFO_V1( extract_e );
Datum extract_e( PG_FUNCTION_ARGS )
{
   text *chaine_In;
   int Nb_e;
   chaine_In = PG_GETARG_TEXT_P(0);
   PG_RETURN_TEXT_P((!(Nb_e=GetNb_e(chaine_In)))?chaine_In:Chaine_WithOut_E(chaine_In,Nb_e)); 
}

Le Makefile

MODULES = extract_e
#PG_CPPFLAGS = -ggdb
DATA_built = extract_e.sql
DATA = uninstall_extract_e.sql
PGXS := $(shell pg_config --pgxs)
include $(PGXS)

Le fichier extract_e.sql.in


BEGIN TRANSACTION;
-- Déclaration de la fonction extract_e en tant que module C
SET search_path = public;
CREATE OR REPLACE FUNCTION extract_e(text) RETURNS text
     AS 'MODULE_PATHNAME', 'extract_e'
     LANGUAGE 'C' IMMUTABLE STRICT;
-- table de test
DROP TABLE IF EXISTS test;
CREATE TABLE test(id serial,data text)WITH OIDS;
INSERT INTO test(data) VALUES 
('david'),
('maman je t''aime'),
('Isabelle tu es la plus belle de toutes'),
('La vie vaut parfois le coup d''être vécue!'),
('Isidore dort dans la chambre')
RETURNING id,data,length(data),extract_e(data);
END TRANSACTION;;

Le fichier uninstall_extract_e.sql.in

SET search_path = public;
DROP FUNCTION extract_e(text);