1 /*****************************************************************************
2 * smb.c: SMB input module
3 *****************************************************************************
4 * Copyright (C) 2001-2009 the VideoLAN team
7 * Authors: Gildas Bazin <gbazin@videolan.org>
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22 *****************************************************************************/
24 /*****************************************************************************
26 *****************************************************************************/
31 #include <vlc_common.h>
32 #include <vlc_charset.h>
33 #include <vlc_plugin.h>
34 #include <vlc_access.h>
40 # ifdef HAVE_SYS_STAT_H
41 # include <sys/stat.h>
44 # define smbc_open(a,b,c) utf8_open(a,b,c)
45 # define smbc_fstat(a,b) _fstati64(a,b)
46 # define smbc_read read
47 # define smbc_lseek _lseeki64
48 # define smbc_close close
50 # include <libsmbclient.h>
55 /*****************************************************************************
57 *****************************************************************************/
58 static int Open ( vlc_object_t * );
59 static void Close( vlc_object_t * );
61 #define CACHING_TEXT N_("Caching value in ms")
62 #define CACHING_LONGTEXT N_( \
63 "Caching value for SMB streams. This " \
64 "value should be set in milliseconds." )
65 #define USER_TEXT N_("SMB user name")
66 #define USER_LONGTEXT N_("User name that will " \
67 "be used for the connection.")
68 #define PASS_TEXT N_("SMB password")
69 #define PASS_LONGTEXT N_("Password that will be " \
70 "used for the connection.")
71 #define DOMAIN_TEXT N_("SMB domain")
72 #define DOMAIN_LONGTEXT N_("Domain/Workgroup that " \
73 "will be used for the connection.")
76 set_shortname( "SMB" )
77 set_description( N_("SMB input") )
78 set_capability( "access", 0 )
79 set_category( CAT_INPUT )
80 set_subcategory( SUBCAT_INPUT_ACCESS )
81 add_integer( "smb-caching", 2 * DEFAULT_PTS_DELAY / 1000, NULL,
82 CACHING_TEXT, CACHING_LONGTEXT, true )
84 add_string( "smb-user", NULL, NULL, USER_TEXT, USER_LONGTEXT,
86 add_password( "smb-pwd", NULL, NULL, PASS_TEXT,
87 PASS_LONGTEXT, false )
88 add_string( "smb-domain", NULL, NULL, DOMAIN_TEXT,
89 DOMAIN_LONGTEXT, false )
91 set_callbacks( Open, Close )
94 /*****************************************************************************
96 *****************************************************************************/
97 static ssize_t Read( access_t *, uint8_t *, size_t );
98 static int Seek( access_t *, int64_t );
99 static int Control( access_t *, int, va_list );
107 static void Win32AddConnection( access_t *, char *, char *, char *, char * );
109 static void smb_auth( const char *srv, const char *shr, char *wg, int wglen,
110 char *un, int unlen, char *pw, int pwlen )
120 //wglen = unlen = pwlen = 0;
124 /****************************************************************************
125 * Open: connect to smb server and ask for file
126 ****************************************************************************/
127 static int Open( vlc_object_t *p_this )
129 access_t *p_access = (access_t*)p_this;
131 struct stat filestat;
132 char *psz_path, *psz_uri;
133 char *psz_user = NULL, *psz_pwd = NULL, *psz_domain = NULL;
138 * [[[domain;]user[:password@]]server[/share[/path[/file]]]] */
139 psz_path = strchr( p_access->psz_path, '/' );
142 msg_Err( p_access, "invalid SMB URI: smb://%s", psz_path );
147 char *psz_tmp = strdup( p_access->psz_path );
150 psz_tmp[ psz_path - p_access->psz_path ] = 0;
151 psz_path = p_access->psz_path;
152 psz_parser = strchr( psz_tmp, '@' );
155 /* User info is there */
157 psz_path = p_access->psz_path + (psz_parser - psz_tmp) + 1;
159 psz_parser = strchr( psz_tmp, ':' );
163 psz_pwd = strdup( psz_parser+1 );
167 psz_parser = strchr( psz_tmp, ';' );
171 *psz_parser = 0; psz_parser++;
172 psz_domain = strdup( psz_tmp );
174 else psz_parser = psz_tmp;
176 psz_user = strdup( psz_parser );
183 * smb://[[[domain;]user[:password@]]server[/share[/path[/file]]]] */
185 if( !psz_user ) psz_user = var_CreateGetString( p_access, "smb-user" );
186 if( psz_user && !*psz_user ) { free( psz_user ); psz_user = NULL; }
187 if( !psz_pwd ) psz_pwd = var_CreateGetString( p_access, "smb-pwd" );
188 if( psz_pwd && !*psz_pwd ) { free( psz_pwd ); psz_pwd = NULL; }
189 if( !psz_domain ) psz_domain = var_CreateGetString( p_access, "smb-domain" );
190 if( psz_domain && !*psz_domain ) { free( psz_domain ); psz_domain = NULL; }
194 Win32AddConnection( p_access, psz_path, psz_user, psz_pwd, psz_domain);
195 i_ret = asprintf( &psz_uri, "//%s", psz_path );
198 i_ret = asprintf( &psz_uri, "smb://%s%s%s%s%s@%s",
199 psz_domain ? psz_domain : "", psz_domain ? ";" : "",
200 psz_user, psz_pwd ? ":" : "",
201 psz_pwd ? psz_pwd : "", psz_path );
203 i_ret = asprintf( &psz_uri, "smb://%s", psz_path );
214 if( smbc_init( smb_auth, 0 ) )
222 ** some version of glibc defines open as a macro, causing havoc
223 ** with other macros using 'open' under the hood, such as the
226 #if defined(smbc_open) && defined(open)
229 if( (i_smb = smbc_open( psz_uri, O_RDONLY, 0 )) < 0 )
231 msg_Err( p_access, "open failed for '%s' (%m)", p_access->psz_path );
237 STANDARD_READ_ACCESS_INIT;
239 i_ret = smbc_fstat( i_smb, &filestat );
243 msg_Err( p_access, "stat failed (%m)" );
246 p_access->info.i_size = filestat.st_size;
250 p_sys->i_smb = i_smb;
252 /* Update default_pts to a suitable value for smb access */
253 var_Create( p_access, "smb-caching", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
258 /*****************************************************************************
259 * Close: free unused data structures
260 *****************************************************************************/
261 static void Close( vlc_object_t *p_this )
263 access_t *p_access = (access_t*)p_this;
264 access_sys_t *p_sys = p_access->p_sys;
266 smbc_close( p_sys->i_smb );
270 /*****************************************************************************
271 * Seek: try to go at the right place
272 *****************************************************************************/
273 static int Seek( access_t *p_access, int64_t i_pos )
275 access_sys_t *p_sys = p_access->p_sys;
278 if( i_pos < 0 ) return VLC_EGENERIC;
280 msg_Dbg( p_access, "seeking to %"PRId64, i_pos );
282 i_ret = smbc_lseek( p_sys->i_smb, i_pos, SEEK_SET );
285 msg_Err( p_access, "seek failed (%m)" );
289 p_access->info.b_eof = false;
290 p_access->info.i_pos = i_ret;
295 /*****************************************************************************
297 *****************************************************************************/
298 static ssize_t Read( access_t *p_access, uint8_t *p_buffer, size_t i_len )
300 access_sys_t *p_sys = p_access->p_sys;
303 if( p_access->info.b_eof ) return 0;
305 i_read = smbc_read( p_sys->i_smb, p_buffer, i_len );
308 msg_Err( p_access, "read failed (%m)" );
312 if( i_read == 0 ) p_access->info.b_eof = true;
313 else if( i_read > 0 ) p_access->info.i_pos += i_read;
318 /*****************************************************************************
320 *****************************************************************************/
321 static int Control( access_t *p_access, int i_query, va_list args )
325 case ACCESS_CAN_SEEK:
326 case ACCESS_CAN_FASTSEEK:
327 case ACCESS_CAN_PAUSE:
328 case ACCESS_CAN_CONTROL_PACE:
329 *va_arg( args, bool* ) = true;
332 case ACCESS_GET_PTS_DELAY:
333 *va_arg( args, int64_t * )
334 = (int64_t)var_GetInteger( p_access, "smb-caching" ) * 1000;
337 case ACCESS_SET_PAUSE_STATE:
341 case ACCESS_GET_TITLE_INFO:
342 case ACCESS_SET_TITLE:
343 case ACCESS_SET_SEEKPOINT:
344 case ACCESS_SET_PRIVATE_ID_STATE:
345 case ACCESS_GET_CONTENT_TYPE:
349 msg_Warn( p_access, "unimplemented query in control" );
358 static void Win32AddConnection( access_t *p_access, char *psz_path,
359 char *psz_user, char *psz_pwd,
362 DWORD (*OurWNetAddConnection2)( LPNETRESOURCE, LPCTSTR, LPCTSTR, DWORD );
363 char psz_remote[MAX_PATH], psz_server[MAX_PATH], psz_share[MAX_PATH];
364 NETRESOURCE net_resource;
367 VLC_UNUSED( psz_domain );
369 HINSTANCE hdll = LoadLibrary(_T("MPR.DLL"));
372 msg_Warn( p_access, "couldn't load mpr.dll" );
376 OurWNetAddConnection2 =
377 (void *)GetProcAddress( hdll, _T("WNetAddConnection2A") );
378 if( !OurWNetAddConnection2 )
380 msg_Warn( p_access, "couldn't find WNetAddConnection2 in mpr.dll" );
384 memset( &net_resource, 0, sizeof(net_resource) );
385 net_resource.dwType = RESOURCETYPE_DISK;
387 /* Find out server and share names */
388 strlcpy( psz_server, psz_path, sizeof( psz_server ) );
390 psz_parser = strchr( psz_path, '/' );
393 char *psz_parser2 = strchr( ++psz_parser, '/' );
395 strlcpy( psz_share, psz_parser, sizeof( psz_share ) );
398 snprintf( psz_remote, sizeof( psz_remote ), "\\\\%s\\%s", psz_server, psz_share );
399 net_resource.lpRemoteName = psz_remote;
401 i_result = OurWNetAddConnection2( &net_resource, psz_pwd, psz_user, 0 );
403 if( i_result != NO_ERROR )
405 msg_Dbg( p_access, "connected to %s", psz_remote );
407 else if( i_result != ERROR_ALREADY_ASSIGNED &&
408 i_result != ERROR_DEVICE_ALREADY_REMEMBERED )
410 msg_Dbg( p_access, "already connected to %s", psz_remote );
414 msg_Dbg( p_access, "failed to connect to %s", psz_remote );