3 * @brief Implementation of Actuator related functionality
8 // Files containing GPIO and PWM definitions
12 /** Array of Actuators (global to this file) initialised by Actuator_Init **/
13 static Actuator g_actuators[NUMACTUATORS];
15 /** Human readable names for the Actuators **/
16 const char * g_actuator_names[NUMACTUATORS] = {
17 "actuator_test0", "gpio1_16", "EHRPWM0A_duty@60Hz"
21 * One off initialisation of *all* Actuators
25 for (int i = 0; i < NUMACTUATORS; ++i)
27 g_actuators[i].id = i;
28 Data_Init(&(g_actuators[i].data_file));
29 pthread_mutex_init(&(g_actuators[i].mutex), NULL);
32 // Initialise pins used
33 GPIO_Export(GPIO1_16);
40 * Sets the actuator to the desired mode. No checks are
41 * done to see if setting to the desired mode will conflict with
42 * the current mode - the caller must guarantee this itself.
43 * @param a The actuator whose mode is to be changed
44 * @param mode The mode to be changed to
45 * @param arg An argument specific to the mode to be set.
46 * e.g for CONTROL_START it represents the experiment name.
48 void Actuator_SetMode(Actuator * a, ControlModes mode, void *arg)
54 char filename[BUFSIZ];
55 const char *experiment_name = (const char*) arg;
57 if (snprintf(filename, BUFSIZ, "%s_a%d", experiment_name, a->id) >= BUFSIZ)
59 Fatal("Experiment name \"%s\" too long (>%d)", experiment_name, BUFSIZ);
62 Log(LOGDEBUG, "Actuator %d with DataFile \"%s\"", a->id, filename);
64 Data_Open(&(a->data_file), filename);
66 case CONTROL_RESUME: //Case fallthrough; no break before
69 a->activated = true; // Don't forget this
70 a->control_changed = false;
72 ret = pthread_create(&(a->thread), NULL, Actuator_Loop, (void*)(a));
75 Fatal("Failed to create Actuator_Loop for Actuator %d", a->id);
78 Log(LOGDEBUG, "Resuming actuator %d", a->id);
82 case CONTROL_EMERGENCY: //TODO add proper case for emergency
85 Actuator_SetControl(a, NULL);
86 pthread_join(a->thread, NULL); // Wait for thread to exit
88 Log(LOGDEBUG, "Paused actuator %d", a->id);
93 if (a->activated) //May have been paused before
96 Actuator_SetControl(a, NULL);
97 pthread_join(a->thread, NULL); // Wait for thread to exit
99 Data_Close(&(a->data_file)); // Close DataFile
101 Log(LOGDEBUG, "Stopped actuator %d", a->id);
104 Fatal("Unknown control mode: %d", mode);
109 * Sets all actuators to the desired mode.
110 * @see Actuator_SetMode for more information.
111 * @param mode The mode to be changed to
112 * @param arg An argument specific to the mode to be set.
114 void Actuator_SetModeAll(ControlModes mode, void * arg)
116 for (int i = 0; i < NUMACTUATORS; i++)
117 Actuator_SetMode(&g_actuators[i], mode, arg);
121 * Actuator control thread
122 * @param arg - Cast to an Actuator*
123 * @returns NULL to keep pthreads happy
125 void * Actuator_Loop(void * arg)
127 Actuator * a = (Actuator*)(arg);
129 // Loop until stopped
132 pthread_mutex_lock(&(a->mutex));
133 while (!a->control_changed)
135 pthread_cond_wait(&(a->cond), &(a->mutex));
137 a->control_changed = false;
138 pthread_mutex_unlock(&(a->mutex));
142 Actuator_SetValue(a, a->control.value);
147 // Keep pthreads happy
152 * Set an Actuators control variable
153 * @param a - Actuator to control
154 * @param c - Control to set to
156 void Actuator_SetControl(Actuator * a, ActuatorControl * c)
158 pthread_mutex_lock(&(a->mutex));
161 a->control_changed = true;
162 pthread_cond_broadcast(&(a->cond));
163 pthread_mutex_unlock(&(a->mutex));
168 * Set an Actuator value
169 * @param a - The Actuator
170 * @param value - The value to set
172 void Actuator_SetValue(Actuator * a, double value)
176 gettimeofday(&t, NULL);
178 DataPoint d = {TIMEVAL_DIFF(t, *Control_GetStartTime()), value};
184 // Onboard LEDs test actuator
185 FILE *led_handle = NULL; //code reference: http://learnbuildshare.wordpress.com/2013/05/19/beaglebone-black-controlling-user-leds-using-c/
186 const char *led_format = "/sys/class/leds/beaglebone:green:usr%d/brightness";
188 bool turn_on = value;
190 for (int i = 0; i < 4; i++)
192 snprintf(buf, 50, led_format, i);
193 if ((led_handle = fopen(buf, "w")) != NULL)
196 fwrite("1", sizeof(char), 1, led_handle);
198 fwrite("0", sizeof(char), 1, led_handle);
202 Log(LOGDEBUG, "LED fopen failed: %s", strerror(errno));
207 GPIO_Set(GPIO1_16, (bool)(value));
211 // PWM analogue actuator (currently generates one PWM signal with first PWM module)
212 static long freq = 16666666; // This is 60Hz
213 PWM_Set(EHRPWM0A, true, freq, value * freq); // Set the duty cycle
218 Log(LOGDEBUG, "Actuator %s set to %f", g_actuator_names[a->id], value);
221 Data_Save(&(a->data_file), &d, 1);
225 * Helper: Begin Actuator response in a given format
226 * @param context - the FCGIContext
227 * @param format - Format
228 * @param id - ID of Actuator
230 void Actuator_BeginResponse(FCGIContext * context, ActuatorId id, DataFormat format)
236 FCGI_BeginJSON(context, STATUS_OK);
237 FCGI_JSONLong("id", id);
238 FCGI_JSONPair("name", g_actuator_names[id]);
241 FCGI_PrintRaw("Content-type: text/plain\r\n\r\n");
247 * Helper: End Actuator response in a given format
248 * @param context - the FCGIContext
249 * @param id - ID of the Actuator
250 * @param format - Format
252 void Actuator_EndResponse(FCGIContext * context, ActuatorId id, DataFormat format)
267 * Handle a request for an Actuator
268 * @param context - FCGI context
269 * @param params - Parameters passed
271 void Actuator_Handler(FCGIContext * context, char * params)
274 gettimeofday(&now, NULL);
275 double current_time = TIMEVAL_DIFF(now, *Control_GetStartTime());
278 double start_time = 0;
279 double end_time = current_time;
283 FCGIValue values[] = {
284 {"id", &id, FCGI_REQUIRED(FCGI_INT_T)},
285 {"set", &set, FCGI_DOUBLE_T},
286 {"start_time", &start_time, FCGI_DOUBLE_T},
287 {"end_time", &end_time, FCGI_DOUBLE_T},
288 {"format", &fmt_str, FCGI_STRING_T}
291 // enum to avoid the use of magic numbers
300 // Fill values appropriately
301 if (!FCGI_ParseRequest(context, params, values, sizeof(values)/sizeof(FCGIValue)))
303 // Error occured; FCGI_RejectJSON already called
307 // Get the Actuator identified
309 if (id < 0 || id >= NUMACTUATORS)
311 FCGI_RejectJSON(context, "Invalid Actuator id");
317 DataFormat format = Data_GetFormat(&(values[FORMAT]));
320 Actuator_BeginResponse(context, id, format);
323 if (FCGI_RECEIVED(values[SET].flags))
326 FCGI_JSONDouble("set", set);
331 Actuator_SetControl(a, &c);
335 Data_Handler(&(a->data_file), &(values[START_TIME]), &(values[END_TIME]), format, current_time);
338 Actuator_EndResponse(context, id, format);