aboutsummaryrefslogtreecommitdiff
path: root/keyboard_layout.c
diff options
context:
space:
mode:
authorHans-Christoph Steiner <eighthave@users.sourceforge.net>2007-11-27 19:05:36 +0000
committerHans-Christoph Steiner <eighthave@users.sourceforge.net>2007-11-27 19:05:36 +0000
commit812c2def5564f6aeb99fe6e593de6f7d21aa2a6a (patch)
tree6a9c3997da41217567bd7fe2bbcd378ac14495f4 /keyboard_layout.c
parent282d94dc2d897117cd78df12e9014740e0fe6c0b (diff)
ported f0.keyboard_layout to Pd, I commented out the 'assist' method because A_CANT is a mytery to me
svn path=/trunk/externals/hcs/; revision=9054
Diffstat (limited to 'keyboard_layout.c')
-rwxr-xr-xkeyboard_layout.c133
1 files changed, 133 insertions, 0 deletions
diff --git a/keyboard_layout.c b/keyboard_layout.c
new file mode 100755
index 0000000..4c7c88e
--- /dev/null
+++ b/keyboard_layout.c
@@ -0,0 +1,133 @@
+/* Copyright 2006 Fredrik Olofsson
+ * Copyright 2007 Free Software Foundation
+ * ported to Pd by Hans-Christoph Steiner <hans@at.or.at> from f0.keyboard_layout.c
+ */
+
+#ifdef __APPLE__
+
+#include "m_pd.h"
+#include <Carbon/Carbon.h>
+
+static t_class *keyboard_layout_class;
+
+typedef struct _keyboard_layout {
+ t_object x_obj;
+ t_outlet* x_data_outlet;
+ t_outlet* x_status_outlet;
+} t_keyboard_layout;
+
+/*
+void keyboard_layout_assist(t_keyboard_layout *x, Object *m, long msg, long arg, char *dst) {
+ if(msg==ASSIST_INLET) {
+ sprintf(dst, "bang to get current, symbol to set");
+ } else if(msg==ASSIST_OUTLET) {
+ switch(arg) {
+ case 0:
+ sprintf(dst, "current keyboard layout (symbol)");
+ break;
+ case 1:
+ sprintf(dst, "dump outlet (for menu)");
+ break;
+ }
+ }
+}
+*/
+
+//----------------------------------------------------------------------------------------------
+void keyboard_layout_bang(t_keyboard_layout *x) {
+ //OSStatus err;
+ KeyboardLayoutRef currentLayoutRef;
+ CFStringRef keyboardName;
+ char cKeyboardName[100];
+
+ KLGetCurrentKeyboardLayout(&currentLayoutRef);
+ KLGetKeyboardLayoutProperty(currentLayoutRef, kKLName, (const void **)&keyboardName);
+ CFStringGetCString(keyboardName, cKeyboardName, 100, kCFStringEncodingASCII);
+
+ outlet_anything(x->x_data_outlet, gensym(cKeyboardName), 0, NULL);
+}
+
+void keyboard_layout_menu(t_keyboard_layout *x) {
+ //OSStatus err;
+ KeyboardLayoutRef currentLayoutRef;
+ CFStringRef keyboardName;
+ char cKeyboardName[100];
+ CFIndex countOfLayouts;
+ CFIndex i;
+ t_atom name;
+
+// TODO this should probably output [menu clear( so other messages work too
+ outlet_anything(x->x_status_outlet, gensym("clear"), 0, NULL);
+
+ KLGetKeyboardLayoutCount(&countOfLayouts);
+ for(i= 0; i<countOfLayouts; i++) {
+ KLGetKeyboardLayoutAtIndex(i, &currentLayoutRef);
+ KLGetKeyboardLayoutProperty(currentLayoutRef, kKLName, (const void **)&keyboardName);
+ CFStringGetCString(keyboardName, cKeyboardName, 100, kCFStringEncodingASCII);
+
+ SETSYMBOL(&name, gensym(cKeyboardName));
+// TODO this should probably output [menu append( so other messages work too
+ outlet_anything(x->x_status_outlet, gensym("append"), 1, &name);
+ }
+}
+
+void keyboard_layout_anything(t_keyboard_layout *x, t_symbol *s, short argc, t_atom *argv) {
+ //OSStatus err;
+ KeyboardLayoutRef currentLayoutRef;
+ CFStringRef keyboardName;
+ char cKeyboardName[100];
+
+ keyboardName= CFStringCreateWithCString(NULL, s->s_name, kCFStringEncodingASCII);
+ KLGetKeyboardLayoutWithName(keyboardName, &currentLayoutRef);
+ KLGetKeyboardLayoutProperty(currentLayoutRef, kKLName, (const void **)&keyboardName);
+ CFStringGetCString(keyboardName, cKeyboardName, 100, kCFStringEncodingASCII);
+ KLSetCurrentKeyboardLayout(currentLayoutRef);
+ //outlet_anything(x->t_out, s, 0, NULL);
+ keyboard_layout_bang(x);
+}
+
+void *keyboard_layout_new(void) {
+ t_keyboard_layout *x = (t_keyboard_layout *)pd_new(keyboard_layout_class);
+
+ x->x_data_outlet = outlet_new(&x->x_obj, &s_float);
+ x->x_status_outlet = outlet_new(&x->x_obj, &s_symbol);
+
+ return (x);
+}
+
+//----------------------------------------------------------------------------------------------
+void keyboard_layout_setup(void) {
+ keyboard_layout_class = class_new(gensym("keyboard_layout"),
+ (t_newmethod)keyboard_layout_new,
+ NULL,
+ sizeof(t_keyboard_layout),
+ 0, A_GIMME, 0);
+
+ class_addbang(keyboard_layout_class, (t_method)keyboard_layout_bang);
+ class_addanything(keyboard_layout_class, (t_method)keyboard_layout_anything);
+
+ class_addmethod(keyboard_layout_class, (t_method)keyboard_layout_menu,
+ gensym("menu"), 0);
+// class_addmethod(keyboard_layout_class, (t_method)keyboard_layout_assist,
+// gensym("assist"), A_CANT, 0);
+
+ post("f0.keyboard_layout v1.1-ub; distributed under GNU GPL license"); //target specific
+}
+
+
+#else /* GNU/Linux and Windows */
+
+
+void keyboard_layout_new(void)
+{
+ post("f0.keyboard_layout v1.1-ub; distributed under GNU GPL license");
+ post("ERROR: this objectclass is currently only for Mac OS X");
+}
+
+void keyboard_layout_setup(void)
+{
+ keyboard_layout_class = class_new(gensym("text"), (t_method)keyboard_layout_new,
+ NULL, sizeof(t_keyboard_layout), 0, 0);
+}
+
+#endif /* __APPLE__ */