host.c

/*                                                                      
 *   OS/2 Guest Tools for VMWare
 *   Copyright (C)2021, Rushfan
 *
 *   Licensed  under the  Apache License, Version  2.0 (the "License");
 *   you may not use this  file  except in compliance with the License.
 *   You may obtain a copy of the License at                          
 *                                                                     
 *               http://www.apache.org/licenses/LICENSE-2.0           
 *                                                                     
 *   Unless  required  by  applicable  law  or agreed to  in  writing,
 *   software  distributed  under  the  License  is  distributed on an
 *   "AS IS"  BASIS, WITHOUT  WARRANTIES  OR  CONDITIONS OF ANY  KIND,
 *   either  express  or implied.  See  the  License for  the specific
 *   language governing permissions and limitations under the License.
 */
#include "host.h"
#include "backdoor.h"
#include "log.h"
#include "vmtypes.h"

// Use stdint.h vs. cstdint so types are in global namespace, not std::
#include <stdint.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>

#define INCL_DOSPROCESS
#define INCL_ERRORS
#include <os2.h>


/* From https://sites.google.com/site/chitchatvmback/backdoor
   =========================================================================================
   02h	APM function	                Y	Y	Y	Y *1	Y *1	Y	Y *1
   04h	Get mouse cursor position	Y	Y	Y	Y	Y	Y	Y
   05h	Set mouse cursor position	Y	Y	Y	Y	Y	Y	Y
   06h	Get text length from clipboard	Y	Y	Y	Y	Y	Y	Y
   07h	Get text from clipboard	        Y	Y	Y	Y	Y	Y	Y
   08h	Set text length to clipboard	Y	Y	Y	Y	Y	Y	Y
   09h	Set text to clipboard	        Y	Y	Y	Y	Y	Y	Y
   =========================================================================================
   ECX gets command
   EBX gets optional params
*/

#define BACKDOOR_CMD_GET_MOUSE_POS 0x04
#define BACKDOOR_CMD_SET_MOUSE_POS 0x05
#define BACKDOOR_CMD_GET_CLIPBOARD_LEN 0x06
#define BACKDOOR_CMD_GET_CLIPBOARD_TEXT 0x07
#define BACKDOOR_CMD_SET_CLIPBOARD_LEN 0x08
#define BACKDOOR_CMD_SET_CLIPBOARD_TEXT 0x09


bool set_host_clipboard_internal(char* buf, uint32_t len) {
  int i = 0;
  uint32_t* p = NULL;
  LOG_FUNCTION();

  if (!buf) {
    return false;
  }

  //fprintf(stdout, "set_host_clipboard: len: %d; buf: '%s'", len, buf); fflush(stdout);
  Backdoor2(BACKDOOR_CMD_SET_CLIPBOARD_LEN, len);
  p = (uint32_t*) buf;
  for (i = 0; i < len; i += sizeof(uint32_t)) {
    // fprintf(stdout, "set_host_clipboard_text_piece: %d/%d [%c]\r\n", 
    // i, len, (char*) *p); fflush(stdout);
    Backdoor2(BACKDOOR_CMD_SET_CLIPBOARD_TEXT, *p++);
  }

  free(buf);
  return true;
}

static const int16_t XPOS_IN_HOST = -100;

bool pointer_in_host(const host_point* pos) {
  return pos->x == XPOS_IN_HOST;
}

bool get_host_pointer(host_point* pos) {
  uint32_t i = Backdoor(BACKDOOR_CMD_GET_MOUSE_POS);
  pos->x = i >> 16;
  pos->y = i & 0xffff;
  return true;
}

bool set_host_pointer(const host_point* pos) {
  uint32_t d = (pos->x << 16) | pos->y;
  Backdoor2(BACKDOOR_CMD_SET_MOUSE_POS, d);
  return true;
}

bool set_host_clipboard(char* b) {
  LOG_FUNCTION();
  if (!b) {
    return false;
  }
  {
    int len = strlen(b);
    set_host_clipboard_internal(b, len);
  }
  return true;
}

static void get_host_clipboard_internal(int32_t len, char* buf) {
   uint32_t *current = (uint32_t *)buf;
   uint32_t const *end = current + (len + sizeof(uint32_t) - 1) / sizeof(uint32_t);
   LOG_FUNCTION();
   for (; current < end; current++) {
     // Gets the next 4 bytes of the clipboard or 0 if none are available.
      *current = Backdoor(BACKDOOR_CMD_GET_CLIPBOARD_TEXT);
   }
}


char* get_host_clipboard() {
  int32_t len;
  char* buf;
  APIRET rc = NO_ERROR;

  LOG_FUNCTION();
  len = Backdoor(BACKDOOR_CMD_GET_CLIPBOARD_LEN);
  if (len <= 0) {
    logl(1, "failed to get clipboard len from host\r\n");
    return NULL;
  }
  rc = DosAllocSharedMem((PPVOID)&buf,
			 NULL, len+1, 
			 PAG_COMMIT | PAG_WRITE | OBJ_GIVEABLE);
  if (rc != NO_ERROR) {
    logl(1, "alloc failed\r\n");
    return NULL;
  }
  get_host_clipboard_internal(len, buf);
  return buf;
}