bonekit 0.0.2-arm-linux → 0.0.3-arm-linux

data/ext/bonekit/beaglebone_global_const.c

@@ -28,105 +28,135 @@
 
 #include "beaglebone_global_const.h"
 
-#include "ruby.h"
-#include "beaglebone.h"
+VALUE cBoneKit_BeaglebonePin;
+
+int Beaglebone_global_const_check_type(VALUE self)
+{
+  return rb_obj_is_kind_of(self, cBoneKit_BeaglebonePin);
+}
+
+beaglebone_t * Beaglebone_global_const_to_beaglebone_t(VALUE self)
+{
+  beaglebone_t * ptr;
+  Data_Get_Struct(self, beaglebone_t, ptr);
+  return ptr;
+}
+
+static void Beaglebone_global_const_free(void * ptr)
+{
+  if(ptr == NULL)
+      return;
+  
+  free(ptr);
+}
+
+static VALUE Beaglebone_global_const_new(VALUE class, beaglebone_t beaglebone_pin)
+{
+  beaglebone_t * ptr = calloc(1, sizeof(beaglebone_t));
+  memcpy(ptr, &beaglebone_pin, sizeof(beaglebone_t));
+  
+  VALUE self = Data_Wrap_Struct(class, 0, Beaglebone_global_const_free, ptr);
+  return self;
+}
 
 void BoneKit_Beaglebone_global_const_init()
 {  
-  rb_define_global_const("USR0", INT2NUM(USR0));
-  rb_define_global_const("USR1", INT2NUM(USR1));
-  rb_define_global_const("USR2", INT2NUM(USR2));
-  rb_define_global_const("USR3", INT2NUM(USR3));
-  rb_define_global_const("P8_1", INT2NUM(P8_1));
-  rb_define_global_const("P8_2", INT2NUM(P8_2));
-  rb_define_global_const("P8_3", INT2NUM(P8_3));
-  rb_define_global_const("P8_4", INT2NUM(P8_4));
-  rb_define_global_const("P8_5", INT2NUM(P8_5));
-  rb_define_global_const("P8_6", INT2NUM(P8_6));
-  rb_define_global_const("P8_7", INT2NUM(P8_7));
-  rb_define_global_const("P8_8", INT2NUM(P8_8));
-  rb_define_global_const("P8_9", INT2NUM(P8_9));
-  rb_define_global_const("P8_10", INT2NUM(P8_10));
-  rb_define_global_const("P8_11", INT2NUM(P8_11));
-  rb_define_global_const("P8_12", INT2NUM(P8_12));
-  rb_define_global_const("P8_13", INT2NUM(P8_13));
-  rb_define_global_const("P8_14", INT2NUM(P8_14));
-  rb_define_global_const("P8_15", INT2NUM(P8_15));
-  rb_define_global_const("P8_16", INT2NUM(P8_16));
-  rb_define_global_const("P8_17", INT2NUM(P8_17));
-  rb_define_global_const("P8_18", INT2NUM(P8_18));
-  rb_define_global_const("P8_19", INT2NUM(P8_19));
-  rb_define_global_const("P8_20", INT2NUM(P8_20));
-  rb_define_global_const("P8_21", INT2NUM(P8_21));
-  rb_define_global_const("P8_22", INT2NUM(P8_22));
-  rb_define_global_const("P8_23", INT2NUM(P8_23));
-  rb_define_global_const("P8_24", INT2NUM(P8_24));
-  rb_define_global_const("P8_25", INT2NUM(P8_25));
-  rb_define_global_const("P8_26", INT2NUM(P8_26));
-  rb_define_global_const("P8_27", INT2NUM(P8_27));
-  rb_define_global_const("P8_28", INT2NUM(P8_28));
-  rb_define_global_const("P8_29", INT2NUM(P8_29));
-  rb_define_global_const("P8_30", INT2NUM(P8_30));
-  rb_define_global_const("P8_31", INT2NUM(P8_31));
-  rb_define_global_const("P8_32", INT2NUM(P8_32));
-  rb_define_global_const("P8_33", INT2NUM(P8_33));
-  rb_define_global_const("P8_34", INT2NUM(P8_34));
-  rb_define_global_const("P8_35", INT2NUM(P8_35));
-  rb_define_global_const("P8_36", INT2NUM(P8_36));
-  rb_define_global_const("P8_37", INT2NUM(P8_37));
-  rb_define_global_const("P8_38", INT2NUM(P8_38));
-  rb_define_global_const("P8_39", INT2NUM(P8_39));
-  rb_define_global_const("P8_40", INT2NUM(P8_40));
-  rb_define_global_const("P8_41", INT2NUM(P8_41));
-  rb_define_global_const("P8_42", INT2NUM(P8_42));
-  rb_define_global_const("P8_43", INT2NUM(P8_43));
-  rb_define_global_const("P8_44", INT2NUM(P8_44));
-  rb_define_global_const("P8_45", INT2NUM(P8_45));
-  rb_define_global_const("P8_46", INT2NUM(P8_46));
-  rb_define_global_const("P9_1", INT2NUM(P9_1));
-  rb_define_global_const("P9_2", INT2NUM(P9_2));
-  rb_define_global_const("P9_3", INT2NUM(P9_3));
-  rb_define_global_const("P9_4", INT2NUM(P9_4));
-  rb_define_global_const("P9_5", INT2NUM(P9_5));
-  rb_define_global_const("P9_6", INT2NUM(P9_6));
-  rb_define_global_const("P9_7", INT2NUM(P9_7));
-  rb_define_global_const("P9_8", INT2NUM(P9_8));
-  rb_define_global_const("P9_9", INT2NUM(P9_9));
-  rb_define_global_const("P9_10", INT2NUM(P9_10));
-  rb_define_global_const("P9_11", INT2NUM(P9_11));
-  rb_define_global_const("P9_12", INT2NUM(P9_12));
-  rb_define_global_const("P9_13", INT2NUM(P9_13));
-  rb_define_global_const("P9_14", INT2NUM(P9_14));
-  rb_define_global_const("P9_15", INT2NUM(P9_15));
-  rb_define_global_const("P9_16", INT2NUM(P9_16));
-  rb_define_global_const("P9_17", INT2NUM(P9_17));
-  rb_define_global_const("P9_18", INT2NUM(P9_18));
-  rb_define_global_const("P9_19", INT2NUM(P9_19));
-  rb_define_global_const("P9_20", INT2NUM(P9_20));
-  rb_define_global_const("P9_21", INT2NUM(P9_21));
-  rb_define_global_const("P9_22", INT2NUM(P9_22));
-  rb_define_global_const("P9_23", INT2NUM(P9_23));
-  rb_define_global_const("P9_24", INT2NUM(P9_24));
-  rb_define_global_const("P9_25", INT2NUM(P9_25));
-  rb_define_global_const("P9_26", INT2NUM(P9_26));
-  rb_define_global_const("P9_27", INT2NUM(P9_27));
-  rb_define_global_const("P9_28", INT2NUM(P9_28));
-  rb_define_global_const("P9_29", INT2NUM(P9_29));
-  rb_define_global_const("P9_30", INT2NUM(P9_30));
-  rb_define_global_const("P9_31", INT2NUM(P9_31));
-  rb_define_global_const("P9_32", INT2NUM(P9_32));
-  rb_define_global_const("P9_33", INT2NUM(P9_33));
-  rb_define_global_const("P9_34", INT2NUM(P9_34));
-  rb_define_global_const("P9_35", INT2NUM(P9_35));
-  rb_define_global_const("P9_36", INT2NUM(P9_36));
-  rb_define_global_const("P9_37", INT2NUM(P9_37));
-  rb_define_global_const("P9_38", INT2NUM(P9_38));
-  rb_define_global_const("P9_39", INT2NUM(P9_39));
-  rb_define_global_const("P9_40", INT2NUM(P9_40));
-  rb_define_global_const("P9_41", INT2NUM(P9_41));
-  rb_define_global_const("P9_42", INT2NUM(P9_42));
-  rb_define_global_const("P9_43", INT2NUM(P9_43));
-  rb_define_global_const("P9_44", INT2NUM(P9_44));
-  rb_define_global_const("P9_45", INT2NUM(P9_45));
-  rb_define_global_const("P9_46", INT2NUM(P9_46));
+  cBoneKit_BeaglebonePin = rb_define_class("BeaglebonePin", rb_cObject);
+  
+  rb_define_global_const("USR0", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, USR0));
+  rb_define_global_const("USR1", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, USR1));
+  rb_define_global_const("USR2", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, USR2));
+  rb_define_global_const("USR3", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, USR3));
+  rb_define_global_const("P8_1", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_1));
+  rb_define_global_const("P8_2", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_2));
+  rb_define_global_const("P8_3", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_3));
+  rb_define_global_const("P8_4", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_4));
+  rb_define_global_const("P8_5", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_5));
+  rb_define_global_const("P8_6", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_6));
+  rb_define_global_const("P8_7", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_7));
+  rb_define_global_const("P8_8", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_8));
+  rb_define_global_const("P8_9", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_9));
+  rb_define_global_const("P8_10", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_10));
+  rb_define_global_const("P8_11", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_11));
+  rb_define_global_const("P8_12", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_12));
+  rb_define_global_const("P8_13", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_13));
+  rb_define_global_const("P8_14", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_14));
+  rb_define_global_const("P8_15", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_15));
+  rb_define_global_const("P8_16", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_16));
+  rb_define_global_const("P8_17", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_17));
+  rb_define_global_const("P8_18", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_18));
+  rb_define_global_const("P8_19", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_19));
+  rb_define_global_const("P8_20", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_20));
+  rb_define_global_const("P8_21", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_21));
+  rb_define_global_const("P8_22", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_22));
+  rb_define_global_const("P8_23", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_23));
+  rb_define_global_const("P8_24", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_24));
+  rb_define_global_const("P8_25", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_25));
+  rb_define_global_const("P8_26", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_26));
+  rb_define_global_const("P8_27", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_27));
+  rb_define_global_const("P8_28", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_28));
+  rb_define_global_const("P8_29", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_29));
+  rb_define_global_const("P8_30", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_30));
+  rb_define_global_const("P8_31", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_31));
+  rb_define_global_const("P8_32", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_32));
+  rb_define_global_const("P8_33", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_33));
+  rb_define_global_const("P8_34", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_34));
+  rb_define_global_const("P8_35", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_35));
+  rb_define_global_const("P8_36", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_36));
+  rb_define_global_const("P8_37", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_37));
+  rb_define_global_const("P8_38", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_38));
+  rb_define_global_const("P8_39", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_39));
+  rb_define_global_const("P8_40", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_40));
+  rb_define_global_const("P8_41", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_41));
+  rb_define_global_const("P8_42", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_42));
+  rb_define_global_const("P8_43", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_43));
+  rb_define_global_const("P8_44", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_44));
+  rb_define_global_const("P8_45", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_45));
+  rb_define_global_const("P8_46", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P8_46));
+  rb_define_global_const("P9_1", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_1));
+  rb_define_global_const("P9_2", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_2));
+  rb_define_global_const("P9_3", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_3));
+  rb_define_global_const("P9_4", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_4));
+  rb_define_global_const("P9_5", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_5));
+  rb_define_global_const("P9_6", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_6));
+  rb_define_global_const("P9_7", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_7));
+  rb_define_global_const("P9_8", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_8));
+  rb_define_global_const("P9_9", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_9));
+  rb_define_global_const("P9_10", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_10));
+  rb_define_global_const("P9_11", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_11));
+  rb_define_global_const("P9_12", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_12));
+  rb_define_global_const("P9_13", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_13));
+  rb_define_global_const("P9_14", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_14));
+  rb_define_global_const("P9_15", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_15));
+  rb_define_global_const("P9_16", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_16));
+  rb_define_global_const("P9_17", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_17));
+  rb_define_global_const("P9_18", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_18));
+  rb_define_global_const("P9_19", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_19));
+  rb_define_global_const("P9_20", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_20));
+  rb_define_global_const("P9_21", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_21));
+  rb_define_global_const("P9_22", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_22));
+  rb_define_global_const("P9_23", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_23));
+  rb_define_global_const("P9_24", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_24));
+  rb_define_global_const("P9_25", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_25));
+  rb_define_global_const("P9_26", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_26));
+  rb_define_global_const("P9_27", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_27));
+  rb_define_global_const("P9_28", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_28));
+  rb_define_global_const("P9_29", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_29));
+  rb_define_global_const("P9_30", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_30));
+  rb_define_global_const("P9_31", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_31));
+  rb_define_global_const("P9_32", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_32));
+  rb_define_global_const("P9_33", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_33));
+  rb_define_global_const("P9_34", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_34));
+  rb_define_global_const("P9_35", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_35));
+  rb_define_global_const("P9_36", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_36));
+  rb_define_global_const("P9_37", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_37));
+  rb_define_global_const("P9_38", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_38));
+  rb_define_global_const("P9_39", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_39));
+  rb_define_global_const("P9_40", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_40));
+  rb_define_global_const("P9_41", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_41));
+  rb_define_global_const("P9_42", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_42));
+  rb_define_global_const("P9_43", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_43));
+  rb_define_global_const("P9_44", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_44));
+  rb_define_global_const("P9_45", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_45));
+  rb_define_global_const("P9_46", Beaglebone_global_const_new(cBoneKit_BeaglebonePin, P9_46));
 }

data/ext/bonekit/beaglebone_global_const.h

@@ -28,6 +28,12 @@
 #ifndef BONEKIT_BEAGLEBONE_GLOBAL_CONST_H__
 #define BONEKIT_BEAGLEBONE_GLOBAL_CONST_H__
 
+#include "ruby.h"
+#include "beaglebone.h"
+
+int Beaglebone_global_const_check_type(VALUE);
+beaglebone_t * Beaglebone_global_const_to_beaglebone_t(VALUE);
+
 void BoneKit_Beaglebone_global_const_init();
 
 #endif

data/ext/bonekit/gpio.c

@@ -26,6 +26,7 @@
 */
 
 #include "gpio.h"
+#include "beaglebone.h"
 
 #include <stdio.h>
 #include <stdlib.h>

data/ext/bonekit/gpio.h

@@ -32,12 +32,6 @@
 extern "C" {
 #endif
   
-#define INPUT  0
-#define OUTPUT 1
-
-#define HIGH 1
-#define LOW  0
-  
 #define GPIO_DIR "/sys/class/gpio"
 #define GPIO_LEN 64
 

data/ext/bonekit/pin.c

@@ -29,8 +29,10 @@
 
 #include "gpio.h"
 #include "adc.h"
+#include "pwm.h"
 
 #include <stdlib.h>
+#include <string.h>
 
 pin_t * pin_alloc()
 {
@@ -39,24 +41,31 @@ pin_t * pin_alloc()
   return obj;
 }
 
-int pin_init(pin_t * obj, unsigned int beaglebone_global_const)
+int pin_init(pin_t * obj, beaglebone_t beaglebone_pin)
 {
   if(obj)
   {
-    int gpio = beaglebone_gpio(beaglebone_global_const);
-    int ain = beaglebone_ain(beaglebone_global_const);
+    int gpio = beaglebone_gpio(beaglebone_pin);
+    int ain = beaglebone_ain(beaglebone_pin);
+    int pwm_mux_mode = beaglebone_pwm_mux_mode(beaglebone_pin);
     
     int is_ain = (ain != -1);
     int is_gpio = (gpio != -1);
+    int can_pwm = (pwm_mux_mode != -1);
     
     if(!(is_ain || is_gpio)) // invalid pin
       return -1;
     
+    memcpy(&(obj->_bp), &beaglebone_pin, sizeof(beaglebone_t));
+    
     obj->_ain = ain;
     obj->_is_ain = is_ain;
     obj->_gpio = gpio;
     obj->_is_gpio = is_gpio;
     
+    obj->_can_pwm = can_pwm; 
+    obj->_pwm_key = NULL; // lazy pwm export (first call to set_analog_value)
+    
     if(is_gpio)
       gpio_export(gpio);
     else if(is_ain)
@@ -71,6 +80,9 @@ void pin_destroy(pin_t * obj)
   if(obj->_is_gpio)
     gpio_unexport(obj->_gpio);
   
+  if(obj->_pwm_key != NULL)
+    pwm_unexport(obj->_pwm_key);
+  
   free(obj);
 }
 
@@ -92,7 +104,13 @@ int pin_value(pin_t * obj)
 {
   int value = 0;
   
-  if(obj->_is_gpio)
+  if(obj->_pwm_key != NULL)
+  {
+    double analog_value;
+    pwm_get_duty_cycle(obj->_pwm_key, &analog_value);
+    value = (int)analog_value;
+  }
+  else if(obj->_is_gpio)
   {
     gpio_get_value(obj->_gpio, &value);
   }
@@ -106,28 +124,52 @@ int pin_value(pin_t * obj)
   return value;
 }
 
-float pin_analog_value(pin_t * obj)
+double pin_analog_value(pin_t * obj)
 {
-  float analog_value = 0.0;
-  
-  if(obj->_is_gpio)
+  double analog_value = 0.0;
+
+  if(obj->_pwm_key != NULL)
+  {
+    pwm_get_duty_cycle(obj->_pwm_key, &analog_value);
+  }
+  else if(obj->_is_gpio)
   {
     int value;
     gpio_get_value(obj->_gpio, &value);
-    analog_value = (float)value;
+    analog_value = (double)value;
   }
   else if(obj->_is_ain)
   {
     int analog_value_raw; // [ADC_MIN_VALUE..ADC_MAX_VALUE]
     adc_get_value(obj->_ain, &analog_value_raw);
-    analog_value = (float)(((float)analog_value_raw)/((float)ADC_MAX_VALUE));
+    analog_value = (double)(((double)analog_value_raw)/((double)ADC_MAX_VALUE));
   }
-  
+    
   return analog_value;
 }
 
 void pin_set_value(pin_t * obj, int value)
 {
-  if(obj->_is_gpio)
+  if(obj->_pwm_key != NULL)
+    pwm_set_duty_cycle(obj->_pwm_key, (double)value);
+  else if(obj->_is_gpio)
     gpio_set_value(obj->_gpio, value);
 }
+
+void pin_set_analog_value(pin_t * obj, double value)
+{
+  if(obj->_can_pwm)
+  {
+    if(obj->_pwm_key == NULL)
+    {
+      char pin_name[PIN_NAME_LEN];
+      beaglebone_pin_name(obj->_bp, pin_name); // retrieve pin name ie. P9_42
+      pwm_export(pin_name, &obj->_pwm_key); // retrieve pin pwm key
+    }
+  }
+  
+  if(obj->_pwm_key != NULL)
+    pwm_set_duty_cycle(obj->_pwm_key, value);
+  else if(obj->_is_gpio)
+    gpio_set_value(obj->_gpio, (int)value);
+}

data/ext/bonekit/pin.h

@@ -31,25 +31,32 @@
 #ifdef __cplusplus
 extern "C" {
 #endif
+  
+#include "beaglebone.h"
 
 struct pin_s
 {
+  beaglebone_t _bp;
+
   int _is_ain;
   unsigned _ain;
   int _is_gpio;
   unsigned _gpio;
+  int _can_pwm;
+  char * _pwm_key;
 };
 
 typedef struct pin_s pin_t;
 
 pin_t * pin_alloc();
-int pin_init(pin_t *, unsigned int);
+int pin_init(pin_t *, beaglebone_t);
 void pin_destroy(pin_t *);
 int pin_mode(pin_t *);
 void pin_set_mode(pin_t *, int);
 int pin_value(pin_t *);
-float pin_analog_value(pin_t *);
+double pin_analog_value(pin_t *);
 void pin_set_value(pin_t *, int);
+void pin_set_analog_value(pin_t *, double);
 
 #ifdef __cplusplus
 }

data/ext/bonekit/pin_class.c

@@ -29,7 +29,8 @@
 #include "pin_class.h"
 
 #include "ruby.h"
-#include "gpio.h"
+
+#include "beaglebone.h"
 #include "pin.h"
 
 VALUE cBoneKit_Pin;
@@ -66,7 +67,14 @@ static VALUE Pin_initialize(int argc, VALUE* argv, VALUE self)
   pin_t * ptr;
   Data_Get_Struct(self, pin_t, ptr);
   
-  if(pin_init(ptr, NUM2UINT(argv[0])) < 0) // pin must support gpio
+  if(Beaglebone_global_const_check_type(argv[0]) == 0)
+    rb_raise(rb_eArgError, "wrong pin argument type Fixnum (expected BeaglebonePin)");
+  
+  beaglebone_t * bp_ptr = (beaglebone_t *)Beaglebone_global_const_to_beaglebone_t(argv[0]);
+  beaglebone_t bp;
+  memcpy(&bp, bp_ptr, sizeof(beaglebone_t));
+  
+  if(pin_init(ptr, bp) < 0) // pin must support gpio, ain, pwm
     rb_raise(rb_eArgError, "invalid pin (%d GPIO not supported)", NUM2UINT(argv[0]));
   
   int mode = INPUT;
@@ -98,7 +106,9 @@ static VALUE Pin_value(VALUE self)
  *  analog_value -> float
  *
  * Reads the analog value from the pin. The range of values is [0.0..1.0].
- * NOTE: If the pin doesn't support ADC, analog_value is the floating point equivalent of value.
+ * NOTE: 
+ * If the pin doesn't support ADC, analog_value is the floating point equivalent of value.
+ * If the pin has been previously used to set analog values (PWM) its returns the last analog value set.
  */
 static VALUE Pin_analog_value(VALUE self)
 {
@@ -108,7 +118,6 @@ static VALUE Pin_analog_value(VALUE self)
   return rb_float_new(pin_analog_value(ptr));
 }
 
-
 /*
  * call-seq:
  *  value=(value) -> integer
@@ -125,6 +134,22 @@ static VALUE Pin_set_value(VALUE self, VALUE value)
   return value;
 }
 
+/*
+ * call-seq:
+ *  analog_value=(value) -> float
+ *
+ * Write the analog value to the pin. The pin must support Pulse-Width Modulation (PWM).
+ * Possible values: 0.0 to 1.0
+ */
+static VALUE Pin_set_analog_value(VALUE self, VALUE value)
+{
+  pin_t * ptr;
+  Data_Get_Struct(self, pin_t, ptr);
+  pin_set_analog_value(ptr, NUM2DBL(value));
+  
+  return value;
+}
+
 /*
  * call-seq:
  *  mode -> integer
@@ -165,6 +190,7 @@ void BoneKit_Pin_class_init()
   rb_define_method(cBoneKit_Pin, "value", Pin_value, 0);
   rb_define_method(cBoneKit_Pin, "analog_value", Pin_analog_value, 0);
   rb_define_method(cBoneKit_Pin, "value=", Pin_set_value, 1);
+  rb_define_method(cBoneKit_Pin, "analog_value=", Pin_set_analog_value, 1);
   rb_define_method(cBoneKit_Pin, "mode", Pin_mode, 0);
   rb_define_method(cBoneKit_Pin, "mode=", Pin_set_mode, 1);