a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* -*- c-basic-offset: 8 -*-
a180a41bba1d50822df23fff0099e90b86638b89vboxsync rdesktop: A Remote Desktop Protocol client.
a180a41bba1d50822df23fff0099e90b86638b89vboxsync RDP licensing negotiation
a180a41bba1d50822df23fff0099e90b86638b89vboxsync Copyright (C) Matthew Chapman <matthewc.unsw.edu.au> 1999-2008
a180a41bba1d50822df23fff0099e90b86638b89vboxsync Copyright (C) Thomas Uhle <thomas.uhle@mailbox.tu-dresden.de> 2011
a180a41bba1d50822df23fff0099e90b86638b89vboxsync Copyright (C) Henrik Andersson <henrik.andersson@cendio.com> 2014
a180a41bba1d50822df23fff0099e90b86638b89vboxsync This program is free software: you can redistribute it and/or modify
a180a41bba1d50822df23fff0099e90b86638b89vboxsync it under the terms of the GNU General Public License as published by
a180a41bba1d50822df23fff0099e90b86638b89vboxsync the Free Software Foundation, either version 3 of the License, or
a180a41bba1d50822df23fff0099e90b86638b89vboxsync (at your option) any later version.
a180a41bba1d50822df23fff0099e90b86638b89vboxsync This program is distributed in the hope that it will be useful,
a180a41bba1d50822df23fff0099e90b86638b89vboxsync but WITHOUT ANY WARRANTY; without even the implied warranty of
a180a41bba1d50822df23fff0099e90b86638b89vboxsync MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
a180a41bba1d50822df23fff0099e90b86638b89vboxsync GNU General Public License for more details.
a180a41bba1d50822df23fff0099e90b86638b89vboxsync You should have received a copy of the GNU General Public License
a180a41bba1d50822df23fff0099e90b86638b89vboxsync along with this program. If not, see <http://www.gnu.org/licenses/>.
6e9aa255e3376b2da5824c09c4c62bc233463bfevboxsync * Oracle GPL Disclaimer: For the avoidance of doubt, except that if any license choice
6e9aa255e3376b2da5824c09c4c62bc233463bfevboxsync * other than GPL or LGPL is available it will apply instead, Oracle elects to use only
6e9aa255e3376b2da5824c09c4c62bc233463bfevboxsync * the General Public License version 2 (GPLv2) at this time for any software where
6e9aa255e3376b2da5824c09c4c62bc233463bfevboxsync * a choice of GPL license versions is made available with the language indicating
6e9aa255e3376b2da5824c09c4c62bc233463bfevboxsync * that GPLv2 or any later version may be used, or where a choice of which version
6e9aa255e3376b2da5824c09c4c62bc233463bfevboxsync * of the GPL is applied is otherwise unspecified.
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* Generate a session key and RC4 keys, given client and server randoms */
a180a41bba1d50822df23fff0099e90b86638b89vboxsynclicence_generate_keys(uint8 * client_random, uint8 * server_random, uint8 * pre_master_secret)
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Generate master secret and then key material */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync sec_hash_48(master_secret, pre_master_secret, client_random, server_random, 'A');
a180a41bba1d50822df23fff0099e90b86638b89vboxsync sec_hash_48(key_block, master_secret, server_random, client_random, 'A');
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Store first 16 bytes of session key as MAC secret */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Generate RC4 key from next 16 bytes */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync sec_hash_16(g_licence_key, &key_block[16], client_random, server_random);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync strncpy((char *) (hwid + 4), g_hostname, LICENCE_HWID_SIZE - 4);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* Send a lincece info packet to server */
a180a41bba1d50822df23fff0099e90b86638b89vboxsynclicence_info(uint8 * client_random, uint8 * rsa_data,
a180a41bba1d50822df23fff0099e90b86638b89vboxsync uint8 * licence_data, int licence_size, uint8 * hwid, uint8 * signature)
a180a41bba1d50822df23fff0099e90b86638b89vboxsync 24 + SEC_RANDOM_SIZE + SEC_MODULUS_SIZE + SEC_PADDING_SIZE +
a180a41bba1d50822df23fff0099e90b86638b89vboxsync licence_size + LICENCE_HWID_SIZE + LICENCE_SIGNATURE_SIZE;
a180a41bba1d50822df23fff0099e90b86638b89vboxsync out_uint8(s, ((g_rdp_version >= RDP_V5) ? 3 : 2)); /* version */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync out_uint16_le(s, (SEC_MODULUS_SIZE + SEC_PADDING_SIZE));
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* Send a new licence request packet */
a180a41bba1d50822df23fff0099e90b86638b89vboxsynclicence_send_new_licence_request(uint8 * client_random, uint8 * rsa_data, char *user, char *host)
a180a41bba1d50822df23fff0099e90b86638b89vboxsync 24 + SEC_RANDOM_SIZE + SEC_MODULUS_SIZE + SEC_PADDING_SIZE + userlen + hostlen;
a180a41bba1d50822df23fff0099e90b86638b89vboxsync out_uint8(s, ((g_rdp_version >= RDP_V5) ? 3 : 2)); /* version */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync out_uint16_le(s, (SEC_MODULUS_SIZE + SEC_PADDING_SIZE));
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Username LICENSE_BINARY_BLOB */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Machinename LICENSE_BINARY_BLOB */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* Process a licence request packet */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Retrieve the server random from the incoming packet */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* We currently use null client keys. This is a bit naughty but, hey,
a180a41bba1d50822df23fff0099e90b86638b89vboxsync the security of licence negotiation isn't exactly paramount. */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync licence_generate_keys(null_data, server_random, null_data);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Generate a signature for the HWID buffer */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync sec_sign(signature, 16, g_licence_sign_key, 16, hwid, sizeof(hwid));
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Now encrypt the HWID */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync rdssl_rc4_crypt(&crypt_key, hwid, hwid, sizeof(hwid));
a180a41bba1d50822df23fff0099e90b86638b89vboxsync DEBUG(("Sending licensing PDU (message type 0x%02x)\n", LICENCE_TAG_LICENCE_INFO));
a180a41bba1d50822df23fff0099e90b86638b89vboxsync licence_info(null_data, null_data, licence_data, licence_size, hwid, signature);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync DEBUG(("Sending licensing PDU (message type 0x%02x)\n", LICENCE_TAG_NEW_LICENCE_REQUEST));
a180a41bba1d50822df23fff0099e90b86638b89vboxsync licence_send_new_licence_request(null_data, null_data, g_username, g_hostname);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* Send a platform challange response packet */
a180a41bba1d50822df23fff0099e90b86638b89vboxsynclicence_send_platform_challange_response(uint8 * token, uint8 * crypt_hwid, uint8 * signature)
a180a41bba1d50822df23fff0099e90b86638b89vboxsync out_uint8(s, LICENCE_TAG_PLATFORM_CHALLANGE_RESPONSE);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync out_uint8(s, ((g_rdp_version >= RDP_V5) ? 3 : 2)); /* version */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* Parse an platform challange request packet */
a180a41bba1d50822df23fff0099e90b86638b89vboxsynclicence_parse_platform_challange(STREAM s, uint8 ** token, uint8 ** signature)
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* Process a platform challange packet */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync uint8 out_token[LICENCE_TOKEN_SIZE], decrypt_token[LICENCE_TOKEN_SIZE];
a180a41bba1d50822df23fff0099e90b86638b89vboxsync uint8 hwid[LICENCE_HWID_SIZE], crypt_hwid[LICENCE_HWID_SIZE];
a180a41bba1d50822df23fff0099e90b86638b89vboxsync uint8 sealed_buffer[LICENCE_TOKEN_SIZE + LICENCE_HWID_SIZE];
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Parse incoming packet and save the encrypted token */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync licence_parse_platform_challange(s, &in_token, &in_sig);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Decrypt the token. It should read TEST in Unicode. */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync rdssl_rc4_crypt(&crypt_key, in_token, decrypt_token, LICENCE_TOKEN_SIZE);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Generate a signature for a buffer of token and HWID */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync memcpy(sealed_buffer, decrypt_token, LICENCE_TOKEN_SIZE);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync memcpy(sealed_buffer + LICENCE_TOKEN_SIZE, hwid, LICENCE_HWID_SIZE);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync sec_sign(out_sig, 16, g_licence_sign_key, 16, sealed_buffer, sizeof(sealed_buffer));
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Now encrypt the HWID */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync rdssl_rc4_crypt(&crypt_key, hwid, crypt_hwid, LICENCE_HWID_SIZE);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync licence_send_platform_challange_response(out_token, crypt_hwid, out_sig);
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* Process a new licence packet */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Parse NEW_LICENSE_INFO block */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* Skip strings, Scope, CompanyName and ProductId to get
a180a41bba1d50822df23fff0099e90b86638b89vboxsync to the LicenseInfo which we store in license blob. */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync for (i = 0; i < 4; i++)
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* process a licence error alert packet */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* There is a special case in the error alert handling, when licensing is all good
a180a41bba1d50822df23fff0099e90b86638b89vboxsync and the server is not sending a license to client, a "Server License Error PDU -
a180a41bba1d50822df23fff0099e90b86638b89vboxsync Valid Client" packet is sent which means, every thing is ok.
a180a41bba1d50822df23fff0099e90b86638b89vboxsync Therefor we should flag that everything is ok with license here.
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* handle error codes, for now, jsut report them */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync warning("License error alert from server: No license server\n");
a180a41bba1d50822df23fff0099e90b86638b89vboxsync warning("License error alert from server: Invalid client\n");
a180a41bba1d50822df23fff0099e90b86638b89vboxsync warning("License error alert from server: code %u, state transition %u\n",
a180a41bba1d50822df23fff0099e90b86638b89vboxsync/* Process a licence packet */
a180a41bba1d50822df23fff0099e90b86638b89vboxsync DEBUG(("Received licensing PDU (message type 0x%02x)\n", tag));
a180a41bba1d50822df23fff0099e90b86638b89vboxsync /* we can handle new and upgrades of licences the same way. */