smb_file *smb_find(smb_session *s, smb_tid tid, const char *pattern)
{
smb_message *msg;
smb_trans2_req *tr2;
smb_tr2_find2 *find;
size_t pattern_len, msg_len;
int res;
assert(s != NULL && pattern != NULL && tid);
pattern_len = strlen(pattern) + 1;
msg_len = sizeof(smb_trans2_req) + sizeof(smb_tr2_find2);
msg_len += pattern_len * 2 + 3;
msg = smb_message_new(SMB_CMD_TRANS2, msg_len);
smb_message_set_default_flags(msg);
msg->packet->header.tid = tid;
tr2 = (smb_trans2_req *)msg->packet->payload;
tr2->wct = 15;
tr2->total_param_count = pattern_len * 2 + sizeof(smb_tr2_find2);
tr2->max_param_count = 10; // ?? Why not the same or 12 ?
tr2->max_data_count = 0xffff;
tr2->param_count = tr2->total_param_count;
tr2->param_offset = 68; // Offset of find_first_params in packet;
tr2->data_count = 0;
tr2->data_offset = 88; // Offset of pattern in packet
tr2->setup_count = 1;
tr2->cmd = SMB_TR2_FIND_FIRST;
tr2->bct = sizeof(smb_tr2_find2) + pattern_len * 2 + 3;
find = (smb_tr2_find2 *) tr2->payload;
find->attrs = SMB_FIND2_ATTR_DEFAULT;
find->count = 1366; // ??
find->flags = SMB_FIND2_FLAG_DEFAULT;
find->interest = 0x0104; // 'Find file both directory info'
smb_message_advance(msg, sizeof(smb_trans2_req));
smb_message_advance(msg, sizeof(smb_tr2_find2));
smb_message_put_utf16(msg, "", pattern, pattern_len);
// Adds padding at the end if necessary.
if (tr2->bct % 4)
smb_message_advance(msg, 4 - tr2->bct % 4);
res = smb_session_send_msg(s, msg);
smb_message_destroy(msg);
if (!res)
{
BDSM_dbg("Unable to query pattern: %s\n", pattern);
return (NULL);
}
if ((msg = smb_tr2_recv(s)) == NULL)
return (NULL);
return (smb_find_parse(msg));
}
static int negotiate(smb_session *s, const char *domain)
{
smb_message *msg = NULL;
smb_session_xsec_req req;
smb_buffer ntlm;
ASN1_TYPE token;
int res, der_size = 128;
char der[128], err_desc[ASN1_MAX_ERROR_DESCRIPTION_SIZE];
msg = smb_message_new(SMB_CMD_SETUP);
if (!msg)
return DSM_ERROR_GENERIC;
// this struct will be set at the end when we know the payload size
SMB_MSG_ADVANCE_PKT(msg, smb_session_xsec_req);
asn1_create_element(s->spnego_asn1, "SPNEGO.GSSAPIContextToken", &token);
res = asn1_write_value(token, "thisMech", spnego_oid, 1);
if (res != ASN1_SUCCESS) goto error;
res = asn1_write_value(token, "spnego", "negTokenInit", 1);
if (res != ASN1_SUCCESS) goto error;
res = asn1_write_value(token, "spnego.negTokenInit.mechTypes", "NEW", 1);
if (res != ASN1_SUCCESS) goto error;
res = asn1_write_value(token, "spnego.negTokenInit.mechTypes.?1", ntlmssp_oid, 1);
if (res != ASN1_SUCCESS) goto error;
res = asn1_write_value(token, "spnego.negTokenInit.reqFlags", NULL, 0);
if (res != ASN1_SUCCESS) goto error;
res = asn1_write_value(token, "spnego.negTokenInit.mechListMIC", NULL, 0);
if (res != ASN1_SUCCESS) goto error;
smb_ntlmssp_negotiate(domain, domain, &ntlm);
res = asn1_write_value(token, "spnego.negTokenInit.mechToken", ntlm.data,
ntlm.size);
smb_buffer_free(&ntlm);
if (res != ASN1_SUCCESS) goto error;
res = asn1_der_coding(token, "", der, &der_size, err_desc);
if (res != ASN1_SUCCESS)
{
smb_message_destroy(msg);
BDSM_dbg("Encoding error: %s", err_desc);
return DSM_ERROR_GENERIC;
}
smb_message_append(msg, der, der_size);
smb_message_put_utf16(msg, SMB_OS, strlen(SMB_OS));
smb_message_put16(msg, 0);
smb_message_put_utf16(msg, SMB_LANMAN, strlen(SMB_LANMAN));
smb_message_put16(msg, 0);
smb_message_put16(msg, 0);
SMB_MSG_INIT_PKT_ANDX(req);
req.wct = 12;
req.max_buffer = SMB_SESSION_MAX_BUFFER;
req.mpx_count = 16;
req.vc_count = 1;
req.caps = s->srv.caps;
req.session_key = s->srv.session_key;
req.xsec_blob_size = der_size;
req.payload_size = msg->cursor - sizeof(smb_session_xsec_req);
SMB_MSG_INSERT_PKT(msg, 0, req);
asn1_delete_structure(&token);
if (!smb_session_send_msg(s, msg))
{
smb_message_destroy(msg);
BDSM_dbg("Unable to send Session Setup AndX (NTLMSSP_NEGOTIATE) message\n");
return DSM_ERROR_NETWORK;
}
smb_message_destroy(msg);
return DSM_SUCCESS;
error:
asn1_display_error("smb_session_login negotiate()", res);
smb_message_destroy(msg);
return DSM_ERROR_GENERIC;
}
static int auth(smb_session *s, const char *domain, const char *user,
const char *password)
{
smb_message *msg = NULL, resp;
smb_session_xsec_req req;
smb_buffer ntlm;
ASN1_TYPE token;
int res, der_size = 512;
char der[512], err_desc[ASN1_MAX_ERROR_DESCRIPTION_SIZE];
msg = smb_message_new(SMB_CMD_SETUP);
if (!msg)
return DSM_ERROR_GENERIC;
// this struct will be set at the end when we know the payload size
SMB_MSG_ADVANCE_PKT(msg, smb_session_xsec_req);
asn1_create_element(s->spnego_asn1, "SPNEGO.NegotiationToken", &token);
// Select a response message type
res = asn1_write_value(token, "", "negTokenResp", 1);
if (res != ASN1_SUCCESS) goto error;
// Delete all optionnal field except 'ResponseToken'
res = asn1_write_value(token, "negTokenResp.negResult", NULL, 0);
if (res != ASN1_SUCCESS) goto error;
res = asn1_write_value(token, "negTokenResp.supportedMech", NULL, 0);
if (res != ASN1_SUCCESS) goto error;
res = asn1_write_value(token, "negTokenResp.mechListMIC", NULL, 0);
if (res != ASN1_SUCCESS) goto error;
smb_ntlmssp_response(s->srv.challenge, s->srv.ts - 4200, domain, domain, user,
password, &s->xsec_target, &ntlm);
res = asn1_write_value(token, "negTokenResp.responseToken", ntlm.data,
ntlm.size);
smb_buffer_free(&ntlm);
if (res != ASN1_SUCCESS) goto error;
res = asn1_der_coding(token, "", der, &der_size, err_desc);
if (res != ASN1_SUCCESS)
{
smb_message_destroy(msg);
BDSM_dbg("Encoding error: %s", err_desc);
return DSM_ERROR_GENERIC;
}
smb_message_append(msg, der, der_size);
if (msg->cursor % 2)
smb_message_put8(msg, 0);
smb_message_put_utf16(msg, SMB_OS, strlen(SMB_OS));
smb_message_put16(msg, 0);
smb_message_put_utf16(msg, SMB_LANMAN, strlen(SMB_LANMAN));
smb_message_put16(msg, 0);
smb_message_put16(msg, 0); // Empty PDC name
SMB_MSG_INIT_PKT_ANDX(req);
req.wct = 12;
req.max_buffer = SMB_SESSION_MAX_BUFFER;
req.mpx_count = 16; // XXX ?
req.vc_count = 1;
req.caps = s->srv.caps; // XXX caps & our_caps_mask
req.session_key = s->srv.session_key;
req.xsec_blob_size = der_size;
req.payload_size = msg->cursor - sizeof(smb_session_xsec_req);
SMB_MSG_INSERT_PKT(msg, 0, req);
asn1_delete_structure(&token);
if (!smb_session_send_msg(s, msg))
{
smb_message_destroy(msg);
BDSM_dbg("Unable to send Session Setup AndX (NTLMSSP_AUTH) message\n");
return DSM_ERROR_NETWORK;
}
smb_message_destroy(msg);
if (smb_session_recv_msg(s, &resp) == 0)
return DSM_ERROR_NETWORK;
if (!smb_session_check_nt_status(s, &resp))
return DSM_ERROR_NT;
else
{
smb_session_xsec_resp *r = (smb_session_xsec_resp *)resp.packet->payload;
if (r->action & 0x0001)
s->guest = true;
s->srv.uid = resp.packet->header.uid;
s->logged = true;
return DSM_SUCCESS;
}
error:
asn1_display_error("smb_session_login auth()", res);
smb_message_destroy(msg);
return DSM_ERROR_GENERIC;
}
smb_file *smb_fstat(smb_session *s, smb_tid tid, const char *path)
{
smb_message *msg, reply;
smb_trans2_req *tr2;
smb_trans2_resp *tr2_resp;
smb_tr2_query *query;
smb_tr2_path_info *info;
smb_file *file;
size_t path_len, msg_len;
int res;
assert(s != NULL && path != NULL && tid);
path_len = strlen(path) + 1;
msg_len = sizeof(smb_trans2_req) + sizeof(smb_tr2_query);
msg_len += path_len * 2 + 3; // +3 for eventual padding
msg = smb_message_new(SMB_CMD_TRANS2, msg_len);
smb_message_set_default_flags(msg);
msg->packet->header.tid = tid;
tr2 = (smb_trans2_req *)msg->packet->payload;
tr2->wct = 15;
tr2->total_param_count = path_len * 2 + sizeof(smb_tr2_query);
tr2->max_param_count = 2; // ?? Why not the same or 12 ?
tr2->max_data_count = 0xffff;
tr2->param_count = tr2->total_param_count;
tr2->param_offset = 68; // Offset of find_first_params in packet;
tr2->data_count = 0;
tr2->data_offset = 96; // Offset of pattern in packet
tr2->setup_count = 1;
tr2->cmd = SMB_TR2_QUERY_PATH;
tr2->bct = sizeof(smb_tr2_query) + path_len * 2 + 3;
query = (smb_tr2_query *)tr2->payload;
query->interest = 0x0107; // Query File All Info
smb_message_advance(msg, sizeof(smb_trans2_req));
smb_message_advance(msg, sizeof(smb_tr2_query));
smb_message_put_utf16(msg, "", path, path_len);
// Adds padding at the end if necessary.
if (msg->cursor % 4)
{
int padding = 4 - msg->cursor % 4;
tr2->bct += padding;
for (int i = 0; i < padding; i++)
smb_message_put8(msg, 0);
}
res = smb_session_send_msg(s, msg);
smb_message_destroy(msg);
if (!res)
{
BDSM_dbg("Unable to query pattern: %s\n", path);
return (NULL);
}
if (!smb_session_recv_msg(s, &reply)
|| reply.packet->header.status != NT_STATUS_SUCCESS)
{
BDSM_dbg("Unable to recv msg or failure for %s\n", path);
return (NULL);
}
tr2_resp = (smb_trans2_resp *)reply.packet->payload;
info = (smb_tr2_path_info *)(tr2_resp->payload + 4); //+4 is padding
file = calloc(1, sizeof(smb_file));
assert(file != NULL);
file->name_len = smb_from_utf16((const char *)info->name, info->name_len,
&file->name);
file->name[info->name_len] = 0;
file->created = info->created;
file->accessed = info->accessed;
file->written = info->written;
file->changed = info->changed;
file->alloc_size = info->alloc_size;
file->size = info->size;
file->attr = info->attr;
file->is_dir = info->is_dir;
return (file);
}
// We should normally implement SCERPC and SRVSVC to perform a share list. But
// since these two protocols have no other use for us, we'll do it the trash way
// PS: Worst function _EVER_. I don't understand a bit myself
int smb_share_get_list(smb_session *s, smb_share_list *list, size_t *pcount)
{
smb_message *req, resp;
smb_trans_req trans;
smb_tid ipc_tid;
smb_fd srvscv_fd;
uint16_t rpc_len;
size_t res, frag_len_cursor;
ssize_t count;
int ret;
assert(s != NULL && list != NULL);
if(s != NULL && list != NULL) {
*list = NULL;
if ((ret = smb_tree_connect(s, "IPC$", &ipc_tid)) != DSM_SUCCESS)
return ret;
if ((ret = smb_fopen(s, ipc_tid, "\\srvsvc", SMB_MOD_READ | SMB_MOD_WRITE,
&srvscv_fd)) != DSM_SUCCESS)
return ret;
//// Phase 1:
// We bind a context or whatever for DCE/RPC
req = smb_message_new(SMD_CMD_TRANS);
if (!req)
{
ret = DSM_ERROR_GENERIC;
goto error;
}
req->packet->header.tid = ipc_tid;
rpc_len = 0xffff;
SMB_MSG_INIT_PKT(trans);
trans.wct = 16;
trans.total_data_count = 72;
trans.max_data_count = rpc_len;
trans.param_offset = 84;
trans.data_count = 72;
trans.data_offset = 84;
trans.setup_count = 2;
trans.pipe_function = 0x26;
trans.fid = SMB_FD_FID(srvscv_fd);
trans.bct = 89;
SMB_MSG_PUT_PKT(req, trans);
smb_message_put8(req, 0); // Padding
smb_message_put_utf16(req, "\\PIPE\\", strlen("\\PIPE\\") + 1);
smb_message_put16(req, 0); // Padding to be aligned with wtf boundary :-/
// Now we'll 'build' the DCE/RPC Packet. This basically a copycat
// from wireshark values.
smb_message_put8(req, 5); // version major
smb_message_put8(req, 0); // minor
smb_message_put8(req, 0x0b); // Packet type = 'bind'
smb_message_put8(req, 0x03); // Packet flags = ??
smb_message_put32(req, 0x10); // Representation = little endian/ASCII. Damn
smb_message_put16(req, 72); // Data len again
smb_message_put16(req, 0); // Auth len ?
smb_message_put32(req, 19); // Call ID ?
smb_message_put16(req, rpc_len); // Max Xmit size
smb_message_put16(req, rpc_len); // Max Recv size
smb_message_put32(req, 0); // Assoc group ?
smb_message_put32(req, 1); // Num Ctx Item
// Adding the CtxItem, whatever could that be
smb_message_put16(req, 0); // ContextID
smb_message_put16(req, 1); // Num Trans Item
// SRVSVC UUID
const uint8_t uuid_e[8] = {0x12, 0x78, 0x5a, 0x47, 0xbf, 0x6e, 0xe1, 0x88};
smb_message_put_uuid(req, 0x4b324fc8, 0x1670, 0x01d3, uuid_e);
smb_message_put16(req, 3); // Version
smb_message_put16(req, 0); // Minor
// Another UUID
const uint8_t uuid_e2[8] = {0x9f, 0xe8, 0x08, 0x00, 0x2b, 0x10, 0x48, 0x60};
smb_message_put_uuid(req, 0x8a885d04, 0x1ceb, 0x11c9, uuid_e2);
smb_message_put32(req, 2); // Another version
// Let's send this ugly pile of shit over the network !
res = smb_session_send_msg(s, req);
smb_message_destroy(req);
if (!res)
{
ret = DSM_ERROR_NETWORK;
goto error;
}
// Is the server throwing pile of shit back at me ?
res = smb_session_recv_msg(s, &resp);
if (!res || resp.packet->payload[68])
{
BDSM_dbg("Bind call failed: 0x%hhx (reason = 0x%hhx)\n",
resp.packet->payload[68], resp.packet->payload[70]);
ret = DSM_ERROR_NETWORK;
goto error;
}
//// Phase 2:
// Now we have the 'bind' done (regarless of what it is), we'll call
// NetShareEnumAll
req = smb_message_new(SMD_CMD_TRANS);
if (!req)
{
ret = DSM_ERROR_GENERIC;
goto error;
}
req->packet->header.tid = ipc_tid;
// this struct will be set at the end when we know the data size
SMB_MSG_ADVANCE_PKT(req, smb_trans_req);
smb_message_put8(req, 0); // Padding
smb_message_put_utf16(req, "\\PIPE\\", strlen("\\PIPE\\") + 1);
smb_message_put16(req, 0); // Padding
// Now we'll 'build' the DCE/RPC Packet. This basically a copycat
// from wireshark values.
smb_message_put8(req, 5); // version major
smb_message_put8(req, 0); // minor
smb_message_put8(req, 0); // Packet type = 'request'
smb_message_put8(req, 0x03); // Packet flags = ??
smb_message_put32(req, 0x10); // Representation = little endian/ASCII. Damn
// Let's save the cursor here to update that later
frag_len_cursor = req->cursor;
smb_message_put16(req, 0); // Data len again (frag length)
smb_message_put16(req, 0); // Auth len ?
smb_message_put32(req, 12); // Call ID ?
smb_message_put32(req, 64); // Alloc hint ?
smb_message_put16(req, 0); // Context ID ?
smb_message_put16(req, 15); // OpNum = NetShareEnumAll
// Pointer to server UNC
smb_message_put32(req, 0x00020000); // Referent ID ?
smb_message_put32(req, strlen(s->srv.name) + 1); // Max count
smb_message_put32(req, 0); // Offset
smb_message_put32(req, strlen(s->srv.name) + 1); // Actual count
// The server name, supposed to be downcased
smb_message_put_utf16(req, s->srv.name, strlen(s->srv.name) + 1);
if ((strlen(s->srv.name) % 2) == 0) // It won't be aligned with the terminating byte
smb_message_put16(req, 0);
smb_message_put32(req, 1); // Level 1 ?
smb_message_put32(req, 1); // Ctr ?
smb_message_put32(req, 0x00020004); // Referent ID ?
smb_message_put64(req, 0); // Count/Null Pointer to NetShareInfo1
smb_message_put32(req, 0xffffffff); // Max Buffer (0xffffffff required by smbX)
smb_message_put32(req, 0x00020008); // Referent ID ?
smb_message_put32(req, 0); // Resume ?
// fill trans pkt at the end since we know the size at the end
SMB_MSG_INIT_PKT(trans);
trans.wct = 16;
trans.max_data_count = 4280;
trans.setup_count = 2;
trans.pipe_function = 0x26; // TransactNmPipe;
trans.fid = SMB_FD_FID(srvscv_fd);
trans.bct = req->cursor - sizeof(smb_trans_req);
trans.data_count = trans.bct - 17; // 17 -> padding + \PIPE\ + padding
trans.total_data_count = trans.data_count;
trans.data_offset = 84;
trans.param_offset = 84;
// but insert it at the begining
SMB_MSG_INSERT_PKT(req, 0, trans);
req->packet->payload[frag_len_cursor] = trans.data_count; // (data_count SHOULD stay < 256)
// Let's send this ugly pile of shit over the network !
res = smb_session_send_msg(s, req);
smb_message_destroy(req);
if (!res)
{
ret = DSM_ERROR_NETWORK;
goto error;
}
// Is the server throwing pile of shit back at me ?
res = smb_session_recv_msg(s, &resp);
if (!res && (uint32_t)resp.packet->payload[resp.payload_size - 4])
{
BDSM_dbg("NetShareEnumAll call failed.\n");
ret = DSM_ERROR_NETWORK;
goto error;
}
//// Phase 3
// We parse the list of Share (finally !) and build function response
count = smb_share_parse_enum(&resp, list);
if (count == -1)
{
ret = DSM_ERROR_GENERIC;
goto error;
}
if (pcount != NULL)
*pcount = count;
ret = DSM_SUCCESS;
error:
// Close the pipe
smb_fclose(s, srvscv_fd);
return ret;
}
ret = DSM_ERROR_GENERIC;
}