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