Subject: port-amiga/3923: french keyboard for amiga
To: None <gnats-bugs@gnats.netbsd.org>
From: None <edelcamp@easynet.fr>
List: netbsd-bugs
Date: 07/29/1997 02:22:16
>Number: 3923
>Category: port-amiga
>Synopsis: french keyboard for amiga
>Confidential: no
>Severity: non-critical
>Priority: low
>Responsible: gnats-admin (GNATS administrator)
>State: open
>Class: change-request
>Submitter-Id: net
>Arrival-Date: Mon Jul 28 17:35:02 1997
>Last-Modified:
>Originator: Eric Delcamp
>Organization:
>Release: <NetBSD-current source date> 970721
>Environment:
System: NetBSD Pop-Bordeaux-25.easynet.fr 1.2G NetBSD 1.2G (IBISCUS) #0: Tue Jul 22 23:13:27 CEST 1997 root@ibiscus.easynet.fr:/usr/src/sys/arch/amiga/compile/IBISCUS amiga
>Description:
A french keymap for the amiga port of NetBSD.
>How-To-Repeat:
none
>Fix:
Here is a shar archive of sources.
Must go to sys/arch/amiga/stand/loadkmap.
Included the modified parent Makefile.
# This is a shell archive. Save it in a file, remove anything before
# this line, and then unpack it by entering "sh file". Note, it may
# create directories; files and directories will be owned by you and
# have default permissions.
#
# This archive contains:
#
# Makefile
# fr/Makefile
# fr/README
# fr/fr-kbdmap.c
#
echo x - Makefile
sed 's/^X//' >Makefile << 'END-of-Makefile'
X# $NetBSD: Makefile,v 1.5 1996/09/27 03:23:13 chopps Exp $
X
XPROG=loadkmap
XNOMAN=loadkmap
XBINDIR=/usr/sbin
XSUBDIR=din fr sw us
X
X.include <bsd.prog.mk>
END-of-Makefile
echo x - fr/Makefile
sed 's/^X//' >fr/Makefile << 'END-of-fr/Makefile'
X# $NetBSD: Makefile,v 1.5 1997/07/14 15:05:13 veego Exp $
X
XPROG=fr-kbdmap
XNOMAN=
XFILES=fr.map
X
X.include <bsd.prog.mk>
END-of-fr/Makefile
echo x - fr/README
sed 's/^X//' >fr/README << 'END-of-fr/README'
X/*
X * README file for fr-kbdmap.c
X * Copyright Eric Delcamp, 1997.
X */
X
XThis keymap is for french keyboard.
XIt is exactly the same mapping as for AmigaDOS(tm)
Xbut not necessary the same interpretation of keypress.
XNotable differences is the ^ key : to obtain an e with
Xthis accent, you could press ^ and e, but :
X
XTo obtain ^ alone, you should use SHIFT + numpad 9 or SHIFT-ALT-6.
XTo obtain # alone, you should use SHIFT + numpad 8 or SHIFT-ALT-3.
X
XIn general manner, SHIFT-ALT switch the keyboard high row (numbers)
Xto the traditional us keyboard.
X
XPlease consult AmigaDOS(tm) "keyshow" in Workbench/System drawer to
Xlearn the others tricks.
X
XThanks.
END-of-fr/README
echo x - fr/fr-kbdmap.c
sed 's/^X//' >fr/fr-kbdmap.c << 'END-of-fr/fr-kbdmap.c'
X/* $NetBSD: fr-kbdmap.c,v 1.0 1997/07/17 21:12:06 veego Exp $ */
X
X/*
X * Copyright (c) 1993 Markus Wild
X * All rights reserved.
X *
X * Redistribution and use in source and binary forms, with or without
X * modification, are permitted provided that the following conditions
X * are met:
X * 1. Redistributions of source code must retain the above copyright
X * notice, this list of conditions and the following disclaimer.
X * 2. Redistributions in binary form must reproduce the above copyright
X * notice, this list of conditions and the following disclaimer in the
X * documentation and/or other materials provided with the distribution.
X * 3. All advertising materials mentioning features or use of this software
X * must display the following acknowledgement:
X * This product includes software developed by Markus Wild.
X * 4. The name of the author may not be used to endorse or promote products
X * derived from this software without specific prior written permission
X *
X * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
X * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
X * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
X * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
X * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
X * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
X * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
X * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
X * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
X * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
X */
X
X/*
X * Modified to standard french keyboard layout by Eric Delcamp
X * Based on ../../../dev/kbdmap.c, some comments are in french (sorry).
X * edelcamp@easynet.fr 970717
X */
X
X#include "../../../dev/kbdmap.h"
X
X/* define a default keymap. This can be changed by keyboard ioctl's
X (later at least..) */
X
X/* mode shortcuts: */
X#define S KBD_MODE_STRING
X#define DG (KBD_MODE_DEAD | KBD_MODE_GRAVE)
X#define DA (KBD_MODE_DEAD | KBD_MODE_ACUTE)
X#define DC (KBD_MODE_DEAD | KBD_MODE_CIRC)
X#define DT (KBD_MODE_DEAD | KBD_MODE_TILDE)
X#define DD (KBD_MODE_DEAD | KBD_MODE_DIER)
X#define C KBD_MODE_CAPS
X#define K KBD_MODE_KPAD
X
Xstruct kbdmap kbdmap = {
X /* normal map */
X {
X { 0, '`' }, /* 0x00 */
X { 0, '&' },
X { 0, '\xe9' }, /* e accent aigu */
X { 0, '"' },
X { 0, '\'' },
X { 0, '(' },
X { 0, '\xa7' }, /* symbole paragraphe */
X { 0, '\xe8' }, /* e accent grave */
X { 0, '!' }, /* 0x08 */
X { 0, '\xe7' }, /* c cedille */
X { 0, '\xe0' }, /* a accent grave */
X { 0, ')' },
X { 0, '-' },
X { 0, '\\' },
X { 0, 0 },
X { K, '0' },
X { C, 'a' }, /* 0x10 */
X { C, 'z' },
X { C, 'e' },
X { C, 'r' },
X { C, 't' },
X { C, 'y' },
X { C, 'u' },
X { C, 'i' },
X { C, 'o' }, /* 0x18 */
X { C, 'p' },
X { DC,'^' },
X { 0, '$' },
X { 0, 0 },
X { K, '1' },
X { K, '2' },
X { K, '3' },
X { C, 'q' }, /* 0x20 */
X { C, 's' },
X { C, 'd' },
X { C, 'f' },
X { C, 'g' },
X { C, 'h' },
X { C, 'j' },
X { C, 'k' },
X { C, 'l' }, /* 0x28 */
X { C, 'm' },
X { 0, '\xd9' }, /* u accent grave */
X { 0, '\xb5' }, /* mu (micron) */
X { 0, 0 },
X { K, '4' },
X { K, '5' },
X { K, '6' },
X { 0, '<' }, /* 0x30 */
X { C, 'w' },
X { C, 'x' },
X { C, 'c' },
X { C, 'v' },
X { C, 'b' },
X { C, 'n' },
X { 0, ',' },
X { 0, ';' }, /* 0x38 */
X { 0, ':' },
X { 0, '=' },
X { 0, 0 },
X { K, '.' },
X { K, '7' },
X { K, '8' },
X { K, '9' },
X { 0, ' ' }, /* 0x40 */
X { 0, DEL }, /* really BS, DEL & BS swapped */
X { 0, '\t' },
X { K, '\r' }, /* enter */
X { 0, '\r' }, /* return */
X { 0, ESC },
X { 0, '\b' }, /* really DEL, BS & DEL swapped */
X { 0, 0 },
X { 0, 0 }, /* 0x48 */
X { 0, 0 },
X { K, '-' },
X { 0, 0 },
X { S, 0x00 }, /* now it gets hairy.. CRSR UP */
X { S, 0x04 }, /* CRSR DOWN */
X { S, 0x08 }, /* CRSR RIGHT */
X { S, 0x0C }, /* CRSR LEFT */
X { S, 0x10 }, /* 0x50 F1 */
X { S, 0x15 }, /* F2 */
X { S, 0x1A }, /* F3 */
X { S, 0x1F }, /* F4 */
X { S, 0x24 }, /* F5 */
X { S, 0x29 }, /* F6 */
X { S, 0x2E }, /* F7 */
X { S, 0x33 }, /* 0x58 F8 */
X { S, 0x38 }, /* F9 */
X { S, 0x3D }, /* F10 */
X { K, '[' },
X { K, ']' },
X { K, '/' },
X { K, '*' },
X { S, 0x42 } /* HELP */
X },
X
X /* shifted map */
X {
X { 0, '~' }, /* 0x00 */
X { 0, '1' },
X { 0, '2' },
X { 0, '3' },
X { 0, '4' },
X { 0, '5' },
X { 0, '6' },
X { 0, '7' },
X { 0, '8' }, /* 0x08 */
X { 0, '9' },
X { 0, '0' },
X { 0, '\xb0' }, /* symbole numero */
X { 0, '_' },
X { 0, '|' },
X { 0, 0 },
X { K, '0' },
X { C, 'A' }, /* 0x10 */
X { C, 'Z' },
X { C, 'E' },
X { C, 'R' },
X { C, 'T' },
X { C, 'Y' },
X { C, 'U' },
X { C, 'I' },
X { C, 'O' }, /* 0x18 */
X { C, 'P' },
X { DD, '\xa8' }, /* 0xEA or 0xA8 ? */
X { 0, '*' },
X { 0, 0 },
X { K, '1' },
X { K, '2' },
X { K, '3' },
X { C, 'Q' }, /* 0x20 */
X { C, 'S' },
X { C, 'D' },
X { C, 'F' },
X { C, 'G' },
X { C, 'H' },
X { C, 'J' },
X { C, 'K' },
X { C, 'L' }, /* 0x28 */
X { C, 'M' },
X { 0, '%' },
X { 0, '\xa3' }, /* livre sterling */
X { 0, 0 },
X { K, '4' },
X { K, '5' },
X { K, '6' },
X { 0, '>' }, /* 0x30 */
X { C, 'W' },
X { C, 'X' },
X { C, 'C' },
X { C, 'V' },
X { C, 'B' },
X { C, 'N' },
X { 0, '?' },
X { 0, '.' }, /* 0x38 */
X { 0, '/' },
X { 0, '+' },
X { 0, 0 },
X { K, '.' },
X { K, '7' },
X { K, '#' },
X { K, '^' },
X { 0, ' ' }, /* 0x40 */
X { 0, DEL }, /* really BS, DEL & BS swapped */
X { S, 0x99 }, /* shift TAB */
X { K, '\r' }, /* enter */
X { 0, '\r' }, /* return */
X { 0, ESC },
X { 0, '\b' }, /* really DEL, BS & DEL swapped */
X { 0, 0 },
X { 0, 0 }, /* 0x48 */
X { 0, 0 },
X { K, '-' },
X { 0, 0 },
X { S, 0x47 }, /* shift CRSR UP */
X { S, 0x4C }, /* shift CRSR DOWN */
X { S, 0x51 }, /* shift CRSR RIGHT */
X { S, 0x57 }, /* shift CRSR LEFT */
X { S, 0x5D }, /* 0x50 shift F1 */
X { S, 0x63 }, /* shift F2 */
X { S, 0x69 }, /* shift F3 */
X { S, 0x6F }, /* shift F4 */
X { S, 0x75 }, /* shift F5 */
X { S, 0x7B }, /* shift F6 */
X { S, 0x81 }, /* shift F7 */
X { S, 0x87 }, /* 0x58 shift F8 */
X { S, 0x8D }, /* shift F9 */
X { S, 0x93 }, /* shift F10 */
X { K, '{' },
X { K, '}' },
X { K, '/' },
X { K, '*' },
X { S, 0x42 } /* HELP (no special shift code) */
X },
X
X
X /* alt map */
X {
X { 0, '`' }, /* 0x00 */
X { 0, '¹' },
X { 0, '\xb2' },
X { 0, '\xb3' },
X { 0, '¢' },
X { 0, '¼' },
X { 0, '½' },
X { 0, '¾' },
X { 0, '·' }, /* 0x08 */
X { 0, '«' },
X { 0, '»' },
X { 0, '-' },
X { 0, '=' },
X { 0, '\\' },
X { 0, 0 },
X { K, '0' },
X { C, 'å' }, /* 0x10 */
X { 0, '°' },
X { 0, '©' },
X { 0, '®' },
X { C, 'þ' },
X { 0, '¤' },
X { 0, 'µ' },
X { 0, '¡' },
X { C, 'ø' }, /* 0x18 */
X { 0, '¶' },
X { 0, '[' },
X { 0, ']' },
X { 0, 0 },
X { K, '1' },
X { K, '2' },
X { K, '3' },
X { C, 'æ' }, /* 0x20 */
X { 0, 'ß' },
X { C, 'ð' },
X { DA, '´' },
X { DG, '`' },
X { DC, '^' },
X { DT, '~' },
X { DD, '¨' },
X { 0, '£' }, /* 0x28 */
X { 0, ';' },
X { 0, '\'' },
X { 0, 'µ' },
X { 0, 0 },
X { K, '4' },
X { K, '5' },
X { K, '6' },
X { 0, '<' }, /* 0x30 */
X { 0, '±' },
X { 0, '×' },
X { C, 'ç' },
X { 0, 'ª' },
X { 0, 'º' },
X { 0, '' },
X { 0, '¸' },
X { 0, ',' }, /* 0x38 */
X { 0, '.' },
X { 0, '/' },
X { 0, 0 },
X { K, '.' },
X { K, '7' },
X { K, '8' },
X { K, '9' },
X { 0, ' ' }, /* 0x40 */
X { 0, DEL }, /* really BS, DEL & BS swapped */
X { 0, '\t' },
X { K, '\r' }, /* enter */
X { 0, '\r' }, /* return */
X { S, 0x9d }, /* CSI */
X { 0, '\b' }, /* really DEL, BS & DEL swapped */
X { 0, 0 },
X { 0, 0 }, /* 0x48 */
X { 0, 0 },
X { K, '-' },
X { 0, 0 },
X { S, 0x00 }, /* now it gets hairy.. CRSR UP */
X { S, 0x04 }, /* CRSR DOWN */
X { S, 0x08 }, /* CRSR RIGHT */
X { S, 0x0C }, /* CRSR LEFT */
X { S, 0x10 }, /* 0x50 F1 */
X { S, 0x15 }, /* F2 */
X { S, 0x1A }, /* F3 */
X { S, 0x1F }, /* F4 */
X { S, 0x24 }, /* F5 */
X { S, 0x29 }, /* F6 */
X { S, 0x2E }, /* F7 */
X { S, 0x33 }, /* 0x58 F8 */
X { S, 0x38 }, /* F9 */
X { S, 0x3D }, /* F10 */
X { K, '(' },
X { K, ')' },
X { K, '/' },
X { K, '*' },
X { S, 0x42 } /* HELP */
X },
X
X /* shift alt map */
X {
X { 0, '~' }, /* 0x00 */
X { 0, '!' },
X { 0, '@' },
X { 0, '#' },
X { 0, '$' },
X { 0, '%' },
X { 0, '^' },
X { 0, '&' },
X { 0, '*' }, /* 0x08 */
X { 0, '(' },
X { 0, ')' },
X { 0, '_' },
X { 0, '+' },
X { 0, '|' },
X { 0, 0 },
X { K, '0' },
X { C, 'Å' }, /* 0x10 */
X { 0, '°' },
X { 0, '©' },
X { 0, '®' },
X { C, 'Þ' },
X { 0, '¥' },
X { 0, 'µ' },
X { 0, '¦' },
X { C, 'Ø' }, /* 0x18 */
X { 0, '¶' },
X { 0, '{' },
X { 0, '}' },
X { 0, 0 },
X { K, '1' },
X { K, '2' },
X { K, '3' },
X { C, 'Æ' }, /* 0x20 */
X { 0, '§' },
X { C, 'Ð' },
X { DA, '´' },
X { DG, '`' },
X { DC, '^' },
X { DT, '~' },
X { DD, '¨' },
X { 0, '£' }, /* 0x28 */
X { 0, ';' },
X { 0, '"' },
X { 0, '£' },
X { 0, 0 },
X { K, '4' },
X { K, '5' },
X { K, '6' },
X { 0, '>' }, /* 0x30 */
X { 0, '\xac' },
X { 0, '\xf7' },
X { 0, '\xc7' },
X { 0, 'ª' },
X { 0, 'º' },
X { 0, '\xaf' },
X { 0, '\xbf' },
X { 0, '<' }, /* 0x38 */
X { 0, '>' },
X { 0, '?' },
X { 0, 0 },
X { K, '.' },
X { K, '7' },
X { K, '8' },
X { K, '9' },
X { 0, ' ' }, /* 0x40 */
X { 0, DEL }, /* really BS, DEL & BS swapped */
X { 0, '\t' },
X { K, '\r' }, /* enter */
X { 0, '\r' }, /* return */
X { S, 0x9d }, /* CSI */
X { 0, '\b' }, /* really DEL, BS & DEL swapped */
X { 0, 0 },
X { 0, 0 }, /* 0x48 */
X { 0, 0 },
X { K, '-' },
X { 0, 0 },
X { S, 0x00 }, /* now it gets hairy.. CRSR UP */
X { S, 0x04 }, /* CRSR DOWN */
X { S, 0x08 }, /* CRSR RIGHT */
X { S, 0x0C }, /* CRSR LEFT */
X { S, 0x10 }, /* 0x50 F1 */
X { S, 0x15 }, /* F2 */
X { S, 0x1A }, /* F3 */
X { S, 0x1F }, /* F4 */
X { S, 0x24 }, /* F5 */
X { S, 0x29 }, /* F6 */
X { S, 0x2E }, /* F7 */
X { S, 0x33 }, /* 0x58 F8 */
X { S, 0x38 }, /* F9 */
X { S, 0x3D }, /* F10 */
X { K, '(' },
X { K, ')' },
X { K, '/' },
X { K, '*' },
X { S, 0x42 } /* HELP */
X },
X
X {
X /* string table. If there's a better way to get the offsets into the
X above table, please tell me..
X
X NOTE: save yourself and others a lot of grief by *not* using
X CSI == 0x9b, using the two-character sequence gives
X much less trouble, especially in GNU-Emacs.. */
X
X 3, ESC, '[', 'A', /* 0x00: CRSR UP */
X 3, ESC, '[', 'B', /* 0x04: CRSR DOWN */
X 3, ESC, '[', 'C', /* 0x08: CRSR RIGHT */
X 3, ESC, '[', 'D', /* 0x0C: CRSR LEFT */
X 4, ESC, '[', '0', '~', /* 0x10: F1 */
X 4, ESC, '[', '1', '~', /* 0x15: F2 */
X 4, ESC, '[', '2', '~', /* 0x1A: F3 */
X 4, ESC, '[', '3', '~', /* 0x1F: F4 */
X 4, ESC, '[', '4', '~', /* 0x24: F5 */
X 4, ESC, '[', '5', '~', /* 0x29: F6 */
X 4, ESC, '[', '6', '~', /* 0x2E: F7 */
X 4, ESC, '[', '7', '~', /* 0x33: F8 */
X 4, ESC, '[', '8', '~', /* 0x38: F9 */
X 4, ESC, '[', '9', '~', /* 0x3D: F10 */
X 4, ESC, '[', '?', '~', /* 0x42: HELP */
X
X 4, ESC, '[', 'T', '~', /* 0x47: shift CRSR UP */
X 4, ESC, '[', 'S', '~', /* 0x4C: shift CRSR DOWN */
X 5, ESC, '[', ' ', '@', '~', /* 0x51: shift CRSR RIGHT */
X 5, ESC, '[', ' ', 'A', '~', /* 0x57: shift CRSR LEFT */
X 5, ESC, '[', '1', '0', '~', /* 0x5D: shift F1 */
X 5, ESC, '[', '1', '1', '~', /* 0x63: shift F2 */
X 5, ESC, '[', '1', '2', '~', /* 0x69: shift F3 */
X 5, ESC, '[', '1', '3', '~', /* 0x6F: shift F4 */
X 5, ESC, '[', '1', '4', '~', /* 0x75: shift F5 */
X 5, ESC, '[', '1', '5', '~', /* 0x7B: shift F6 */
X 5, ESC, '[', '1', '6', '~', /* 0x81: shift F7 */
X 5, ESC, '[', '1', '7', '~', /* 0x87: shift F8 */
X 5, ESC, '[', '1', '8', '~', /* 0x8D: shift F9 */
X 5, ESC, '[', '1', '9', '~', /* 0x93: shift F10 */
X 3, ESC, '[', 'Z', /* 0x99: shift TAB */
X 2, ESC, '[', /* 0x9d: alt ESC == CSI */
X },
X};
X
Xunsigned char acctable[KBD_NUM_ACC][64] = {
X { "@ÀBCDÈFGHÌJKLMNÒPQRSTÙVWXYZ[\\]^_"
X "`àbcdèfghìjklmnòpqrstùvwxyz{|}~\177"}, /* KBD_ACC_GRAVE */
X
X { "@ÁBCDÉFGHÍJKLMNÓPQRSTÚVWXYZ[\\]^_"
X "`ábcdéfghíjklmnópqrstúvwxyz{|}~\177"}, /* KBD_ACC_ACUTE */
X
X { "@ÂBCDÊFGHÎJKLMNÔPQRSTÛVWXYZ[\\]^_"
X "`âbcdêfghîjklmnôpqrstûvwxyz{|}~\177"}, /* KBD_ACC_CIRC */
X
X { "@ÃBCDEFGHIJKLMÑÕPQRSTUVWXYZ[\\]^_"
X "`ãbcdefghijklmñÕpqrstuvwxyz{|}~\177"}, /* KBD_ACC_TILDE */
X
X { "@ÄBCDËFGHÏJKLMNÖPQRSTÜVWXYZ[\\]^_"
X "`äbcdëfghïjklmnöpqrstüvwxyz{|}~\177"}, /* KBD_ACC_DIER */
X};
X
Xmain()
X{
X write(1, &kbdmap, sizeof(kbdmap) );
X}
END-of-fr/fr-kbdmap.c
exit
>Audit-Trail:
>Unformatted: