e00ea880150b348660b19e48067a2ade6677799e
[sfrench/samba-autobuild/.git] / source / rpc_server / srv_dfs_nt.c
1 /* 
2  *  Unix SMB/CIFS implementation.
3  *  RPC Pipe client / server routines for Dfs
4  *  Copyright (C) Shirish Kalele        2000.
5  *  Copyright (C) Jeremy Allison        2001.
6  *  Copyright (C) Jelmer Vernooij       2005-2006.
7  *  
8  *  This program is free software; you can redistribute it and/or modify
9  *  it under the terms of the GNU General Public License as published by
10  *  the Free Software Foundation; either version 3 of the License, or
11  *  (at your option) any later version.
12  *  
13  *  This program is distributed in the hope that it will be useful,
14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  *  GNU General Public License for more details.
17  *  
18  *  You should have received a copy of the GNU General Public License
19  *  along with this program; if not, write to the Free Software
20  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21  */
22
23 /* This is the implementation of the dfs pipe. */
24
25 #include "includes.h"
26
27 #undef DBGC_CLASS
28 #define DBGC_CLASS DBGC_MSDFS
29
30 /* This function does not return a WERROR or NTSTATUS code but rather 1 if
31    dfs exists, or 0 otherwise. */
32
33 void _dfs_GetManagerVersion(pipes_struct *p, struct dfs_GetManagerVersion *r)
34 {
35         if (lp_host_msdfs()) {
36                 *r->out.version = DFS_MANAGER_VERSION_NT4;
37         } else {
38                 *r->out.version = 0;
39         }
40 }
41
42 WERROR _dfs_Add(pipes_struct *p, struct dfs_Add *r)
43 {
44         struct junction_map jn;
45         struct referral* old_referral_list = NULL;
46         BOOL self_ref = False;
47         int consumedcnt = 0;
48         BOOL exists = False;
49
50         pstring altpath;
51
52         if (p->pipe_user.ut.uid != 0) {
53                 DEBUG(10,("_dfs_add: uid != 0. Access denied.\n"));
54                 return WERR_ACCESS_DENIED;
55         }
56
57         DEBUG(5,("init_reply_dfs_add: Request to add %s -> %s\\%s.\n",
58                 r->in.path, r->in.server, r->in.share));
59
60         pstrcpy(altpath, r->in.server);
61         pstrcat(altpath, "\\");
62         pstrcat(altpath, r->in.share);
63
64         /* The following call can change the cwd. */
65         if(NT_STATUS_IS_OK(get_referred_path(p->mem_ctx, r->in.path, &jn, &consumedcnt, &self_ref))) {
66                 exists = True;
67                 jn.referral_count += 1;
68                 old_referral_list = jn.referral_list;
69         } else {
70                 jn.referral_count = 1;
71         }
72
73         vfs_ChDir(p->conn,p->conn->connectpath);
74
75         jn.referral_list = TALLOC_ARRAY(p->mem_ctx, struct referral, jn.referral_count);
76         if(jn.referral_list == NULL) {
77                 DEBUG(0,("init_reply_dfs_add: talloc failed for referral list!\n"));
78                 return WERR_DFS_INTERNAL_ERROR;
79         }
80
81         if(old_referral_list) {
82                 memcpy(jn.referral_list, old_referral_list, sizeof(struct referral)*jn.referral_count-1);
83         }
84   
85         jn.referral_list[jn.referral_count-1].proximity = 0;
86         jn.referral_list[jn.referral_count-1].ttl = REFERRAL_TTL;
87
88         pstrcpy(jn.referral_list[jn.referral_count-1].alternate_path, altpath);
89   
90         if(!create_msdfs_link(&jn, exists)) {
91                 vfs_ChDir(p->conn,p->conn->connectpath);
92                 return WERR_DFS_CANT_CREATE_JUNCT;
93         }
94         vfs_ChDir(p->conn,p->conn->connectpath);
95
96         return WERR_OK;
97 }
98
99 WERROR _dfs_Remove(pipes_struct *p, struct dfs_Remove *r)
100 {
101         struct junction_map jn;
102         BOOL self_ref = False;
103         int consumedcnt = 0;
104         BOOL found = False;
105
106         pstring altpath;
107
108         if (p->pipe_user.ut.uid != 0) {
109                 DEBUG(10,("_dfs_remove: uid != 0. Access denied.\n"));
110                 return WERR_ACCESS_DENIED;
111         }
112
113         if (r->in.servername && r->in.sharename) {
114                 pstrcpy(altpath, r->in.servername);
115                 pstrcat(altpath, "\\");
116                 pstrcat(altpath, r->in.sharename);
117                 strlower_m(altpath);
118         }
119
120         DEBUG(5,("init_reply_dfs_remove: Request to remove %s -> %s\\%s.\n",
121                 r->in.dfs_entry_path, r->in.servername, r->in.sharename));
122
123         if(!NT_STATUS_IS_OK(get_referred_path(p->mem_ctx, r->in.dfs_entry_path, &jn, &consumedcnt, &self_ref))) {
124                 return WERR_DFS_NO_SUCH_VOL;
125         }
126
127         /* if no server-share pair given, remove the msdfs link completely */
128         if(!r->in.servername && !r->in.sharename) {
129                 if(!remove_msdfs_link(&jn)) {
130                         vfs_ChDir(p->conn,p->conn->connectpath);
131                         return WERR_DFS_NO_SUCH_VOL;
132                 }
133                 vfs_ChDir(p->conn,p->conn->connectpath);
134         } else {
135                 int i=0;
136                 /* compare each referral in the list with the one to remove */
137                 DEBUG(10,("altpath: .%s. refcnt: %d\n", altpath, jn.referral_count));
138                 for(i=0;i<jn.referral_count;i++) {
139                         pstring refpath;
140                         pstrcpy(refpath,jn.referral_list[i].alternate_path);
141                         trim_char(refpath, '\\', '\\');
142                         DEBUG(10,("_dfs_remove:  refpath: .%s.\n", refpath));
143                         if(strequal(refpath, altpath)) {
144                                 *(jn.referral_list[i].alternate_path)='\0';
145                                 DEBUG(10,("_dfs_remove: Removal request matches referral %s\n",
146                                         refpath));
147                                 found = True;
148                         }
149                 }
150
151                 if(!found) {
152                         return WERR_DFS_NO_SUCH_SHARE;
153                 }
154
155                 /* Only one referral, remove it */
156                 if(jn.referral_count == 1) {
157                         if(!remove_msdfs_link(&jn)) {
158                                 vfs_ChDir(p->conn,p->conn->connectpath);
159                                 return WERR_DFS_NO_SUCH_VOL;
160                         }
161                 } else {
162                         if(!create_msdfs_link(&jn, True)) { 
163                                 vfs_ChDir(p->conn,p->conn->connectpath);
164                                 return WERR_DFS_CANT_CREATE_JUNCT;
165                         }
166                 }
167                 vfs_ChDir(p->conn,p->conn->connectpath);
168         }
169
170         return WERR_OK;
171 }
172
173 static BOOL init_reply_dfs_info_1(TALLOC_CTX *mem_ctx, struct junction_map* j, struct dfs_Info1* dfs1)
174 {
175         dfs1->path = talloc_asprintf(mem_ctx, 
176                                 "\\\\%s\\%s\\%s", global_myname(), 
177                                 j->service_name, j->volume_name);
178         if (dfs1->path == NULL)
179                 return False;
180
181         DEBUG(5,("init_reply_dfs_info_1: initing entrypath: %s\n",dfs1->path));
182         return True;
183 }
184
185 static BOOL init_reply_dfs_info_2(TALLOC_CTX *mem_ctx, struct junction_map* j, struct dfs_Info2* dfs2)
186 {
187         dfs2->path = talloc_asprintf(mem_ctx, 
188                         "\\\\%s\\%s\\%s", global_myname(), j->service_name, j->volume_name);
189         if (dfs2->path == NULL)
190                 return False;
191         dfs2->comment = talloc_strdup(mem_ctx, j->comment);
192         dfs2->state = 1; /* set up state of dfs junction as OK */
193         dfs2->num_stores = j->referral_count;
194         return True;
195 }
196
197 static BOOL init_reply_dfs_info_3(TALLOC_CTX *mem_ctx, struct junction_map* j, struct dfs_Info3* dfs3)
198 {
199         int ii;
200         if (j->volume_name[0] == '\0')
201                 dfs3->path = talloc_asprintf(mem_ctx, "\\\\%s\\%s",
202                         global_myname(), j->service_name);
203         else
204                 dfs3->path = talloc_asprintf(mem_ctx, "\\\\%s\\%s\\%s", global_myname(),
205                         j->service_name, j->volume_name);
206
207         if (dfs3->path == NULL)
208                 return False;
209
210         dfs3->comment = talloc_strdup(mem_ctx, j->comment);
211         dfs3->state = 1;
212         dfs3->num_stores = j->referral_count;
213     
214         /* also enumerate the stores */
215         if (j->referral_count) {
216                 dfs3->stores = TALLOC_ARRAY(mem_ctx, struct dfs_StorageInfo, j->referral_count);
217                 if (!dfs3->stores)
218                         return False;
219                 memset(dfs3->stores, '\0', j->referral_count * sizeof(struct dfs_StorageInfo));
220         } else {
221                 dfs3->stores = NULL;
222         }
223
224         for(ii=0;ii<j->referral_count;ii++) {
225                 char* p; 
226                 pstring path;
227                 struct dfs_StorageInfo* stor = &(dfs3->stores[ii]);
228                 struct referral* ref = &(j->referral_list[ii]);
229   
230                 pstrcpy(path, ref->alternate_path);
231                 trim_char(path,'\\','\0');
232                 p = strrchr_m(path,'\\');
233                 if(p==NULL) {
234                         DEBUG(4,("init_reply_dfs_info_3: invalid path: no \\ found in %s\n",path));
235                         continue;
236                 }
237                 *p = '\0';
238                 DEBUG(5,("storage %d: %s.%s\n",ii,path,p+1));
239                 stor->state = 2; /* set all stores as ONLINE */
240                 stor->server = talloc_strdup(mem_ctx, path);
241                 stor->share = talloc_strdup(mem_ctx, p+1);
242         }
243         return True;
244 }
245
246 static BOOL init_reply_dfs_info_100(TALLOC_CTX *mem_ctx, struct junction_map* j, struct dfs_Info100* dfs100)
247 {
248         dfs100->comment = talloc_strdup(mem_ctx, j->comment);
249         return True;
250 }
251
252
253 WERROR _dfs_Enum(pipes_struct *p, struct dfs_Enum *r)
254 {
255         struct junction_map jn[MAX_MSDFS_JUNCTIONS];
256         int num_jn = 0;
257         int i;
258
259         num_jn = enum_msdfs_links(p->mem_ctx, jn, ARRAY_SIZE(jn));
260         vfs_ChDir(p->conn,p->conn->connectpath);
261     
262         DEBUG(5,("_dfs_Enum: %d junctions found in Dfs, doing level %d\n", num_jn, r->in.level));
263
264         *r->out.total = num_jn;
265
266         /* Create the return array */
267         switch (r->in.level) {
268         case 1:
269                 if (num_jn) {
270                         if ((r->out.info->e.info1->s = TALLOC_ARRAY(p->mem_ctx, struct dfs_Info1, num_jn)) == NULL) {
271                                 return WERR_NOMEM;
272                         }
273                 } else {
274                         r->out.info->e.info1->s = NULL;
275                 }
276                 r->out.info->e.info1->count = num_jn;
277                 break;
278         case 2:
279                 if (num_jn) {
280                         if ((r->out.info->e.info2->s = TALLOC_ARRAY(p->mem_ctx, struct dfs_Info2, num_jn)) == NULL) {
281                                 return WERR_NOMEM;
282                         }
283                 } else {
284                         r->out.info->e.info2->s = NULL;
285                 }
286                 r->out.info->e.info2->count = num_jn;
287                 break;
288         case 3:
289                 if (num_jn) {
290                         if ((r->out.info->e.info3->s = TALLOC_ARRAY(p->mem_ctx, struct dfs_Info3, num_jn)) == NULL) {
291                                 return WERR_NOMEM;
292                         }
293                 } else {
294                         r->out.info->e.info3->s = NULL;
295                 }
296                 r->out.info->e.info3->count = num_jn;
297                 break;
298         default:
299                 return WERR_INVALID_PARAM;
300         }
301
302         for (i = 0; i < num_jn; i++) {
303                 switch (r->in.level) {
304                 case 1: 
305                         init_reply_dfs_info_1(p->mem_ctx, &jn[i], &r->out.info->e.info1->s[i]);
306                         break;
307                 case 2:
308                         init_reply_dfs_info_2(p->mem_ctx, &jn[i], &r->out.info->e.info2->s[i]);
309                         break;
310                 case 3:
311                         init_reply_dfs_info_3(p->mem_ctx, &jn[i], &r->out.info->e.info3->s[i]);
312                         break;
313                 default:
314                         return WERR_INVALID_PARAM;
315                 }
316         }
317   
318         return WERR_OK;
319 }
320
321 WERROR _dfs_GetInfo(pipes_struct *p, struct dfs_GetInfo *r)
322 {
323         int consumedcnt = sizeof(pstring);
324         struct junction_map jn;
325         BOOL self_ref = False;
326         BOOL ret;
327
328         if(!create_junction(r->in.dfs_entry_path, &jn))
329                 return WERR_DFS_NO_SUCH_SERVER;
330   
331         /* The following call can change the cwd. */
332         if(!NT_STATUS_IS_OK(get_referred_path(p->mem_ctx, r->in.dfs_entry_path, &jn, &consumedcnt, &self_ref)) || consumedcnt < strlen(r->in.dfs_entry_path)) {
333                 vfs_ChDir(p->conn,p->conn->connectpath);
334                 return WERR_DFS_NO_SUCH_VOL;
335         }
336
337         vfs_ChDir(p->conn,p->conn->connectpath);
338
339         switch (r->in.level) {
340                 case 1: ret = init_reply_dfs_info_1(p->mem_ctx, &jn, r->out.info->info1); break;
341                 case 2: ret = init_reply_dfs_info_2(p->mem_ctx, &jn, r->out.info->info2); break;
342                 case 3: ret = init_reply_dfs_info_3(p->mem_ctx, &jn, r->out.info->info3); break;
343                 case 100: ret = init_reply_dfs_info_100(p->mem_ctx, &jn, r->out.info->info100); break;
344                 default:
345                         r->out.info->info1 = NULL;
346                         return WERR_INVALID_PARAM;
347         }
348
349         if (!ret) 
350                 return WERR_INVALID_PARAM;
351   
352         return WERR_OK;
353 }
354
355 WERROR _dfs_SetInfo(pipes_struct *p, struct dfs_SetInfo *r)
356 {
357         /* FIXME: Implement your code here */
358         p->rng_fault_state = True;
359         return WERR_NOT_SUPPORTED;
360 }
361
362 WERROR _dfs_Rename(pipes_struct *p, struct dfs_Rename *r)
363 {
364         /* FIXME: Implement your code here */
365         p->rng_fault_state = True;
366         return WERR_NOT_SUPPORTED;
367 }
368
369 WERROR _dfs_Move(pipes_struct *p, struct dfs_Move *r)
370 {
371         /* FIXME: Implement your code here */
372         p->rng_fault_state = True;
373         return WERR_NOT_SUPPORTED;
374 }
375
376 WERROR _dfs_ManagerGetConfigInfo(pipes_struct *p, struct dfs_ManagerGetConfigInfo *r)
377 {
378         /* FIXME: Implement your code here */
379         p->rng_fault_state = True;
380         return WERR_NOT_SUPPORTED;
381 }
382
383 WERROR _dfs_ManagerSendSiteInfo(pipes_struct *p, struct dfs_ManagerSendSiteInfo *r)
384 {
385         /* FIXME: Implement your code here */
386         p->rng_fault_state = True;
387         return WERR_NOT_SUPPORTED;
388 }
389
390 WERROR _dfs_AddFtRoot(pipes_struct *p, struct dfs_AddFtRoot *r)
391 {
392         /* FIXME: Implement your code here */
393         p->rng_fault_state = True;
394         return WERR_NOT_SUPPORTED;
395 }
396
397 WERROR _dfs_RemoveFtRoot(pipes_struct *p, struct dfs_RemoveFtRoot *r)
398 {
399         /* FIXME: Implement your code here */
400         p->rng_fault_state = True;
401         return WERR_NOT_SUPPORTED;
402 }
403
404 WERROR _dfs_AddStdRoot(pipes_struct *p, struct dfs_AddStdRoot *r)
405 {
406         /* FIXME: Implement your code here */
407         p->rng_fault_state = True;
408         return WERR_NOT_SUPPORTED;
409 }
410
411 WERROR _dfs_RemoveStdRoot(pipes_struct *p, struct dfs_RemoveStdRoot *r)
412 {
413         /* FIXME: Implement your code here */
414         p->rng_fault_state = True;
415         return WERR_NOT_SUPPORTED;
416 }
417
418 WERROR _dfs_ManagerInitialize(pipes_struct *p, struct dfs_ManagerInitialize *r)
419 {
420         /* FIXME: Implement your code here */
421         p->rng_fault_state = True;
422         return WERR_NOT_SUPPORTED;
423 }
424
425 WERROR _dfs_AddStdRootForced(pipes_struct *p, struct dfs_AddStdRootForced *r)
426 {
427         /* FIXME: Implement your code here */
428         p->rng_fault_state = True;
429         return WERR_NOT_SUPPORTED;
430 }
431
432 WERROR _dfs_GetDcAddress(pipes_struct *p, struct dfs_GetDcAddress *r)
433 {
434         /* FIXME: Implement your code here */
435         p->rng_fault_state = True;
436         return WERR_NOT_SUPPORTED;
437 }
438
439 WERROR _dfs_SetDcAddress(pipes_struct *p, struct dfs_SetDcAddress *r)
440 {
441         /* FIXME: Implement your code here */
442         p->rng_fault_state = True;
443         return WERR_NOT_SUPPORTED;
444 }
445
446 WERROR _dfs_FlushFtTable(pipes_struct *p, struct dfs_FlushFtTable *r)
447 {
448         /* FIXME: Implement your code here */
449         p->rng_fault_state = True;
450         return WERR_NOT_SUPPORTED;
451 }
452
453 WERROR _dfs_Add2(pipes_struct *p, struct dfs_Add2 *r)
454 {
455         /* FIXME: Implement your code here */
456         p->rng_fault_state = True;
457         return WERR_NOT_SUPPORTED;
458 }
459
460 WERROR _dfs_Remove2(pipes_struct *p, struct dfs_Remove2 *r)
461 {
462         /* FIXME: Implement your code here */
463         p->rng_fault_state = True;
464         return WERR_NOT_SUPPORTED;
465 }
466
467 WERROR _dfs_EnumEx(pipes_struct *p, struct dfs_EnumEx *r)
468 {
469         /* FIXME: Implement your code here */
470         p->rng_fault_state = True;
471         return WERR_NOT_SUPPORTED;
472 }
473
474 WERROR _dfs_SetInfo2(pipes_struct *p, struct dfs_SetInfo2 *r)
475 {
476         /* FIXME: Implement your code here */
477         p->rng_fault_state = True;
478         return WERR_NOT_SUPPORTED;
479 }