WebSVN – HomeAutomation – Diff – /trunk/EmbeddedSoftware/AVR/avr-lib/drivers/ir/protocols.c

 /**
  * IR receiver and transmitter protocols.
+ *
  * @date    2006-12-10
+ *
- * @author  Anders Runeson, Andreas Fritiofson, Martin Nordn
+ * @author  Anders Runeson, Andreas Fritiofson, Martin Nordin
+ *
  */
 #include "protocols.h"
 #include <bios.h>
 #if (IR_PROTOCOLS_USE_SAMSUNG)
     if (parseSamsung(buf, len, proto)==IR_OK) return IR_OK;
 #endif
 #if (IR_PROTOCOLS_USE_MARANTZ)
     if (parseMarantz(buf, len, proto)==IR_OK) return IR_OK;
+#endif
+#if (IR_PROTOCOLS_USE_PANASONIC)
+    if (parsePanasonic(buf, len, proto)==IR_OK) return IR_OK;
 #endif
     /* No protocol matched. */
     proto->protocol = IR_PROTO_UNKNOWN;
     return IR_NOT_CORRECT_DATA;
+}
         return expandNEC(buf, len, proto);
     case IR_PROTO_SAMS:
         return expandSamsung(buf, len, proto);
     case IR_PROTO_MARANTZ:
         return expandMarantz(buf, len, proto);
+    case IR_PROTO_PANASONIC:
+        return expandPanasonic(buf, len, proto);
+    }
     /* Invalid protocol specified. */
     return IR_NOT_CORRECT_DATA;
+}
 int8_t parseSIRC(const uint16_t *buf, uint8_t len, Ir_Protocol_Data_t *proto) {
     /* parse buf[], max is len */
     /* check if we have correct amount of data */
     if (len != 25) {
         return IR_NOT_CORRECT_DATA;
     }
     /* check startbit */
     if (buf[0] > IR_SIRC_ST_BIT + IR_SIRC_ST_BIT/IR_SIRC_TOL_DIV || buf[0] < IR_SIRC_ST_BIT - IR_SIRC_ST_BIT/IR_SIRC_TOL_DIV) {
         return IR_NOT_CORRECT_DATA;
+    }
         } else {            /* if even, ir-bit */
             if (buf[i] > IR_SIRC_HIGH_ONE - IR_SIRC_HIGH_ONE/IR_SIRC_TOL_DIV && buf[i] < IR_SIRC_HIGH_ONE + IR_SIRC_HIGH_ONE/IR_SIRC_TOL_DIV) {
                 /* write a one */
                 rawbits |= 1<<((i-2)>>1);
             } else if (buf[i] > IR_SIRC_HIGH_ZERO - IR_SIRC_HIGH_ZERO/IR_SIRC_TOL_DIV && buf[i] < IR_SIRC_HIGH_ZERO + IR_SIRC_HIGH_ZERO/IR_SIRC_TOL_DIV) {
                 /* do nothing, a zero is already in rawbits */
             } else {
                 return IR_NOT_CORRECT_DATA;
             }
         }
     }
     proto->protocol = IR_PROTO_SIRC;
     proto->timeout = IR_SIRC_TIMEOUT;
     proto->data = rawbits;
     return IR_OK;
+}
 #endif
 /**
  * Expand data from SIRC protocol
  * http://www.sbprojects.com/knowledge/ir/sirc.htm
  *
  * @param buf
  *      Pointer to buffer to store the expanded data
  * @param len
  *      Pointer to length of the data
  * @param proto
  *      Pointer to protocol information
     proto->protocol=IR_PROTO_RC5;
     proto->timeout=IR_RC5_TIMEOUT;
     //support RC5-extended keeping second startbit
     //remove togglebit
     proto->data = rawbits&0x37ff; //This seems to be wrong? Does not invert second start bit and keeps first start bit
     //proto->data = (rawbits&0x07ff) | ((~rawbits)&0x0100);
     return IR_OK;
 }
 #endif
 /**
  * Used by the expandRC5 to ensure that we toggle the signal with each button press.
  */
 int8_t rc5_toggle=0;
 /**
  * @return
  *      IR_OK if data expanded successfully, one of several errormessages if not
  */
 int8_t expandSharp(uint16_t *buf, uint8_t *len, Ir_Protocol_Data_t *proto) {
     //TODO: Implement this function.
     return IR_NOT_CORRECT_DATA;
 }
 #if (IR_PROTOCOLS_USE_NEC)
 /**
  * Test data on NEC protocol
  * http://www.sbprojects.com/knowledge/ir/nec.htm
+ *
  * @param buf
  *      Pointer to buffer to where to data to parse is stored
  * @param len
  *      Length of the data
  * @param proto
  *      Pointer to protocol information
  * @return
  *      IR_OK if data parsed successfully, one of several errormessages if not
  */
 int8_t parseNEC(const uint16_t *buf, uint8_t len, Ir_Protocol_Data_t *proto) {
     /* parse buf[], max is len */
     /* check if we have correct amount of data */
     if (len != 67) {
         return IR_NOT_CORRECT_DATA;
     }
     /* check startbit */
     if (buf[0] > IR_NEC_ST_BIT + IR_NEC_ST_BIT/IR_NEC_TOL_DIV || buf[0] < IR_NEC_ST_BIT - IR_NEC_ST_BIT/IR_NEC_TOL_DIV) {
         return IR_NOT_CORRECT_DATA;
+    }
     /* check pause after startbit */
     if (buf[1] > IR_NEC_ST_PAUSE + IR_NEC_ST_PAUSE/IR_NEC_TOL_DIV || buf[1] < IR_NEC_ST_PAUSE - IR_NEC_ST_PAUSE/IR_NEC_TOL_DIV) {
         return IR_NOT_CORRECT_DATA;
     }
     uint32_t rawbits = 0;
     for (uint8_t i = 3; i < len; i++) {
         if ((i&1) == 1) {       /* if odd, ir-pause */
 int8_t expandNEC(uint16_t *buf, uint8_t *len, Ir_Protocol_Data_t *proto) {
     /* Set up startbit */
     buf[0] = IR_NEC_ST_BIT;
     if (proto->framecnt == 0) {
         buf[1] = IR_NEC_ST_PAUSE;
         *len = 67;
         for (uint8_t i = 0; i < 65; i++) {
             if ((i&1) == 1) {       /* if odd, ir-pause */
                 if ((proto->data>>(i>>1))&1) {
                     buf[i+2] = IR_NEC_LOW_ONE;
                 } else {
                     buf[i+2] = IR_NEC_LOW_ZERO;
+                }
             } else {            /* if even, ir-bit */
                 buf[i+2] = IR_NEC_HIGH;
             }
         }
         proto->timeout=IR_NEC_TIMEOUT;
     } else {
         buf[1] = IR_NEC_ST_PAUSE/2;
         buf[2] = IR_NEC_HIGH;
         proto->timeout=IR_NEC_ST_TIMEOUT;
         return IR_NOT_CORRECT_DATA;
+    }
     /* check startbit */
     if (buf[0] > IR_SAMS_ST_BIT + IR_SAMS_ST_BIT/IR_SAMS_TOL_DIV || buf[0] < IR_SAMS_ST_BIT - IR_SAMS_ST_BIT/IR_SAMS_TOL_DIV) {
         return IR_NOT_CORRECT_DATA;
     }
     /* check pause after startbit */
     if (buf[1] > IR_SAMS_ST_PAUSE + IR_SAMS_ST_PAUSE/IR_SAMS_TOL_DIV || buf[1] < IR_SAMS_ST_PAUSE - IR_SAMS_ST_PAUSE/IR_SAMS_TOL_DIV) {
         return IR_NOT_CORRECT_DATA;
+    }
+            }
+        }
+    }
     proto->protocol=IR_PROTO_SAMS;
     proto->timeout=IR_SAMS_TIMEOUT;
     proto->data=rawbits;
     return IR_OK;
+}
 #endif
 /**
  * Expand data from Samsung protocol
  *      Pointer to length of the data
  * @param proto
  *      Pointer to protocol information
  * @return
  *      IR_OK if data expanded successfully, one of several errormessages if not
  */
 int8_t expandSamsung(uint16_t *buf, uint8_t *len, Ir_Protocol_Data_t *proto) {
     /* Set up startbit */
     buf[0] = IR_SAMS_ST_BIT;
     buf[1] = IR_SAMS_ST_PAUSE;
     for (uint8_t i = 0; i < 65; i++) {
         if ((i&1) == 1) {       /* if odd, ir-pause */
             if ((proto->data>>(i>>1))&1) {
                 buf[i+2] = IR_SAMS_LOW_ONE;
             } else {
                 buf[i+2] = IR_SAMS_LOW_ZERO;
+            }
         } else {                /* if even, ir-bit */
             buf[i+2] = IR_SAMS_HIGH;
+        }
             halfbitscnt += 1;
         } else if (buf[i] > IR_MARANTZ_BIT - IR_MARANTZ_BIT/IR_MARANTZ_TOL_DIV && buf[i] < IR_MARANTZ_BIT + IR_MARANTZ_BIT/IR_MARANTZ_TOL_DIV) {
             halfbitscnt += 2;
         } else if (buf[i] > IR_MARANTZ_BIT - IR_MARANTZ_BIT/IR_MARANTZ_TOL_DIV && buf[i] < 5*IR_MARANTZ_HALF_BIT + IR_MARANTZ_BIT/IR_MARANTZ_TOL_DIV) {
             halfbitscnt += 1; //It seems to work, not entirely sure of the purpose of this long zero though.
         } else {
             return IR_NOT_CORRECT_DATA;
         }
     }
     proto->protocol=IR_PROTO_MARANTZ;
     proto->timeout=IR_MARANTZ_TIMEOUT;
     proto->data = rawbits&0x0001ffff;
     return IR_OK;
 }
+#endif
 /**
- * Expand data from Marantz. Written by Martin Nordn
+ * Expand data from Marantz. Written by Martin Nordin
  *
  * @param buf
  *      Pointer to buffer to store the expanded data
  * @param len
  *      Pointer to length of the data
  * @param proto
                 buf[*len-1] = IR_MARANTZ_BIT;
                 buf[*len] = IR_MARANTZ_HALF_BIT;
                 *len = *len + 1;
+            }
             previousBit = 1;
         } else {
             if (previousBit == 1){//10
                 buf[*len-1] = IR_MARANTZ_BIT;
                 buf[*len] = IR_MARANTZ_HALF_BIT;
                 *len = *len + 1;
             } else {//00
     proto->timeout=IR_MARANTZ_TIMEOUT;
     proto->repeats=IR_MARANTZ_REPS;
     return IR_OK;
+}
+#if (IR_PROTOCOLS_USE_PANASONIC)
+/**
+ * Test data on Panasonic protocol
+ *
+ * @param buf
+ *      Pointer to buffer to where to data to parse is stored
+ * @param len
+ *      Length of the data
+ * @param proto
+ *      Pointer to protocol information
+ * @return
+ *      IR_OK if data parsed successfully, one of several errormessages if not
+ */
+int8_t parsePanasonic(const uint16_t *buf, uint8_t len, Ir_Protocol_Data_t *proto) {
+    /* parse buf[], max is len */
+    /* check if we have correct amount of data */
+    if (len != 99) {
+        return IR_NOT_CORRECT_DATA;
+    }
+    /* check startbit */
+    if (buf[0] > IR_PANA_ST_BIT + IR_PANA_ST_BIT/IR_PANA_TOL_DIV || buf[0] < IR_PANA_ST_BIT - IR_PANA_ST_BIT/IR_PANA_TOL_DIV) {
+        return IR_NOT_CORRECT_DATA;
+    }
+    /* check pause after startbit */
+    if (buf[1] > IR_PANA_ST_PAUSE + IR_PANA_ST_PAUSE/IR_PANA_TOL_DIV || buf[1] < IR_PANA_ST_PAUSE - IR_PANA_ST_PAUSE/IR_PANA_TOL_DIV) {
+        return IR_NOT_CORRECT_DATA;
+    }
+    uint32_t rawbits = 0;
+    /* skip start bit, start bit pause and first 16 bits (32 values) */
+    for (uint8_t i = (3+16*2); i < len; i++) {
+        if ((i&1) == 1) {       /* if odd, ir-pause */
+            /* check length of pause between bits */
+            if (buf[i] > IR_PANA_LOW_ONE - IR_PANA_LOW_ONE/IR_PANA_TOL_DIV && buf[i] < IR_PANA_LOW_ONE + IR_PANA_LOW_ONE/IR_PANA_TOL_DIV) {
+                /* write a one */
+                rawbits |= 1UL<<((i-(3+16*2))>>1);
+            } else if (buf[i] > IR_PANA_LOW_ZERO - IR_PANA_LOW_ZERO/IR_PANA_TOL_DIV && buf[i] < IR_PANA_LOW_ZERO + IR_PANA_LOW_ZERO/IR_PANA_TOL_DIV) {
+                /* do nothing, a zero is already in rawbits */
+            } else {
+                return IR_NOT_CORRECT_DATA;
+            }
+        } else {            /* if even, ir-bit */
+            if (buf[i] > IR_PANA_HIGH + IR_PANA_HIGH/IR_PANA_TOL_DIV || buf[i] < IR_PANA_HIGH - IR_PANA_HIGH/IR_PANA_TOL_DIV) {
+                return IR_NOT_CORRECT_DATA;
+            }
+        }
+    }
+    proto->protocol=IR_PROTO_PANASONIC;
+    proto->timeout=IR_PANA_TIMEOUT;
+    proto->data=rawbits;
+    return IR_OK;
+}
 #endif
+/**
+ * Expand data from Panasonic protocol
+ *
+ * @param buf
+ *      Pointer to buffer to store the expanded data
+ * @param len
+ *      Pointer to length of the data
+ * @param proto
+ *      Pointer to protocol information
+ * @return
+ *      IR_OK if data expanded successfully, one of several errormessages if not
+ */
+int8_t expandPanasonic(uint16_t *buf, uint8_t *len, Ir_Protocol_Data_t *proto) {
+    /* Set up startbit */
+    buf[0] = IR_PANA_ST_BIT;
+    buf[1] = IR_PANA_ST_PAUSE;
+    /* add the first 16 static bits */
+    uint16_t staticBits = 0x2002;
+    for (uint8_t i = 0; i < 32; i++) {
+        if ((i&1) == 1) {       /* if odd, ir-pause */
+            if ((staticBits>>(i>>1))&1) {
+                buf[i+2] = IR_PANA_LOW_ONE;
+            } else {
+                buf[i+2] = IR_PANA_LOW_ZERO;
+            }
+        } else {                /* if even, ir-bit */
+            buf[i+2] = IR_PANA_HIGH;
+        }
+    }
+    /* then add the value bits */
+    for (uint8_t i = 0; i < 65; i++) {
+        if ((i&1) == 1) {       /* if odd, ir-pause */
+            if ((proto->data>>(i>>1))&1) {
+                buf[i+2+32] = IR_PANA_LOW_ONE;
+            } else {
+                buf[i+2+32] = IR_PANA_LOW_ZERO;
+            }
+        } else {                /* if even, ir-bit */
+            buf[i+2+32] = IR_PANA_HIGH;
+        }
+    }
+    *len = 99;
+    proto->modfreq=(((F_CPU/2000)/IR_PANA_F_MOD) -1);
+    proto->timeout=IR_PANA_TIMEOUT;
+    proto->repeats=IR_PANA_REPS;
+    return IR_OK;
+}

Subversion Repositories HomeAutomation

(root)/trunk/EmbeddedSoftware/AVR/avr-lib/drivers/ir/protocols.c – Rev 922 → 1320