… | |
… | |
549 | if (keysym >= 0xFF00 && keysym <= 0xFFFF) |
549 | if (keysym >= 0xFF00 && keysym <= 0xFFFF) |
550 | { |
550 | { |
551 | { |
551 | { |
552 | bool kp = priv_modes & PrivMode_aplKP ? !shft : shft; |
552 | bool kp = priv_modes & PrivMode_aplKP ? !shft : shft; |
553 | newlen = 1; |
553 | newlen = 1; |
|
|
554 | #ifdef XK_KP_Home |
|
|
555 | static const KeySym keypadtrans[] = { |
|
|
556 | XK_KP_7, // XK_KP_Home |
|
|
557 | XK_KP_4, // XK_KP_Left |
|
|
558 | XK_KP_8, // XK_KP_Up |
|
|
559 | XK_KP_6, // XK_KP_Right |
|
|
560 | XK_KP_2, // XK_KP_Down |
|
|
561 | #ifndef UNSHIFTED_SCROLLKEYS |
|
|
562 | XK_KP_9, // XK_KP_Prior |
|
|
563 | XK_KP_3, // XK_KP_Next |
|
|
564 | #else |
|
|
565 | XK_Prior, |
|
|
566 | XK_Next, |
|
|
567 | #endif |
|
|
568 | XK_KP_1, // XK_KP_End |
|
|
569 | XK_KP_5, // XK_KP_Begin |
|
|
570 | }; |
|
|
571 | |
|
|
572 | if (IN_RANGE_INC (keysym, XK_KP_Home, XK_KP_Begin)) |
|
|
573 | { |
|
|
574 | unsigned int index = keysym - XK_KP_Home; |
|
|
575 | keysym = kp ? keypadtrans[index] : XK_Home + index; |
|
|
576 | } |
|
|
577 | else if (keysym == XK_KP_Insert) |
|
|
578 | keysym = kp ? XK_KP_0 : XK_Insert; |
|
|
579 | #ifndef NO_DELETE_KEY |
|
|
580 | else if (keysym == XK_KP_Delete) |
|
|
581 | keysym = kp ? XK_KP_Decimal : XK_Delete; |
|
|
582 | #endif |
|
|
583 | #endif |
554 | switch (keysym) |
584 | switch (keysym) |
555 | { |
585 | { |
556 | #ifndef NO_BACKSPACE_KEY |
586 | #ifndef NO_BACKSPACE_KEY |
557 | case XK_BackSpace: |
587 | case XK_BackSpace: |
558 | if (priv_modes & PrivMode_HaveBackSpace) |
588 | if (priv_modes & PrivMode_HaveBackSpace) |
… | |
… | |
564 | else |
594 | else |
565 | strcpy (kbuf, rs[Rs_backspace_key]); |
595 | strcpy (kbuf, rs[Rs_backspace_key]); |
566 | break; |
596 | break; |
567 | #endif |
597 | #endif |
568 | #ifndef NO_DELETE_KEY |
598 | #ifndef NO_DELETE_KEY |
569 | # ifdef XK_KP_Delete |
|
|
570 | case XK_KP_Delete: |
|
|
571 | /* allow shift to override */ |
|
|
572 | if (kp) |
|
|
573 | { |
|
|
574 | strcpy (kbuf, "\033On"); |
|
|
575 | break; |
|
|
576 | } |
|
|
577 | /* FALLTHROUGH */ |
|
|
578 | # endif |
|
|
579 | case XK_Delete: |
599 | case XK_Delete: |
580 | strcpy (kbuf, rs[Rs_delete_key]); |
600 | strcpy (kbuf, rs[Rs_delete_key]); |
581 | break; |
601 | break; |
582 | #endif |
602 | #endif |
583 | case XK_Tab: |
603 | case XK_Tab: |
… | |
… | |
595 | #endif |
615 | #endif |
596 | newlen = 0; |
616 | newlen = 0; |
597 | } |
617 | } |
598 | break; |
618 | break; |
599 | |
619 | |
600 | #ifdef XK_KP_Left |
|
|
601 | case XK_KP_Left: /* \033Ot or standard */ |
|
|
602 | case XK_KP_Up: /* \033Ox or standard */ |
|
|
603 | case XK_KP_Right: /* \033Ov or standard */ |
|
|
604 | case XK_KP_Down: /* \033Or or standard */ |
|
|
605 | if (kp) |
|
|
606 | { |
|
|
607 | strcpy (kbuf, "\033OZ"); |
|
|
608 | kbuf[2] = "txvr"[keysym - XK_KP_Left]; |
|
|
609 | break; |
|
|
610 | } |
|
|
611 | else |
|
|
612 | /* translate to std. cursor key */ |
|
|
613 | keysym = XK_Left + (keysym - XK_KP_Left); |
|
|
614 | /* FALLTHROUGH */ |
|
|
615 | #endif |
|
|
616 | case XK_Up: /* "\033[A" */ |
620 | case XK_Up: /* "\033[A" */ |
617 | case XK_Down: /* "\033[B" */ |
621 | case XK_Down: /* "\033[B" */ |
618 | case XK_Right: /* "\033[C" */ |
622 | case XK_Right: /* "\033[C" */ |
619 | case XK_Left: /* "\033[D" */ |
623 | case XK_Left: /* "\033[D" */ |
620 | strcpy (kbuf, "\033[Z"); |
624 | strcpy (kbuf, "\033[Z"); |
… | |
… | |
630 | else if (priv_modes & PrivMode_aplCUR) |
634 | else if (priv_modes & PrivMode_aplCUR) |
631 | kbuf[1] = 'O'; |
635 | kbuf[1] = 'O'; |
632 | break; |
636 | break; |
633 | |
637 | |
634 | #ifndef UNSHIFTED_SCROLLKEYS |
638 | #ifndef UNSHIFTED_SCROLLKEYS |
635 | # ifdef XK_KP_Prior |
|
|
636 | case XK_KP_Prior: |
|
|
637 | /* allow shift to override */ |
|
|
638 | if (kp) |
|
|
639 | { |
|
|
640 | strcpy (kbuf, "\033Oy"); |
|
|
641 | break; |
|
|
642 | } |
|
|
643 | /* FALLTHROUGH */ |
|
|
644 | # endif |
|
|
645 | case XK_Prior: |
639 | case XK_Prior: |
646 | strcpy (kbuf, "\033[5~"); |
640 | strcpy (kbuf, "\033[5~"); |
647 | break; |
641 | break; |
648 | # ifdef XK_KP_Next |
|
|
649 | case XK_KP_Next: |
|
|
650 | /* allow shift to override */ |
|
|
651 | if (kp) |
|
|
652 | { |
|
|
653 | strcpy (kbuf, "\033Os"); |
|
|
654 | break; |
|
|
655 | } |
|
|
656 | /* FALLTHROUGH */ |
|
|
657 | # endif |
|
|
658 | case XK_Next: |
642 | case XK_Next: |
659 | strcpy (kbuf, "\033[6~"); |
643 | strcpy (kbuf, "\033[6~"); |
660 | break; |
644 | break; |
661 | #endif |
645 | #endif |
662 | case XK_KP_Enter: |
646 | case XK_KP_Enter: |
… | |
… | |
681 | kbuf[0] = '\015'; |
665 | kbuf[0] = '\015'; |
682 | kbuf[1] = '\0'; |
666 | kbuf[1] = '\0'; |
683 | } |
667 | } |
684 | break; |
668 | break; |
685 | |
669 | |
686 | #ifdef XK_KP_Begin |
|
|
687 | case XK_KP_Begin: |
|
|
688 | strcpy (kbuf, "\033Ou"); |
|
|
689 | break; |
|
|
690 | |
|
|
691 | #endif |
|
|
692 | case XK_KP_F1: /* "\033OP" */ |
670 | case XK_KP_F1: /* "\033OP" */ |
693 | case XK_KP_F2: /* "\033OQ" */ |
671 | case XK_KP_F2: /* "\033OQ" */ |
694 | case XK_KP_F3: /* "\033OR" */ |
672 | case XK_KP_F3: /* "\033OR" */ |
695 | case XK_KP_F4: /* "\033OS" */ |
673 | case XK_KP_F4: /* "\033OS" */ |
696 | strcpy (kbuf, "\033OP"); |
674 | strcpy (kbuf, "\033OP"); |
… | |
… | |
728 | |
706 | |
729 | case XK_Find: |
707 | case XK_Find: |
730 | strcpy (kbuf, "\033[1~"); |
708 | strcpy (kbuf, "\033[1~"); |
731 | break; |
709 | break; |
732 | |
710 | |
733 | #ifdef XK_KP_Insert |
|
|
734 | case XK_KP_Insert: |
|
|
735 | /* allow shift to override */ |
|
|
736 | if (kp) |
|
|
737 | { |
|
|
738 | strcpy (kbuf, "\033Op"); |
|
|
739 | break; |
|
|
740 | } |
|
|
741 | /* FALLTHROUGH */ |
|
|
742 | #endif |
|
|
743 | case XK_Insert: |
711 | case XK_Insert: |
744 | strcpy (kbuf, "\033[2~"); |
712 | strcpy (kbuf, "\033[2~"); |
745 | break; |
713 | break; |
746 | #ifdef DXK_Remove /* support for DEC remove like key */ |
714 | #ifdef DXK_Remove /* support for DEC remove like key */ |
747 | case DXK_Remove: |
715 | case DXK_Remove: |
… | |
… | |
751 | strcpy (kbuf, "\033[3~"); |
719 | strcpy (kbuf, "\033[3~"); |
752 | break; |
720 | break; |
753 | case XK_Select: |
721 | case XK_Select: |
754 | strcpy (kbuf, "\033[4~"); |
722 | strcpy (kbuf, "\033[4~"); |
755 | break; |
723 | break; |
756 | #ifdef XK_KP_End |
|
|
757 | case XK_KP_End: |
|
|
758 | /* allow shift to override */ |
|
|
759 | if (kp) |
|
|
760 | { |
|
|
761 | strcpy (kbuf, "\033Oq"); |
|
|
762 | break; |
|
|
763 | } |
|
|
764 | /* FALLTHROUGH */ |
|
|
765 | #endif |
|
|
766 | case XK_End: |
724 | case XK_End: |
767 | strcpy (kbuf, KS_END); |
725 | strcpy (kbuf, KS_END); |
768 | break; |
726 | break; |
769 | #ifdef XK_KP_Home |
|
|
770 | case XK_KP_Home: |
|
|
771 | /* allow shift to override */ |
|
|
772 | if (kp) |
|
|
773 | { |
|
|
774 | strcpy (kbuf, "\033Ow"); |
|
|
775 | break; |
|
|
776 | } |
|
|
777 | /* FALLTHROUGH */ |
|
|
778 | #endif |
|
|
779 | case XK_Home: |
727 | case XK_Home: |
780 | strcpy (kbuf, KS_HOME); |
728 | strcpy (kbuf, KS_HOME); |
781 | break; |
729 | break; |
782 | |
730 | |
783 | #define FKEY(n, fkey) \ |
731 | #define FKEY(n, fkey) \ |