import java.util.*;
import java.io.*;
import java.nio.charset.*;
import java.text.MessageFormat;
import java.util.logging.*;
public class WrapperGenerator {
private final static Logger log = Logger.getLogger("WrapperGenerator");
boolean generateLog = true;
boolean wide;
private static Charset charset = Charset.forName("ISO-8859-15");
String package_name = "sun.awt.X11";
String package_path = "sun/awt/X11";
String sizerFileName = "sizer.c";
String defaultBaseClass = "XWrapperBase";
String compile_options = "-lX11";
static Hashtable symbolTable = new Hashtable();
static Hashtable sizeTable32bit = new Hashtable();
static Hashtable sizeTable64bit = new Hashtable();
static Hashtable knownSizes32 = new Hashtable();
static Hashtable knownSizes64 = new Hashtable();
static {
knownSizes64.put("XComposeStatus", Integer.valueOf(16));
knownSizes64.put("XTimeCoord", Integer.valueOf(16));
knownSizes64.put("XExtData", Integer.valueOf(32));
knownSizes64.put("XWindowChanges", Integer.valueOf(40));
knownSizes64.put("XOMCharSetList", Integer.valueOf(16));
knownSizes64.put("XModifierKeymap", Integer.valueOf(16));
knownSizes32.put("XIMValuesList", Integer.valueOf(8));
knownSizes32.put("XGCValues", Integer.valueOf(92));
}
private static abstract class BaseType {
String real_type;
String name;
public String getName() {
return name;
}
public String getRealType() {
return real_type;
}
public String toString() {
return name;
}
}
private static class AtomicType extends BaseType {
private boolean alias;
private String aliasName;
static final int TYPE_INT=0;
static final int TYPE_CHAR=1;
static final int TYPE_LONG=2;
static final int TYPE_LONG_LONG=3;
static final int TYPE_DOUBLE=4;
static final int TYPE_FLOAT=5;
static final int TYPE_PTR=6;
static final int TYPE_SHORT=7;
static final int TYPE_BOOL = 8;
static final int TYPE_STRUCT = 9;
static final int TYPE_ARRAY = 10;
static final int TYPE_BYTE=11;
static final int TYPE_ATOM = 12;
static final int TYPE_ULONG = 13;
static int getTypeForString(String str) {
int type=-1;
if (str.equals("int"))
type = AtomicType.TYPE_INT;
else if (str.equals("long"))
type = AtomicType.TYPE_LONG;
else if (str.equals("byte"))
type = AtomicType.TYPE_BYTE;
else if (str.equals("char"))
type = AtomicType.TYPE_CHAR;
else if (str.equals("long long"))
type = AtomicType.TYPE_LONG_LONG;
else if (str.equals("double"))
type = AtomicType.TYPE_DOUBLE;
else if (str.equals("float"))
type = AtomicType.TYPE_FLOAT;
else if (str.equals("pointer"))
type = AtomicType.TYPE_PTR;
else if (str.equals("short"))
type = AtomicType.TYPE_SHORT;
else if (str.equals("Bool"))
type = AtomicType.TYPE_BOOL;
else if (str.equals("struct"))
type = AtomicType.TYPE_STRUCT;
else if (str.equals("Atom"))
type = AtomicType.TYPE_ATOM;
else if (str.equals("array"))
type = TYPE_ARRAY;
else if (str.equals("ulong"))
type = TYPE_ULONG;
else throw new IllegalArgumentException("Uknown type string: " + str);
return type;
}
String getJavaType() {
if (referencedType != null) {
if (referencedType instanceof AtomicType) {
return ((AtomicType)referencedType).getJavaType();
} else {
return referencedType.getName();
}
} else {
return getJavaTypeForType(type);
}
}
static String getJavaTypeForType(int type) {
switch (type) {
case TYPE_INT:
return "int";
case TYPE_CHAR:
return "char";
case TYPE_BYTE:
return "byte";
case TYPE_LONG:
case TYPE_LONG_LONG:
case TYPE_PTR:
case TYPE_ULONG:
return "long";
case TYPE_DOUBLE:
return "double";
case TYPE_FLOAT:
return "float";
case TYPE_SHORT:
return "short";
case TYPE_BOOL:
return "boolean";
case TYPE_ATOM:
return "long";
default:
throw new IllegalArgumentException("Unknown type: " + type);
}
}
String getItemSize() {
if (referencedType != null) {
if (referencedType instanceof StructType) {
return ((StructType)referencedType).getSize();
} else {
return ((AtomicType)referencedType).getItemSize();
}
} else {
int i32 = getNativeSizeForAccess(getJavaAccess(false));
int i64 = getNativeSizeForAccess(getJavaAccess(true));
if (i32 != i64) {
return "Native.get" + getNativeAccess() + "Size()";
} else {
return Integer.toString(i32);
}
}
}
String getJavaResult(String offset, String base) {
String res = null;
switch (type) {
case TYPE_STRUCT:
res = "pData + " + offset;
break;
case TYPE_PTR:
if (referencedType == null || referencedType instanceof StructType) {
res = base + "+" + offset;
} else if (referencedType instanceof AtomicType) {
res = MessageFormat.format("Native.get{0}({1})",
new Object[] {getNativeAccessForType(((AtomicType)referencedType).type),
base + "+" + offset});
}
break;
case TYPE_ARRAY:
if (referencedType instanceof StructType) {
res = "pData + " + offset;
} else if (referencedType instanceof AtomicType) {
res = MessageFormat.format("Native.get{0}(pData + {1})",
new Object[] {getNativeAccessForType(((AtomicType)referencedType).type),
offset});
}
break;
default:
res = MessageFormat.format("(Native.get{0}(pData+{1}))",
new Object[] {getNativeAccess(), offset});
}
return getJavaResultConversion(res, base);
}
String getJavaResultConversion(String value, String base) {
if (referencedType != null) {
if (referencedType instanceof StructType) {
if (type == TYPE_PTR) {
return MessageFormat.format("({2} != 0)?(new {0}({1})):(null)", new Object[] {referencedType.getName(),value, base});
} else {
return MessageFormat.format("new {0}({1})", new Object[] {referencedType.getName(),value});
}
} else {
return value;
}
} else {
return getJavaResultConversionForType(type, value);
}
}
static String getJavaResultConversionForType(int type, String value) {
return value;
}
String getNativeAccess() {
return getNativeAccessForType(type);
}
String getJavaAccess(boolean wide) {
return getJavaAccessForType(type, wide);
}
static String getJavaAccessForType(int type, boolean wide) {
switch (type) {
case TYPE_INT:
return "Int";
case TYPE_CHAR:
return "Char";
case TYPE_BYTE:
return "Byte";
case TYPE_LONG:
case TYPE_PTR:
case TYPE_ARRAY:
case TYPE_STRUCT:
case TYPE_ATOM:
return (wide?"Long":"Int");
case TYPE_LONG_LONG:
return "Long";
case TYPE_ULONG:
return (wide?"ULong":"UInt");
case TYPE_DOUBLE:
return "Double";
case TYPE_FLOAT:
return "Float";
case TYPE_SHORT:
return "Short";
case TYPE_BOOL:
return "Int";
default:
throw new IllegalArgumentException("Unknown type: " + type);
}
}
static String getNativeAccessForType(int type) {
switch (type) {
case TYPE_INT:
return "Int";
case TYPE_CHAR:
return "Char";
case TYPE_BYTE:
return "Byte";
case TYPE_LONG:
case TYPE_PTR:
case TYPE_ARRAY:
case TYPE_STRUCT:
return "Long";
case TYPE_LONG_LONG:
return "Long";
case TYPE_ULONG:
return "ULong";
case TYPE_DOUBLE:
return "Double";
case TYPE_FLOAT:
return "Float";
case TYPE_SHORT:
return "Short";
case TYPE_BOOL:
return "Bool";
case TYPE_ATOM:
return "Long";
default:
throw new IllegalArgumentException("Unknown type: " + type);
}
}
static int getNativeSizeForAccess(String access) {
if (access.equals("Int")) return 4;
else if (access.equals("Byte")) return 1;
else if (access.equals("Long")) return 8;
else if (access.equals("Double")) return 8;
else if (access.equals("Float")) return 4;
else if (access.equals("Char")) return 2;
else if (access.equals("Short")) return 2;
else if (access.equals("ULong")) return 8;
else if (access.equals("UInt")) return 4;
else throw new IllegalArgumentException("Unknow access type: " + access);
}
String getJavaConversion(String offset, String value) {
if (referencedType != null) {
if (referencedType instanceof StructType) {
return getJavaConversionForType(TYPE_PTR, offset, value + ".pData");
} else {
if (type == TYPE_ARRAY) {
return getJavaConversionForType(((AtomicType)referencedType).type, offset, value);
} else {
return getJavaConversionForType(TYPE_PTR, offset, value);
}
}
} else {
return getJavaConversionForType(type, offset, value);
}
}
static String getJavaConversionForType(int type, String offset, String value) {
return MessageFormat.format("Native.put{0}({2}, {1})", new Object[] {getNativeAccessForType(type), value, offset});
}
int type;
int offset;
int direction;
BaseType referencedType;
int arrayLength = -1;
boolean autoFree = false;
public AtomicType(int _type,String _name, String _real_type) {
name = _name.replaceAll("[* \t]","");
if ((name.indexOf("[") != -1) || (name.indexOf("]") != -1))
{
name = name.replaceAll("\\[.*\\]","");
}
type = _type;
real_type = _real_type;
if (real_type == null)
{
System.out.println(" real type is null");
}
}
public boolean isIn() {
return direction == 0;
}
public boolean isOut() {
return direction == 1;
}
public boolean isInOut() {
return direction == 2;
}
public boolean isAutoFree() {
return autoFree;
}
public void setAttributes(String[] attributes) {
String mod = attributes[3];
if ("in".equals(mod)) {
direction = 0;
} else if ("out".equals(mod)) {
direction = 1;
if (attributes.length > 4 && "free".equals(attributes[4])) {
autoFree = true;
}
} else if ("inout".equals(mod)) {
direction = 2;
} else if ("alias".equals(mod)) {
alias = true;
aliasName = attributes[4];
} else if (type == TYPE_ARRAY || type == TYPE_PTR || type == TYPE_STRUCT) {
referencedType = (BaseType)symbolTable.get(mod);
if (referencedType == null) {
log.warning("Can't find type for name " + mod);
}
if (attributes.length > 4) {
try {
arrayLength = Integer.parseInt(attributes[4]);
} catch (Exception e) {
}
}
}
}
public BaseType getReferencedType() {
return referencedType;
}
public int getArrayLength() {
return arrayLength;
}
public void setOffset(int o)
{
offset = o;
}
public int getType() {
return type;
}
public String getTypeUpperCase() {
switch (type) {
case TYPE_INT:
return "Int";
case TYPE_CHAR:
return "Char";
case TYPE_BYTE:
return "Byte";
case TYPE_LONG:
case TYPE_LONG_LONG:
case TYPE_PTR:
return "Long";
case TYPE_DOUBLE:
return "Double";
case TYPE_FLOAT:
return "Float";
case TYPE_SHORT:
return "Short";
case TYPE_BOOL:
return "Int";
case TYPE_ATOM:
return "Long";
case TYPE_ULONG:
return "ULong";
default: throw new IllegalArgumentException("Uknown type");
}
}
public int getOffset()
{
return offset;
}
public boolean isAlias() {
return alias;
}
public String getAliasName() {
return aliasName;
}
}
private static class StructType extends BaseType {
Vector members;
String description;
boolean packed;
int size;
String baseClass, interfaces;
boolean isInterface;
String javaClassName;
public StructType(String _desc)
{
members = new Vector();
parseDescription(_desc);
}
public int getNumFields()
{
return members.size();
}
public void setName(String _name)
{
_name = _name.replaceAll("[* \t]","");
parseDescription(_name);
}
public void setSize(int i)
{
size = i;
}
public String getDescription()
{
return description;
}
public Enumeration getMembers()
{
return members.elements();
}
public void addMember(BaseType tp)
{
members.add(tp);
}
public String getBaseClass() {
return baseClass;
}
public String getInterfaces() {
return interfaces;
}
public boolean getIsInterface() {
return isInterface;
}
public String getJavaClassName() {
return javaClassName;
}
void parseDescription(String _desc) {
if (_desc.indexOf('[') != -1) {
baseClass = _desc.substring(_desc.indexOf('[')+1, _desc.indexOf(']'));
_desc = _desc.substring(0, _desc.indexOf('[')) + _desc.substring(_desc.indexOf(']')+1);
}
if (_desc.indexOf('{') != -1) {
interfaces = _desc.substring(_desc.indexOf('{')+1, _desc.indexOf('}'));
_desc = _desc.substring(0, _desc.indexOf('{')) + _desc.substring(_desc.indexOf('}')+1);
}
if (_desc.startsWith("-")) {
isInterface = true;
_desc = _desc.substring(1, _desc.length());
}
if (_desc.indexOf("|") != -1) {
javaClassName = _desc.substring(_desc.indexOf('|')+1, _desc.length());
_desc = _desc.substring(0, _desc.indexOf('|'));
}
name = _desc;
if (javaClassName == null) {
javaClassName = name;
}
description = _desc;
}
public String getSize() {
String s32 = (String) WrapperGenerator.sizeTable32bit.get(getName());
String s64 = (String) WrapperGenerator.sizeTable64bit.get(getName());
if (s32 == null || s64 == null) {
return (s32 == null)?(s64):(s32);
}
if (s32.equals(s64)) {
return s32;
} else {
return MessageFormat.format("((XlibWrapper.dataModel == 32)?({0}):({1}))", new Object[] {s32, s64});
}
}
public String getOffset(AtomicType atp) {
String key = getName()+"."+(atp.isAlias() ? atp.getAliasName() : atp.getName());
String s64 = (String) WrapperGenerator.sizeTable64bit.get(key);
String s32 = (String) WrapperGenerator.sizeTable32bit.get(key);
if (s32 == null || s64 == null) {
return (s32 == null)?(s64):(s32);
}
if (s32.equals(s64)) {
return s32;
} else {
return MessageFormat.format("((XlibWrapper.dataModel == 32)?({0}):({1}))", new Object[]{s32, s64});
}
}
}
private static class FunctionType extends BaseType {
Vector args;
String description;
boolean packed;
String returnType;
int alignment;
public FunctionType(String _desc)
{
args = new Vector();
description = _desc;
setName(_desc);
}
boolean isVoid() {
return (returnType == null);
}
String getReturnType() {
if (returnType == null) {
return "void";
} else {
return returnType;
}
}
public int getNumArgs()
{
return args.size();
}
public void setName(String _name)
{
if (_name.startsWith("!")) {
_name = _name.substring(1, _name.length());
}
if (_name.indexOf("|") != -1) {
returnType = _name.substring(_name.indexOf("|")+1, _name.length());
_name = _name.substring(0, _name.indexOf("|"));
}
name = _name.replaceAll("[* \t]","");
}
public String getDescription()
{
return description;
}
public Collection getArguments()
{
return args;
}
public void addArgument(BaseType tp)
{
args.add(tp);
}
}
public String (String str)
{
StringTokenizer st = new StringTokenizer(str,"\r\n");
String ret="";
while (st.hasMoreTokens())
{
ret = ret + "//" + st.nextToken() + "\n";
}
return ret;
}
public String getJavaTypeForSize(int size) {
switch(size) {
case 1: return "byte";
case 2: return "short";
case 4: return "int";
case 8: return "long";
default: throw new RuntimeException("Unsupported size: " + size);
}
}
public String getOffsets(StructType stp,AtomicType atp, boolean wide)
{
String key = stp.getName()+"."+atp.getName();
return wide == true ? (String) sizeTable64bit.get(key) : (String) sizeTable32bit.get(key);
}
public String getStructSize(StructType stp, boolean wide)
{
return wide == true ? (String) sizeTable64bit.get(stp.getName()) : (String) sizeTable32bit.get(stp.getName());
}
public int getLongSize(boolean wide)
{
return Integer.parseInt(wide == true ? (String)sizeTable64bit.get("long") : (String)sizeTable32bit.get("long"));
}
public int getPtrSize(boolean wide)
{
return Integer.parseInt(wide == true ? (String)sizeTable64bit.get("ptr") : (String)sizeTable32bit.get("ptr"));
}
public int getBoolSize(boolean wide) {
return getOrdinalSize("Bool", wide);
}
public int getOrdinalSize(String ordinal, boolean wide) {
return Integer.parseInt(wide == true ? (String)sizeTable64bit.get(ordinal) : (String)sizeTable32bit.get(ordinal));
}
public void writeToString(StructType stp, PrintWriter pw) {
int type;
pw.println("\n\n\tString getName() {\n\t\treturn \"" + stp.getName()+ "\"; \n\t}");
pw.println("\n\n\tString getFieldsAsString() {\n\t\tString ret=\"\";\n");
for (Enumeration e = stp.getMembers() ; e.hasMoreElements() ;) {
AtomicType tp = (AtomicType) e.nextElement();
type = tp.getType();
String name = tp.getName().replace('.', '_');
if ((name != null) && (name.length() > 0))
{
if (type == AtomicType.TYPE_ATOM) {
pw.println("\t\tret += \"\"+\"" + name + " = \" + XAtom.get(get_" + name + "()) +\", \";");
} else if (name.equals("type")) {
pw.println("\t\tret += \"\"+\"type = \" + XlibWrapper.eventToString[get_type()] +\", \";");
} else if (name.equals("window")){
pw.println("\t\tret += \"\"+\"window = \" + getWindow(get_window()) + \", \";");
} else if (type == AtomicType.TYPE_ARRAY) {
pw.print("\t\tret += \"{\"");
for (int i = 0; i < tp.getArrayLength(); i++) {
pw.print(" + get_" + name + "(" + i + ") + \" \"");
}
pw.println(" + \"}\";");
} else {
pw.println("\t\tret += \"\"+\"" + name +" = \" + get_"+ name+"() +\", \";");
}
}
}
pw.println("\t\treturn ret;\n\t}\n\n");
}
public void writeStubs(StructType stp, PrintWriter pw) {
int type;
String prefix = "";
if (!stp.getIsInterface()) {
prefix = "\t\tabstract ";
} else {
prefix = "\t";
}
for (Enumeration e = stp.getMembers() ; e.hasMoreElements() ;) {
AtomicType tp = (AtomicType) e.nextElement();
type = tp.getType();
String name = tp.getName().replace('.','_');
if ((name != null) && (name.length() > 0))
{
if (type == AtomicType.TYPE_ARRAY) {
pw.println(prefix + "long get_" +name +"();");
pw.println(prefix + tp.getJavaType() + " get_" +name +"(int index);");
pw.println(prefix + "void set_" +name +"(int index, " + tp.getJavaType() + " v);");
} else {
pw.println(prefix + tp.getJavaType() + " get_" +name +"();");
if (type != AtomicType.TYPE_STRUCT) pw.println(prefix + "void set_" +name +"(" + tp.getJavaType() + " v);");
}
}
}
}
private int padSize(int size, int wordLength) {
int bytesPerWord = wordLength / 8;
return (size + bytesPerWord / 2) / bytesPerWord * bytesPerWord;
}
public void writeAccessorImpls(StructType stp, PrintWriter pw) {
int type;
int i=0;
String s_size_32 = getStructSize(stp, false);
String s_size_64 = getStructSize(stp, true);
int acc_size_32 = 0;
int acc_size_64 = 0;
String s_log = (generateLog?"log.finest(\"\");":"");
for (Enumeration e = stp.getMembers() ; e.hasMoreElements() ;) {
AtomicType tp = (AtomicType) e.nextElement();
type = tp.getType();
String name = tp.getName().replace('.','_');
String pref = "\tpublic " ;
if ((name != null) && (name.length() > 0))
{
String jt = tp.getJavaType();
String ja_32 = tp.getJavaAccess(false);
String ja_64 = tp.getJavaAccess(true);
String ja = ja_32;
int elemSize_32 = AtomicType.getNativeSizeForAccess(ja_32);
int elemSize_64 = AtomicType.getNativeSizeForAccess(ja_64);
String elemSize = tp.getItemSize();
if (type == AtomicType.TYPE_ARRAY) {
acc_size_32 += elemSize_32 * tp.getArrayLength();
acc_size_64 += elemSize_64 * tp.getArrayLength();
pw.println(pref + tp.getJavaType() + " get_" +name + "(int index) { " +s_log+"return " +
tp.getJavaResult(stp.getOffset(tp) + "+index*" + elemSize, null) + "; }");
if (tp.getReferencedType() instanceof AtomicType) {
pw.println(MessageFormat.format(pref + "void set_{0}(int index, {1} v) '{' {3} {2}; '}'",
new Object[] {
name, jt,
tp.getJavaConversion("pData+"+stp.getOffset(tp)+" + index*" + elemSize, "v"),
s_log}));
}
pw.println(pref + "long get_" +name+ "() { "+s_log+"return pData+"+stp.getOffset(tp)+"; }");
} else if (type == AtomicType.TYPE_PTR) {
pw.println(MessageFormat.format(pref + "{0} get_{1}(int index) '{' {3} return {2}; '}'",
new Object[] {
jt, name,
tp.getJavaResult("index*" + elemSize, "Native.getLong(pData+"+stp.getOffset(tp)+")"),
s_log
}));
pw.println(pref + "long get_" +name+ "() { "+s_log+"return Native.getLong(pData+"+stp.getOffset(tp)+"); }");
pw.println(MessageFormat.format(pref + "void set_{0}({1} v) '{' {3} {2}; '}'",
new Object[] {name, "long", "Native.putLong(pData + " + stp.getOffset(tp) + ", v)", s_log}));
acc_size_32 += elemSize_32;
acc_size_64 += elemSize_64;
} else {
acc_size_32 += elemSize_32;
acc_size_64 += elemSize_64;
pw.println(pref + tp.getJavaType() + " get_" +name +
"() { "+s_log+"return " + tp.getJavaResult(stp.getOffset(tp), null) + "; }");
if (type != AtomicType.TYPE_STRUCT) {
pw.println(MessageFormat.format(pref + "void set_{0}({1} v) '{' {3} {2}; '}'",
new Object[] {name, jt, tp.getJavaConversion("pData+"+stp.getOffset(tp), "v"), s_log}));
}
}
i++;
}
}
if (s_size_32 != null && !s_size_32.equals(Integer.toString(acc_size_32))) {
if (log.isLoggable(Level.FINE)) {
log.fine("32 bits: The size of the structure " + stp.getName() + " " + s_size_32 +
" is not equal to the accumulated size " +acc_size_32 + " of the fields");
}
} else if (s_size_64 != null && !s_size_64.equals(Integer.toString(acc_size_64))) {
if (log.isLoggable(Level.FINE)) {
log.fine("64 bits: The size of the structure " + stp.getName() + " " +s_size_64+
" is not equal to the accumulated size " +acc_size_64+" of the fields");
}
}
}
public void writeWrapperSubclass(StructType stp, PrintWriter pw, boolean wide) {
pw.println("class " + stp.getJavaClassName() + "AccessorImpl" + " extends " + stp.getJavaClassName() + "Accessor {");
pw.println("/*\nThis class serves as a Wrapper for the following X Struct \nsThe offsets here are calculated based on actual compiler.\n\n" +stp.getDescription() + "\n\n */");
writeAccessorImpls(stp, pw);
pw.println("\n\n } \n\n");
}
public void writeWrapper(String outputDir, StructType stp)
{
if (stp.getNumFields() > 0) {
try {
FileOutputStream fs = new FileOutputStream(outputDir + "/"+stp.getJavaClassName()+".java");
PrintWriter pw = new PrintWriter(fs);
pw.println("// This file is an automatically generated file, please do not edit this file, modify the WrapperGenerator.java file instead !\n" );
pw.println("package "+package_name+";\n");
pw.println("import sun.misc.*;\n");
pw.println("import java.util.logging.*;");
String baseClass = stp.getBaseClass();
if (baseClass == null) {
baseClass = defaultBaseClass;
}
if (stp.getIsInterface()) {
pw.print("public interface ");
pw.print(stp.getJavaClassName());
} else {
pw.print("public class ");
pw.print(stp.getJavaClassName() + " extends " + baseClass);
}
if (stp.getInterfaces() != null) {
pw.print(" implements " + stp.getInterfaces());
}
pw.println(" { ");
if (!stp.getIsInterface()) {
pw.println("\tprivate Unsafe unsafe = XlibWrapper.unsafe; ");
pw.println("\tprivate final boolean should_free_memory;");
pw.println("\tpublic static int getSize() { return " + stp.getSize() + "; }");
pw.println("\tpublic int getDataSize() { return getSize(); }");
pw.println("\n\tlong pData;");
pw.println("\n\tpublic long getPData() { return pData; }");
pw.println("\n\n\tpublic " + stp.getJavaClassName() + "(long addr) {");
if (generateLog) {
pw.println("\t\tlog.finest(\"Creating\");");
}
pw.println("\t\tpData=addr;");
pw.println("\t\tshould_free_memory = false;");
pw.println("\t}");
pw.println("\n\n\tpublic " + stp.getJavaClassName() + "() {");
if (generateLog) {
pw.println("\t\tlog.finest(\"Creating\");");
}
pw.println("\t\tpData = unsafe.allocateMemory(getSize());");
pw.println("\t\tshould_free_memory = true;");
pw.println("\t}");
pw.println("\n\n\tpublic void dispose() {");
if (generateLog) {
pw.println("\t\tlog.finest(\"Disposing\");");
}
pw.println("\t\tif (should_free_memory) {");
if (generateLog) {
pw.println("\t\t\tlog.finest(\"freeing memory\");");
}
pw.println("\t\t\tunsafe.freeMemory(pData); \n\t}");
pw.println("\t\t}");
writeAccessorImpls(stp, pw);
writeToString(stp,pw);
} else {
pw.println("\n\n\tvoid dispose();");
pw.println("\n\tlong getPData();");
writeStubs(stp,pw);
}
pw.println("}\n\n\n");
pw.close();
}
catch (Exception e)
{
e.printStackTrace();
}
}
}
private boolean readSizeInfo(InputStream is, boolean wide) {
String line;
String splits[];
BufferedReader in = new BufferedReader(new InputStreamReader(is));
try {
while ((line = in.readLine()) != null)
{
splits = line.split("\\p{Space}");
if (splits.length == 2)
{
if (wide) {
sizeTable64bit.put(splits[0],splits[1]);
} else {
sizeTable32bit.put(splits[0],splits[1]);
}
}
}
return true;
} catch (Exception e) {
e.printStackTrace();
return false;
}
}
public void writeFunctionCallWrapper(String outputDir, FunctionType ft) {
try {
FileOutputStream fs = new FileOutputStream(outputDir + "/" + ft.getName()+".java");
PrintWriter pw = new PrintWriter(fs);
pw.println("// This file is an automatically generated file, please do not edit this file, modify the WrapperGenerator.java file instead !\n" );
pw.println("package "+package_name+";\n");
pw.println("import sun.misc.Unsafe;\n");
pw.println("class " + ft.getName() + " {");
pw.println("\tprivate static Unsafe unsafe = XlibWrapper.unsafe;");
pw.println("\tprivate boolean __executed = false;");
pw.println("\tprivate boolean __disposed = false;");
Iterator iter = ft.getArguments().iterator();
while (iter.hasNext()) {
AtomicType at = (AtomicType)iter.next();
if (at.isIn()) {
pw.println("\t" + at.getJavaType() + " _" + at.getName() + ";");
} else {
pw.println("\tlong " + at.getName() + "_ptr = unsafe.allocateMemory(Native.get" + at.getTypeUpperCase() + "Size());");
}
}
pw.println("\tpublic " + ft.getName() + "(");
iter = ft.getArguments().iterator();
boolean first = true;
while (iter.hasNext()) {
AtomicType at = (AtomicType)iter.next();
if (at.isIn() || at.isInOut()) {
if (!first) {
pw.println(",");
}
first = false;
pw.print("\t\t" + at.getJavaType() + " " + at.getName());
}
}
pw.println("\t)");
pw.println("\t{");
iter = ft.getArguments().iterator();
while (iter.hasNext()) {
AtomicType at = (AtomicType)iter.next();
if (at.isIn() || at.isInOut()) {
pw.println("\t\tset_" + at.getName() + "(" + at.getName() + ");");
}
}
pw.println("\t}");
pw.println("\tpublic " + ft.getReturnType() + " execute() {");
if (ft.isVoid()) {
pw.println("\t\texecute(null);");
} else {
pw.println("\t\treturn execute(null);");
}
pw.println("\t}");
pw.println("\tpublic " + ft.getReturnType() + " execute(XToolkit.XErrorHandler errorHandler) {");
pw.println("\t\tif (__disposed) {");
pw.println("\t\t throw new IllegalStateException(\"Disposed\");");
pw.println("\t\t}");
pw.println("\t\tXToolkit.awtLock();");
pw.println("\t\ttry {");
pw.println("\t\t\tif (__executed) {");
pw.println("\t\t\t throw new IllegalStateException(\"Already executed\");");
pw.println("\t\t\t}");
pw.println("\t\t\t__executed = true;");
pw.println("\t\t\tif (errorHandler != null) {");
pw.println("\t\t\t XToolkit.WITH_XERROR_HANDLER(errorHandler);");
pw.println("\t\t\t}");
iter = ft.getArguments().iterator();
while (iter.hasNext()) {
AtomicType at = (AtomicType)iter.next();
if (!at.isIn() && at.isAutoFree()) {
pw.println("\t\t\tNative.put" + at.getTypeUpperCase() + "(" +at.getName() + "_ptr, 0);");
}
}
if (!ft.isVoid()) {
pw.println("\t\t\t" + ft.getReturnType() + " status = ");
}
pw.println("\t\t\tXlibWrapper." + ft.getName() + "(XToolkit.getDisplay(), ");
iter = ft.getArguments().iterator();
first = true;
while (iter.hasNext()) {
AtomicType at = (AtomicType)iter.next();
if (!first) {
pw.println(",");
}
first = false;
if (at.isIn()) {
pw.print("\t\t\t\tget_" + at.getName() + "()");
} else {
pw.print("\t\t\t\t" + at.getName() + "_ptr");
}
}
pw.println("\t\t\t);");
pw.println("\t\t\tif (errorHandler != null) {");
pw.println("\t\t\t XToolkit.RESTORE_XERROR_HANDLER();");
pw.println("\t\t\t}");
if (!ft.isVoid()) {
pw.println("\t\t\treturn status;");
}
pw.println("\t\t} finally {");
pw.println("\t\t XToolkit.awtUnlock();");
pw.println("\t\t}");
pw.println("\t}");
pw.println("\tpublic boolean isExecuted() {");
pw.println("\t return __executed;");
pw.println("\t}");
pw.println("\t");
pw.println("\tpublic boolean isDisposed() {");
pw.println("\t return __disposed;");
pw.println("\t}");
pw.println("\tpublic void finalize() {");
pw.println("\t dispose();");
pw.println("\t}");
pw.println("\tpublic void dispose() {");
pw.println("\t\tXToolkit.awtLock();");
pw.println("\t\ttry {");
pw.println("\t\tif (__disposed || !__executed) {");
pw.println("\t\t return;");
pw.println("\t\t} finally {");
pw.println("\t\t XToolkit.awtUnlock();");
pw.println("\t\t}");
pw.println("\t\t}");
iter = ft.getArguments().iterator();
while (iter.hasNext()) {
AtomicType at = (AtomicType)iter.next();
if (!at.isIn()) {
if (at.isAutoFree()) {
pw.println("\t\tif (__executed && get_" + at.getName() + "()!= 0) {");
pw.println("\t\t\tXlibWrapper.XFree(get_" + at.getName() + "());");
pw.println("\t\t}");
}
pw.println("\t\tunsafe.freeMemory(" + at.getName() + "_ptr);");
}
}
pw.println("\t\t__disposed = true;");
pw.println("\t\t}");
pw.println("\t}");
iter = ft.getArguments().iterator();
while (iter.hasNext()) {
AtomicType at = (AtomicType)iter.next();
pw.println("\tpublic " + at.getJavaType() + " get_" + at.getName() + "() {");
pw.println("\t\tif (__disposed) {");
pw.println("\t\t throw new IllegalStateException(\"Disposed\");");
pw.println("\t\t}");
pw.println("\t\tif (!__executed) {");
pw.println("\t\t throw new IllegalStateException(\"Not executed\");");
pw.println("\t\t}");
if (at.isIn()) {
pw.println("\t\treturn _" + at.getName() + ";");
} else {
pw.println("\t\treturn Native.get" + at.getTypeUpperCase() + "(" + at.getName() + "_ptr);");
}
pw.println("\t}");
pw.println("\tpublic void set_" + at.getName() + "(" + at.getJavaType() + " data) {");
if (at.isIn()) {
pw.println("\t\t_" + at.getName() + " = data;");
} else {
pw.println("\t\tNative.put" + at.getTypeUpperCase() + "(" + at.getName() + "_ptr, data);");
}
pw.println("\t}");
}
pw.println("}");
pw.close();
} catch (Exception e) {
e.printStackTrace();
}
}
public void writeJavaWrapperClass(String outputDir) {
try {
for (Enumeration e = symbolTable.elements() ; e.hasMoreElements() ;) {
BaseType tp = (BaseType) e.nextElement();
if (tp instanceof StructType) {
StructType st = (StructType) tp;
writeWrapper(outputDir, st);
} else if (tp instanceof FunctionType) {
writeFunctionCallWrapper(outputDir, (FunctionType)tp);
}
}
}
catch (Exception e) {
e.printStackTrace();
}
}
public void writeNativeSizer(String file)
{
int type;
int i=0;
int j=0;
BaseType tp;
StructType stp;
Enumeration eo;
try {
FileOutputStream fs = new FileOutputStream(file);
PrintWriter pw = new PrintWriter(fs);
pw.println("/* This file is an automatically generated file, please do not edit this file, modify the XlibParser.java file instead !*/\n" );
pw.println("#include <X11/Xlib.h>\n#include <X11/Xutil.h>\n#include <X11/Xos.h>\n#include <X11/Xatom.h>\n#include <stdio.h>\n");
pw.println("#include <X11/extensions/Xdbe.h>");
pw.println("#include <X11/XKBlib.h>");
pw.println("#include \"awt_p.h\"");
pw.println("#include \"color.h\"");
pw.println("#include \"colordata.h\"");
pw.println("\ntypedef struct\n");
pw.println("{\n");
pw.println(" unsigned long flags;\n");
pw.println(" unsigned long functions;\n");
pw.println(" unsigned long decorations;\n");
pw.println(" long inputMode;\n");
pw.println(" unsigned long status;\n");
pw.println("} PropMwmHints;\n");
pw.println("\n\nint main(){");
j=0;
for ( eo = symbolTable.elements() ; eo.hasMoreElements() ;) {
tp = (BaseType) eo.nextElement();
if (tp instanceof StructType)
{
stp = (StructType) tp;
if (!stp.getIsInterface()) {
pw.println(stp.getName()+" temp"+ j + ";\n");
j++;
}
}
}
j=0;
pw.println("printf(\"long\t%d\\n\",(int)sizeof(long));");
pw.println("printf(\"int\t%d\\n\",(int)sizeof(int));");
pw.println("printf(\"short\t%d\\n\",(int)sizeof(short));");
pw.println("printf(\"ptr\t%d\\n\",(int)sizeof(void *));");
pw.println("printf(\"Bool\t%d\\n\",(int)sizeof(Bool));");
pw.println("printf(\"Atom\t%d\\n\",(int)sizeof(Atom));");
pw.println("printf(\"Window\t%d\\n\",(int)sizeof(Window));");
for (eo = symbolTable.elements() ; eo.hasMoreElements() ;) {
tp = (BaseType) eo.nextElement();
if (tp instanceof StructType)
{
stp = (StructType) tp;
if (stp.getIsInterface()) {
continue;
}
for (Enumeration e = stp.getMembers() ; e.hasMoreElements() ;) {
AtomicType atp = (AtomicType) e.nextElement();
if (atp.isAlias()) continue;
pw.println("printf(\""+ stp.getName() + "." + atp.getName() + "\t%d\\n\""+
",(int)((unsigned long ) &temp"+j+"."+atp.getName()+"- (unsigned long ) &temp" + j + ") );");
i++;
}
pw.println("printf(\""+ stp.getName() + "\t%d\\n\"" + ",(int)sizeof(temp"+j+"));");
j++;
}
}
pw.println("return 0;");
pw.println("}");
pw.close();
}
catch (Exception e)
{
e.printStackTrace();
}
}
private void initTypes() {
symbolTable.put("int", new AtomicType(AtomicType.TYPE_INT, "", "int"));
symbolTable.put("short", new AtomicType(AtomicType.TYPE_SHORT, "", "short"));
symbolTable.put("long", new AtomicType(AtomicType.TYPE_LONG, "", "long"));
symbolTable.put("float", new AtomicType(AtomicType.TYPE_FLOAT, "", "float"));
symbolTable.put("double", new AtomicType(AtomicType.TYPE_DOUBLE, "", "double"));
symbolTable.put("Bool", new AtomicType(AtomicType.TYPE_BOOL, "", "Bool"));
symbolTable.put("char", new AtomicType(AtomicType.TYPE_CHAR, "", "char"));
symbolTable.put("byte", new AtomicType(AtomicType.TYPE_BYTE, "", "byte"));
symbolTable.put("pointer", new AtomicType(AtomicType.TYPE_PTR, "", "pointer"));
symbolTable.put("longlong", new AtomicType(AtomicType.TYPE_LONG_LONG, "", "longlong"));
symbolTable.put("Atom", new AtomicType(AtomicType.TYPE_ATOM, "", "Atom"));
symbolTable.put("ulong", new AtomicType(AtomicType.TYPE_ULONG, "", "ulong"));
}
public WrapperGenerator(String outputDir, String xlibFilename) {
initTypes();
try {
BufferedReader in = new BufferedReader(new FileReader(xlibFilename));
String line;
String splits[];
BaseType curType = null;
while ((line = in.readLine()) != null)
{
int commentStart = line.indexOf("//");
if (commentStart >= 0) {
line = line.substring(0, commentStart);
}
if ("".equals(line)) {
continue;
}
splits = line.split("\\p{Space}+");
if (splits.length >= 2)
{
String struct_name = curType.getName();
String field_name = splits[1];
String s_type = splits[2];
BaseType bt = curType;
int type = AtomicType.getTypeForString(s_type);
AtomicType atp = null;
if (bt != null && type != -1) {
atp = new AtomicType(type,field_name,s_type);
if (splits.length > 3) {
atp.setAttributes(splits);
}
if (bt instanceof StructType) {
StructType stp = (StructType) bt;
stp.addMember(atp);
} else if (bt instanceof FunctionType) {
((FunctionType)bt).addArgument(atp);
}
}
else if (bt == null) {
System.out.println("Cannot find " + struct_name);
}
}
else if (line != null) {
BaseType bt = (BaseType) symbolTable.get(line);
if (bt == null) {
if (line.startsWith("!")) {
FunctionType ft = new FunctionType(line);
ft.setName(line);
symbolTable.put(ft.getName(),ft);
curType = ft;
} else {
StructType stp = new StructType(line);
stp.setName(line);
curType = stp;
symbolTable.put(stp.getName(),stp);
}
}
}
}
in.close();
}
catch (Exception e) {
e.printStackTrace();
}
}
private void makeSizer(String outputDir) {
if (wide) {
sizerFileName = "sizer.64.c";
} else {
sizerFileName = "sizer.32.c";
}
File fp = new File(outputDir, sizerFileName);
writeNativeSizer(fp.getAbsolutePath());
}
private boolean readSizeInfo(String sizeInfo) {
try {
File f = new File(sizeInfo+".32");
boolean res = true;
FileInputStream fis = null;
if (f.exists()) {
fis = new FileInputStream(f);
res = readSizeInfo(fis, false);
fis.close();
}
f = new File(sizeInfo+".64");
if (f.exists()) {
fis = new FileInputStream(f);
res &= readSizeInfo(fis, true);
fis.close();
}
return res;
} catch (Exception e) {
e.printStackTrace();
return false;
}
}
private void startGeneration(String outputDir, String sizeInfo) {
if (readSizeInfo(sizeInfo))
{
writeJavaWrapperClass(outputDir);
}
else {
System.out.println("Error calculating offsets");
}
}
public static void main(String[] args) {
if (args.length < 4) {
System.out.println("Usage:\nWrapperGenerator <output_dir> <xlibtypes.txt> <action> [<platform> | <sizes info file>]");
System.out.println("Where <action>: gen, sizer");
System.out.println(" <platform>: 32, 64");
System.exit(1);
}
WrapperGenerator xparser = new WrapperGenerator(args[0], args[1]);
if (args[2].equals("sizer")) {
xparser.wide = args[3].equals("64");
xparser.makeSizer(args[0]);
} else if (args[2].equals("gen")) {
xparser.startGeneration(args[0], args[3]);
}
}
}