First Extras-Testing Candidate Release
[pierogi] / protocols / pirprotocol.cpp
1 #include "pirprotocol.h"
2
3 #include <QMutex>
4 #include <QMetaType>
5
6 #include <time.h>
7 #include <sstream>
8 #include <errno.h>
9 #include "pirexception.h"
10
11 // A flag for communicating with the main thread:
12 extern bool stopRepeatingFlag;
13 extern QMutex stopRepeatingMutex;
14
15 // Total of all running commands
16 extern bool commandInFlight;
17 extern QMutex commandIFMutex;
18
19 // From what I understand (mostly from reading LIRC config files), NEC
20 // protocol based remotes mostly use a frequency of 38000 units and a
21 // duty cycle of 50%.  They'll be set to these defaults here, and overridden
22 // as needed by child classes.
23
24 PIRProtocol::PIRProtocol(
25   QObject *guiObject,
26   unsigned int index,
27   unsigned int gSpace,
28   bool iclflag)
29   : carrierFrequency(38000),
30     dutyCycle(50),
31     isConstantLength(iclflag),
32     gap(gSpace),
33     minimumRepetitions(0),
34     id(index)
35 {
36   qRegisterMetaType<PIRKeyName>("PIRKeyName");
37
38   QObject::connect(
39     guiObject,
40     SIGNAL(buttonPressed(unsigned int, PIRKeyName)),
41     this,
42     SLOT(startSendingCommand(unsigned int, PIRKeyName)),
43     Qt::QueuedConnection);
44
45   QObject::connect(
46     this,
47     SIGNAL(commandFailed(const char *)),
48     guiObject,
49     SLOT(receivedExternalWarning(const char *)),
50     Qt::QueuedConnection);
51 }
52
53
54 void PIRProtocol::addKey(
55   PIRKeyName key,
56   unsigned long command,
57   unsigned int size)
58 {
59   // First, if key already exists, clear it out:
60   PIRKeyBits *pkb = 0;
61   KeycodeCollection::iterator i = keycodes.find(key);
62   if (i != keycodes.end())
63   {
64     pkb = &(i->second);
65     pkb->firstCode.clear();
66   }
67   else
68   {
69     pkb = &(keycodes[key]);
70   }
71
72   appendToBitSeq(pkb->firstCode, command, size);
73 }
74
75
76 void PIRProtocol::addSIRCKey(
77   PIRKeyName key,
78   unsigned int addressData,
79   unsigned int size,
80   unsigned int commandData)
81 {
82   // First, if key already exists, clear it out:
83   PIRKeyBits *pkb = 0;
84   KeycodeCollection::iterator i = keycodes.find(key);
85   if (i != keycodes.end())
86   {
87     pkb = &(i->second);
88     pkb->firstCode.clear();
89     pkb->secondCode.clear();
90     pkb->thirdCode.clear();
91   }
92   else
93   {
94     pkb = &(keycodes[key]);
95   }
96
97   // First, append the address data:
98   appendToBitSeq(pkb->firstCode, addressData, size);
99
100   // Next, the command data.  The size is always 7 bits:
101   appendToBitSeq(pkb->secondCode, commandData, 7);
102 }
103
104
105 void PIRProtocol::addSIRC20Key(
106   PIRKeyName key,
107   unsigned int secondaryAddressData,
108   unsigned int primaryAddressData,
109   unsigned int commandData)
110 {
111   // First, if key already exists, clear it out:
112   PIRKeyBits *pkb = 0;
113   KeycodeCollection::iterator i = keycodes.find(key);
114   if (i != keycodes.end())
115   {
116     pkb = &(i->second);
117     pkb->firstCode.clear();
118     pkb->secondCode.clear();
119     pkb->thirdCode.clear();
120   }
121   else
122   {
123     pkb = &(keycodes[key]);
124   }
125
126   // First, append the secondary address data:
127   appendToBitSeq(pkb->firstCode, secondaryAddressData, 8);
128
129   // Next, the primary address data:
130   appendToBitSeq(pkb->secondCode, primaryAddressData, 5);
131
132   // Next, the command data.  The size is always 7 bits:
133   appendToBitSeq(pkb->thirdCode, commandData, 7);
134 }
135
136
137 void PIRProtocol::addSharpKey(
138   PIRKeyName key,
139   unsigned int addressData,
140   unsigned int commandData)
141 {
142   // First, if key already exists, clear it out:
143   PIRKeyBits *pkb = 0;
144   KeycodeCollection::iterator i = keycodes.find(key);
145   if (i != keycodes.end())
146   {
147     pkb = &(i->second);
148     pkb->firstCode.clear();
149     pkb->secondCode.clear();
150   }
151   else
152   {
153     pkb = &(keycodes[key]);
154   }
155
156   // Sharp commands are all 5 bit address, 8 bit command:
157   appendToBitSeq(pkb->firstCode, addressData, 5);
158   appendToBitSeq(pkb->secondCode, commandData, 8);
159 }
160
161
162 void PIRProtocol::addNECKey(
163   PIRKeyName key,
164   unsigned int addressData,
165   unsigned int commandData)
166 {
167   PIRKeyBits *pkb = 0;
168   KeycodeCollection::iterator i = keycodes.find(key);
169   if (i != keycodes.end())
170   {
171     pkb = &(i->second);
172     pkb->firstCode.clear();
173     pkb->secondCode.clear();
174     pkb->thirdCode.clear();
175     pkb->fourthCode.clear();
176   }
177   else
178   {
179     pkb = &(keycodes[key]);
180   }
181
182   // NEC commands should always be 8 bits address, 8 bits command:
183   appendToBitSeq(pkb->firstCode, addressData, 8);
184   appendToBitSeq(pkb->secondCode, commandData, 8);
185 }
186
187
188 // Most Pioneer keys use the NEC key format, but some are pairs of
189 // NEC keys sent together:
190 void PIRProtocol::addPioneerKey(
191   PIRKeyName key,
192   unsigned int firstAddress,
193   unsigned int firstCommand,
194   unsigned int secondAddress,
195   unsigned int secondCommand)
196 {
197   PIRKeyBits *pkb = 0;
198   KeycodeCollection::iterator i = keycodes.find(key);
199   if (i != keycodes.end())
200   {
201     pkb = &(i->second);
202     pkb->firstCode.clear();
203     pkb->secondCode.clear();
204     pkb->thirdCode.clear();
205     pkb->fourthCode.clear();
206   }
207   else
208   {
209     pkb = &(keycodes[key]);
210   }
211
212   // All four codes should be 8 bits in length:
213   appendToBitSeq(pkb->firstCode, firstAddress, 8);
214   appendToBitSeq(pkb->secondCode, firstCommand, 8);
215   appendToBitSeq(pkb->thirdCode, secondAddress, 8);
216   appendToBitSeq(pkb->fourthCode, secondCommand, 8);
217 }
218
219
220 /*
221 void PIRProtocol::addRCAKey(
222   PIRKeyName key,
223   unsigned int addressData,
224   unsigned int commandData)
225 {
226   PIRKeyBits *pkb = 0;
227   KeycodeCollection::iterator i = keycodes.find(key);
228   if (i != keycodes.end())
229   {
230     pkb = &(i->second);
231     pkb->firstcode.clear();
232     pkb->secondCode.clear();
233   }
234   else
235   {
236     pkb = &(keycodes[key]);
237   }
238
239   // Address is 4 bits, command is 8 bits:
240   appendToBitSeq(pkb->firstCode, addressData, 4);
241   appendToBitSeq(pkb->secondCode, commandData, 8);
242 }
243 */
244
245
246 void PIRProtocol::addKaseikyoKey(
247   PIRKeyName key,
248   unsigned int addressData,
249   unsigned int commandData)
250 {
251   PIRKeyBits *pkb = 0;
252   KeycodeCollection::iterator i = keycodes.find(key);
253   if (i != keycodes.end())
254   {
255     pkb = &(i->second);
256     pkb->firstCode.clear();
257     pkb->secondCode.clear();
258   }
259   else
260   {
261     pkb = &(keycodes[key]);
262   }
263
264   appendToBitSeq(pkb->firstCode, addressData, 12);
265   appendToBitSeq(pkb->secondCode, commandData, 8);
266 }
267
268
269 void PIRProtocol::setCarrierFrequency(
270   unsigned int freq)
271 {
272   carrierFrequency = freq;
273 }
274
275
276 void PIRProtocol::setDutyCycle(
277   unsigned int dc)
278 {
279   dutyCycle = dc;
280 }
281
282
283 void PIRProtocol::setMinimumRepetitions(
284   unsigned int minrep)
285 {
286   minimumRepetitions = minrep;
287 }
288
289
290 void PIRProtocol::setPreData(
291   unsigned long data,
292   unsigned int bits)
293 {
294   // If the container is not empty, first clear it out:
295   if (!preData.empty())
296   {
297     preData.clear();
298   }
299
300   appendToBitSeq(preData, data, bits);
301 }
302
303
304 void PIRProtocol::setPostData(
305   unsigned long data,
306   unsigned int bits)
307 {
308   // If the container is not empty, first clear it out:
309   if (!postData.empty())
310   {
311     postData.clear();
312   }
313
314   appendToBitSeq(postData, data, bits);
315 }
316
317
318 bool PIRProtocol::isCommandSupported(
319   PIRKeyName command)
320 {
321   return (keycodes.find(command) != keycodes.end());
322 }
323
324
325 void PIRProtocol::appendToBitSeq(
326   CommandSequence &sequence,
327   unsigned int bits,
328   int size)
329 {
330   if (size == 0)
331   {
332     // This is bad, but just return silently for now...
333     return;
334   }
335
336   // For each bit in the char, append a 1 or a 0 into the sequence.
337   // Starting with the largest bit, move forward one bit at a time:
338   unsigned int currentBit = 1 << (size - 1);
339
340   do
341   {
342     if (bits & currentBit)
343     {
344       sequence.push_back(1);
345     }
346     else
347     {
348       sequence.push_back(0);
349     }
350
351     currentBit = currentBit >> 1;
352   }
353   while (currentBit > 0);
354 }
355
356
357 void PIRProtocol::clearRepeatFlag()
358 {
359   QMutexLocker locker(&stopRepeatingMutex);
360   stopRepeatingFlag = false;
361 }
362
363
364 bool PIRProtocol::checkRepeatFlag()
365 {
366   QMutexLocker locker(&stopRepeatingMutex);
367   return stopRepeatingFlag;
368 }
369
370
371 // Note that the following routine blindly sleeps for the amount of time
372 // specified by the LIRC config file.  The extra overhead of processing
373 // each command will mean that repeated commands will overshoot the config
374 // time by some amount.  We could improve accuracy by waiting a little less
375 // than the specified time, if we could get a good handle on how long the
376 // overhead is delaying the command...
377 #define PIEROGI_OVERHEAD_HACK 13260
378
379 void PIRProtocol::sleepUntilRepeat(
380   int commandDuration)
381 {
382   int microseconds;
383
384   // If the LIRC config file specifies the flag "CONST_LENGTH", that means
385   // the "gap" value is the exact amount of time to wait between kicking off
386   // each command.  If not, then the "gap" needs to be added on to the total
387   // time of the previous command to see how long to sleep.
388
389   if (isConstantLength)
390   {
391     microseconds = (gap - commandDuration) - PIEROGI_OVERHEAD_HACK;
392   }
393   else
394   {
395     microseconds = gap - PIEROGI_OVERHEAD_HACK;
396   }
397
398 /*
399   // Don't even bother sleeping if there's only a few microseconds:
400   if (microseconds < 1000)
401   {
402     return;
403   }
404 */
405   // For now, I'm going to enforce a minimum sleep of 10 ms, so that we
406   // don't get runaway commands:
407   if (microseconds < 10000)
408   {
409     microseconds = 10000;
410   }
411
412   timespec sleeptime;
413   sleeptime.tv_sec = 0;
414   sleeptime.tv_nsec = microseconds * 1000;
415
416   timespec remainingtime;
417
418   if (nanosleep(&sleeptime, &remainingtime) == -1)
419   {
420     std::stringstream ss;
421     ss << "Problem while sleeping.\n";
422     ss << "Trying to sleep for: " << microseconds << "\n";
423     ss << "Nanosleep returned error: " << strerror(errno) << "\n";
424     throw PIRException(ss.str());
425   }
426 }