2 Unix SMB/Netbios implementation.
3 SMB client library implementation
4 Copyright (C) Andrew Tridgell 1998
5 Copyright (C) Richard Sharpe 2000, 2002
6 Copyright (C) John Terpstra 2000
7 Copyright (C) Tom Jansen (Ninja ISD) 2002
8 Copyright (C) Derrell Lipman 2003-2008
9 Copyright (C) Jeremy Allison 2007, 2008
11 This program is free software; you can redistribute it and/or modify
12 it under the terms of the GNU General Public License as published by
13 the Free Software Foundation; either version 3 of the License, or
14 (at your option) any later version.
16 This program is distributed in the hope that it will be useful,
17 but WITHOUT ANY WARRANTY; without even the implied warranty of
18 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 GNU General Public License for more details.
21 You should have received a copy of the GNU General Public License
22 along with this program. If not, see <http://www.gnu.org/licenses/>.
26 #include "libsmbclient.h"
27 #include "libsmb_internal.h"
30 /* Used by urldecode_talloc() */
32 hex2int( unsigned int _char
)
34 if ( _char
>= 'A' && _char
<='F')
35 return _char
- 'A' + 10;
36 if ( _char
>= 'a' && _char
<='f')
37 return _char
- 'a' + 10;
38 if ( _char
>= '0' && _char
<='9')
45 * and urldecode_talloc() (internal fn.)
47 * Convert strings of %xx to their single character equivalent. Each 'x' must
48 * be a valid hexadecimal digit, or that % sequence is left undecoded.
50 * dest may, but need not be, the same pointer as src.
52 * Returns the number of % sequences which could not be converted due to lack
53 * of two following hexadecimal digits.
56 urldecode_talloc(TALLOC_CTX
*ctx
, char **pp_dest
, const char *src
)
58 int old_length
= strlen(src
);
64 if (old_length
== 0) {
69 for (i
= 0; i
< old_length
; ) {
70 unsigned char character
= src
[i
++];
72 if (character
== '%') {
73 int a
= i
+1 < old_length
? hex2int(src
[i
]) : -1;
74 int b
= i
+1 < old_length
? hex2int(src
[i
+1]) : -1;
76 /* Replace valid sequence */
77 if (a
!= -1 && b
!= -1) {
78 /* Replace valid %xx sequence with %dd */
79 character
= (a
* 16) + b
;
80 if (character
== '\0') {
81 break; /* Stop at %00 */
91 dest
= TALLOC_ARRAY(ctx
, char, newlen
);
97 for (p
= dest
, i
= 0; i
< old_length
; ) {
98 unsigned char character
= src
[i
++];
100 if (character
== '%') {
101 int a
= i
+1 < old_length
? hex2int(src
[i
]) : -1;
102 int b
= i
+1 < old_length
? hex2int(src
[i
+1]) : -1;
104 /* Replace valid sequence */
105 if (a
!= -1 && b
!= -1) {
106 /* Replace valid %xx sequence with %dd */
107 character
= (a
* 16) + b
;
108 if (character
== '\0') {
109 break; /* Stop at %00 */
125 smbc_urldecode(char *dest
,
129 TALLOC_CTX
*frame
= talloc_stackframe();
131 int ret
= urldecode_talloc(frame
, &pdest
, src
);
134 strlcpy(dest
, pdest
, max_dest_len
);
143 * Convert any characters not specifically allowed in a URL into their %xx
146 * Returns the remaining buffer length.
149 smbc_urlencode(char *dest
,
153 char hex
[] = "0123456789ABCDEF";
155 for (; *src
!= '\0' && max_dest_len
>= 3; src
++) {
167 *dest
++ = hex
[(*src
>> 4) & 0x0f];
168 *dest
++ = hex
[*src
& 0x0f];
183 * Function to parse a path and turn it into components
185 * The general format of an SMB URI is explain in Christopher Hertel's CIFS
186 * book, at http://ubiqx.org/cifs/Appendix-D.html. We accept a subset of the
187 * general format ("smb:" only; we do not look for "cifs:").
191 * smb://[[[domain;]user[:password]@]server[/share[/path[/file]]]][?options]
195 * smb:// Show all workgroups.
197 * The method of locating the list of workgroups varies
198 * depending upon the setting of the context variable
199 * context->options.browse_max_lmb_count. This value
200 * determines the maximum number of local master browsers to
201 * query for the list of workgroups. In order to ensure that
202 * a complete list of workgroups is obtained, all master
203 * browsers must be queried, but if there are many
204 * workgroups, the time spent querying can begin to add up.
205 * For small networks (not many workgroups), it is suggested
206 * that this variable be set to 0, indicating query all local
207 * master browsers. When the network has many workgroups, a
208 * reasonable setting for this variable might be around 3.
210 * smb://name/ if name<1D> or name<1B> exists, list servers in
211 * workgroup, else, if name<20> exists, list all shares
214 * If "options" are provided, this function returns the entire option list as a
215 * string, for later parsing by the caller. Note that currently, no options
219 static const char *smbc_prefix
= "smb:";
222 SMBC_parse_path(TALLOC_CTX
*ctx
,
236 char *workgroup
= NULL
;
239 /* Ensure these returns are at least valid pointers. */
240 *pp_server
= talloc_strdup(ctx
, "");
241 *pp_share
= talloc_strdup(ctx
, "");
242 *pp_path
= talloc_strdup(ctx
, "");
243 *pp_user
= talloc_strdup(ctx
, "");
244 *pp_password
= talloc_strdup(ctx
, "");
246 if (!*pp_server
|| !*pp_share
|| !*pp_path
||
247 !*pp_user
|| !*pp_password
) {
252 * Assume we wont find an authentication domain to parse, so default
253 * to the workgroup in the provided context.
255 if (pp_workgroup
!= NULL
) {
257 talloc_strdup(ctx
, smbc_getWorkgroup(context
));
261 *pp_options
= talloc_strdup(ctx
, "");
263 s
= talloc_strdup(ctx
, fname
);
265 /* see if it has the right prefix */
266 len
= strlen(smbc_prefix
);
267 if (strncmp(s
,smbc_prefix
,len
) || (s
[len
] != '/' && s
[len
] != 0)) {
268 return -1; /* What about no smb: ? */
273 /* Watch the test below, we are testing to see if we should exit */
275 if (strncmp(p
, "//", 2) && strncmp(p
, "\\\\", 2)) {
276 DEBUG(1, ("Invalid path (does not begin with smb://"));
280 p
+= 2; /* Skip the double slash */
282 /* See if any options were specified */
283 if ((q
= strrchr(p
, '?')) != NULL
) {
284 /* There are options. Null terminate here and point to them */
287 DEBUG(4, ("Found options '%s'", q
));
289 /* Copy the options */
290 if (pp_options
&& *pp_options
!= NULL
) {
291 TALLOC_FREE(*pp_options
);
292 *pp_options
= talloc_strdup(ctx
, q
);
301 int wl
= strlen(smbc_getWorkgroup(context
));
307 *pp_server
= talloc_strdup(ctx
, smbc_getWorkgroup(context
));
311 *pp_server
[wl
] = '\0';
316 * ok, its for us. Now parse out the server, share etc.
318 * However, we want to parse out [[domain;]user[:password]@] if it
322 /* check that '@' occurs before '/', if '/' exists at all */
323 q
= strchr_m(p
, '@');
324 r
= strchr_m(p
, '/');
325 if (q
&& (!r
|| q
< r
)) {
326 char *userinfo
= NULL
;
329 next_token_no_ltrim_talloc(ctx
, &p
, &userinfo
, "@");
335 if (strchr_m(u
, ';')) {
336 next_token_no_ltrim_talloc(ctx
, &u
, &workgroup
, ";");
341 *pp_workgroup
= workgroup
;
345 if (strchr_m(u
, ':')) {
346 next_token_no_ltrim_talloc(ctx
, &u
, pp_user
, ":");
350 *pp_password
= talloc_strdup(ctx
, u
);
355 *pp_user
= talloc_strdup(ctx
, u
);
362 if (!next_token_talloc(ctx
, &p
, pp_server
, "/")) {
367 goto decoding
; /* That's it ... */
370 if (!next_token_talloc(ctx
, &p
, pp_share
, "/")) {
375 * Prepend a leading slash if there's a file path, as required by
379 *pp_path
= talloc_asprintf(ctx
,
383 *pp_path
= talloc_strdup(ctx
, "");
388 string_replace(*pp_path
, '/', '\\');
392 (void) urldecode_talloc(ctx
, pp_path
, *pp_path
);
393 (void) urldecode_talloc(ctx
, pp_server
, *pp_server
);
394 (void) urldecode_talloc(ctx
, pp_share
, *pp_share
);
395 (void) urldecode_talloc(ctx
, pp_user
, *pp_user
);
396 (void) urldecode_talloc(ctx
, pp_password
, *pp_password
);
399 workgroup
= talloc_strdup(ctx
, smbc_getWorkgroup(context
));
405 /* set the credentials to make DFS work */
406 smbc_set_credentials_with_fallback(context
,