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;
58 if (snprintf(filename, BUFSIZ, "%s_a%d", experiment_name, a->id) >= BUFSIZ)
60 Fatal("Experiment name \"%s\" too long (>%d)", experiment_name, BUFSIZ);
63 Log(LOGDEBUG, "Actuator %d with DataFile \"%s\"", a->id, filename);
65 Data_Open(&(a->data_file), filename);
67 a->activated = true; // Don't forget this
68 a->allow_actuation = true;
70 a->control_changed = false;
73 ret = pthread_create(&(a->thread), NULL, Actuator_Loop, (void*)(a));
76 Fatal("Failed to create Actuator_Loop for Actuator %d", a->id);
81 case CONTROL_EMERGENCY: //TODO add proper case for emergency
83 a->allow_actuation = false;
86 a->allow_actuation = true;
89 a->allow_actuation = false;
91 Actuator_SetControl(a, NULL);
92 pthread_join(a->thread, NULL); // Wait for thread to exit
93 Data_Close(&(a->data_file)); // Close DataFile
96 Fatal("Unknown control mode: %d", mode);
101 * Sets all actuators to the desired mode.
102 * @see Actuator_SetMode for more information.
103 * @param mode The mode to be changed to
104 * @param arg An argument specific to the mode to be set.
106 void Actuator_SetModeAll(ControlModes mode, void * arg)
108 for (int i = 0; i < NUMACTUATORS; i++)
109 Actuator_SetMode(&g_actuators[i], mode, arg);
113 * Actuator control thread
114 * @param arg - Cast to an Actuator*
115 * @returns NULL to keep pthreads happy
117 void * Actuator_Loop(void * arg)
119 Actuator * a = (Actuator*)(arg);
121 // Loop until stopped
124 pthread_mutex_lock(&(a->mutex));
125 while (!a->control_changed)
127 pthread_cond_wait(&(a->cond), &(a->mutex));
129 a->control_changed = false;
130 pthread_mutex_unlock(&(a->mutex));
133 else if (!a->allow_actuation)
136 Actuator_SetValue(a, a->control.value);
141 // Keep pthreads happy
146 * Set an Actuators control variable
147 * @param a - Actuator to control
148 * @param c - Control to set to
150 void Actuator_SetControl(Actuator * a, ActuatorControl * c)
152 pthread_mutex_lock(&(a->mutex));
155 a->control_changed = true;
156 pthread_cond_broadcast(&(a->cond));
157 pthread_mutex_unlock(&(a->mutex));
162 * Set an Actuator value
163 * @param a - The Actuator
164 * @param value - The value to set
166 void Actuator_SetValue(Actuator * a, double value)
170 gettimeofday(&t, NULL);
172 DataPoint d = {TIMEVAL_DIFF(t, *Control_GetStartTime()), value};
178 // Onboard LEDs test actuator
179 FILE *led_handle = NULL; //code reference: http://learnbuildshare.wordpress.com/2013/05/19/beaglebone-black-controlling-user-leds-using-c/
180 const char *led_format = "/sys/class/leds/beaglebone:green:usr%d/brightness";
182 bool turn_on = value;
184 for (int i = 0; i < 4; i++)
186 snprintf(buf, 50, led_format, i);
187 if ((led_handle = fopen(buf, "w")) != NULL)
190 fwrite("1", sizeof(char), 1, led_handle);
192 fwrite("0", sizeof(char), 1, led_handle);
196 Log(LOGDEBUG, "LED fopen failed: %s", strerror(errno));
201 GPIO_Set(GPIO1_16, (bool)(value));
205 // PWM analogue actuator (currently generates one PWM signal with first PWM module)
206 static long freq = 16666666; // This is 60Hz
207 PWM_Set(EHRPWM0A, true, freq, value * freq); // Set the duty cycle
212 Log(LOGDEBUG, "Actuator %s set to %f", g_actuator_names[a->id], value);
215 Data_Save(&(a->data_file), &d, 1);
219 * Helper: Begin Actuator response in a given format
220 * @param context - the FCGIContext
221 * @param format - Format
222 * @param id - ID of Actuator
224 void Actuator_BeginResponse(FCGIContext * context, ActuatorId id, DataFormat format)
230 FCGI_BeginJSON(context, STATUS_OK);
231 FCGI_JSONLong("id", id);
232 FCGI_JSONPair("name", g_actuator_names[id]);
235 FCGI_PrintRaw("Content-type: text/plain\r\n\r\n");
241 * Helper: End Actuator response in a given format
242 * @param context - the FCGIContext
243 * @param id - ID of the Actuator
244 * @param format - Format
246 void Actuator_EndResponse(FCGIContext * context, ActuatorId id, DataFormat format)
263 * Handle a request for an Actuator
264 * @param context - FCGI context
265 * @param params - Parameters passed
267 void Actuator_Handler(FCGIContext * context, char * params)
270 gettimeofday(&now, NULL);
271 double current_time = TIMEVAL_DIFF(now, *Control_GetStartTime());
274 double start_time = 0;
275 double end_time = current_time;
279 FCGIValue values[] = {
280 {"id", &id, FCGI_REQUIRED(FCGI_INT_T)},
281 {"set", &set, FCGI_DOUBLE_T},
282 {"start_time", &start_time, FCGI_DOUBLE_T},
283 {"end_time", &end_time, FCGI_DOUBLE_T},
284 {"format", &fmt_str, FCGI_STRING_T}
287 // enum to avoid the use of magic numbers
296 // Fill values appropriately
297 if (!FCGI_ParseRequest(context, params, values, sizeof(values)/sizeof(FCGIValue)))
299 // Error occured; FCGI_RejectJSON already called
303 // Get the Actuator identified
305 if (id < 0 || id >= NUMACTUATORS)
307 FCGI_RejectJSON(context, "Invalid Actuator id");
313 DataFormat format = Data_GetFormat(&(values[FORMAT]));
316 Actuator_BeginResponse(context, id, format);
319 if (FCGI_RECEIVED(values[SET].flags))
322 FCGI_JSONDouble("set", set);
327 Actuator_SetControl(a, &c);
331 Data_Handler(&(a->data_file), &(values[START_TIME]), &(values[END_TIME]), format, current_time);
334 Actuator_EndResponse(context, id, format);