/**

 * FreeRDP: A Remote Desktop Protocol Implementation

 * FreeRDP Mac OS X Server (Input)

 *

 * Copyright 2013 Corey Clayton <can.of.tuna@gmail.com>

 *

 * 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.

 */

#ifdef HAVE_CONFIG_H

#include "config.h"

#endif

#include <ApplicationServices/ApplicationServices.h>

#include <Carbon/Carbon.h>

#include <winpr/windows.h>

#include "mf_input.h"

#include "mf_info.h"

#include <freerdp/log.h>

#define TAG SERVER_TAG("mac")

static const CGKeyCode keymap[256] = {

	0xFF,                    // 0x0

	kVK_Escape,              // 0x1

	kVK_ANSI_1,              // 0x2

	kVK_ANSI_2,              // 0x3

	kVK_ANSI_3,              // 0x4

	kVK_ANSI_4,              // 0x5

	kVK_ANSI_5,              // 0x6

	kVK_ANSI_6,              // 0x7

	kVK_ANSI_7,              // 0x8

	kVK_ANSI_8,              // 0x9

	kVK_ANSI_9,              // 0xa

	kVK_ANSI_0,              // 0xb

	kVK_ANSI_Minus,          // 0xc

	kVK_ANSI_Equal,          // 0xd

	kVK_Delete,              // 0xe

	kVK_Tab,                 // 0xf

	kVK_ANSI_Q,              // 0x10

	kVK_ANSI_W,              // 0x11

	kVK_ANSI_E,              // 0x12

	kVK_ANSI_R,              // 0x13

	kVK_ANSI_T,              // 0x14

	kVK_ANSI_Y,              // 0x15

	kVK_ANSI_U,              // 0x16

	kVK_ANSI_I,              // 0x17

	kVK_ANSI_O,              // 0x18

	kVK_ANSI_P,              // 0x19

	kVK_ANSI_LeftBracket,    // 0x1a

	kVK_ANSI_RightBracket,   // 0x1b

	kVK_Return,              // 0x1c

	kVK_Control,             // 0x1d

	kVK_ANSI_A,              // 0x1e

	kVK_ANSI_S,              // 0x1f

	kVK_ANSI_D,              // 0x20

	kVK_ANSI_F,              // 0x21

	kVK_ANSI_G,              // 0x22

	kVK_ANSI_H,              // 0x23

	kVK_ANSI_J,              // 0x24

	kVK_ANSI_K,              // 0x25

	kVK_ANSI_L,              // 0x26

	kVK_ANSI_Semicolon,      // 0x27

	kVK_ANSI_Quote,          // 0x28

	kVK_ANSI_Grave,          // 0x29

	kVK_Shift,               // 0x2a

	kVK_ANSI_Backslash,      // 0x2b

	kVK_ANSI_Z,              // 0x2c

	kVK_ANSI_X,              // 0x2d

	kVK_ANSI_C,              // 0x2e

	kVK_ANSI_V,              // 0x2f

	kVK_ANSI_B,              // 0x30

	kVK_ANSI_N,              // 0x31

	kVK_ANSI_M,              // 0x32

	kVK_ANSI_Comma,          // 0x33

	kVK_ANSI_Period,         // 0x34

	kVK_ANSI_Slash,          // 0x35

	kVK_Shift,               // 0x36

	kVK_ANSI_KeypadMultiply, // 0x37

	kVK_Option,              // 0x38

	kVK_Space,               // 0x39

	kVK_CapsLock,            // 0x3a

	kVK_F1,                  // 0x3b

	kVK_F2,                  // 0x3c

	kVK_F3,                  // 0x3d

	kVK_F4,                  // 0x3e

	kVK_F5,                  // 0x3f

	kVK_F6,                  // 0x40

	kVK_F7,                  // 0x41

	kVK_F8,                  // 0x42

	kVK_F9,                  // 0x43

	kVK_F10,                 // 0x44

	0xFF,                    // 0x45 -- numlock

	0xFF,                    // 0x46 -- scroll lock

	kVK_ANSI_Keypad7,        // 0x47

	kVK_ANSI_Keypad8,        // 0x48

	kVK_ANSI_Keypad9,        // 0x49

	kVK_ANSI_KeypadMinus,    // 0x4a

	kVK_ANSI_Keypad4,        // 0x4b

	kVK_ANSI_Keypad5,        // 0x4c

	kVK_ANSI_Keypad6,        // 0x4d

	kVK_ANSI_KeypadPlus,     // 0x4e

	kVK_ANSI_Keypad1,        // 0x4f

	kVK_ANSI_Keypad2,        // 0x50

	kVK_ANSI_Keypad3,        // 0x51

	kVK_ANSI_Keypad0,        // 0x52

	kVK_ANSI_KeypadDecimal,  // 0x53

	0xFF,                    // 0x54

	0xFF,                    // 0x55

	0xFF,                    // 0x56

	kVK_F11,                 // 0x57

	kVK_F12,                 // 0x58

	0xFF,                    // 0x59 -- pause

	0xFF,                    // 0x5a

	kVK_Control,             // 0x5b

	kVK_Control,             // 0x5c

	0xFF,                    // 0x5d -- application

	0xFF,                    // 0x5e -- power

	0xFF,                    // 0x5f -- sleep

	0xFF,                    // 0x60

	0xFF,                    // 0x61

	0xFF,                    // 0x62

	0xFF,                    // 0x63 -- wake

	0xFF,                    // 0x64

	0xFF,                    // 0x65

	0xFF,                    // 0x66

	0xFF,                    // 0x67

	0xFF,                    // 0x68

	0xFF,                    // 0x69

	0xFF,                    // 0x6a

	0xFF,                    // 0x6b

	0xFF,                    // 0x6c

	0xFF,                    // 0x6d

	0xFF,                    // 0x6e

	0xFF,                    // 0x6f

	0xFF,                    // 0x70

	0xFF,                    // 0x71

	0xFF,                    // 0x72

	0xFF,                    // 0x73

	0xFF,                    // 0x74

	0xFF,                    // 0x75

	0xFF,                    // 0x76

	0xFF,                    // 0x77

	0xFF,                    // 0x78

	0xFF,                    // 0x79

	0xFF,                    // 0x7a

	0xFF,                    // 0x7b

	0xFF,                    // 0x7c

	0xFF,                    // 0x7d

	0xFF,                    // 0x7e

	0xFF,                    // 0x7f

	0xFF,                    // 0x80

	0xFF,                    // 0x81

	0xFF,                    // 0x82

	0xFF,                    // 0x83

	0xFF,                    // 0x84

	0xFF,                    // 0x85

	0xFF,                    // 0x86

	0xFF,                    // 0x87

	0xFF,                    // 0x88

	0xFF,                    // 0x89

	0xFF,                    // 0x8a

	0xFF,                    // 0x8b

	0xFF,                    // 0x8c

	0xFF,                    // 0x8d

	0xFF,                    // 0x8e

	0xFF,                    // 0x8f

	0xFF,                    // 0x90

	0xFF,                    // 0x91

	0xFF,                    // 0x92

	0xFF,                    // 0x93

	0xFF,                    // 0x94

	0xFF,                    // 0x95

	0xFF,                    // 0x96

	0xFF,                    // 0x97

	0xFF,                    // 0x98

	0xFF,                    // 0x99

	0xFF,                    // 0x9a

	0xFF,                    // 0x9b

	0xFF,                    // 0x9c

	0xFF,                    // 0x9d

	0xFF,                    // 0x9e

	0xFF,                    // 0x9f

	0xFF,                    // 0xa0

	0xFF,                    // 0xa1

	0xFF,                    // 0xa2

	0xFF,                    // 0xa3

	0xFF,                    // 0xa4

	0xFF,                    // 0xa5

	0xFF,                    // 0xa6

	0xFF,                    // 0xa7

	0xFF,                    // 0xa8

	0xFF,                    // 0xa9

	0xFF,                    // 0xaa

	0xFF,                    // 0xab

	0xFF,                    // 0xac

	0xFF,                    // 0xad

	0xFF,                    // 0xae

	0xFF,                    // 0xaf

	0xFF,                    // 0xb0

	0xFF,                    // 0xb1

	0xFF,                    // 0xb2

	0xFF,                    // 0xb3

	0xFF,                    // 0xb4

	0xFF,                    // 0xb5

	0xFF,                    // 0xb6

	0xFF,                    // 0xb7

	0xFF,                    // 0xb8

	0xFF,                    // 0xb9

	0xFF,                    // 0xba

	0xFF,                    // 0xbb

	0xFF,                    // 0xbc

	0xFF,                    // 0xbd

	0xFF,                    // 0xbe

	0xFF,                    // 0xbf

	0xFF,                    // 0xc0

	0xFF,                    // 0xc1

	0xFF,                    // 0xc2

	0xFF,                    // 0xc3

	0xFF,                    // 0xc4

	0xFF,                    // 0xc5

	0xFF,                    // 0xc6

	0xFF,                    // 0xc7

	0xFF,                    // 0xc8

	0xFF,                    // 0xc9

	0xFF,                    // 0xca

	0xFF,                    // 0xcb

	0xFF,                    // 0xcc

	0xFF,                    // 0xcd

	0xFF,                    // 0xce

	0xFF,                    // 0xcf

	0xFF,                    // 0xd0

	0xFF,                    // 0xd1

	0xFF,                    // 0xd2

	0xFF,                    // 0xd3

	0xFF,                    // 0xd4

	0xFF,                    // 0xd5

	0xFF,                    // 0xd6

	0xFF,                    // 0xd7

	0xFF,                    // 0xd8

	0xFF,                    // 0xd9

	0xFF,                    // 0xda

	0xFF,                    // 0xdb

	0xFF,                    // 0xdc

	0xFF,                    // 0xdd

	0xFF,                    // 0xde

	0xFF,                    // 0xdf

	0xFF,                    // 0xe0

	0xFF,                    // 0xe1

	0xFF,                    // 0xe2

	0xFF,                    // 0xe3

	0xFF,                    // 0xe4

	0xFF,                    // 0xe5

	0xFF,                    // 0xe6

	0xFF,                    // 0xe7

	0xFF,                    // 0xe8

	0xFF,                    // 0xe9

	0xFF,                    // 0xea

	0xFF,                    // 0xeb

	0xFF,                    // 0xec

	0xFF,                    // 0xed

	0xFF,                    // 0xee

	0xFF,                    // 0xef

	0xFF,                    // 0xf0

	0xFF,                    // 0xf1

	0xFF,                    // 0xf2

	0xFF,                    // 0xf3

	0xFF,                    // 0xf4

	0xFF,                    // 0xf5

	0xFF,                    // 0xf6

	0xFF,                    // 0xf7

	0xFF,                    // 0xf8

	0xFF,                    // 0xf9

	0xFF,                    // 0xfa

	0xFF,                    // 0xfb

	0xFF,                    // 0xfc

	0xFF,                    // 0xfd

	0xFF,                    // 0xfe

};

BOOL mf_input_keyboard_event(rdpInput* input, UINT16 flags, UINT16 code)

{

	CGEventSourceRef source = CGEventSourceCreate(kCGEventSourceStateHIDSystemState);

	BOOL keyDown = TRUE;

	CGEventRef kbEvent;

	CGKeyCode kCode = 0xFF;

	if (flags & KBD_FLAGS_RELEASE)

	{

		keyDown = FALSE;

	}

	if (flags & KBD_FLAGS_EXTENDED)

	{

		switch (code)

		{

			// case 0x52: //insert

			case 0x53:

				kCode = kVK_ForwardDelete;

				break;

			case 0x4B:

				kCode = kVK_LeftArrow;

				break;

			case 0x47:

				kCode = kVK_Home;

				break;

			case 0x4F:

				kCode = kVK_End;

				break;

			case 0x48:

				kCode = kVK_UpArrow;

				break;

			case 0x50:

				kCode = kVK_DownArrow;

				break;

			case 0x49:

				kCode = kVK_PageUp;

				break;

			case 0x51:

				kCode = kVK_PageDown;

				break;

			case 0x4D:

				kCode = kVK_RightArrow;

				break;

			default:

				break;

		}

	}

	else

	{

		kCode = keymap[code];

	}

	kbEvent = CGEventCreateKeyboardEvent(source, kCode, keyDown);

	CGEventPost(kCGHIDEventTap, kbEvent);

	CFRelease(kbEvent);

	CFRelease(source);

	return TRUE;

}

BOOL mf_input_unicode_keyboard_event(rdpInput* input, UINT16 flags, UINT16 code)

{

	return FALSE;

}

BOOL mf_input_mouse_event(rdpInput* input, UINT16 flags, UINT16 x, UINT16 y)

{

	float width, height;

	CGWheelCount wheelCount = 2;

	INT32 scroll_x = 0;

	INT32 scroll_y = 0;

	if (flags & (PTR_FLAGS_WHEEL | PTR_FLAGS_HWHEEL))

	{

		INT32 scroll = flags & WheelRotationMask;

		if (flags & PTR_FLAGS_WHEEL_NEGATIVE)

			scroll = -(flags & WheelRotationMask) / 392;

		else

			scroll = (flags & WheelRotationMask) / 120;

		if (flags & PTR_FLAGS_WHEEL)

			scroll_y = scroll;

		else

			scroll_x = scroll;

		CGEventSourceRef source = CGEventSourceCreate(kCGEventSourceStateHIDSystemState);

		CGEventRef scrollEvent = CGEventCreateScrollWheelEvent(source, kCGScrollEventUnitLine,

		                                                       wheelCount, scroll_y, scroll_x);

		CGEventPost(kCGHIDEventTap, scrollEvent);

		CFRelease(scrollEvent);

		CFRelease(source);

	}

	else

	{

		mfInfo* mfi;

		CGEventSourceRef source = CGEventSourceCreate(kCGEventSourceStateHIDSystemState);

		CGEventType mouseType = kCGEventNull;

		CGMouseButton mouseButton = kCGMouseButtonLeft;

		mfi = mf_info_get_instance();

		// width and height of primary screen (even in multimon setups

		width = (float)mfi->servscreen_width;

		height = (float)mfi->servscreen_height;

		x += mfi->servscreen_xoffset;

		y += mfi->servscreen_yoffset;

		if (flags & PTR_FLAGS_MOVE)

		{

			if (mfi->mouse_down_left == TRUE)

			{

				mouseType = kCGEventLeftMouseDragged;

			}

			else if (mfi->mouse_down_right == TRUE)

			{

				mouseType = kCGEventRightMouseDragged;

			}

			else if (mfi->mouse_down_other == TRUE)

			{

				mouseType = kCGEventOtherMouseDragged;

			}

			else

			{

				mouseType = kCGEventMouseMoved;

			}

			CGEventRef move = CGEventCreateMouseEvent(source, mouseType, CGPointMake(x, y),

			                                          mouseButton // ignored for just movement

			);

			CGEventPost(kCGHIDEventTap, move);

			CFRelease(move);

		}

		if (flags & PTR_FLAGS_BUTTON1)

		{

			mouseButton = kCGMouseButtonLeft;

			if (flags & PTR_FLAGS_DOWN)

			{

				mouseType = kCGEventLeftMouseDown;

				mfi->mouse_down_left = TRUE;

			}

			else

			{

				mouseType = kCGEventLeftMouseUp;

				mfi->mouse_down_right = FALSE;

			}

		}

		else if (flags & PTR_FLAGS_BUTTON2)

		{

			mouseButton = kCGMouseButtonRight;

			if (flags & PTR_FLAGS_DOWN)

			{

				mouseType = kCGEventRightMouseDown;

				mfi->mouse_down_right = TRUE;

			}

			else

			{

				mouseType = kCGEventRightMouseUp;

				mfi->mouse_down_right = FALSE;

			}

		}

		else if (flags & PTR_FLAGS_BUTTON3)

		{

			mouseButton = kCGMouseButtonCenter;

			if (flags & PTR_FLAGS_DOWN)

			{

				mouseType = kCGEventOtherMouseDown;

				mfi->mouse_down_other = TRUE;

			}

			else

			{

				mouseType = kCGEventOtherMouseUp;

				mfi->mouse_down_other = FALSE;

			}

		}

		CGEventRef mouseEvent =

		    CGEventCreateMouseEvent(source, mouseType, CGPointMake(x, y), mouseButton);

		CGEventPost(kCGHIDEventTap, mouseEvent);

		CFRelease(mouseEvent);

		CFRelease(source);

	}

	return TRUE;

}

BOOL mf_input_extended_mouse_event(rdpInput* input, UINT16 flags, UINT16 x, UINT16 y)

{

	return FALSE;

}

BOOL mf_input_keyboard_event_dummy(rdpInput* input, UINT16 flags, UINT16 code)

{

	return FALSE;

}

BOOL mf_input_unicode_keyboard_event_dummy(rdpInput* input, UINT16 flags, UINT16 code)

{

	return FALSE;

}

BOOL mf_input_mouse_event_dummy(rdpInput* input, UINT16 flags, UINT16 x, UINT16 y)

{

	return FALSE;

}

BOOL mf_input_extended_mouse_event_dummy(rdpInput* input, UINT16 flags, UINT16 x, UINT16 y)

{

	return FALSE;

}