krbpwd 0.2

data/ext/krbpwd/extconf.rb

@@ -0,0 +1,13 @@
+#
+
+require 'mkmf'
+
+extension_name = 'krbpwd'
+
+dir_config(extension_name, '/usr/local')
+
+have_header('krb5.h')
+have_library('krb5')
+
+create_makefile(extension_name)
+

data/ext/krbpwd/krbpwd.c

@@ -0,0 +1,97 @@
+#include <stdio.h>
+#include <strings.h>
+#include <kerberosv5/krb5.h>
+#include <ruby.h>
+
+//#define DEBUG
+
+#define KADM5_CHANGEPW_SERVICE "kadmin/changepw"
+
+VALUE cKrbPwd = Qnil;
+
+VALUE change_passwd(VALUE self, VALUE v_user, VALUE v_old_pwd, VALUE v_new_pwd)
+{
+  Check_Type(v_user, T_STRING);
+  Check_Type(v_old_pwd, T_STRING);
+  Check_Type(v_new_pwd, T_STRING);
+  char* user = StringValuePtr(v_user);
+  char* old_pwd = StringValuePtr(v_old_pwd);
+  char* new_pwd = StringValuePtr(v_new_pwd);
+  int iRubyRetCode=-1;
+  krb5_error_code             krbret;
+  krb5_context                ctx;
+  krb5_creds                  creds;
+  krb5_principal              princ;
+  int pw_result;
+  krb5_data       pw_res_string, res_string;
+
+  memset(&princ, 0, sizeof(princ));
+  memset(&creds, 0, sizeof(creds));
+
+#ifdef DEBUG
+  printf("Old=%s\n", old_pwd);
+  printf("New=%s\n", new_pwd);
+#endif
+
+  if ((krbret = krb5_init_context(&ctx))) {
+#ifdef DEBUG
+    printf("Error to init.\n");
+#endif
+    iRubyRetCode=1;
+    return INT2NUM(iRubyRetCode);
+  }
+
+  if ((krbret = krb5_parse_name(ctx, user, &princ))) {
+    krb5_free_context(ctx);
+#ifdef DEBUG
+    printf("Error to parse name.\n");
+#endif
+    iRubyRetCode=2;
+    return INT2NUM(iRubyRetCode);
+  }
+
+  if ((krbret = krb5_get_init_creds_password( ctx, &creds, princ, old_pwd, NULL, NULL, 0, KADM5_CHANGEPW_SERVICE, NULL))) {
+#ifdef DEBUG
+    printf("Error to init cred %d %s.\n", krbret, error_message(krbret));
+#endif
+    krb5_free_principal(ctx, princ);
+    krb5_free_context(ctx);
+    iRubyRetCode=3;
+    return INT2NUM(iRubyRetCode);
+  }
+
+  if ((krbret = krb5_change_password(ctx, &creds, new_pwd, &pw_result, &pw_res_string, &res_string ))) {
+    iRubyRetCode=4;
+    pw_result=0;
+#ifdef DEBUG
+    printf("Error set password.\n");
+#endif
+  }
+
+  if (pw_result!=0) {
+    iRubyRetCode=5;
+#ifdef DEBUG
+    printf("DEBUG: Fehler to change pwd.\n");
+#endif
+  }
+  else {
+    iRubyRetCode=0;
+#ifdef DEBUG
+    printf("DEBUG: Pwd changed.\n");
+#endif
+  }
+
+  krb5_free_cred_contents(ctx, &creds);
+  krb5_free_principal(ctx, princ);
+  krb5_free_context(ctx);
+
+  return INT2NUM(iRubyRetCode);
+}
+
+
+void Init_krbpwd()
+{
+  cKrbPwd     = rb_define_class("KrbPwd", rb_cObject);
+  rb_define_method(cKrbPwd, "change_passwd", change_passwd, 3);
+
+}

data/krbpwd.gemspec

@@ -0,0 +1,28 @@
+require 'rubygems'
+
+Gem::Specification.new do |spec|
+  spec.name       = 'krbpwd'
+  spec.version    = '0.2'
+  spec.author     = 'Stephan Toggweiler'
+  spec.license    = 'MIT'
+  spec.email      = 'stephan@rheoli.net'
+  spec.homepage   = 'http://www.rheoli.net'
+  spec.platform   = Gem::Platform::RUBY
+  spec.summary    = 'A Ruby interface for the the Kerberos library'
+  spec.has_rdoc   = false
+  #spec.test_files = Dir['test/test*']
+  spec.extensions = ['ext/krbpwd/extconf.rb']
+  spec.files      = Dir['**/*'].reject{ |f| f.include?('git') || f.include?('tmp') }
+  
+  #spec.rubyforge_project = 'krb5-auth'
+  #spec.extra_rdoc_files  = ['README', 'CHANGES', 'MANIFEST'] + Dir['ext/krb5_auth/*.c']
+
+  #spec.add_dependency('rake-compiler')
+  
+  #spec.add_development_dependency('test-unit', '>= 2.0.6')
+  #spec.add_development_dependency('dbi-dbrc', '>= 1.1.6')
+   
+  spec.description = <<-EOF
+    Interface to Kerberos for change password.
+  EOF
+end

metadata

@@ -0,0 +1,58 @@
+--- !ruby/object:Gem::Specification 
+name: krbpwd
+version: !ruby/object:Gem::Version 
+  prerelease: 
+  version: "0.2"
+platform: ruby
+authors: 
+- Stephan Toggweiler
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-07-05 00:00:00 +02:00
+default_executable: 
+dependencies: []
+
+description: "    Interface to Kerberos for change password.\n"
+email: stephan@rheoli.net
+executables: []
+
+extensions: 
+- ext/krbpwd/extconf.rb
+extra_rdoc_files: []
+
+files: 
+- krbpwd.gemspec
+- ext/krbpwd/krbpwd.c
+- ext/krbpwd/extconf.rb
+has_rdoc: true
+homepage: http://www.rheoli.net
+licenses: 
+- MIT
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.6.2
+signing_key: 
+specification_version: 3
+summary: A Ruby interface for the the Kerberos library
+test_files: []
+