Regenerated from Xorg 7.1 keysyms.h, using gdkkeysyms-update.pl.

2006-05-11  Matthias Clasen  <mclasen@redhat.com>

	* gdk/gdkkeysyms.h: Regenerated from Xorg 7.1 keysyms.h, using
	gdkkeysyms-update.pl.

	* gdk/gdkkeysyms-update.pl: Script to sync gdkkeysyms.h
	with Xorg.  (#321896, Simos Xenitellis)

	* gdk/Makefile.am (EXTRA_DIST): Add gdkkeysyms-update.pl

1 files changed, 119 insertions, 0 deletions

diff --git a/gdk/gdkkeysyms-update.pl b/gdk/gdkkeysyms-update.pl
new file mode 100755
index 0000000000..564d32ee3d
--- /dev/null
+++ b/gdk/gdkkeysyms-update.pl
@@ -0,0 +1,119 @@
+#!/usr/bin/env perl
+
+# Updates http://cvs.gnome.org/viewcvs/gtk%2B/gdk/gdkkeysyms.h from upstream (X.org 6.9/7.0),
+# OLD OLD -----from http://cvs.freedesktop.org/xorg/xc/include/keysymdef.h------  OLD OLD
+# from http://webcvs.freedesktop.org/*checkout*/xorg/proto/X11/keysymdef.h
+# 
+# Author  : Simos Xenitellis <simos at gnome dot org>.
+# Version : 1.0
+#
+# Input   : http://webcvs.freedesktop.org/xorg/proto/X11/keysymdef.h
+# Output  : http://cvs.gnome.org/viewcvs/gtk%2B/gdk/gdkkeysyms.h
+# 
+# Notes   : It downloads keysymdef.h from the Internet if not found locally
+# Notes   : and creates an updated gdkkeysyms.h
+
+use strict;
+
+# Used for reading the keysymdef symbols.
+my @keysymelements;
+
+if ( ! -f "keysymdef.h" )
+{
+	print "Trying to download keysymdef.h from\n";
+	print "http://webcvs.freedesktop.org/xorg/proto/X11/keysymdef.h: ";
+	die "Unable to download keysymdef.h from http://webcvs.freedesktop.org/xorg/proto/X11/keysymdef.h\n" 
+		unless system("wget -q \"http://webcvs.freedesktop.org/*checkout*/xorg/proto/X11/keysymdef.h\"") == 0;
+	print " done.\n\n";
+}
+else
+{
+	print "We are using existing keysymdef.h found in this directory.\n";
+	print "It is assume that you took care and it is a recent version\n";
+	print "as found at http://webcvs.freedesktop.org/*checkout*/xorg/proto/X11/keysymdef.h\n\n";
+}
+
+
+if ( -f "gdkkeysyms.h" )
+{
+	print "There is already a gdkkeysyms.h file in this directory. We are not overwriting it.\n";
+	print "Please move it in order to run this script.\n";
+	die "Exiting...\n\n";
+}
+
+# Source: http://cvs.freedesktop.org/xorg/xc/include/keysymdef.h
+die "Could not open file keysymdef.h: $!\n" unless open(IN_KEYSYMDEF, "<:utf8", "keysymdef.h");
+
+# Output: gtk+/gdk/gdkkeysyms.h
+die "Could not open file gdkkeysyms.h: $!\n" unless open(OUT_GDKKEYSYMS, ">:utf8", "gdkkeysyms.h");
+
+print OUT_GDKKEYSYMS<<EOF;
+/* GDK - The GIMP Drawing Kit
+ * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ * Copyright (C) 2005 GNOME Foundation
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * File auto-generated from script gdkkeysyms-update.pl
+ * using the input file
+ * http://cvs.freedesktop.org/xorg/xc/include/keysymdef.h
+ */
+
+/*
+ * Modified by the GTK+ Team and others 1997-2001.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/.
+ */
+
+#ifndef __GDK_KEYSYMS_H__
+#define __GDK_KEYSYMS_H__
+
+
+EOF
+
+
+while (<IN_KEYSYMDEF>)
+{
+	next if ( ! /^#define / );
+
+	@keysymelements = split(/\s+/);
+	die "Internal error, no \@keysymelements: $_\n" unless @keysymelements;
+
+	$_ = $keysymelements[1];
+	die "Internal error, was expecting \"XC_*\", found: $_\n" if ( ! /^XK_/ );
+	
+	$_ = $keysymelements[2];
+	die "Internal error, was expecting \"0x*\", found: $_\n" if ( ! /^0x/ );
+
+	$keysymelements[1] =~ s/^XK_/GDK_/g;
+
+	printf OUT_GDKKEYSYMS "#define %s 0x%03x\n", $keysymelements[1], hex($keysymelements[2]);
+}
+
+#$gdksyms{"0"} = "0000";
+
+close IN_KEYSYMDEF;
+
+
+print OUT_GDKKEYSYMS<<EOF;
+
+#endif /* __GDK_KEYSYMS_H__ */
+EOF
+
+printf "We just finished converting keysymdef.h to gdkkeysyms.h\n";