r13640 - /trunk/libvideo-capture-v4l-perl/RTjpeg/codec/modules/RTb2s_raw.c
roberto at users.alioth.debian.org
roberto at users.alioth.debian.org
Sat Jan 26 20:18:38 UTC 2008
Author: roberto
Date: Sat Jan 26 20:18:38 2008
New Revision: 13640
URL: http://svn.debian.org/wsvn/?sc=1&rev=13640
Log:
Add inadvertently deleted file.
Added:
trunk/libvideo-capture-v4l-perl/RTjpeg/codec/modules/RTb2s_raw.c
Added: trunk/libvideo-capture-v4l-perl/RTjpeg/codec/modules/RTb2s_raw.c
URL: http://svn.debian.org/wsvn/trunk/libvideo-capture-v4l-perl/RTjpeg/codec/modules/RTb2s_raw.c?rev=13640&op=file
==============================================================================
--- trunk/libvideo-capture-v4l-perl/RTjpeg/codec/modules/RTb2s_raw.c (added)
+++ trunk/libvideo-capture-v4l-perl/RTjpeg/codec/modules/RTb2s_raw.c Sat Jan 26 20:18:38 2008
@@ -1,0 +1,35 @@
+int RTjpeg_b2s(s16 *data, s8 *strm, u8 bt8)
+{
+ int ci=1, co=1, tmp;
+
+ strm[0]=(u8)(data[RTjpeg_ZZ[0]]>254) ? 254:((data[RTjpeg_ZZ[0]]<0)?0:data[RTjpeg_ZZ[0]]);
+
+ for(ci=1; ci<=63; ci++)
+ if(data[RTjpeg_ZZ[ci]]>0)
+ {
+ strm[co++]=(s8)(data[RTjpeg_ZZ[ci]]>127)?127:data[RTjpeg_ZZ[ci]];
+ } else
+ {
+ strm[co++]=(s8)(data[RTjpeg_ZZ[ci]]<-128)?-128:data[RTjpeg_ZZ[ci]];
+ }
+/*
+ for(; ci<64; ci++)
+ if(data[RTjpeg_ZZ[ci]]>0)
+ {
+ strm[co++]=(s8)(data[RTjpeg_ZZ[ci]]>63)?63:data[RTjpeg_ZZ[ci]];
+ } else if(data[RTjpeg_ZZ[ci]]<0)
+ {
+ strm[co++]=(s8)(data[RTjpeg_ZZ[ci]]<-64)?-64:data[RTjpeg_ZZ[ci]];
+ } else
+ {
+ tmp=ci;
+ do
+ {
+ ci++;
+ } while((ci<64)&&(data[RTjpeg_ZZ[ci]]==0));
+ strm[co++]=(s8)(63+(ci-tmp));
+ ci--;
+ }
+*/
+ return (int)co;
+}
More information about the Pkg-perl-cvs-commits
mailing list