4coder/custom/4coder_events.cpp

465 lines
14 KiB
C++
Raw Normal View History

/*
* 4coder event helpers
*/
// TOP
function b32
has_modifier(Key_Code *mods, i32 count, Key_Code modifier){
b32 result = false;
for (i32 i = 0; i < count; i += 1){
if (mods[i] == modifier){
result = true;
break;
}
}
return(result);
}
function b32
has_modifier(Input_Modifier_Set_Fixed *set, Key_Code modifier){
return(has_modifier(set->mods, set->count, modifier));
}
function b32
has_modifier(Input_Modifier_Set *set, Key_Code modifier){
return(has_modifier(set->mods, set->count, modifier));
}
function Input_Modifier_Set
copy_modifier_set(Arena *arena, Input_Modifier_Set_Fixed *set){
Input_Modifier_Set result = {};
result.count = set->count;
if (result.count > 0){
result.mods = push_array_write(arena, Key_Code, result.count, set->mods);
}
return(result);
}
2019-11-22 22:09:52 +00:00
function void
copy_modifier_set(Input_Modifier_Set_Fixed *dst, Input_Modifier_Set *set){
i32 count = clamp_top(set->count, ArrayCount(dst->mods));
dst->count = count;
block_copy(dst->mods, set->mods, count*sizeof(*set->mods));
}
function void
add_modifier(Input_Modifier_Set_Fixed *set, Key_Code mod){
if (!has_modifier(set, mod)){
if (set->count < ArrayCount(set->mods)){
set->mods[set->count] = mod;
set->count += 1;
}
}
}
function void
remove_modifier(Input_Modifier_Set_Fixed *set, Key_Code mod){
i32 count = set->count;
Key_Code *mods = set->mods;
for (i32 i = 0; i < count; i += 1){
if (mods[i] == mod){
i32 new_count = count - 1;
mods[i] = mods[new_count];
set->count = new_count;
break;
}
}
}
function void
set_modifier(Input_Modifier_Set_Fixed *set, Key_Code mod, b32 val){
if (val){
add_modifier(set, mod);
}
else{
remove_modifier(set, mod);
}
}
function Input_Modifier_Set
copy_modifier_set(Arena *arena, Input_Modifier_Set *set){
Input_Modifier_Set result = {};
result.count = set->count;
if (result.count > 0){
result.mods = push_array_write(arena, Key_Code, result.count, set->mods);
}
return(result);
}
function Input_Modifier_Set*
get_modifiers(Input_Event *event){
Input_Modifier_Set *result = 0;
switch (event->kind){
case InputEventKind_KeyStroke:
{
result = &event->key.modifiers;
}break;
case InputEventKind_MouseButton:
{
result = &event->mouse.modifiers;
}break;
case InputEventKind_MouseWheel:
{
result = &event->mouse_wheel.modifiers;
}break;
case InputEventKind_MouseMove:
{
result = &event->mouse_move.modifiers;
}break;
}
return(result);
}
function b32
has_modifier(Input_Event *event, Key_Code modifier){
Input_Modifier_Set *set = get_modifiers(event);
return(has_modifier(set, modifier));
}
2019-10-12 03:19:42 +00:00
function b32
is_unmodified_key(Input_Event *event){
b32 result = false;
if (event->kind == InputEventKind_KeyStroke){
Input_Modifier_Set *set = get_modifiers(event);
result = (!has_modifier(set, KeyCode_Control) &&
!has_modifier(set, KeyCode_Alt) &&
!has_modifier(set, KeyCode_Shift) &&
!has_modifier(set, KeyCode_Command));
}
return(result);
}
function b32
is_modified(Input_Event *event){
Input_Modifier_Set *mods = get_modifiers(event);
b32 result = false;
if (mods != 0){
result = (mods->count > 0);
}
return(result);
}
function b32
event_is_dead_key(Input_Event *event){
return(event->kind == InputEventKind_KeyStroke && HasFlag(event->key.flags, KeyFlag_IsDeadKey));
}
function Input_Event
event_next_text_event(Input_Event *event){
Input_Event result = {};
if (event != 0){
if (event->kind == InputEventKind_KeyStroke &&
event->key.first_dependent_text != 0){
block_copy_struct(&result, event->key.first_dependent_text);
}
else if (event->kind == InputEventKind_TextInsert &&
event->text.next_text != 0){
block_copy_struct(&result, event->text.next_text);
}
}
return(result);
}
function String_Const_u8
to_writable(Input_Event *event){
String_Const_u8 result = {};
if (event->kind == InputEventKind_TextInsert){
result = event->text.string;
}
return(result);
}
function b32
match_key_code(Input_Event *event, Key_Code code){
return(event->kind == InputEventKind_KeyStroke && event->key.code == code);
}
function b32
match_mouse_code(Input_Event *event, Mouse_Code code){
return(event->kind == InputEventKind_MouseButton && event->mouse.code == code);
}
function b32
match_mouse_code_release(Input_Event *event, Mouse_Code code){
return(event->kind == InputEventKind_MouseButtonRelease && event->mouse.code == code);
}
function b32
match_core_code(Input_Event *event, Core_Code code){
return(event->kind == InputEventKind_Core && event->core.code == code);
}
function Event_Property
get_event_properties(Input_Event *event){
Event_Property flags = 0;
switch (event->kind){
case InputEventKind_TextInsert:
{
flags |= EventProperty_TextInsert;
}break;
case InputEventKind_KeyStroke:
{
if (event->key.code == KeyCode_Escape){
flags |= EventProperty_Escape;
}
flags |= EventProperty_AnyKey;
}break;
2019-10-14 05:27:57 +00:00
case InputEventKind_KeyRelease:
{
flags |= EventProperty_AnyKeyRelease;
}break;
case InputEventKind_MouseButton:
{
2019-10-14 05:27:57 +00:00
flags |= EventProperty_MouseButton;
}break;
case InputEventKind_MouseButtonRelease:
{
flags |= EventProperty_MouseRelease;
}break;
case InputEventKind_MouseWheel:
{
flags |= EventProperty_MouseWheel;
}break;
case InputEventKind_MouseMove:
{
flags |= EventProperty_MouseMove;
}break;
case InputEventKind_Core:
{
switch (event->core.code){
case CoreCode_Animate:
{
flags |= EventProperty_Animate;
}break;
case CoreCode_ClickActivateView:
case CoreCode_ClickDeactivateView:
{
flags |= EventProperty_ViewActivation;
}break;
2019-10-14 22:57:47 +00:00
case CoreCode_FileExternallyModified:
{
flags |= EventProperty_AnyFile;
}break;
case CoreCode_Startup:
{
flags |= EventProperty_Startup;
}break;
case CoreCode_TryExit:
{
flags |= EventProperty_Exit;
}break;
case CoreCode_NewClipboardContents:
{
flags |= EventProperty_Clipboard;
}break;
}
}break;
case InputEventKind_CustomFunction:
{
flags |= EventProperty_CustomFunction;
}break;
}
return(flags);
}
function Input_Event*
2019-10-10 20:15:47 +00:00
push_input_event(Arena *arena, Input_List *list){
Input_Event_Node *node = push_array_zero(arena, Input_Event_Node, 1);
sll_queue_push(list->first, list->last, node);
list->count += 1;
return(&node->event);
}
function Input_Event*
push_input_event(Arena *arena, Input_List *list, Input_Event *event){
Input_Event_Node *node = push_array(arena, Input_Event_Node, 1);
block_copy_struct(&node->event, event);
sll_queue_push(list->first, list->last, node);
list->count += 1;
return(&node->event);
}
2019-11-22 22:09:52 +00:00
function Input_Event
copy_input_event(Arena *arena, Input_Event *event){
Input_Event result = *event;
switch (result.kind){
case InputEventKind_TextInsert:
{
result.text.string = push_string_copy(arena, event->text.string);
}break;
case InputEventKind_KeyStroke:
case InputEventKind_KeyRelease:
{
result.key.modifiers = copy_modifier_set(arena, &event->key.modifiers);
}break;
case InputEventKind_MouseButton:
case InputEventKind_MouseButtonRelease:
{
result.mouse.modifiers = copy_modifier_set(arena, &event->mouse.modifiers);
}break;
case InputEventKind_MouseWheel:
{
result.mouse_wheel.modifiers = copy_modifier_set(arena, &event->mouse_wheel.modifiers);
}break;
case InputEventKind_MouseMove:
{
result.mouse_move.modifiers = copy_modifier_set(arena, &event->mouse_move.modifiers);
}break;
case InputEventKind_Core:
{
switch (result.core.code){
case CoreCode_Startup:
{
result.core.flag_strings = push_string_array_copy(arena, event->core.flag_strings);
result.core.file_names = push_string_array_copy(arena, event->core.file_names);
}break;
case CoreCode_FileExternallyModified:
case CoreCode_NewClipboardContents:
{
result.core.string = push_string_copy(arena, event->core.string);
}break;
}
}break;
}
return(result);
}
////////////////////////////////
function String_Const_u8
stringize_keyboard_event(Arena *arena, Input_Event *event){
List_String_Const_u8 list = {};
switch (event->kind){
case InputEventKind_TextInsert:
{
string_list_push(arena, &list, string_u8_litexpr("t"));
u64 size = event->text.string.size;
2019-11-22 22:09:52 +00:00
u8 *ptr = event->text.string.str;
for (u64 i = 0; i < size; i += 1, ptr += 1){
2019-11-22 22:09:52 +00:00
string_list_pushf(arena, &list, "%02X", (i32)(*ptr));
}
string_list_push(arena, &list, string_u8_litexpr("\n"));
}break;
case InputEventKind_KeyStroke:
case InputEventKind_KeyRelease:
{
string_list_pushf(arena, &list, "k%X ", event->key.code);
if (event->kind == InputEventKind_KeyRelease){
string_list_push(arena, &list, string_u8_litexpr("^"));
}
i32 count = event->key.modifiers.count;
if (count > 0){
Key_Code *m = event->key.modifiers.mods;
string_list_push(arena, &list, string_u8_litexpr("m{"));
for (i32 i = 0; i < count; i += 1, m += 1){
string_list_pushf(arena, &list, "%X ", *m);
}
string_list_push(arena, &list, string_u8_litexpr("}"));
}
string_list_push(arena, &list, string_u8_litexpr("\n"));
2019-11-22 22:09:52 +00:00
}break;
}
2019-11-22 22:09:52 +00:00
return(string_list_flatten(arena, list));
}
function Input_Event
parse_keyboard_event(Arena *arena, String_Const_u8 text){
Input_Event result = {};
u64 pos = 0;
2019-11-22 22:09:52 +00:00
Range_i64 range = {};
if (pos < text.size && text.str[pos] == 't'){
pos += 1;
result.kind = InputEventKind_TextInsert;
u64 max_size = text.size/2;
2019-11-22 22:09:52 +00:00
result.text.string.str = push_array(arena, u8, max_size);
for (; pos + 1 < text.size; pos += 2){
if (character_is_base16(text.str[pos]) &&
character_is_base16(text.str[pos + 1])){
String_Const_u8 byte_str = {text.str + pos, 2};
result.text.string.str[result.text.string.size] = (u8)string_to_integer(byte_str, 16);
result.text.string.size += 1;
}
}
}
else if (pos < text.size && text.str[pos] == 'k'){
pos += 1;
result.kind = InputEventKind_KeyStroke;
range.first = pos;
for (;pos < text.size && character_is_base16(text.str[pos]); pos += 1);
range.one_past_last = pos;
if (range.first == range.one_past_last){
result.kind = InputEventKind_None;
}
else{
String_Const_u8 code_str = string_substring(text, range);
result.key.code = (u32)string_to_integer(code_str, 16);
for (;pos < text.size && character_is_whitespace(text.str[pos]); pos += 1);
if (pos < text.size && text.str[pos] == '^'){
result.kind = InputEventKind_KeyRelease;
pos += 1;
for (;pos < text.size && character_is_whitespace(text.str[pos]); pos += 1);
}
if (pos < text.size && text.str[pos] == 'm'){
pos += 1;
if (pos < text.size && text.str[pos] == '{'){
pos += 1;
Input_Modifier_Set_Fixed mods = {};
for (;mods.count < ArrayCount(mods.mods);){
for (;pos < text.size && character_is_whitespace(text.str[pos]); pos += 1);
range.first = pos;
for (;pos < text.size && character_is_base16(text.str[pos]); pos += 1);
range.one_past_last = pos;
if (range.first == range.one_past_last){
break;
}
code_str = string_substring(text, range);
mods.mods[mods.count] = (u32)string_to_integer(code_str, 16);
mods.count += 1;
}
result.key.modifiers = copy_modifier_set(arena, &mods);
}
}
}
}
return(result);
}
// BOTTOM