2 Unix SMB/CIFS implementation.
4 dcerpc utility functions
6 Copyright (C) Andrew Tridgell 2003
7 Copyright (C) Jelmer Vernooij 2004
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., 675 Mass Ave, Cambridge, MA 02139, USA.
25 #include "system/network.h"
26 #include "librpc/gen_ndr/ndr_epmapper.h"
29 find the pipe name for a local IDL interface
31 const char *idl_pipe_name(const char *uuid
, uint32_t if_version
)
33 const struct dcerpc_interface_list
*l
;
34 for (l
=librpc_dcerpc_pipes();l
;l
=l
->next
) {
35 if (strcasecmp(l
->table
->uuid
, uuid
) == 0 &&
36 l
->table
->if_version
== if_version
) {
37 return l
->table
->name
;
44 find the number of calls defined by local IDL
46 int idl_num_calls(const char *uuid
, uint32_t if_version
)
48 const struct dcerpc_interface_list
*l
;
49 for (l
=librpc_dcerpc_pipes();l
;l
=l
->next
){
50 if (strcasecmp(l
->table
->uuid
, uuid
) == 0 &&
51 l
->table
->if_version
== if_version
) {
52 return l
->table
->num_calls
;
60 find a dcerpc interface by name
62 const struct dcerpc_interface_table
*idl_iface_by_name(const char *name
)
64 const struct dcerpc_interface_list
*l
;
65 for (l
=librpc_dcerpc_pipes();l
;l
=l
->next
) {
66 if (strcasecmp(l
->table
->name
, name
) == 0) {
74 find a dcerpc interface by uuid
76 const struct dcerpc_interface_table
*idl_iface_by_uuid(const char *uuid
)
78 const struct dcerpc_interface_list
*l
;
79 for (l
=librpc_dcerpc_pipes();l
;l
=l
->next
) {
80 if (strcasecmp(l
->table
->uuid
, uuid
) == 0) {
89 push a dcerpc_packet into a blob, potentially with auth info
91 NTSTATUS
dcerpc_push_auth(DATA_BLOB
*blob
, TALLOC_CTX
*mem_ctx
,
92 struct dcerpc_packet
*pkt
,
93 struct dcerpc_auth
*auth_info
)
98 ndr
= ndr_push_init_ctx(mem_ctx
);
100 return NT_STATUS_NO_MEMORY
;
103 if (!(pkt
->drep
[0] & DCERPC_DREP_LE
)) {
104 ndr
->flags
|= LIBNDR_FLAG_BIGENDIAN
;
107 if (pkt
->pfc_flags
& DCERPC_PFC_FLAG_ORPC
) {
108 ndr
->flags
|= LIBNDR_FLAG_OBJECT_PRESENT
;
112 pkt
->auth_length
= auth_info
->credentials
.length
;
114 pkt
->auth_length
= 0;
117 status
= ndr_push_dcerpc_packet(ndr
, NDR_SCALARS
|NDR_BUFFERS
, pkt
);
118 if (!NT_STATUS_IS_OK(status
)) {
123 status
= ndr_push_dcerpc_auth(ndr
, NDR_SCALARS
|NDR_BUFFERS
, auth_info
);
126 *blob
= ndr_push_blob(ndr
);
128 /* fill in the frag length */
129 dcerpc_set_frag_length(blob
, blob
->length
);
134 #define MAX_PROTSEQ 10
136 static const struct {
138 enum dcerpc_transport_t transport
;
140 enum epm_protocol protseq
[MAX_PROTSEQ
];
142 { "ncacn_np", NCACN_NP
, 3,
143 { EPM_PROTOCOL_NCACN
, EPM_PROTOCOL_SMB
, EPM_PROTOCOL_NETBIOS
}},
144 { "ncacn_ip_tcp", NCACN_IP_TCP
, 3,
145 { EPM_PROTOCOL_NCACN
, EPM_PROTOCOL_TCP
, EPM_PROTOCOL_IP
} },
146 { "ncacn_http", NCACN_HTTP
, 3,
147 { EPM_PROTOCOL_NCACN
, EPM_PROTOCOL_HTTP
, EPM_PROTOCOL_IP
} },
148 { "ncadg_ip_udp", NCACN_IP_UDP
, 3,
149 { EPM_PROTOCOL_NCADG
, EPM_PROTOCOL_UDP
, EPM_PROTOCOL_IP
} },
150 { "ncalrpc", NCALRPC
, 2,
151 { EPM_PROTOCOL_NCALRPC
, EPM_PROTOCOL_PIPE
} },
152 { "ncacn_unix_stream", NCACN_UNIX_STREAM
, 2,
153 { EPM_PROTOCOL_NCACN
, EPM_PROTOCOL_UNIX_DS
} },
154 { "ncadg_unix_dgram", NCADG_UNIX_DGRAM
, 2,
155 { EPM_PROTOCOL_NCADG
, EPM_PROTOCOL_UNIX_DS
} },
156 { "ncacn_at_dsp", NCACN_AT_DSP
, 3,
157 { EPM_PROTOCOL_NCACN
, EPM_PROTOCOL_APPLETALK
, EPM_PROTOCOL_DSP
} },
158 { "ncadg_at_ddp", NCADG_AT_DDP
, 3,
159 { EPM_PROTOCOL_NCADG
, EPM_PROTOCOL_APPLETALK
, EPM_PROTOCOL_DDP
} },
160 { "ncacn_vns_ssp", NCACN_VNS_SPP
, 3,
161 { EPM_PROTOCOL_NCACN
, EPM_PROTOCOL_STREETTALK
, EPM_PROTOCOL_VINES_SPP
} },
162 { "ncacn_vns_ipc", NCACN_VNS_IPC
, 3,
163 { EPM_PROTOCOL_NCACN
, EPM_PROTOCOL_STREETTALK
, EPM_PROTOCOL_VINES_IPC
}, },
164 { "ncadg_ipx", NCADG_IPX
, 2,
165 { EPM_PROTOCOL_NCADG
, EPM_PROTOCOL_IPX
},
167 { "ncacn_spx", NCACN_SPX
, 3,
168 { EPM_PROTOCOL_NCACN
, EPM_PROTOCOL_NCALRPC
, EPM_PROTOCOL_UUID
},
172 static const struct {
175 } ncacn_options
[] = {
176 {"sign", DCERPC_SIGN
},
177 {"seal", DCERPC_SEAL
},
178 {"connect", DCERPC_CONNECT
},
179 {"spnego", DCERPC_AUTH_SPNEGO
},
180 {"krb5", DCERPC_AUTH_KRB5
},
181 {"validate", DCERPC_DEBUG_VALIDATE_BOTH
},
182 {"print", DCERPC_DEBUG_PRINT_BOTH
},
183 {"padcheck", DCERPC_DEBUG_PAD_CHECK
},
184 {"bigendian", DCERPC_PUSH_BIGENDIAN
}
187 const char *epm_floor_string(TALLOC_CTX
*mem_ctx
, struct epm_floor
*fl
)
193 switch(fl
->lhs
.protocol
) {
194 case EPM_PROTOCOL_UUID
:
195 status
= dcerpc_floor_get_lhs_data(fl
, &uuid
, &if_version
);
196 if (NT_STATUS_IS_OK(status
)) {
197 /* lhs is used: UUID */
200 uuidstr
= GUID_string(mem_ctx
, &uuid
);
202 if (strcasecmp(uuidstr
, NDR_GUID
) == 0) {
206 return talloc_asprintf(mem_ctx
, " uuid %s/0x%02x", uuidstr
, if_version
);
208 return talloc_asprintf(mem_ctx
, "IPX:%s",
209 data_blob_hex_string(mem_ctx
, &fl
->rhs
.uuid
.unknown
));
212 case EPM_PROTOCOL_NCACN
:
215 case EPM_PROTOCOL_NCADG
:
218 case EPM_PROTOCOL_NCALRPC
:
221 case EPM_PROTOCOL_DNET_NSP
:
224 case EPM_PROTOCOL_IP
:
225 return talloc_asprintf(mem_ctx
, "IP:%s", fl
->rhs
.ip
.ipaddr
);
227 case EPM_PROTOCOL_PIPE
:
228 return talloc_asprintf(mem_ctx
, "PIPE:%s", fl
->rhs
.pipe
.path
);
230 case EPM_PROTOCOL_SMB
:
231 return talloc_asprintf(mem_ctx
, "SMB:%s", fl
->rhs
.smb
.unc
);
233 case EPM_PROTOCOL_UNIX_DS
:
234 return talloc_asprintf(mem_ctx
, "Unix:%s", fl
->rhs
.unix_ds
.path
);
236 case EPM_PROTOCOL_NETBIOS
:
237 return talloc_asprintf(mem_ctx
, "NetBIOS:%s", fl
->rhs
.netbios
.name
);
239 case EPM_PROTOCOL_NETBEUI
:
242 case EPM_PROTOCOL_SPX
:
245 case EPM_PROTOCOL_NB_IPX
:
248 case EPM_PROTOCOL_HTTP
:
249 return talloc_asprintf(mem_ctx
, "HTTP:%d", fl
->rhs
.http
.port
);
251 case EPM_PROTOCOL_TCP
:
252 return talloc_asprintf(mem_ctx
, "TCP:%d", fl
->rhs
.tcp
.port
);
254 case EPM_PROTOCOL_UDP
:
255 return talloc_asprintf(mem_ctx
, "UDP:%d", fl
->rhs
.udp
.port
);
258 return talloc_asprintf(mem_ctx
, "UNK(%02x):", fl
->lhs
.protocol
);
264 form a binding string from a binding structure
266 const char *dcerpc_binding_string(TALLOC_CTX
*mem_ctx
, const struct dcerpc_binding
*b
)
268 char *s
= talloc_strdup(mem_ctx
, "");
270 const char *t_name
=NULL
;
272 for (i
=0;i
<ARRAY_SIZE(transports
);i
++) {
273 if (transports
[i
].transport
== b
->transport
) {
274 t_name
= transports
[i
].name
;
281 if (!GUID_all_zero(&b
->object
)) {
282 s
= talloc_asprintf(s
, "%s@",
283 GUID_string(mem_ctx
, &b
->object
));
286 s
= talloc_asprintf_append(s
, "%s:", t_name
);
290 s
= talloc_asprintf_append(s
, "%s", b
->host
);
293 if (!b
->endpoint
&& !b
->options
&& !b
->flags
) {
297 s
= talloc_asprintf_append(s
, "[");
300 s
= talloc_asprintf_append(s
, "%s", b
->endpoint
);
303 /* this is a *really* inefficent way of dealing with strings,
304 but this is rarely called and the strings are always short,
306 for (i
=0;b
->options
&& b
->options
[i
];i
++) {
307 s
= talloc_asprintf_append(s
, ",%s", b
->options
[i
]);
311 for (i
=0;i
<ARRAY_SIZE(ncacn_options
);i
++) {
312 if (b
->flags
& ncacn_options
[i
].flag
) {
313 s
= talloc_asprintf_append(s
, ",%s", ncacn_options
[i
].name
);
318 s
= talloc_asprintf_append(s
, "]");
324 parse a binding string into a dcerpc_binding structure
326 NTSTATUS
dcerpc_parse_binding(TALLOC_CTX
*mem_ctx
, const char *s
, struct dcerpc_binding
**b_out
)
328 struct dcerpc_binding
*b
;
329 char *options
, *type
;
331 int i
, j
, comma_count
;
333 b
= talloc(mem_ctx
, struct dcerpc_binding
);
335 return NT_STATUS_NO_MEMORY
;
338 b
->authservice
= NULL
;
342 if (p
&& PTR_DIFF(p
, s
) == 36) { /* 36 is the length of a UUID */
345 status
= GUID_from_string(s
, &b
->object
);
347 if (NT_STATUS_IS_ERR(status
)) {
348 DEBUG(0, ("Failed parsing UUID\n"));
354 ZERO_STRUCT(b
->object
);
357 b
->object_version
= 0;
361 return NT_STATUS_INVALID_PARAMETER
;
364 type
= talloc_strndup(mem_ctx
, s
, PTR_DIFF(p
, s
));
366 return NT_STATUS_NO_MEMORY
;
369 for (i
=0;i
<ARRAY_SIZE(transports
);i
++) {
370 if (strcasecmp(type
, transports
[i
].name
) == 0) {
371 b
->transport
= transports
[i
].transport
;
375 if (i
==ARRAY_SIZE(transports
)) {
376 DEBUG(0,("Unknown dcerpc transport '%s'\n", type
));
377 return NT_STATUS_INVALID_PARAMETER
;
384 b
->host
= talloc_strndup(b
, s
, PTR_DIFF(p
, s
));
385 options
= talloc_strdup(mem_ctx
, p
+1);
386 if (options
[strlen(options
)-1] != ']') {
387 return NT_STATUS_INVALID_PARAMETER
;
389 options
[strlen(options
)-1] = 0;
391 b
->host
= talloc_strdup(b
, s
);
396 return NT_STATUS_NO_MEMORY
;
408 comma_count
= count_chars(options
, ',');
410 b
->options
= talloc_array(b
, const char *, comma_count
+2);
412 return NT_STATUS_NO_MEMORY
;
415 for (i
=0; (p
= strchr(options
, ',')); i
++) {
416 b
->options
[i
] = talloc_strndup(b
, options
, PTR_DIFF(p
, options
));
417 if (!b
->options
[i
]) {
418 return NT_STATUS_NO_MEMORY
;
422 b
->options
[i
] = options
;
423 b
->options
[i
+1] = NULL
;
425 /* some options are pre-parsed for convenience */
426 for (i
=0;b
->options
[i
];i
++) {
427 for (j
=0;j
<ARRAY_SIZE(ncacn_options
);j
++) {
428 if (strcasecmp(ncacn_options
[j
].name
, b
->options
[i
]) == 0) {
430 b
->flags
|= ncacn_options
[j
].flag
;
431 for (k
=i
;b
->options
[k
];k
++) {
432 b
->options
[k
] = b
->options
[k
+1];
441 /* Endpoint is first option */
442 b
->endpoint
= b
->options
[0];
443 if (strlen(b
->endpoint
) == 0) b
->endpoint
= NULL
;
445 for (i
=0;b
->options
[i
];i
++) {
446 b
->options
[i
] = b
->options
[i
+1];
450 if (b
->options
[0] == NULL
)
457 NTSTATUS
dcerpc_floor_get_lhs_data(struct epm_floor
*floor
, struct GUID
*uuid
, uint16_t *if_version
)
459 TALLOC_CTX
*mem_ctx
= talloc_init("floor_get_lhs_data");
460 struct ndr_pull
*ndr
= ndr_pull_init_blob(&floor
->lhs
.lhs_data
, mem_ctx
);
463 ndr
->flags
|= LIBNDR_FLAG_NOALIGN
;
465 status
= ndr_pull_GUID(ndr
, NDR_SCALARS
| NDR_BUFFERS
, uuid
);
466 if (NT_STATUS_IS_ERR(status
)) {
467 talloc_free(mem_ctx
);
471 status
= ndr_pull_uint16(ndr
, NDR_SCALARS
, if_version
);
473 talloc_free(mem_ctx
);
478 DATA_BLOB
dcerpc_floor_pack_lhs_data(TALLOC_CTX
*mem_ctx
, struct GUID
*uuid
, uint32_t if_version
)
480 struct ndr_push
*ndr
= ndr_push_init_ctx(mem_ctx
);
482 ndr
->flags
|= LIBNDR_FLAG_NOALIGN
;
484 ndr_push_GUID(ndr
, NDR_SCALARS
| NDR_BUFFERS
, uuid
);
485 ndr_push_uint16(ndr
, NDR_SCALARS
, if_version
);
487 return ndr_push_blob(ndr
);
490 const char *dcerpc_floor_get_rhs_data(TALLOC_CTX
*mem_ctx
, struct epm_floor
*floor
)
492 switch (floor
->lhs
.protocol
) {
493 case EPM_PROTOCOL_TCP
:
494 if (floor
->rhs
.tcp
.port
== 0) return NULL
;
495 return talloc_asprintf(mem_ctx
, "%d", floor
->rhs
.tcp
.port
);
497 case EPM_PROTOCOL_UDP
:
498 if (floor
->rhs
.udp
.port
== 0) return NULL
;
499 return talloc_asprintf(mem_ctx
, "%d", floor
->rhs
.udp
.port
);
501 case EPM_PROTOCOL_HTTP
:
502 if (floor
->rhs
.http
.port
== 0) return NULL
;
503 return talloc_asprintf(mem_ctx
, "%d", floor
->rhs
.http
.port
);
505 case EPM_PROTOCOL_IP
:
506 return talloc_strdup(mem_ctx
, floor
->rhs
.ip
.ipaddr
);
508 case EPM_PROTOCOL_NCACN
:
511 case EPM_PROTOCOL_NCADG
:
514 case EPM_PROTOCOL_SMB
:
515 if (strlen(floor
->rhs
.smb
.unc
) == 0) return NULL
;
516 return talloc_strdup(mem_ctx
, floor
->rhs
.smb
.unc
);
518 case EPM_PROTOCOL_PIPE
:
519 if (strlen(floor
->rhs
.pipe
.path
) == 0) return NULL
;
520 return talloc_strdup(mem_ctx
, floor
->rhs
.pipe
.path
);
522 case EPM_PROTOCOL_NETBIOS
:
523 if (strlen(floor
->rhs
.netbios
.name
) == 0) return NULL
;
524 return talloc_strdup(mem_ctx
, floor
->rhs
.netbios
.name
);
526 case EPM_PROTOCOL_NCALRPC
:
529 case EPM_PROTOCOL_VINES_SPP
:
530 return talloc_asprintf(mem_ctx
, "%d", floor
->rhs
.vines_spp
.port
);
532 case EPM_PROTOCOL_VINES_IPC
:
533 return talloc_asprintf(mem_ctx
, "%d", floor
->rhs
.vines_ipc
.port
);
535 case EPM_PROTOCOL_STREETTALK
:
536 return talloc_strdup(mem_ctx
, floor
->rhs
.streettalk
.streettalk
);
538 case EPM_PROTOCOL_UNIX_DS
:
539 if (strlen(floor
->rhs
.unix_ds
.path
) == 0) return NULL
;
540 return talloc_strdup(mem_ctx
, floor
->rhs
.unix_ds
.path
);
542 case EPM_PROTOCOL_NULL
:
546 DEBUG(0,("Unsupported lhs protocol %d\n", floor
->lhs
.protocol
));
553 static NTSTATUS
dcerpc_floor_set_rhs_data(TALLOC_CTX
*mem_ctx
, struct epm_floor
*floor
, const char *data
)
555 switch (floor
->lhs
.protocol
) {
556 case EPM_PROTOCOL_TCP
:
557 floor
->rhs
.tcp
.port
= atoi(data
);
560 case EPM_PROTOCOL_UDP
:
561 floor
->rhs
.udp
.port
= atoi(data
);
564 case EPM_PROTOCOL_HTTP
:
565 floor
->rhs
.http
.port
= atoi(data
);
568 case EPM_PROTOCOL_IP
:
569 floor
->rhs
.ip
.ipaddr
= talloc_strdup(mem_ctx
, data
);
570 NT_STATUS_HAVE_NO_MEMORY(floor
->rhs
.ip
.ipaddr
);
573 case EPM_PROTOCOL_NCACN
:
574 floor
->rhs
.ncacn
.minor_version
= 0;
577 case EPM_PROTOCOL_NCADG
:
578 floor
->rhs
.ncadg
.minor_version
= 0;
581 case EPM_PROTOCOL_SMB
:
582 floor
->rhs
.smb
.unc
= talloc_strdup(mem_ctx
, data
);
583 NT_STATUS_HAVE_NO_MEMORY(floor
->rhs
.smb
.unc
);
586 case EPM_PROTOCOL_PIPE
:
587 floor
->rhs
.pipe
.path
= talloc_strdup(mem_ctx
, data
);
588 NT_STATUS_HAVE_NO_MEMORY(floor
->rhs
.pipe
.path
);
591 case EPM_PROTOCOL_NETBIOS
:
592 floor
->rhs
.netbios
.name
= talloc_strdup(mem_ctx
, data
);
593 NT_STATUS_HAVE_NO_MEMORY(floor
->rhs
.netbios
.name
);
596 case EPM_PROTOCOL_NCALRPC
:
599 case EPM_PROTOCOL_VINES_SPP
:
600 floor
->rhs
.vines_spp
.port
= atoi(data
);
603 case EPM_PROTOCOL_VINES_IPC
:
604 floor
->rhs
.vines_ipc
.port
= atoi(data
);
607 case EPM_PROTOCOL_STREETTALK
:
608 floor
->rhs
.streettalk
.streettalk
= talloc_strdup(mem_ctx
, data
);
609 NT_STATUS_HAVE_NO_MEMORY(floor
->rhs
.streettalk
.streettalk
);
612 case EPM_PROTOCOL_UNIX_DS
:
613 floor
->rhs
.unix_ds
.path
= talloc_strdup(mem_ctx
, data
);
614 NT_STATUS_HAVE_NO_MEMORY(floor
->rhs
.unix_ds
.path
);
617 case EPM_PROTOCOL_NULL
:
621 DEBUG(0,("Unsupported lhs protocol %d\n", floor
->lhs
.protocol
));
625 return NT_STATUS_NOT_SUPPORTED
;
628 enum dcerpc_transport_t
dcerpc_transport_by_endpoint_protocol(int prot
)
632 /* Find a transport that has 'prot' as 4th protocol */
633 for (i
=0;i
<ARRAY_SIZE(transports
);i
++) {
634 if (transports
[i
].num_protocols
>= 2 &&
635 transports
[i
].protseq
[1] == prot
) {
636 return transports
[i
].transport
;
640 /* Unknown transport */
644 enum dcerpc_transport_t
dcerpc_transport_by_tower(struct epm_tower
*tower
)
648 /* Find a transport that matches this tower */
649 for (i
=0;i
<ARRAY_SIZE(transports
);i
++) {
651 if (transports
[i
].num_protocols
!= tower
->num_floors
- 2) {
655 for (j
= 0; j
< transports
[i
].num_protocols
; j
++) {
656 if (transports
[i
].protseq
[j
] != tower
->floors
[j
+2].lhs
.protocol
) {
661 if (j
== transports
[i
].num_protocols
) {
662 return transports
[i
].transport
;
666 /* Unknown transport */
670 NTSTATUS
dcerpc_binding_from_tower(TALLOC_CTX
*mem_ctx
, struct epm_tower
*tower
, struct dcerpc_binding
**b_out
)
673 struct dcerpc_binding
*binding
;
675 binding
= talloc(mem_ctx
, struct dcerpc_binding
);
676 NT_STATUS_HAVE_NO_MEMORY(binding
);
678 ZERO_STRUCT(binding
->object
);
679 binding
->options
= NULL
;
680 binding
->host
= NULL
;
683 binding
->transport
= dcerpc_transport_by_tower(tower
);
685 if (binding
->transport
== -1) {
686 return NT_STATUS_NOT_SUPPORTED
;
689 if (tower
->num_floors
< 1) {
693 /* Set object uuid */
694 status
= dcerpc_floor_get_lhs_data(&tower
->floors
[0], &binding
->object
, &binding
->object_version
);
696 if (!NT_STATUS_IS_OK(status
)) {
697 DEBUG(1, ("Error pulling object uuid and version: %s", nt_errstr(status
)));
701 /* Ignore floor 1, it contains the NDR version info */
703 binding
->options
= NULL
;
706 if (tower
->num_floors
>= 4) {
707 binding
->endpoint
= dcerpc_floor_get_rhs_data(mem_ctx
, &tower
->floors
[3]);
709 binding
->endpoint
= NULL
;
712 /* Set network address */
713 if (tower
->num_floors
>= 5) {
714 binding
->host
= dcerpc_floor_get_rhs_data(mem_ctx
, &tower
->floors
[4]);
720 NTSTATUS
dcerpc_binding_build_tower(TALLOC_CTX
*mem_ctx
, struct dcerpc_binding
*binding
, struct epm_tower
*tower
)
722 const enum epm_protocol
*protseq
= NULL
;
723 int num_protocols
= -1, i
;
724 struct GUID ndr_guid
;
728 for (i
=0;i
<ARRAY_SIZE(transports
);i
++) {
729 if (transports
[i
].transport
== binding
->transport
) {
730 protseq
= transports
[i
].protseq
;
731 num_protocols
= transports
[i
].num_protocols
;
736 if (num_protocols
== -1) {
737 DEBUG(0, ("Unable to find transport with id '%d'\n", binding
->transport
));
738 return NT_STATUS_UNSUCCESSFUL
;
741 tower
->num_floors
= 2 + num_protocols
;
742 tower
->floors
= talloc_array(mem_ctx
, struct epm_floor
, tower
->num_floors
);
745 tower
->floors
[0].lhs
.protocol
= EPM_PROTOCOL_UUID
;
747 tower
->floors
[0].lhs
.lhs_data
= dcerpc_floor_pack_lhs_data(mem_ctx
, &binding
->object
, binding
->object_version
);
749 tower
->floors
[0].rhs
.uuid
.unknown
= data_blob_talloc_zero(mem_ctx
, 2);
752 tower
->floors
[1].lhs
.protocol
= EPM_PROTOCOL_UUID
;
754 status
= GUID_from_string(NDR_GUID
, &ndr_guid
);
755 if (NT_STATUS_IS_ERR(status
)) {
759 tower
->floors
[1].lhs
.lhs_data
= dcerpc_floor_pack_lhs_data(mem_ctx
, &ndr_guid
, NDR_GUID_VERSION
);
761 tower
->floors
[1].rhs
.uuid
.unknown
= data_blob_talloc_zero(mem_ctx
, 2);
763 /* Floor 2 to num_protocols */
764 for (i
= 0; i
< num_protocols
; i
++) {
765 tower
->floors
[2 + i
].lhs
.protocol
= protseq
[i
];
766 tower
->floors
[2 + i
].lhs
.lhs_data
= data_blob_talloc(mem_ctx
, NULL
, 0);
767 ZERO_STRUCT(tower
->floors
[2 + i
].rhs
);
768 dcerpc_floor_set_rhs_data(mem_ctx
, &tower
->floors
[2 + i
], "");
771 /* The 4th floor contains the endpoint */
772 if (num_protocols
>= 2 && binding
->endpoint
) {
773 status
= dcerpc_floor_set_rhs_data(mem_ctx
, &tower
->floors
[3], binding
->endpoint
);
774 if (NT_STATUS_IS_ERR(status
)) {
779 /* The 5th contains the network address */
780 if (num_protocols
>= 3 && binding
->host
) {
781 status
= dcerpc_floor_set_rhs_data(mem_ctx
, &tower
->floors
[4], binding
->host
);
782 if (NT_STATUS_IS_ERR(status
)) {
790 NTSTATUS
dcerpc_epm_map_binding(TALLOC_CTX
*mem_ctx
, struct dcerpc_binding
*binding
,
791 const char *uuid
, uint_t version
)
793 struct dcerpc_pipe
*p
;
796 struct policy_handle handle
;
798 struct epm_twr_t twr
, *twr_r
;
799 struct dcerpc_binding
*epmapper_binding
;
800 const struct dcerpc_interface_table
*table
= idl_iface_by_uuid(uuid
);
803 struct cli_credentials
*anon_creds
804 = cli_credentials_init(mem_ctx
);
805 cli_credentials_set_anonymous(anon_creds
);
806 cli_credentials_guess(anon_creds
);
808 /* First, check if there is a default endpoint specified in the IDL */
811 struct dcerpc_binding
*default_binding
;
813 binding
->authservice
= talloc_strdup(binding
, table
->authservices
->names
[0]);
815 /* Find one of the default pipes for this interface */
816 for (i
= 0; i
< table
->endpoints
->count
; i
++) {
817 status
= dcerpc_parse_binding(mem_ctx
, table
->endpoints
->names
[i
], &default_binding
);
819 if (NT_STATUS_IS_OK(status
)) {
820 if (default_binding
->transport
== binding
->transport
&& default_binding
->endpoint
) {
821 binding
->endpoint
= talloc_reference(binding
, default_binding
->endpoint
);
822 talloc_free(default_binding
);
825 talloc_free(default_binding
);
831 epmapper_binding
= talloc_zero(mem_ctx
, struct dcerpc_binding
);
832 if (!epmapper_binding
) {
833 return NT_STATUS_NO_MEMORY
;
836 epmapper_binding
->transport
= binding
->transport
;
837 epmapper_binding
->host
= talloc_reference(epmapper_binding
,
839 epmapper_binding
->options
= NULL
;
840 epmapper_binding
->flags
= 0;
841 epmapper_binding
->endpoint
= NULL
;
842 epmapper_binding
->authservice
= NULL
;
844 status
= dcerpc_pipe_connect_b(mem_ctx
,
847 DCERPC_EPMAPPER_UUID
,
848 DCERPC_EPMAPPER_VERSION
,
851 if (!NT_STATUS_IS_OK(status
)) {
858 status
= GUID_from_string(uuid
, &binding
->object
);
859 if (NT_STATUS_IS_ERR(status
)) {
863 binding
->object_version
= version
;
865 status
= dcerpc_binding_build_tower(p
, binding
, &twr
.tower
);
866 if (NT_STATUS_IS_ERR(status
)) {
870 /* with some nice pretty paper around it of course */
872 r
.in
.map_tower
= &twr
;
873 r
.in
.entry_handle
= &handle
;
875 r
.out
.entry_handle
= &handle
;
877 status
= dcerpc_epm_Map(p
, p
, &r
);
878 if (!NT_STATUS_IS_OK(status
)) {
882 if (r
.out
.result
!= 0 || r
.out
.num_towers
!= 1) {
884 return NT_STATUS_PORT_UNREACHABLE
;
887 twr_r
= r
.out
.towers
[0].twr
;
890 return NT_STATUS_PORT_UNREACHABLE
;
893 if (twr_r
->tower
.num_floors
!= twr
.tower
.num_floors
||
894 twr_r
->tower
.floors
[3].lhs
.protocol
!= twr
.tower
.floors
[3].lhs
.protocol
) {
896 return NT_STATUS_PORT_UNREACHABLE
;
899 binding
->endpoint
= talloc_reference(binding
, dcerpc_floor_get_rhs_data(mem_ctx
, &twr_r
->tower
.floors
[3]));
908 perform an authenticated bind if needed
910 NTSTATUS
dcerpc_pipe_auth(struct dcerpc_pipe
*p
,
911 struct dcerpc_binding
*binding
,
912 const char *pipe_uuid
,
913 uint32_t pipe_version
,
914 struct cli_credentials
*credentials
)
918 tmp_ctx
= talloc_new(p
);
920 p
->conn
->flags
= binding
->flags
;
922 /* remember the binding string for possible secondary connections */
923 p
->conn
->binding_string
= dcerpc_binding_string(p
, binding
);
925 if (!cli_credentials_is_anonymous(credentials
) &&
926 (binding
->flags
& DCERPC_SCHANNEL_ANY
)) {
927 status
= dcerpc_bind_auth_schannel(tmp_ctx
,
928 p
, pipe_uuid
, pipe_version
,
930 } else if (!cli_credentials_is_anonymous(credentials
)) {
932 if (binding
->flags
& DCERPC_AUTH_SPNEGO
) {
933 auth_type
= DCERPC_AUTH_TYPE_SPNEGO
;
934 } else if (binding
->flags
& DCERPC_AUTH_KRB5
) {
935 auth_type
= DCERPC_AUTH_TYPE_KRB5
;
937 auth_type
= DCERPC_AUTH_TYPE_NTLMSSP
;
940 status
= dcerpc_bind_auth_password(p
, pipe_uuid
, pipe_version
,
941 credentials
, auth_type
,
942 binding
->authservice
);
944 status
= dcerpc_bind_auth_none(p
, pipe_uuid
, pipe_version
);
947 if (!NT_STATUS_IS_OK(status
)) {
948 DEBUG(0,("Failed to bind to uuid %s - %s\n", pipe_uuid
, nt_errstr(status
)));
950 talloc_free(tmp_ctx
);
955 /* open a rpc connection to a rpc pipe on SMB using the binding
956 structure to determine the endpoint and options */
957 static NTSTATUS
dcerpc_pipe_connect_ncacn_np(TALLOC_CTX
*tmp_ctx
,
958 struct dcerpc_pipe
*p
,
959 struct dcerpc_binding
*binding
,
960 const char *pipe_uuid
,
961 uint32_t pipe_version
,
962 struct cli_credentials
*credentials
)
965 struct smbcli_state
*cli
;
966 const char *pipe_name
= NULL
;
968 if (binding
->flags
& DCERPC_SCHANNEL_ANY
) {
969 struct cli_credentials
*anon_creds
970 = cli_credentials_init(tmp_ctx
);
971 cli_credentials_set_anonymous(anon_creds
);
972 cli_credentials_guess(anon_creds
);
973 status
= smbcli_full_connection(p
->conn
, &cli
,
974 cli_credentials_get_workstation(credentials
),
979 status
= smbcli_full_connection(p
->conn
, &cli
,
980 cli_credentials_get_workstation(credentials
),
985 if (!NT_STATUS_IS_OK(status
)) {
986 DEBUG(0,("Failed to connect to %s - %s\n", binding
->host
, nt_errstr(status
)));
990 /* Look up identifier using the epmapper */
991 if (!binding
->endpoint
) {
992 status
= dcerpc_epm_map_binding(tmp_ctx
, binding
, pipe_uuid
, pipe_version
);
993 if (!NT_STATUS_IS_OK(status
)) {
994 DEBUG(0,("Failed to map DCERPC/TCP NCACN_NP pipe for '%s' - %s\n",
995 pipe_uuid
, nt_errstr(status
)));
998 DEBUG(1,("Mapped to DCERPC/NP pipe %s\n", binding
->endpoint
));
1001 pipe_name
= binding
->endpoint
;
1003 status
= dcerpc_pipe_open_smb(p
->conn
, cli
->tree
, pipe_name
);
1004 if (!NT_STATUS_IS_OK(status
)) {
1005 DEBUG(0,("Failed to open pipe %s - %s\n", pipe_name
, nt_errstr(status
)));
1009 return NT_STATUS_OK
;
1012 /* open a rpc connection to a rpc pipe on SMP using the binding
1013 structure to determine the endpoint and options */
1014 static NTSTATUS
dcerpc_pipe_connect_ncalrpc(TALLOC_CTX
*tmp_ctx
,
1015 struct dcerpc_pipe
*p
,
1016 struct dcerpc_binding
*binding
,
1017 const char *pipe_uuid
,
1018 uint32_t pipe_version
)
1022 /* Look up identifier using the epmapper */
1023 if (!binding
->endpoint
) {
1024 status
= dcerpc_epm_map_binding(tmp_ctx
, binding
, pipe_uuid
, pipe_version
);
1025 if (!NT_STATUS_IS_OK(status
)) {
1026 DEBUG(0,("Failed to map DCERPC/TCP NCALRPC identifier for '%s' - %s\n",
1027 pipe_uuid
, nt_errstr(status
)));
1030 DEBUG(1,("Mapped to DCERPC/LRPC identifier %s\n", binding
->endpoint
));
1033 status
= dcerpc_pipe_open_pipe(p
->conn
, binding
->endpoint
);
1034 if (!NT_STATUS_IS_OK(status
)) {
1035 DEBUG(0,("Failed to open ncalrpc pipe '%s' - %s\n",
1036 binding
->endpoint
, nt_errstr(status
)));
1045 /* open a rpc connection to a rpc pipe on SMP using the binding
1046 structure to determine the endpoint and options */
1047 static NTSTATUS
dcerpc_pipe_connect_ncacn_unix_stream(TALLOC_CTX
*tmp_ctx
,
1048 struct dcerpc_pipe
*p
,
1049 struct dcerpc_binding
*binding
,
1050 const char *pipe_uuid
,
1051 uint32_t pipe_version
)
1055 if (!binding
->endpoint
) {
1056 DEBUG(0, ("Path to unix socket not specified\n"));
1057 return NT_STATUS_INVALID_PARAMETER
;
1060 status
= dcerpc_pipe_open_unix_stream(p
->conn
, binding
->endpoint
);
1061 if (!NT_STATUS_IS_OK(status
)) {
1062 DEBUG(0,("Failed to open unix socket %s - %s\n",
1063 binding
->endpoint
, nt_errstr(status
)));
1071 /* open a rpc connection to a rpc pipe on TCP/IP sockets using the binding
1072 structure to determine the endpoint and options */
1073 static NTSTATUS
dcerpc_pipe_connect_ncacn_ip_tcp(TALLOC_CTX
*tmp_ctx
,
1074 struct dcerpc_pipe
*p
,
1075 struct dcerpc_binding
*binding
,
1076 const char *pipe_uuid
,
1077 uint32_t pipe_version
)
1082 if (!binding
->endpoint
) {
1083 status
= dcerpc_epm_map_binding(tmp_ctx
, binding
,
1084 pipe_uuid
, pipe_version
);
1085 if (!NT_STATUS_IS_OK(status
)) {
1086 DEBUG(0,("Failed to map DCERPC/TCP port for '%s' - %s\n",
1087 pipe_uuid
, nt_errstr(status
)));
1090 DEBUG(1,("Mapped to DCERPC/TCP port %s\n", binding
->endpoint
));
1093 port
= atoi(binding
->endpoint
);
1095 status
= dcerpc_pipe_open_tcp(p
->conn
, binding
->host
, port
);
1096 if (!NT_STATUS_IS_OK(status
)) {
1097 DEBUG(0,("Failed to connect to %s:%d - %s\n",
1098 binding
->host
, port
, nt_errstr(status
)));
1106 /* open a rpc connection to a rpc pipe, using the specified
1107 binding structure to determine the endpoint and options */
1108 NTSTATUS
dcerpc_pipe_connect_b(TALLOC_CTX
*parent_ctx
,
1109 struct dcerpc_pipe
**pp
,
1110 struct dcerpc_binding
*binding
,
1111 const char *pipe_uuid
,
1112 uint32_t pipe_version
,
1113 struct cli_credentials
*credentials
)
1115 NTSTATUS status
= NT_STATUS_INVALID_PARAMETER
;
1116 struct dcerpc_pipe
*p
;
1118 TALLOC_CTX
*tmp_ctx
;
1122 p
= dcerpc_pipe_init(parent_ctx
);
1124 return NT_STATUS_NO_MEMORY
;
1126 tmp_ctx
= talloc_named(p
, 0, "dcerpc_pipe_connect_b tmp_ctx");
1128 switch (binding
->transport
) {
1130 status
= dcerpc_pipe_connect_ncacn_np(tmp_ctx
,
1131 p
, binding
, pipe_uuid
, pipe_version
, credentials
);
1134 status
= dcerpc_pipe_connect_ncacn_ip_tcp(tmp_ctx
,
1135 p
, binding
, pipe_uuid
, pipe_version
);
1137 case NCACN_UNIX_STREAM
:
1138 status
= dcerpc_pipe_connect_ncacn_unix_stream(tmp_ctx
,
1139 p
, binding
, pipe_uuid
, pipe_version
);
1142 status
= dcerpc_pipe_connect_ncalrpc(tmp_ctx
,
1143 p
, binding
, pipe_uuid
, pipe_version
);
1146 return NT_STATUS_NOT_SUPPORTED
;
1149 if (!NT_STATUS_IS_OK(status
)) {
1154 status
= dcerpc_pipe_auth(p
, binding
, pipe_uuid
, pipe_version
, credentials
);
1155 if (!NT_STATUS_IS_OK(status
)) {
1160 talloc_free(tmp_ctx
);
1166 /* open a rpc connection to a rpc pipe, using the specified string
1167 binding to determine the endpoint and options */
1168 NTSTATUS
dcerpc_pipe_connect(TALLOC_CTX
*parent_ctx
,
1169 struct dcerpc_pipe
**pp
,
1170 const char *binding
,
1171 const char *pipe_uuid
,
1172 uint32_t pipe_version
,
1173 struct cli_credentials
*credentials
)
1175 struct dcerpc_binding
*b
;
1177 TALLOC_CTX
*tmp_ctx
;
1179 tmp_ctx
= talloc_named(parent_ctx
, 0, "dcerpc_pipe_connect tmp_ctx");
1181 return NT_STATUS_NO_MEMORY
;
1184 status
= dcerpc_parse_binding(tmp_ctx
, binding
, &b
);
1185 if (!NT_STATUS_IS_OK(status
)) {
1186 DEBUG(0,("Failed to parse dcerpc binding '%s'\n", binding
));
1187 talloc_free(tmp_ctx
);
1191 DEBUG(3,("Using binding %s\n", dcerpc_binding_string(tmp_ctx
, b
)));
1193 status
= dcerpc_pipe_connect_b(tmp_ctx
,
1194 pp
, b
, pipe_uuid
, pipe_version
, credentials
);
1196 if (NT_STATUS_IS_OK(status
)) {
1197 *pp
= talloc_reference(parent_ctx
, *pp
);
1199 talloc_free(tmp_ctx
);
1206 create a secondary dcerpc connection from a primary connection
1208 if the primary is a SMB connection then the secondary connection
1209 will be on the same SMB connection, but use a new fnum
1211 NTSTATUS
dcerpc_secondary_connection(struct dcerpc_pipe
*p
, struct dcerpc_pipe
**p2
,
1212 struct dcerpc_binding
*b
)
1216 struct smbcli_tree
*tree
;
1217 NTSTATUS status
= NT_STATUS_INVALID_PARAMETER
;
1219 (*p2
) = dcerpc_pipe_init(p
);
1221 return NT_STATUS_NO_MEMORY
;
1224 switch (p
->conn
->transport
.transport
) {
1226 tree
= dcerpc_smb_tree(p
->conn
);
1228 return NT_STATUS_INVALID_PARAMETER
;
1230 status
= dcerpc_pipe_open_smb((*p2
)->conn
, tree
, b
->endpoint
);
1234 status
= dcerpc_pipe_open_tcp((*p2
)->conn
, b
->host
, atoi(b
->endpoint
));
1238 status
= dcerpc_pipe_open_pipe((*p2
)->conn
, b
->endpoint
);
1242 return NT_STATUS_NOT_SUPPORTED
;
1245 if (!NT_STATUS_IS_OK(status
)) {
1250 (*p2
)->conn
->flags
= p
->conn
->flags
;
1252 return NT_STATUS_OK
;
1255 NTSTATUS
dcerpc_generic_session_key(struct dcerpc_connection
*c
,
1256 DATA_BLOB
*session_key
)
1258 /* this took quite a few CPU cycles to find ... */
1259 session_key
->data
= discard_const_p(unsigned char, "SystemLibraryDTC");
1260 session_key
->length
= 16;
1261 return NT_STATUS_OK
;
1265 fetch the user session key - may be default (above) or the SMB session key
1267 NTSTATUS
dcerpc_fetch_session_key(struct dcerpc_pipe
*p
,
1268 DATA_BLOB
*session_key
)
1270 return p
->conn
->security_state
.session_key(p
->conn
, session_key
);
1275 log a rpc packet in a format suitable for ndrdump. This is especially useful
1276 for sealed packets, where ethereal cannot easily see the contents
1278 this triggers on a debug level of >= 10
1280 void dcerpc_log_packet(const struct dcerpc_interface_table
*ndr
,
1281 uint32_t opnum
, uint32_t flags
, DATA_BLOB
*pkt
)
1283 const int num_examples
= 20;
1286 if (DEBUGLEVEL
< 10) return;
1288 for (i
=0;i
<num_examples
;i
++) {
1290 asprintf(&name
, "%s/rpclog/%s-%u.%d.%s",
1291 lp_lockdir(), ndr
->name
, opnum
, i
,
1292 (flags
&NDR_IN
)?"in":"out");
1296 if (!file_exist(name
)) {
1297 if (file_save(name
, pkt
->data
, pkt
->length
)) {
1298 DEBUG(10,("Logged rpc packet to %s\n", name
));
1310 create a secondary context from a primary connection
1312 this uses dcerpc_alter_context() to create a new dcerpc context_id
1314 NTSTATUS
dcerpc_secondary_context(struct dcerpc_pipe
*p
,
1315 struct dcerpc_pipe
**pp2
,
1316 const char *pipe_uuid
,
1317 uint32_t pipe_version
)
1320 struct dcerpc_pipe
*p2
;
1322 p2
= talloc_zero(p
, struct dcerpc_pipe
);
1324 return NT_STATUS_NO_MEMORY
;
1326 p2
->conn
= talloc_reference(p2
, p
->conn
);
1328 p2
->context_id
= ++p
->conn
->next_context_id
;
1330 status
= GUID_from_string(pipe_uuid
, &p2
->syntax
.uuid
);
1331 if (!NT_STATUS_IS_OK(status
)) {
1335 p2
->syntax
.if_version
= pipe_version
;
1337 status
= GUID_from_string(NDR_GUID
, &p2
->transfer_syntax
.uuid
);
1338 if (!NT_STATUS_IS_OK(status
)) {
1342 p2
->transfer_syntax
.if_version
= NDR_GUID_VERSION
;
1344 status
= dcerpc_alter_context(p2
, p2
, &p2
->syntax
, &p2
->transfer_syntax
);
1345 if (!NT_STATUS_IS_OK(status
)) {