Update to MPlayer SVN rev 34578.
[vaapi:athaifas-mplayer.git] / stream / stream_vcd.c
1 /*
2  * This file is part of MPlayer.
3  *
4  * MPlayer is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation; either version 2 of the License, or
7  * (at your option) any later version.
8  *
9  * MPlayer is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License along
15  * with MPlayer; if not, write to the Free Software Foundation, Inc.,
16  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
17  */
18
19 #include "config.h"
20
21 #if defined(__MINGW32__) || defined(__CYGWIN__)
22 #include <windows.h>
23 #endif
24
25 #include "osdep/osdep.h"
26
27 #include "mp_msg.h"
28 #include "stream.h"
29 #include "help_mp.h"
30 #include "m_option.h"
31 #include "m_struct.h"
32
33 #include <fcntl.h>
34 #include <stdlib.h>
35 #include <unistd.h>
36 #if !defined(__MINGW32__) && !defined(__CYGWIN__)
37 #include <sys/ioctl.h>
38 #endif
39 #include <errno.h>
40
41 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__) || defined(__NetBSD__) || defined(__OpenBSD__)
42 #include "vcd_read_fbsd.h"
43 #elif defined(__APPLE__)
44 #include "vcd_read_darwin.h"
45 #elif defined(__MINGW32__) || defined(__CYGWIN__)
46 #include "vcd_read_win32.h"
47 #elif defined(__OS2__)
48 #include "vcd_read_os2.h"
49 #else
50 #include "vcd_read.h"
51 #endif
52
53 #include "libmpdemux/demuxer.h"
54
55 static struct stream_priv_s {
56   int track;
57   char* device;
58 } stream_priv_dflts = {
59   1,
60   NULL
61 };
62
63 #define ST_OFF(f) M_ST_OFF(struct stream_priv_s,f)
64 /// URL definition
65 static const m_option_t stream_opts_fields[] = {
66   { "track", ST_OFF(track), CONF_TYPE_INT, M_OPT_MIN, 1, 0, NULL },
67   { "device", ST_OFF(device), CONF_TYPE_STRING, 0, 0 ,0, NULL},
68   /// For url parsing
69   { "hostname", ST_OFF(track), CONF_TYPE_INT, M_OPT_MIN, 1, 0, NULL },
70   { "filename", ST_OFF(device), CONF_TYPE_STRING, 0, 0 ,0, NULL},
71   { NULL, NULL, 0, 0, 0, 0,  NULL }
72 };
73 static const struct m_struct_st stream_opts = {
74   "vcd",
75   sizeof(struct stream_priv_s),
76   &stream_priv_dflts,
77   stream_opts_fields
78 };
79
80 static int fill_buffer(stream_t *s, char* buffer, int max_len){
81   if(s->pos > s->end_pos) /// don't past end of current track
82     return 0;
83   return vcd_read(s->priv,buffer);
84 }
85
86 static int seek(stream_t *s,off_t newpos) {
87   s->pos = newpos;
88   vcd_set_msf(s->priv,s->pos/VCD_SECTOR_DATA);
89   return 1;
90 }
91
92 static int control(stream_t *stream, int cmd, void *arg) {
93   struct stream_priv_s *p = stream->priv;
94   switch(cmd) {
95     case STREAM_CTRL_GET_NUM_TITLES:
96     case STREAM_CTRL_GET_NUM_CHAPTERS:
97     {
98       mp_vcd_priv_t *vcd = vcd_read_toc(stream->fd);
99       if (!vcd)
100         break;
101       *(unsigned int *)arg = vcd_end_track(vcd);
102       return STREAM_OK;
103     }
104     case STREAM_CTRL_SEEK_TO_CHAPTER:
105     {
106       int r;
107       unsigned int track = *(unsigned int *)arg + 1;
108       mp_vcd_priv_t *vcd = vcd_read_toc(stream->fd);
109       if (!vcd)
110         break;
111       r = vcd_seek_to_track(vcd, track);
112       if (r >= 0) {
113         p->track = track;
114         return STREAM_OK;
115       }
116       break;
117     }
118     case STREAM_CTRL_GET_CURRENT_CHAPTER:
119     {
120       *(unsigned int *)arg = p->track - 1;
121       return STREAM_OK;
122     }
123   }
124   return STREAM_UNSUPPORTED;
125 }
126
127 static void close_s(stream_t *stream) {
128   free(stream->priv);
129 }
130
131 static int open_s(stream_t *stream,int mode, void* opts, int* file_format) {
132   struct stream_priv_s* p = opts;
133   int ret,ret2,f,sect,tmp;
134   mp_vcd_priv_t* vcd;
135 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
136   int bsize = VCD_SECTOR_SIZE;
137 #endif
138 #if defined(__MINGW32__) || defined(__CYGWIN__)
139   HANDLE hd;
140   char device[] = "\\\\.\\?:";
141 #endif
142 #if defined(__OS2__)
143   char device[] = "X:";
144   HFILE hcd;
145   ULONG ulAction;
146   ULONG rc;
147 #endif
148
149   if(mode != STREAM_READ
150 #if defined(__MINGW32__) || defined(__CYGWIN__)
151       || GetVersion() > 0x80000000 // Win9x
152 #endif
153       ) {
154     m_struct_free(&stream_opts,opts);
155     return STREAM_UNSUPPORTED;
156   }
157
158   if (!p->device) {
159     if(cdrom_device)
160       p->device = strdup(cdrom_device);
161     else
162       p->device = strdup(DEFAULT_CDROM_DEVICE);
163   }
164
165 #if defined(__MINGW32__) || defined(__CYGWIN__)
166   device[4] = p->device[0];
167   /* open() can't be used for devices so do it the complicated way */
168   hd = CreateFile(device, GENERIC_READ, FILE_SHARE_READ, NULL,
169           OPEN_EXISTING, FILE_FLAG_SEQUENTIAL_SCAN, NULL);
170   f = _open_osfhandle((long)hd, _O_RDONLY);
171 #elif defined(__OS2__)
172   device[0] = p->device[0];
173   rc = DosOpen(device, &hcd, &ulAction, 0, FILE_NORMAL,
174                OPEN_ACTION_OPEN_IF_EXISTS | OPEN_ACTION_FAIL_IF_NEW,
175                OPEN_ACCESS_READONLY | OPEN_SHARE_DENYNONE | OPEN_FLAGS_DASD,
176                NULL);
177   f = rc ? -1 : hcd;
178 #else
179   f=open(p->device,O_RDONLY);
180 #endif
181   if(f<0){
182     mp_msg(MSGT_OPEN,MSGL_ERR,MSGTR_CdDevNotfound,p->device);
183     m_struct_free(&stream_opts,opts);
184     return STREAM_ERROR;
185   }
186
187   vcd = vcd_read_toc(f);
188   if(!vcd) {
189     mp_msg(MSGT_OPEN,MSGL_ERR,"Failed to get cd toc\n");
190     close(f);
191     m_struct_free(&stream_opts,opts);
192     return STREAM_ERROR;
193   }
194   ret2=vcd_get_track_end(vcd,p->track);
195   if(ret2<0){
196     mp_msg(MSGT_OPEN,MSGL_ERR,MSGTR_ErrTrackSelect " (get)\n");
197     close(f);
198     free(vcd);
199     m_struct_free(&stream_opts,opts);
200     return STREAM_ERROR;
201   }
202   ret=vcd_seek_to_track(vcd,p->track);
203   if(ret<0){
204     mp_msg(MSGT_OPEN,MSGL_ERR,MSGTR_ErrTrackSelect " (seek)\n");
205     close(f);
206     free(vcd);
207     m_struct_free(&stream_opts,opts);
208     return STREAM_ERROR;
209   }
210   /* search forward up to at most 3 seconds to skip leading margin */
211   sect = ret / VCD_SECTOR_DATA;
212   for (tmp = sect; tmp < sect + 3 * 75; tmp++) {
213     char mem[VCD_SECTOR_DATA];
214     //since MPEG packs are block-aligned we stop discarding sectors if they are non-null
215     if (vcd_read(vcd, mem) != VCD_SECTOR_DATA || mem[2] || mem[3])
216       break;
217   }
218   mp_msg(MSGT_OPEN, MSGL_DBG2, "%d leading sectors skipped\n", tmp - sect);
219   vcd_set_msf(vcd, tmp);
220   ret = tmp * VCD_SECTOR_DATA;
221
222   mp_msg(MSGT_OPEN,MSGL_V,"VCD start byte position: 0x%X  end: 0x%X\n",ret,ret2);
223
224 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
225   if (ioctl (f, CDRIOCSETBLOCKSIZE, &bsize) == -1) {
226     mp_msg(MSGT_OPEN,MSGL_WARN,"Error in CDRIOCSETBLOCKSIZE");
227   }
228 #endif
229
230   stream->fd = f;
231   stream->type = STREAMTYPE_VCD;
232   stream->sector_size = VCD_SECTOR_DATA;
233   stream->start_pos=ret;
234   stream->end_pos=ret2;
235   stream->priv = vcd;
236
237   stream->fill_buffer = fill_buffer;
238   stream->seek = seek;
239   stream->control = control;
240   stream->close = close_s;
241   *file_format = DEMUXER_TYPE_MPEG_PS;
242
243   m_struct_free(&stream_opts,opts);
244   return STREAM_OK;
245 }
246
247 const stream_info_t stream_info_vcd = {
248   "Video CD",
249   "vcd",
250   "Albeu",
251   "based on the code from ???",
252   open_s,
253   { "vcd", NULL },
254   &stream_opts,
255   1 // Urls are an option string
256 };