<?php

// this is a php script that will be called using AJAX by an Ensemble form handler.
// when first called in an experimental session, it will generate an EchoNest
// static playlist and cache that playlist in the $_SESSION array. It will then,
// and from that point forward, return items form the playlist, until the playlist
// has been exhausted.
//
// this script assumes you've populated the $_SESSION['en_params'] and 
// $_SESSION['en_params']['playlist_params'] array locations
//
// 15 songs are selected for each cell in the following 2x2 factorial design:
// preference (preferred vs disliked), mode (major, minor). Songs are selected
// to span a range of tempi, with a mean tempo of 120bpm, and a standard deviation
// of 30bpm.
//
  //
  // this file is meant to be included in form_stimulus_php_*s.php, rather than called
  // using ajax or some other method
  //
// FB <fbarrett@ucdavis.edu> 2012.03.31

include_once('../include/ensemble_echonest_api.php');

  // debugging
  $outpath = '/home/fbarrett/data/logs/echonest_ensemble/js_meer_v2_ENplaylist_ajax.php';
  $oh = fopen($outpath,'a+');
  fwrite($oh,"\n----------------------\nDate:" . date('MdYHis') . "\n");
  fwrite($oh,"subid: {$_SESSION['subject_id']}, session: {$_SESSION['session_id']}\n");

// set parameters to store stim info in database
$pref_qid = 1101;
$pref_formid = 464;

// set params to construct this playlist
$_SESSION['stim_root'] = 'https://atonal.ucdavis.edu/ensemble/stimuli/';
$_SESSION['en_params'] = array();
$_SESSION['en_params']['api_key'] = 'QVKVLGQZD44CKT8CX';
$_SESSION['en_params']['playlist_type'] = 'static';
$_SESSION['en_params']['playlist_params'] = array();
$_SESSION['en_params']['playlist_params']['api_key'] = $_SESSION['en_params']['api_key'];
$_SESSION['en_params']['playlist_params']['format'] = 'json';
$_SESSION['en_params']['playlist_params']['type'] = 'artist-description';
$_SESSION['en_params']['playlist_params']['limit'] = 'true';
$_SESSION['en_params']['playlist_params']['bucket']['id']='CAESQRM1367E86DB88';
$_SESSION['en_params']['playlist_params']['bucket']['tracks'] = '';
//$_SESSION['en_params']['playlist_params']['variety'] = 1;
$_SESSION['en_params']['playlist_params']['results'] = 4;
//$_SESSION['en_params']['playlist_params']['description'] = array();

// if no en_playlist is set, retrieve one!
if (!isset($_SESSION['en_stimids'])) {

  $stimids = array();
  $prefout = array();
  $prefary = array(0,1);
  $modeary = array(0,1);

  // iterate over preference and mode, get sets of stimuli
  foreach ($prefary as $pref) {

    $_SESSION['en_params']['preferred'] = $pref;
    $_SESSION['en_params']['playlist_params']['style'] = get_stomp_weighted_genres($_SESSION['en_params']['preferred']);

    foreach ($modeary as $mode) {

      $_SESSION['en_params']['playlist_params']['mode'] = $mode;

      for ($tempo=0;$tempo < 2;$tempo++) {

	switch ($tempo) {
	case 0:
	  unset($_SESSION['en_params']['playlist_params']['min_tempo']);
	  $_SESSION['en_params']['playlist_params']['max_tempo'] = 120;
	case 1:
	  unset($_SESSION['en_params']['playlist_params']['max_tempo']);
	  $_SESSION['en_params']['playlist_params']['min_tempo'] = 120;
	}
	
        // get an EchoNest playlist
        $pltype = $_SESSION['en_params']['playlist_type'];
        $endata = get_echonest_data('playlist/'.$pltype,$_SESSION['en_params']['playlist_params']);

        $playlist = $endata->{'songs'};
        foreach ($playlist as $stim) {
	  array_push($stimids,$stim->{'foreign_ids'}[0]->{'foreign_id'});
	  array_push($prefout,$pref);
        } // foreach($playlist as $stim

        fwrite($oh,"pref $pref, mode $mode, tempo $tempo, " . count($playlist) . " items\n");
      } // for ($tempo=0;$tempo < 2; $tempo++
    } // foreach ($modeary as $mode

  } // foreach ($prefary as $pref

  // randomize stim presentation
  $stimorder = array();
  for ($i=0;$i<count($stimids);$i++) array_push($stimorder,$i);
  shuffle($stimorder);

  // save randomized stim id, along with pref and mode indicators
  $_SESSION['en_stimids'] = array();
  $_SESSION['en_stimpref'] = array();
  foreach ($stimorder as $item) {
    array_push($_SESSION['en_stimids'],$stimids[$item]);
    array_push($_SESSION['en_stimpref'],$prefout[$item]);
  }
 } // if (!isset($_SESSION['en_stimids

// if no songs are left, return an error
if (!count($_SESSION['en_stimids'])) {
  fwrite($oh,"no stims!?\n");
  $stimulus_id = 'end';
 } else {

  // get the next stim
  $stim = array_pop($_SESSION['en_stimids']);
  $pref = array_pop($_SESSION['en_stimpref']);
  preg_match('/.*:(\d*)/',$stim,$matches);

  // if we couldn't find the stimid, return an error
  if (!count($matches)) {
    fwrite($oh,"no matches!?\n");
    $stimulus_id = 'end';
  } else {

    // get the location of the next stim
    $sql = "SELECT location FROM stimulus WHERE stimulus_id=" . $matches[1];
    $results = mysql_query($sql);
    $nrows = mysql_num_rows($results);

    // if we couldn't find the stim in the database, return an error
    if (!$nrows) {
      fwrite($oh,"no rows!?\n");
      $stimulus_id = 'end';
    } else {
      // return the data in json format
      $stimulus_id = "{$matches[1]}";
      fwrite($oh,"stim id chosen: $stimulus_id\n");

      // save the intended preference for this stimulus
      if($_SESSION['encrypted_response_table']) {
	$enc_key = subinfo_encryption_key();
	$resp_submit = sprintf("aes_encrypt(%s,%s)",GetSQLValueString($pref,"text"),GetSQLValueString($enc_key,"text"));
      } else {
	$resp_submit = sprintf("%s",GetSQLValueString($pref,"text"));
      }

      //add this response as response_text to the query string
      $new_response_record = sprintf("(%s,%s,%s,%s,%s,%s,%s,%s,%s,%s,%s,%s,%s)",
				     GetSQLValueString($_SESSION['response_order'],"int"),
				     GetSQLValueString(date("Y-m-d H:i:s"),"date"),
				     $resp_submit, //response_text field
				     GetSQLValueString($pref_qid,"int"),
				     GetSQLValueString(1,"int"),
				     GetSQLValueString(1,"int"),
				     GetSQLValueString(1,"int"),
				     GetSQLValueString($stimulus_id,"int"),
				     GetSQLValueString($pref_formid,"int"),
				     GetSQLValueString($_SESSION['last_visited'],"int"),
				     GetSQLValueString($_SESSION['session_id'],"int"),
				     GetSQLValueString($_SESSION['subject_id'],"text"),
				     GetSQLValueString($_SESSION['experiment_id'],"int"));
      
      $query_insert_response = sprintf("INSERT INTO %s (response_order,date_time,response_text,question_id,form_question_num,question_iteration,subquestion,stimulus_id,form_id,form_order,session_id,subject_id,experiment_id) ",$_SESSION['response_table']) .
	sprintf("VALUES ".preg_replace("/%/","%%",$new_response_record).";");
      
      mysql_select_db($database_subject,$subject);
      mysql_query($query_insert_response,$subject) or die("js_meer_v2_ENplaylist_ajax:mysql error (ln 164): " . mysql_error());
      
      $_SESSION['response_order']++;
    } // if (!$nrows
  } // if (!count($matches
 } // if (!count($_SESSION['en_stimids

  fclose($oh);

?>