Index: mappers/references.inc
===================================================================
RCS file: mappers/references.inc
diff -N mappers/references.inc
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ mappers/references.inc	4 Dec 2010 19:24:24 -0000
@@ -0,0 +1,191 @@
+<?php
+// $Id$
+
+/**
+ * @file
+ * Mapper that handles any fields added by the References module (node_reference, user_reference)
+ *
+ * Code is effectively a port of the mapper_for_nodereference_field patch to drupal 7, and borrows
+ * heavily from the nodereference patch
+ *
+ */
+
+/**
+ * Implements hook_feeds_processor_targets_alter() for node_reference fields
+ *
+ * @see FeedsNodeProcessor::getMappingTargets().
+ *
+ */
+function node_reference_feeds_processor_targets_alter(&$targets, $entity_type, $bundle_name) {
+  foreach (field_info_instances($entity_type, $bundle_name) as $name => $instance) {
+    $info = field_info_field($name);
+    if ($info['type'] == 'node_reference') {
+
+      $targets[$name . ':title'] = array(
+        'name' => $instance['label'] . t(' (Node reference by node title)'),
+        'callback' => 'references_feeds_set_target',
+        'description' => t('The @label field of the node matched by node title.', array('@label' => $instance['label'])),
+        'real_target' => $name);
+
+      $targets[$name . ':nid'] = array(
+        'name' => $instance['label'] . t(' (Node reference by node ID)'),
+        'callback' => 'references_feeds_set_target',
+        'description' => t('The @label field of the node matched by node ID.', array('@label' => $instance['label'])),
+        'real_target' => $name);
+
+      $targets[$name . ':title:duplicates'] = array(
+        'name' => $instance['label'] . t(' (Node reference by node title) -- allow duplicate nodes'),
+        'callback' => 'references_feeds_set_target',
+        'description' => t('The @label field of the node matched by node title. This target allows duplicate nodes (nodes can appear more than once in a field).', array('@label' => $instance['label'])),
+        'real_target' => $name);
+
+      $targets[$name . ':nid:duplicates'] = array(
+        'name' => $instance['label'] . t(' (Node reference by node ID) -- allow duplicate nodes'),
+        'callback' => 'references_feeds_set_target',
+        'description' => t('The @label field of the node matched by node ID.  This target allows duplicate nodes (nodes can appear more than once in a field).', array('@label' => $instance['label'])),
+        'real_target' => $name);
+    }
+  }
+}
+/**
+ * Implements hook_feeds_processor_targets_alter() for user_reference fields
+ *
+ * @see FeedsNodeProcessor::getMappingTargets().
+ *
+ */
+function user_reference_feeds_processor_targets_alter(&$targets, $entity_type, $bundle_name) {
+  foreach (field_info_instances($entity_type, $bundle_name) as $name => $instance) {
+    $info = field_info_field($name);
+    if ($info['type'] == 'user_reference') {
+
+      $targets[$name . ':name'] = array(
+        'name' => $instance['label'] . t(' (User reference by user name)'),
+        'callback' => 'references_feeds_set_target',
+        'description' => t('The @label field of the user matched by user name. ', array('@label' => $instance['label'])),
+        'real_target' => $name);
+
+      $targets[$name . ':uid'] = array(
+        'name' => $instance['label'] . t(' (User reference by user ID)'),
+        'callback' => 'references_feeds_set_target',
+        'description' => t('The @label field of the user matched by user ID.', array('@label' => $instance['label'])),
+        'real_target' => $name);
+
+      $targets[$name . ':name:duplicates'] = array(
+        'name' => $instance['label'] . t(' (User reference by user name) -- allow duplicate users'),
+        'callback' => 'references_feeds_set_target',
+        'description' => t('The @label field of the user matched by user name.  This target allows duplicate users (users can appear more than once in a field).', array('@label' => $instance['label'])),
+        'real_target' => $name);
+
+      $targets[$name . ':uid:duplicates'] = array(
+        'name' => $instance['label'] . t(' (User reference by user ID) -- allow duplicate users'),
+        'callback' => 'references_feeds_set_target',
+        'description' => t('The @label field of the user matched by user ID.  This target allows duplicate users (users can appear more than once in a field).', array('@label' => $instance['label'])),
+        'real_target' => $name);
+    }
+  }
+}
+
+/**
+ * Callback for mapping both node reference and user_reference fields
+ *
+ * Implementation of hook_feeds_set_target().
+ *
+ * @param $source
+ *   A FeedsSource object.
+ * @param $entity
+ *   The entity to map to.
+ * @param $target
+ *   The target key on $entity to map to.
+ * @param $value
+ *   The value to map. Can be an array or a string.
+ */
+function references_feeds_set_target($source, $entity, $target, $value) {
+  if (empty($value)) {
+    return;
+  }
+
+  // Handle non-multiple values.
+  if (!is_array($value)) {
+    $value = array($value);
+  }
+
+  // Determine whether we are matching against the title/user or nid/uid, and whether duplicates are allowed.
+  list($target, $match_key, $duplicates) = explode(':', $target, 3);
+  if (empty($duplicates)) {
+    $value = array_unique($value);
+  }
+
+  // Load field definition.
+  $info = field_info_field($target);
+  // Parameters to handle differences between node references and user references
+  if ($info['type'] == 'user_reference') {
+    $idname = 'uid';
+    $typename = 'user';
+    $validate_function = '_user_reference_potential_references';
+  }
+  else {
+    $idname = 'nid';
+    $typename = 'node';
+    $validate_function = '_node_reference_potential_references';
+  }
+
+  $field = isset($entity->$target) ? $entity->$target : array();
+  if (!isset($field['und'])) {
+    $field['und'] = array();
+  }
+
+  // Match values against nodes and add to field.
+  foreach ($value as $v) {
+    $id = NULL;
+
+    switch ($match_key) {
+      case 'title':
+      case 'name':
+        // Validate node title or user name.
+        if ((is_string($v) && $v != '') || is_numeric($v)) {
+          // Lookup potential exact matches for the value (limit to one result).
+          $matches = $validate_function($info, $v, 'equals', array(), 1);
+          // Use the first element of the potential matches.
+          $id = key($matches);
+        }
+
+        // Alert if no match is found.
+        if (empty($id)) {
+          drupal_set_message(t('%title does not match an existing '.$typename, array('%title' => $v)));        }
+        break;
+
+      case 'nid':
+      case 'uid':
+        // Make sure it is a positive integer.
+        if ((is_int($v) || ctype_digit($v)) && $v > 0 && $v !== '') {
+	  // Make sure it is a valid node id or user id for this field.
+          $matches = $validate_function($info, '', NULL, array($v));
+          $id = key($matches);
+        }
+
+        // Alert if no match is found.
+        if (empty($id)) {
+          drupal_set_message(t('%id is not a valid '.$typename.' id for this field.', array('%id' => $v)));
+        }
+        break;
+    }
+
+    if (isset($id)) {
+      $reference = array($idname => $id);
+      if (!empty($duplicates)) {
+        // Add the reference, ignoring duplicates.
+        $field['und'][] = $reference;
+      }
+      else if (!in_array($reference, $field['und'])) {
+        // Add the reference only if it doesn't already exist.
+        $field['und'][] = $reference;
+      }
+     
+      if ($info['cardinality'] == 1) {
+        break;
+      }
+    }
+  }
+  $entity->{$target} = $field;
+}
+