void ApplicationWindow::tpgColorspaceChanged()
{
cv4l_fmt fmt;
int colorspace = combo2int(m_tpgColorspace);
int xferFunc = combo2int(m_tpgXferFunc);
int ycbcrEnc = combo2int(m_tpgYCbCrEnc);
int quantization = combo2int(m_tpgQuantRange);
g_fmt(fmt);
if (colorspace == V4L2_COLORSPACE_DEFAULT)
colorspace = fmt.g_colorspace();
if (colorspace == V4L2_COLORSPACE_DEFAULT)
colorspace = tpgDefaultColorspace();
if (xferFunc == V4L2_XFER_FUNC_DEFAULT)
xferFunc = fmt.g_xfer_func();
if (ycbcrEnc == V4L2_YCBCR_ENC_DEFAULT)
ycbcrEnc = fmt.g_ycbcr_enc();
if (quantization == V4L2_QUANTIZATION_DEFAULT)
quantization = fmt.g_quantization();
tpg_s_colorspace(&m_tpg, colorspace);
tpg_s_xfer_func(&m_tpg, xferFunc);
tpg_s_ycbcr_enc(&m_tpg, ycbcrEnc);
tpg_s_quantization(&m_tpg, quantization);
}
int saa7146_video_do_ioctl(struct inode *inode, struct file *file, unsigned int cmd, void *arg)
{
struct saa7146_fh *fh = file->private_data;
struct saa7146_dev *dev = fh->dev;
struct saa7146_vv *vv = dev->vv_data;
int err = 0, result = 0, ee = 0;
struct saa7146_use_ops *ops;
struct videobuf_queue *q;
/* check if extension handles the command */
for(ee = 0; dev->ext_vv_data->ioctls[ee].flags != 0; ee++) {
if( cmd == dev->ext_vv_data->ioctls[ee].cmd )
break;
}
if( 0 != (dev->ext_vv_data->ioctls[ee].flags & SAA7146_EXCLUSIVE) ) {
DEB_D(("extension handles ioctl exclusive.\n"));
result = dev->ext_vv_data->ioctl(fh, cmd, arg);
return result;
}
if( 0 != (dev->ext_vv_data->ioctls[ee].flags & SAA7146_BEFORE) ) {
DEB_D(("extension handles ioctl before.\n"));
result = dev->ext_vv_data->ioctl(fh, cmd, arg);
if( -EAGAIN != result ) {
return result;
}
}
/* fixme: add handle "after" case (is it still needed?) */
switch (fh->type) {
case V4L2_BUF_TYPE_VIDEO_CAPTURE: {
ops = &saa7146_video_uops;
q = &fh->video_q;
break;
}
case V4L2_BUF_TYPE_VBI_CAPTURE: {
ops = &saa7146_vbi_uops;
q = &fh->vbi_q;
break;
}
default:
BUG();
return 0;
}
switch (cmd) {
case VIDIOC_QUERYCAP:
{
struct v4l2_capability *cap = arg;
memset(cap,0,sizeof(*cap));
DEB_EE(("VIDIOC_QUERYCAP\n"));
strcpy(cap->driver, "saa7146 v4l2");
strlcpy(cap->card, dev->ext->name, sizeof(cap->card));
sprintf(cap->bus_info,"PCI:%s", pci_name(dev->pci));
cap->version = SAA7146_VERSION_CODE;
cap->capabilities =
V4L2_CAP_VIDEO_CAPTURE |
V4L2_CAP_VIDEO_OVERLAY |
V4L2_CAP_READWRITE |
V4L2_CAP_STREAMING;
cap->capabilities |= dev->ext_vv_data->capabilities;
return 0;
}
case VIDIOC_G_FBUF:
{
struct v4l2_framebuffer *fb = arg;
DEB_EE(("VIDIOC_G_FBUF\n"));
*fb = vv->ov_fb;
fb->capability = V4L2_FBUF_CAP_LIST_CLIPPING;
return 0;
}
case VIDIOC_S_FBUF:
{
struct v4l2_framebuffer *fb = arg;
struct saa7146_format *fmt;
DEB_EE(("VIDIOC_S_FBUF\n"));
if(!capable(CAP_SYS_ADMIN) &&
!capable(CAP_SYS_RAWIO))
return -EPERM;
/* check args */
fmt = format_by_fourcc(dev,fb->fmt.pixelformat);
if (NULL == fmt) {
return -EINVAL;
}
/* planar formats are not allowed for overlay video, clipping and video dma would clash */
if (0 != (fmt->flags & FORMAT_IS_PLANAR)) {
DEB_S(("planar pixelformat '%4.4s' not allowed for overlay\n",(char *)&fmt->pixelformat));
}
/* check if overlay is running */
if (IS_OVERLAY_ACTIVE(fh) != 0) {
if (vv->video_fh != fh) {
DEB_D(("refusing to change framebuffer informations while overlay is active in another open.\n"));
return -EBUSY;
}
}
down(&dev->lock);
/* ok, accept it */
vv->ov_fb = *fb;
vv->ov_fmt = fmt;
if (0 == vv->ov_fb.fmt.bytesperline)
vv->ov_fb.fmt.bytesperline =
vv->ov_fb.fmt.width*fmt->depth/8;
up(&dev->lock);
return 0;
}
case VIDIOC_ENUM_FMT:
{
struct v4l2_fmtdesc *f = arg;
int index;
switch (f->type) {
case V4L2_BUF_TYPE_VIDEO_CAPTURE:
case V4L2_BUF_TYPE_VIDEO_OVERLAY: {
index = f->index;
if (index < 0 || index >= NUM_FORMATS) {
return -EINVAL;
}
memset(f,0,sizeof(*f));
f->index = index;
strlcpy(f->description,formats[index].name,sizeof(f->description));
f->pixelformat = formats[index].pixelformat;
break;
}
default:
return -EINVAL;
}
DEB_EE(("VIDIOC_ENUM_FMT: type:%d, index:%d\n",f->type,f->index));
return 0;
}
case VIDIOC_QUERYCTRL:
{
const struct v4l2_queryctrl *ctrl;
struct v4l2_queryctrl *c = arg;
if ((c->id < V4L2_CID_BASE ||
c->id >= V4L2_CID_LASTP1) &&
(c->id < V4L2_CID_PRIVATE_BASE ||
c->id >= V4L2_CID_PRIVATE_LASTP1))
return -EINVAL;
ctrl = ctrl_by_id(c->id);
if( NULL == ctrl ) {
return -EINVAL;
/*
c->flags = V4L2_CTRL_FLAG_DISABLED;
return 0;
*/
}
DEB_EE(("VIDIOC_QUERYCTRL: id:%d\n",c->id));
*c = *ctrl;
return 0;
}
case VIDIOC_G_CTRL: {
DEB_EE(("VIDIOC_G_CTRL\n"));
return get_control(fh,arg);
}
case VIDIOC_S_CTRL:
{
DEB_EE(("VIDIOC_S_CTRL\n"));
err = set_control(fh,arg);
return err;
}
case VIDIOC_G_PARM:
{
struct v4l2_streamparm *parm = arg;
if( parm->type != V4L2_BUF_TYPE_VIDEO_CAPTURE ) {
return -EINVAL;
}
memset(&parm->parm.capture,0,sizeof(struct v4l2_captureparm));
parm->parm.capture.readbuffers = 1;
// fixme: only for PAL!
parm->parm.capture.timeperframe.numerator = 1;
parm->parm.capture.timeperframe.denominator = 25;
return 0;
}
case VIDIOC_G_FMT:
{
struct v4l2_format *f = arg;
DEB_EE(("VIDIOC_G_FMT\n"));
return g_fmt(fh,f);
}
case VIDIOC_S_FMT:
{
struct v4l2_format *f = arg;
DEB_EE(("VIDIOC_S_FMT\n"));
return s_fmt(fh,f);
}
case VIDIOC_TRY_FMT:
{
struct v4l2_format *f = arg;
DEB_EE(("VIDIOC_TRY_FMT\n"));
return try_fmt(fh,f);
}
case VIDIOC_G_STD:
{
v4l2_std_id *id = arg;
DEB_EE(("VIDIOC_G_STD\n"));
*id = vv->standard->id;
return 0;
}
/* the saa7146 supfhrts (used in conjunction with the saa7111a for example)
PAL / NTSC / SECAM. if your hardware does not (or does more)
-- override this function in your extension */
case VIDIOC_ENUMSTD:
{
struct v4l2_standard *e = arg;
if (e->index < 0 )
return -EINVAL;
if( e->index < dev->ext_vv_data->num_stds ) {
DEB_EE(("VIDIOC_ENUMSTD: index:%d\n",e->index));
v4l2_video_std_construct(e, dev->ext_vv_data->stds[e->index].id, dev->ext_vv_data->stds[e->index].name);
return 0;
}
return -EINVAL;
}
case VIDIOC_S_STD:
{
v4l2_std_id *id = arg;
int found = 0;
int i, err;
DEB_EE(("VIDIOC_S_STD\n"));
if ((vv->video_status & STATUS_CAPTURE) == STATUS_CAPTURE) {
DEB_D(("cannot change video standard while streaming capture is active\n"));
return -EBUSY;
}
if ((vv->video_status & STATUS_OVERLAY) != 0) {
vv->ov_suspend = vv->video_fh;
err = saa7146_stop_preview(vv->video_fh); /* side effect: video_status is now 0, video_fh is NULL */
if (0 != err) {
DEB_D(("suspending video failed. aborting\n"));
return err;
}
}
down(&dev->lock);
for(i = 0; i < dev->ext_vv_data->num_stds; i++)
if (*id & dev->ext_vv_data->stds[i].id)
break;
if (i != dev->ext_vv_data->num_stds) {
vv->standard = &dev->ext_vv_data->stds[i];
if( NULL != dev->ext_vv_data->std_callback )
dev->ext_vv_data->std_callback(dev, vv->standard);
found = 1;
}
up(&dev->lock);
if (vv->ov_suspend != NULL) {
saa7146_start_preview(vv->ov_suspend);
vv->ov_suspend = NULL;
}
if( 0 == found ) {
DEB_EE(("VIDIOC_S_STD: standard not found.\n"));
return -EINVAL;
}
DEB_EE(("VIDIOC_S_STD: set to standard to '%s'\n",vv->standard->name));
return 0;
}
case VIDIOC_OVERLAY:
{
int on = *(int *)arg;
int err = 0;
DEB_D(("VIDIOC_OVERLAY on:%d\n",on));
if (on != 0) {
err = saa7146_start_preview(fh);
} else {
err = saa7146_stop_preview(fh);
}
return err;
}
case VIDIOC_REQBUFS: {
struct v4l2_requestbuffers *req = arg;
DEB_D(("VIDIOC_REQBUFS, type:%d\n",req->type));
return videobuf_reqbufs(q,req);
}
case VIDIOC_QUERYBUF: {
struct v4l2_buffer *buf = arg;
DEB_D(("VIDIOC_QUERYBUF, type:%d, offset:%d\n",buf->type,buf->m.offset));
return videobuf_querybuf(q,buf);
}
case VIDIOC_QBUF: {
struct v4l2_buffer *buf = arg;
int ret = 0;
ret = videobuf_qbuf(q,buf);
DEB_D(("VIDIOC_QBUF: ret:%d, index:%d\n",ret,buf->index));
return ret;
}
case VIDIOC_DQBUF: {
struct v4l2_buffer *buf = arg;
int ret = 0;
ret = videobuf_dqbuf(q,buf,file->f_flags & O_NONBLOCK);
DEB_D(("VIDIOC_DQBUF: ret:%d, index:%d\n",ret,buf->index));
return ret;
}
case VIDIOC_STREAMON: {
int *type = arg;
DEB_D(("VIDIOC_STREAMON, type:%d\n",*type));
err = video_begin(fh);
if( 0 != err) {
return err;
}
err = videobuf_streamon(q);
return err;
}
case VIDIOC_STREAMOFF: {
int *type = arg;
DEB_D(("VIDIOC_STREAMOFF, type:%d\n",*type));
/* ugly: we need to copy some checks from video_end(),
because videobuf_streamoff() relies on the capture running.
check and fix this */
if ((vv->video_status & STATUS_CAPTURE) != STATUS_CAPTURE) {
DEB_S(("not capturing.\n"));
return 0;
}
if (vv->video_fh != fh) {
DEB_S(("capturing, but in another open.\n"));
return -EBUSY;
}
err = videobuf_streamoff(q);
if (0 != err) {
DEB_D(("warning: videobuf_streamoff() failed.\n"));
video_end(fh, file);
} else {
err = video_end(fh, file);
}
return err;
}
case VIDIOCGMBUF:
{
struct video_mbuf *mbuf = arg;
struct videobuf_queue *q;
int i;
/* fixme: number of capture buffers and sizes for v4l apps */
int gbuffers = 2;
int gbufsize = 768*576*4;
DEB_D(("VIDIOCGMBUF \n"));
q = &fh->video_q;
down(&q->lock);
err = videobuf_mmap_setup(q,gbuffers,gbufsize,
V4L2_MEMORY_MMAP);
if (err < 0) {
up(&q->lock);
return err;
}
memset(mbuf,0,sizeof(*mbuf));
mbuf->frames = gbuffers;
mbuf->size = gbuffers * gbufsize;
for (i = 0; i < gbuffers; i++)
mbuf->offsets[i] = i * gbufsize;
up(&q->lock);
return 0;
}
default:
return v4l_compat_translate_ioctl(inode,file,cmd,arg,
saa7146_video_do_ioctl);
}
return 0;
}
dfmt(int op)
#endif
{
cgrad **cg0, **cg01, *cgi, *cgi0, *cgi00, *cgj, **cgnew,
**cgprev, **cgx, *free_cg;
ograd *og;
real *LU, *LUdv, *LUdvi, *LUdrhs, *LUdvxi, *LUrhse, *LUve;
int Max, aextra, i, m, me, n, n1, nextra;
FILE *f;
real t;
char *dvtype, *dvt;
static char *AXIN[2] = { "AX", "IN" };
dvthead dvth;
char buf[32];
n = c_vars;
if (n < o_vars)
n = o_vars;
n1 = n + 1;
m = n_con;
LUrhse = LUrhs + 2*m;
LUve = LUv + 2*n;
aextra = nextra = 0;;
for (LU = LUrhs, cgx = Cgrad; LU < LUrhse; LU += 2, cgx++)
if (LU[0] > negInfinity) {
if (LU[0])
aextra++;
if (LU[0] < LU[1] && LU[1] < Infinity) {
nextra++;
if (LU[1])
aextra++;
for(cgi = *cgx; cgi; cgi = cgi->next)
aextra++;
}
else if (LU[0])
aextra++;
}
else if (LU[1])
aextra++;
for (LU = LUv; LU < LUve; LU += 2) {
if (LU[0] > negInfinity) {
aextra++;
nextra++;
if (LU[0])
aextra++;
}
if (LU[1] < Infinity) {
aextra++;
nextra++;
if (LU[1])
aextra++;
}
}
me = m + nextra;
LUdvi = LUdv = (real *)Malloc((me + n)*2*sizeof(real)
+ me*sizeof(cgrad *)
+ aextra*sizeof(cgrad)
+ m);
LUdvxi = LUdv + 2*m;
LUdrhs = LUdvxi + 2*nextra;
free_cg = (cgrad *)(LUdrhs + 2*n);
cg0 = cg01 = (cgrad **)(free_cg + aextra);
cgnew = cg0 + m;
dvt = dvtype = (char *)(cgnew + nextra);
for (LU = LUrhs, cgx = Cgrad; LU < LUrhse; LU += 2, cgx++) {
cgi0 = 0;
for(cgi = cgi00 = *cgx; cgi; cgi = cgj) {
cgj = cgi->next;
cgi->next = cgi0;
cgi0 = cgi;
cgi->varno++;
}
*cg01++ = cgi0;
if (LU[0] > negInfinity) {
*LUdvi++ = LU[0] == LU[1] ? negInfinity : 0;
*LUdvi++ = Infinity;
if (LU[0] < LU[1] && LU[1] < Infinity) {
*LUdvxi++ = 0;
*LUdvxi++ = Infinity;
cgprev = cgnew++;
for(cgi = *cgx; cgi; cgi = cgi->next) {
*cgprev = cgj = free_cg++;
cgprev = &cgj->next;
cgj->varno = cgi->varno;
cgj->coef = -cgi->coef;
}
if (LU[1]) {
cgi = *cgprev = free_cg++;
cgi->varno = n1;
cgi->coef = -LU[1];
cgprev = &cgi->next;
}
*cgprev = 0;
*dvt++ = 2;
}
else
*dvt++ = LU[0] == LU[1] ? 3 : 0;
if (LU[0]) {
cgi = cgi00->next = free_cg++;
cgi->varno = n1;
cgi->coef = LU[0];
cgi->next = 0;
}
}
else {
*dvt++ = 1;
*LUdvi++ = 0;
*LUdvi++ = Infinity;
for(cgi = cgi0; cgi; cgi = cgi->next)
cgi->coef = -cgi->coef;
if (LU[1]) {
cgi = cgi00->next = free_cg++;
cgi->varno = n1;
cgi->coef = -LU[1];
cgi->next = 0;
}
}
}
for (LU = LUv, i = 1; LU < LUve; LU += 2, i++) {
if (LU[0] > negInfinity) {
*LUdvxi++ = 0;
*LUdvxi++ = Infinity;
*cgnew++ = cgi = free_cg++;
cgi->varno = i;
cgi->coef = 1;
if (LU[0]) {
cgi = cgi->next = free_cg++;
cgi->varno = n1;
cgi->coef = LU[0];
}
cgi->next = 0;
}
if (LU[1] < Infinity) {
*LUdvxi++ = 0;
*LUdvxi++ = Infinity;
*cgnew++ = cgi = free_cg++;
cgi->varno = i;
cgi->coef = -1;
if (LU[1]) {
cgi = cgi->next = free_cg++;
cgi->varno = n1;
cgi->coef = -LU[1];
}
cgi->next = 0;
}
}
memset(LUdrhs, 0, n*2*sizeof(real));
if (objno >= 0)
for(og = Ograd[objno]; og; og = og->next) {
LU = LUdrhs + 2*og->varno;
LU[0] = LU[1] = og->coef;
}
if (Max = objtype[objno])
for(LU = LUdv; LU < LUdrhs; LU += 2) {
t = LU[0];
LU[0] = -LU[1];
LU[1] = -t;
}
/* Negate columns with lower bound -Infinity, finite upper bound. */
/* This shouldn't be necessary, but shortens the MPS file */
/* and may avoid bugs in some solvers. */
for(cg01 = cg0, LU = LUdv; LU < LUdrhs; LU += 2, cg01++)
if (LU[0] <= negInfinity && LU[1] < Infinity) {
t = LU[0];
LU[0] = -LU[1];
LU[1] = -t;
for(cgi = *cg01; cgi; cgi = cgi->next)
cgi->coef = -cgi->coef;
}
if (op != 'm') {
switch(op) {
case 'b':
binary_nl = 1;
break;
case 'g':
binary_nl = 0;
}
nl_write(n, me, cg0, LUdv, LUdrhs, Max);
}
else {
mps(n, me, cg0, LUdv, LUdrhs);
f = openfo(".spc", "w");
fprintf(f, "BEGIN %s\nROWS %d\nCOLUMNS %d\n",
Basename, n + 1, me+1);
fprintf(f, "*true value: COLUMNS %d\n", me);
fprintf(f, "ELEMENTS %d\nM%sIMIZE\nOBJECTIVE DUMMY\n",
nzc + aextra, AXIN[Max]);
fprintf(f, "END %s\n", Basename);
fclose(f);
f = openfo(".adj", "w");
g_fmt(buf, objconst(objno));
fprintf(f, "'objective' %s\n", buf);
fclose(f);
}
f = openfo(".duw", "wb");
for(i = 0; i < 10; i++)
dvth.Options[i] = ampl_options[i];
dvth.vbtol = ampl_vbtol;
dvth.m = m;
dvth.n = n;
dvth.nextra = nextra;
dvth.maxobj = Max;
dvth.binary = binary_nl;
fwrite(&dvth, sizeof(dvthead), 1, f);
fwrite(dvtype, m, 1, f);
fclose(f);
}
aprintf(va_alist) va_dcl
#else
aprintf(const char *fmt, ...)
#endif
{
char *s;
char buf[32];
va_list ap;
int i, j;
double x;
#ifdef KR_headers
char *fmt;
va_start(ap);
fmt = va_arg(ap, char*);
#else
va_start(ap, fmt);
#endif
for(;;) {
for(;;) {
switch(i = *fmt++) {
case 0: goto done;
case '%': break;
default: putc(i,fd);
continue;
}
break;
}
switch(*fmt++) {
case 'c':
i = va_arg(ap, int);
putc(i,fd);
continue;
case 'd':
i = va_arg(ap, int);
if (i < 0) {
putc('-',fd);
i = -i;
}
s = buf;
do {
j = i / 10;
*s++ = i - 10*j + '0';
}
while(i = j);
do {
i = *--s;
putc(i,fd);
}
while(s > buf);
continue;
case 'g':
x = va_arg(ap, double);
g_fmt(s = buf, x);
while(i = *s++)
putc(i,fd);
continue;
default:
fprintf(Stderr, "aprintf bug: unexpect fmt %s\n",
fmt-1);
exit(1);
}
}
done:
va_end(ap);
}
static int
aprintf(FILE *fd, const char *fmt, ...)
{
char *s;
char buf[32];
va_list ap;
int i, j;
double x;
int rc = 0;
va_start(ap, fmt);
if (*fmt != '%')
rc++;
for(;;) {
for(;;) {
switch(i = *fmt++) {
case 0: goto done;
case '%': break;
default: putc(i,fd);
continue;
}
break;
}
rc++;
switch(*fmt++) {
case 'c':
i = va_arg(ap, int);
putc(i,fd);
continue;
case 'd':
i = va_arg(ap, int);
if (i < 0) {
putc('-',fd);
i = -i;
}
s = buf;
do {
j = i / 10;
*s++ = i - 10*j + '0';
}
while((i = j));
do {
i = *--s;
putc(i,fd);
}
while(s > buf);
continue;
case '.':
while(*fmt++ != 'g');
case 'g':
x = va_arg(ap, double);
i = g_fmt(s = buf, x);
goto have_s;
case 's':
s = va_arg(ap, char*);
have_s:
while((i = *s++))
putc(i,fd);
continue;
default:
fprintf(Stderr, "aprintf bug: unexpect fmt %s\n",
fmt-1);
exit(1);
}
}
done:
va_end(ap);
return rc;
}