ruby-rpm 1.2.2

data/ext/rpm/dependency.c

@@ -0,0 +1,330 @@
+/* -*- mode: C; c-basic-offset: 4; tab-width: 4; -*- */
+/* Ruby/RPM
+ *
+ * Copyright (C) 2002 Kenta MURATA <muraken2@nifty.com>.
+ */
+
+/* $Id: dependency.c 42 2004-06-03 14:26:37Z kazuhiko $ */
+
+#include "private.h"
+
+VALUE rpm_cDependency;
+VALUE rpm_cProvide;
+VALUE rpm_cRequire;
+VALUE rpm_cConflict;
+VALUE rpm_cObsolete;
+
+static ID id_name;
+static ID id_ver;
+static ID id_flags;
+static ID id_owner;
+
+static ID id_nametag;
+static ID id_versiontag;
+static ID id_flagstag;
+
+static VALUE
+dependency_initialize(VALUE dep, VALUE name, VALUE version,
+					  VALUE flags, VALUE owner)
+{
+	if (TYPE(name) != T_STRING
+		|| (!NIL_P(version) && rb_obj_is_kind_of(version, rpm_cVersion) == Qfalse)) {
+		rb_raise(rb_eTypeError, "illegal argument type");
+	}
+
+	rb_ivar_set(dep, id_name, name);
+	rb_ivar_set(dep, id_ver, version);
+	rb_ivar_set(dep, id_flags, rb_Integer(flags));
+	rb_ivar_set(dep, id_owner, owner);
+	return dep;
+}
+
+static VALUE
+provide_initialize(VALUE dep, VALUE name, VALUE version,
+					  VALUE flags, VALUE owner)
+{
+	dependency_initialize(dep,name,version,flags,owner);
+	rb_ivar_set(dep, id_nametag, INT2NUM(RPMTAG_PROVIDENAME));
+	rb_ivar_set(dep, id_versiontag, INT2NUM(RPMTAG_PROVIDEVERSION));
+	rb_ivar_set(dep, id_flagstag, INT2NUM(RPMTAG_PROVIDEFLAGS));
+	return dep;
+}
+
+static VALUE
+require_initialize(VALUE dep, VALUE name, VALUE version,
+					  VALUE flags, VALUE owner)
+{
+	dependency_initialize(dep,name,version,flags,owner);
+	rb_ivar_set(dep, id_nametag, INT2NUM(RPMTAG_REQUIRENAME));
+	rb_ivar_set(dep, id_versiontag, INT2NUM(RPMTAG_REQUIREVERSION));
+	rb_ivar_set(dep, id_flagstag, INT2NUM(RPMTAG_REQUIREFLAGS));
+	return dep;
+}
+
+static VALUE
+obsolete_initialize(VALUE dep, VALUE name, VALUE version,
+					  VALUE flags, VALUE owner)
+{
+	dependency_initialize(dep,name,version,flags,owner);
+	rb_ivar_set(dep, id_nametag, INT2NUM(RPMTAG_OBSOLETENAME));
+	rb_ivar_set(dep, id_versiontag, INT2NUM(RPMTAG_OBSOLETEVERSION));
+	rb_ivar_set(dep, id_flagstag, INT2NUM(RPMTAG_OBSOLETEFLAGS));
+	return dep;
+}
+
+static VALUE
+conflict_initialize(VALUE dep, VALUE name, VALUE version,
+					  VALUE flags, VALUE owner)
+{
+	dependency_initialize(dep,name,version,flags,owner);
+	rb_ivar_set(dep, id_nametag, INT2NUM(RPMTAG_CONFLICTNAME));
+	rb_ivar_set(dep, id_versiontag, INT2NUM(RPMTAG_CONFLICTVERSION));
+	rb_ivar_set(dep, id_flagstag, INT2NUM(RPMTAG_CONFLICTFLAGS));
+	return dep;
+}
+
+VALUE
+rpm_provide_new(const char* name, VALUE version, int flags, VALUE target)
+{
+	VALUE prov, argv[4];
+
+	argv[0] = rb_str_new2(name);
+	argv[1] = version;
+	argv[2] = INT2NUM(flags);
+	argv[3] = target;
+
+	prov = rb_newobj();
+	OBJSETUP(prov, rpm_cProvide, T_OBJECT);
+	rb_obj_call_init(prov, 4, argv);
+	rb_ivar_set(prov, id_nametag, INT2NUM(RPMTAG_PROVIDENAME));
+	rb_ivar_set(prov, id_versiontag, INT2NUM(RPMTAG_PROVIDEVERSION));
+	rb_ivar_set(prov, id_flagstag, INT2NUM(RPMTAG_PROVIDEFLAGS));
+	return prov;
+}
+
+VALUE
+rpm_require_new(const char* name, VALUE version, int flags, VALUE target)
+{
+	VALUE req, argv[4];
+
+	argv[0] = rb_str_new2(name);
+	argv[1] = version;
+	argv[2] = INT2NUM(flags);
+	argv[3] = target;
+
+	req = rb_newobj();
+	OBJSETUP(req, rpm_cRequire, T_OBJECT);
+	rb_obj_call_init(req, 4, argv);
+	rb_ivar_set(req, id_nametag, INT2NUM(RPMTAG_REQUIRENAME));
+	rb_ivar_set(req, id_versiontag, INT2NUM(RPMTAG_REQUIREVERSION));
+	rb_ivar_set(req, id_flagstag, INT2NUM(RPMTAG_REQUIREFLAGS));
+	return req;
+}
+
+VALUE
+rpm_conflict_new(const char* name, VALUE version, int flags, VALUE target)
+{
+	VALUE conf, argv[4];
+
+	argv[0] = rb_str_new2(name);
+	argv[1] = version;
+	argv[2] = INT2NUM(flags);
+	argv[3] = target;
+
+	conf = rb_newobj();
+	OBJSETUP(conf, rpm_cConflict, T_OBJECT);
+	rb_obj_call_init(conf, 4, argv);
+	rb_ivar_set(conf, id_nametag, INT2NUM(RPMTAG_CONFLICTNAME));
+	rb_ivar_set(conf, id_versiontag, INT2NUM(RPMTAG_CONFLICTVERSION));
+	rb_ivar_set(conf, id_flagstag, INT2NUM(RPMTAG_CONFLICTFLAGS));
+	return conf;
+}
+
+VALUE
+rpm_obsolete_new(const char* name, VALUE version, int flags, VALUE target)
+{
+	VALUE obso, argv[4];
+
+	argv[0] = rb_str_new2(name);
+	argv[1] = version;
+	argv[2] = INT2NUM(flags);
+	argv[3] = target;
+
+	obso = rb_newobj();
+	OBJSETUP(obso, rpm_cObsolete, T_OBJECT);
+	rb_obj_call_init(obso, 4, argv);
+	rb_ivar_set(obso, id_nametag, INT2NUM(RPMTAG_OBSOLETENAME));
+	rb_ivar_set(obso, id_versiontag, INT2NUM(RPMTAG_OBSOLETEVERSION));
+	rb_ivar_set(obso, id_flagstag, INT2NUM(RPMTAG_OBSOLETEFLAGS));
+	return obso;
+}
+
+VALUE
+rpm_dependency_is_satisfy(VALUE dep,VALUE other)
+{
+	int oflag;
+    int sflag;
+	char *svre;
+	char *ovre;
+	char *name;
+    char *oname;
+	if (rb_obj_is_kind_of(other,rpm_cPackage) == Qtrue){
+		VALUE provide;
+		VALUE provides = rpm_package_get_provides(other);
+		while (!NIL_P(provide = rb_ary_pop(provides))){
+            if (rpm_dependency_is_satisfy(dep,provide) == Qtrue) {
+                return Qtrue;
+			}
+		}
+		return Qfalse;
+	}
+
+	name = RSTRING(rb_ivar_get(dep,id_name))->ptr;
+	svre = RSTRING(rpm_version_to_vre(rb_ivar_get(dep,id_ver)))->ptr;
+    sflag = NUM2INT(rb_ivar_get(dep, id_flags));
+
+	if (rb_obj_is_kind_of(other,rpm_cDependency) == Qtrue){
+		oflag = NUM2INT(rb_ivar_get(other, id_flags));
+        oname = RSTRING(rb_ivar_get(other, id_name))->ptr;
+		ovre = RSTRING(rpm_version_to_vre(rb_ivar_get(other,id_ver)))->ptr;
+		other = rb_ivar_get(other,id_ver);
+	} else if (rb_obj_is_kind_of(other,rpm_cVersion) == Qtrue){
+		ovre = RSTRING(rpm_version_to_vre(other))->ptr;
+        oname = name;
+		if (!*ovre)
+			oflag = 0;
+		else
+			oflag = RPMSENSE_EQUAL;
+	} else {
+		rb_raise(rb_eTypeError, "illegal argument type");
+	}
+
+#if RPM_VERSION_CODE < RPM_VERSION(4,1,0)
+	if (rpmRangesOverlap(name,ovre,oflag, sname,svre,sflag))
+#else
+	if (rpmdsCompare(rpmdsSingle(RPMTAG_PROVIDENAME, oname, ovre, oflag),
+			 rpmdsSingle(RPMTAG_PROVIDENAME, name, svre, sflag)))
+#endif
+		return Qtrue;
+	return Qfalse;
+}
+
+VALUE
+rpm_dependency_get_name(VALUE dep)
+{
+	return rb_ivar_get(dep, id_name);
+}
+
+VALUE
+rpm_dependency_get_version(VALUE dep)
+{
+	return rb_ivar_get(dep, id_ver);
+}
+
+VALUE
+rpm_dependency_get_flags(VALUE dep)
+{
+	return rb_ivar_get(dep, id_flags);
+}
+
+VALUE
+rpm_dependency_get_owner(VALUE dep)
+{
+	return rb_ivar_get(dep, id_owner);
+}
+
+VALUE
+rpm_dependency_get_nametag(VALUE dep)
+{
+	return rb_ivar_get(dep, id_nametag);
+}
+
+VALUE
+rpm_dependency_get_versiontag(VALUE dep)
+{
+	return rb_ivar_get(dep, id_versiontag);
+}
+
+VALUE
+rpm_dependency_get_flagstag(VALUE dep)
+{
+	return rb_ivar_get(dep, id_flagstag);
+}
+
+VALUE
+rpm_dependency_is_lt(VALUE dep)
+{
+	return (NUM2INT(rb_ivar_get(dep, id_flags)) & RPMSENSE_LESS) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_dependency_is_gt(VALUE dep)
+{
+	return (NUM2INT(rb_ivar_get(dep, id_flags)) & RPMSENSE_GREATER) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_dependency_is_eq(VALUE dep)
+{
+	return (NUM2INT(rb_ivar_get(dep, id_flags)) & RPMSENSE_EQUAL) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_dependency_is_le(VALUE dep)
+{
+	int flags = NUM2INT(rb_ivar_get(dep, id_flags));
+	return ((flags & RPMSENSE_LESS) && (flags & RPMSENSE_EQUAL)) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_dependency_is_ge(VALUE dep)
+{
+	int flags = NUM2INT(rb_ivar_get(dep, id_flags));
+	return ((flags & RPMSENSE_GREATER) && (flags & RPMSENSE_EQUAL)) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_require_is_pre(VALUE req)
+{
+	return (NUM2INT(rb_ivar_get(req, id_flags)) & RPMSENSE_PREREQ) ? Qtrue : Qfalse;
+}
+
+void
+Init_rpm_dependency(void)
+{
+	rpm_cDependency = rb_define_class_under(rpm_mRPM, "Dependency", rb_cObject);
+	rb_define_method(rpm_cDependency, "initialize", dependency_initialize, 4);
+	rb_define_method(rpm_cDependency, "name", rpm_dependency_get_name, 0);
+	rb_define_method(rpm_cDependency, "version", rpm_dependency_get_version, 0);
+	rb_define_method(rpm_cDependency, "flags", rpm_dependency_get_flags, 0);
+	rb_define_method(rpm_cDependency, "owner", rpm_dependency_get_owner, 0);
+	rb_define_method(rpm_cDependency, "lt?", rpm_dependency_is_lt, 0);
+	rb_define_method(rpm_cDependency, "gt?", rpm_dependency_is_gt, 0);
+	rb_define_method(rpm_cDependency, "eq?", rpm_dependency_is_eq, 0);
+	rb_define_method(rpm_cDependency, "le?", rpm_dependency_is_le, 0);
+	rb_define_method(rpm_cDependency, "ge?", rpm_dependency_is_ge, 0);
+	rb_define_method(rpm_cDependency, "satisfy?", rpm_dependency_is_satisfy, 1);
+	rb_define_method(rpm_cDependency, "nametag", rpm_dependency_get_nametag, 0);
+	rb_define_method(rpm_cDependency, "versiontag", rpm_dependency_get_versiontag, 0);
+	rb_define_method(rpm_cDependency, "flagstag", rpm_dependency_get_flagstag, 0);
+
+	rpm_cProvide = rb_define_class_under(rpm_mRPM, "Provide", rpm_cDependency);
+	rb_define_method(rpm_cProvide, "initialize", provide_initialize, 4);
+	rpm_cRequire = rb_define_class_under(rpm_mRPM, "Require", rpm_cDependency);
+	rb_define_method(rpm_cRequire, "initialize", require_initialize, 4);
+	rpm_cConflict = rb_define_class_under(rpm_mRPM, "Conflict", rpm_cDependency);
+	rb_define_method(rpm_cConflict, "initialize", conflict_initialize, 4);
+	rpm_cObsolete = rb_define_class_under(rpm_mRPM, "Obsolete", rpm_cDependency);
+	rb_define_method(rpm_cObsolete, "initialize", obsolete_initialize, 4);
+
+	rb_define_method(rpm_cRequire, "pre?", rpm_require_is_pre, 0);
+
+	id_name = rb_intern("name");
+	id_ver = rb_intern("version");
+	id_flags = rb_intern("flags");
+	id_owner = rb_intern("owner");
+
+	id_nametag = rb_intern("nametag");
+	id_versiontag = rb_intern("versiontag");
+	id_flagstag = rb_intern("flagstag");
+}

data/ext/rpm/extconf.rb

@@ -0,0 +1,78 @@
+### -*- mode: ruby; indent-tabs-mode: nil; -*-
+### Ruby/RPM
+###
+### Copyright (C) 2002 Kenta MURATA <muraken2@nifty.com>.
+
+### $Id: extconf.rb 19 2004-03-28 10:01:23Z zaki $
+
+require 'mkmf'
+
+dir_config('popt')
+dir_config("rpm", "/usr/include/rpm", "/usr/lib")
+
+def check_popt
+  if have_header('popt.h') and have_library('popt') then
+    true
+  else
+    STDERR.puts "libpopt not found"
+    false
+  end
+end
+
+def check_db
+  dir_config('db')
+  if have_library("db-4.2","db_version")
+    return true
+  end
+  4.downto(2) do |i|
+    if have_library("db-#{i}.0", "db_version") or
+        have_library("db#{i}", "db_version") then
+      return true
+    end
+  end
+  if have_library("db", "db_version") then
+    true
+  else
+    STDERR.puts "db not found"
+  end
+end
+
+def check_rpm
+  return false unless check_db
+  $libs = append_library($libs, 'rpmdb')
+  $libs = append_library($libs, 'rpm')
+  if have_header('rpmlib.h') and
+      have_library('rpmio') and
+      have_library('rpmbuild', 'getBuildTime') then
+    true
+  else
+    STDERR.puts "rpm library not found"
+    false
+  end
+end
+
+def check_rpm_version
+  version_string=`LANG=C rpm --version| cut -d' ' -f 3`
+  ver=version_string.split(/\./)
+  # TODO: zaki: strict checking is requires
+  $CFLAGS="#{$CFLAGS} -DRPM_VERSION_CODE=#{(ver[0].to_i<<16) + (ver[1].to_i<<8) + (ver[2].to_i<<0)}"
+end
+
+def check_debug
+  if ENV["RUBYRPM_DEBUG"] then
+    puts "debug mode\n"
+    $CFLAGS="#{$CFLAGS} -O0 -g -ggdb"
+  else
+    puts "non-debug mode\n"
+  end
+end
+
+exit unless check_popt
+exit unless check_rpm
+exit unless check_rpm_version
+
+check_debug
+
+system 'gcc -MM *.c >depend 2>/dev/null'
+
+create_makefile('rpmmodule')

data/ext/rpm/file.c

@@ -0,0 +1,281 @@
+/* -*- mode: C; c-basic-offset: 4; tab-width: 4; -*- */
+/* Ruby/RPM
+ *
+ * Copyright (C) 2002 Kenta MURATA <muraken2@nifty.com>.
+ */
+
+/* $Id: file.c 9 2004-03-13 14:19:20Z zaki $ */
+
+#include "private.h"
+
+VALUE rpm_cFile;
+
+static ID id_path;
+static ID id_md5sum;
+static ID id_link_to;
+static ID id_size;
+static ID id_mtime;
+static ID id_owner;
+static ID id_group;
+static ID id_rdev;
+static ID id_mode;
+static ID id_attr;
+static ID id_state;
+
+static VALUE
+file_initialize(VALUE file, VALUE path, VALUE md5sum, VALUE link_to,
+				VALUE size, VALUE mtime, VALUE owner, VALUE group,
+				VALUE rdev, VALUE mode, VALUE attr, VALUE state)
+{
+	if (TYPE(path) != T_STRING
+		|| TYPE(md5sum) != T_STRING
+		|| (!NIL_P(link_to) && TYPE(link_to) != T_STRING)
+		|| (!NIL_P(owner) && TYPE(owner) != T_STRING)
+		|| (!NIL_P(group) && TYPE(group) != T_STRING)) {
+		rb_raise(rb_eTypeError, "illegal argument type");
+	}
+	rb_ivar_set(file, id_path, path);
+	rb_ivar_set(file, id_md5sum, md5sum);
+	rb_ivar_set(file, id_link_to, (!NIL_P(link_to) && RSTRING(link_to)->len) ? link_to : Qnil);
+	rb_ivar_set(file, id_size, rb_Integer(size));
+	if (rb_obj_is_kind_of(mtime, rb_cTime) == Qfalse) {
+		mtime = rb_time_new(NUM2INT(rb_Integer(mtime)), (time_t)0);
+	}
+	rb_ivar_set(file, id_mtime, mtime);
+	rb_ivar_set(file, id_owner, owner);
+	rb_ivar_set(file, id_group, group);
+	rb_ivar_set(file, id_rdev, rb_Integer(rdev));
+	rb_ivar_set(file, id_mode, UINT2NUM(NUM2UINT(rb_Integer(mode))&0777));
+	rb_ivar_set(file, id_attr, rb_Integer(attr));
+	rb_ivar_set(file, id_state, rb_Integer(state));
+
+	return file;
+}
+
+VALUE
+rpm_file_new(const char* path, const char* md5sum, const char* link_to,
+			 size_t size, time_t mtime, const char* owner, const char* group,
+			 dev_t rdev, mode_t mode, rpmfileAttrs attr, rpmfileState state)
+{
+	VALUE file, argv[11];
+
+	argv[0] = rb_str_new2(path);
+	argv[1] = rb_str_new2(md5sum);
+	argv[2] = link_to ? rb_str_new2(link_to) : Qnil;
+	argv[3] = UINT2NUM(size);
+	argv[4] = rb_time_new(mtime, (time_t)0);
+	argv[5] = owner ? rb_str_new2(owner) : Qnil;
+	argv[6] = group ? rb_str_new2(group) : Qnil;
+	argv[7] = UINT2NUM(rdev);
+	argv[8] = UINT2NUM(mode);
+	argv[9] = INT2NUM(attr);
+	argv[10] = INT2NUM(state);
+
+	file = rb_newobj();
+	OBJSETUP(file, rpm_cFile, T_OBJECT);
+	rb_obj_call_init(file, 11, argv);
+
+	return file;
+}
+
+VALUE
+rpm_file_get_path(VALUE file)
+{
+	return rb_ivar_get(file, id_path);
+}
+
+VALUE
+rpm_file_get_md5sum(VALUE file)
+{
+	return rb_ivar_get(file, id_md5sum);
+}
+
+VALUE
+rpm_file_get_link_to(VALUE file)
+{
+	return rb_ivar_get(file, id_link_to);
+}
+
+VALUE
+rpm_file_get_size(VALUE file)
+{
+	return rb_ivar_get(file, id_size);
+}
+
+VALUE
+rpm_file_get_mtime(VALUE file)
+{
+	return rb_ivar_get(file, id_mtime);
+}
+
+VALUE
+rpm_file_get_owner(VALUE file)
+{
+	return rb_ivar_get(file, id_owner);
+}
+
+VALUE
+rpm_file_get_group(VALUE file)
+{
+	return rb_ivar_get(file, id_group);
+}
+
+VALUE
+rpm_file_get_rdev(VALUE file)
+{
+	return rb_ivar_get(file, id_rdev);
+}
+
+VALUE
+rpm_file_get_mode(VALUE file)
+{
+	return rb_ivar_get(file, id_mode);
+}
+
+VALUE
+rpm_file_get_attr(VALUE file)
+{
+	return rb_ivar_get(file, id_attr);
+}
+
+VALUE
+rpm_file_get_state(VALUE file)
+{
+	return rb_ivar_get(file, id_state);
+}
+
+VALUE
+rpm_file_is_symlink(VALUE file)
+{
+	return NIL_P(rb_ivar_get(file, id_link_to)) ? Qfalse : Qtrue;
+}
+
+VALUE
+rpm_file_is_config(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_CONFIG) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_doc(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_DOC) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_donotuse(VALUE file)
+{
+#if RPM_VERSION_CODE < RPM_VERSION(4,1,0)
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_DONOTUSE) ? Qtrue : Qfalse;
+#else
+	return Qfalse;
+#endif
+}
+
+VALUE
+rpm_file_is_missingok(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_MISSINGOK) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_noreplace(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_NOREPLACE) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_specfile(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_SPECFILE) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_ghost(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_GHOST) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_license(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_LICENSE) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_readme(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_README) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_exclude(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_attr)) & RPMFILE_EXCLUDE) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_replaced(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_state))
+			== RPMFILE_STATE_REPLACED) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_notinstalled(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_state))
+			== RPMFILE_STATE_NOTINSTALLED) ? Qtrue : Qfalse;
+}
+
+VALUE
+rpm_file_is_netshared(VALUE file)
+{
+	return (NUM2INT(rb_ivar_get(file, id_state))
+			== RPMFILE_STATE_NETSHARED) ? Qtrue : Qfalse;
+}
+
+void
+Init_rpm_file(void)
+{
+	rpm_cFile = rb_define_class_under(rpm_mRPM, "File", rb_cObject);
+	rb_define_method(rpm_cFile, "initialize", file_initialize, 11);
+	rb_define_method(rpm_cFile, "path", rpm_file_get_path, 0);
+	rb_define_alias(rpm_cFile, "to_s", "path");
+	rb_define_method(rpm_cFile, "md5sum", rpm_file_get_md5sum, 0);
+	rb_define_method(rpm_cFile, "link_to", rpm_file_get_link_to, 0);
+	rb_define_method(rpm_cFile, "size", rpm_file_get_size, 0);
+	rb_define_method(rpm_cFile, "mtime", rpm_file_get_mtime, 0);
+	rb_define_method(rpm_cFile, "owner", rpm_file_get_owner, 0);
+	rb_define_method(rpm_cFile, "group", rpm_file_get_group, 0);
+	rb_define_method(rpm_cFile, "rdev", rpm_file_get_rdev, 0);
+	rb_define_method(rpm_cFile, "mode", rpm_file_get_mode, 0);
+	rb_define_method(rpm_cFile, "attr", rpm_file_get_attr, 0);
+	rb_define_method(rpm_cFile, "state", rpm_file_get_state, 0);
+	rb_define_method(rpm_cFile, "symlink?", rpm_file_is_symlink, 0);
+	rb_define_method(rpm_cFile, "config?", rpm_file_is_config, 0);
+	rb_define_method(rpm_cFile, "doc?", rpm_file_is_doc, 0);
+	rb_define_method(rpm_cFile, "donotuse?", rpm_file_is_donotuse, 0);
+	rb_define_method(rpm_cFile, "missingok?", rpm_file_is_missingok, 0);
+	rb_define_method(rpm_cFile, "noreplace?", rpm_file_is_noreplace, 0);
+	rb_define_method(rpm_cFile, "specfile?", rpm_file_is_specfile, 0);
+	rb_define_method(rpm_cFile, "ghost?", rpm_file_is_ghost, 0);
+	rb_define_method(rpm_cFile, "license?", rpm_file_is_license, 0);
+	rb_define_method(rpm_cFile, "readme?", rpm_file_is_readme, 0);
+	rb_define_method(rpm_cFile, "exclude?", rpm_file_is_exclude, 0);
+	rb_define_method(rpm_cFile, "replaced?", rpm_file_is_replaced, 0);
+	rb_define_method(rpm_cFile, "notinstalled?", rpm_file_is_notinstalled, 0);
+	rb_define_method(rpm_cFile, "netshared?", rpm_file_is_netshared, 0);
+
+	id_path = rb_intern("path");
+	id_md5sum = rb_intern("md5sum");
+	id_link_to = rb_intern("link_to");
+	id_size = rb_intern("size");
+	id_mtime = rb_intern("mtime");
+	id_owner = rb_intern("owner");
+	id_group = rb_intern("group");
+	id_rdev = rb_intern("rdev");
+	id_mode = rb_intern("mode");
+	id_attr = rb_intern("attr");
+	id_state = rb_intern("state");
+}