vbscript: Added function parser implementation.
[wine] / dlls / avicap32 / avicap32_main.c
1 /*
2  * Copyright 2002 Dmitry Timoshkov for CodeWeavers
3  * Copyright 2005 Maarten Lankhorst
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2.1 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  *
15  * You should have received a copy of the GNU Lesser General Public
16  * License along with this library; if not, write to the Free Software
17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
18  */
19
20 #include "config.h"
21 #include "wine/port.h"
22
23 #include <stdarg.h>
24 #include <stdio.h>
25 #include <fcntl.h>
26 #ifdef HAVE_SYS_IOCTL_H
27 # include <sys/ioctl.h>
28 #endif
29 #ifdef HAVE_SYS_STAT_H
30 # include <sys/stat.h>
31 #endif
32 #ifdef HAVE_SYS_ERRNO_H
33 # include <sys/errno.h>
34 #endif
35 #ifdef HAVE_SYS_TIME_H
36 # include <sys/time.h>
37 #endif
38 #ifdef HAVE_ASM_TYPES_H
39 # include <asm/types.h>
40 #endif
41 #ifdef HAVE_LINUX_VIDEODEV2_H
42 # include <linux/videodev2.h>
43 #endif
44 #ifdef HAVE_UNISTD_H
45 # include <unistd.h>
46 #endif
47
48 #include "windef.h"
49 #include "winbase.h"
50 #include "wingdi.h"
51 #include "winuser.h"
52 #include "vfw.h"
53 #include "winnls.h"
54 #include "winternl.h"
55 #include "wine/debug.h"
56
57 #define CAP_DESC_MAX 32
58
59 WINE_DEFAULT_DEBUG_CHANNEL(avicap);
60
61
62 /***********************************************************************
63  *             capCreateCaptureWindowW   (AVICAP32.@)
64  */
65 HWND VFWAPI capCreateCaptureWindowW(LPCWSTR lpszWindowName, DWORD dwStyle, INT x,
66                                     INT y, INT nWidth, INT nHeight, HWND hWnd,
67                                     INT nID)
68 {
69     FIXME("%s, %08x, %08x, %08x, %08x, %08x, %p, %08x\n",
70            debugstr_w(lpszWindowName), dwStyle,
71            x, y, nWidth, nHeight, hWnd, nID);
72     return 0;
73 }
74
75 /***********************************************************************
76  *             capCreateCaptureWindowA   (AVICAP32.@)
77  */
78 HWND VFWAPI capCreateCaptureWindowA(LPCSTR lpszWindowName, DWORD dwStyle, INT x,
79                                     INT y, INT nWidth, INT nHeight, HWND hWnd,
80                                     INT nID)
81 {   UNICODE_STRING nameW;
82     HWND retW;
83
84     if (lpszWindowName) RtlCreateUnicodeStringFromAsciiz(&nameW, lpszWindowName);
85     else nameW.Buffer = NULL;
86
87     retW = capCreateCaptureWindowW(nameW.Buffer, dwStyle, x, y, nWidth, nHeight,
88                                    hWnd, nID);
89     RtlFreeUnicodeString(&nameW);
90
91     return retW;
92 }
93
94 #ifdef HAVE_LINUX_VIDEODEV2_H
95
96 static int xioctl(int fd, int request, void * arg)
97 {
98    int r;
99
100    do r = ioctl (fd, request, arg);
101    while (-1 == r && EINTR == errno);
102
103    return r;
104 }
105
106 static BOOL query_video_device(int devnum, char *name, int namesize, char *version, int versionsize)
107 {
108    int fd;
109    char device[16];
110    struct stat st;
111    struct v4l2_capability caps;
112
113    snprintf(device, sizeof(device), "/dev/video%i", devnum);
114
115    if (stat (device, &st) == -1) {
116       /* This is probably because the device does not exist */
117       WARN("%s: %s\n", device, strerror(errno));
118       return FALSE;
119    }
120
121    if (!S_ISCHR (st.st_mode)) {
122       ERR("%s: Not a device\n", device);
123       return FALSE;
124    }
125
126    fd = open(device, O_RDWR | O_NONBLOCK);
127    if (fd == -1) {
128       ERR("%s: Failed to open: %s\n", device, strerror(errno));
129       return FALSE;
130    }
131
132    memset(&caps, 0, sizeof(caps));
133    if (xioctl(fd, VIDIOC_QUERYCAP, &caps) != -1) {
134       lstrcpynA(name, (char *)caps.card, namesize);
135       snprintf(version, versionsize, "%s v%u.%u.%u", (char *)caps.driver, (caps.version >> 16) & 0xFF,
136                              (caps.version >> 8) & 0xFF, caps.version & 0xFF);
137       close(fd);
138       return TRUE;
139    }
140
141    if (errno != EINVAL && errno != 515)
142 /* errno 515 is used by some webcam drivers for unknown IOICTL command */
143       ERR("%s: Querying failed: %s\n", device, strerror(errno));
144    else ERR("%s: Querying failed: Not a V4L compatible device\n", device);
145
146    close(fd);
147    return FALSE;
148 }
149
150 #else /* HAVE_LINUX_VIDEODEV2_H */
151
152 static BOOL query_video_device(int devnum, char *name, int namesize, char *version, int versionsize)
153 {
154    ERR("Video 4 Linux support not enabled\n");
155    return FALSE;
156 }
157
158 #endif /* HAVE_LINUX_VIDEODEV2_H */
159
160 /***********************************************************************
161  *             capGetDriverDescriptionA   (AVICAP32.@)
162  */
163 BOOL VFWAPI capGetDriverDescriptionA(WORD wDriverIndex, LPSTR lpszName,
164                                      INT cbName, LPSTR lpszVer, INT cbVer)
165 {
166    BOOL retval;
167    WCHAR devname[CAP_DESC_MAX], devver[CAP_DESC_MAX];
168    TRACE("--> capGetDriverDescriptionW\n");
169    retval = capGetDriverDescriptionW(wDriverIndex, devname, CAP_DESC_MAX, devver, CAP_DESC_MAX);
170    if (retval) {
171       WideCharToMultiByte(CP_ACP, 0, devname, -1, lpszName, cbName, NULL, NULL);
172       WideCharToMultiByte(CP_ACP, 0, devver, -1, lpszVer, cbVer, NULL, NULL);
173    }
174    return retval;
175 }
176
177 /***********************************************************************
178  *             capGetDriverDescriptionW   (AVICAP32.@)
179  */
180 BOOL VFWAPI capGetDriverDescriptionW(WORD wDriverIndex, LPWSTR lpszName,
181                                      INT cbName, LPWSTR lpszVer, INT cbVer)
182 {
183    char devname[CAP_DESC_MAX], devver[CAP_DESC_MAX];
184
185    if (!query_video_device(wDriverIndex, devname, CAP_DESC_MAX, devver, CAP_DESC_MAX)) return FALSE;
186
187    MultiByteToWideChar(CP_UNIXCP, 0, devname, -1, lpszName, cbName);
188    MultiByteToWideChar(CP_UNIXCP, 0, devver, -1, lpszVer, cbVer);
189    TRACE("Version: %s - Name: %s\n", debugstr_w(lpszVer), debugstr_w(lpszName));
190    return TRUE;
191 }