Форум arduino.ua

void http() {
Serial2.println("AT+CPIN=");
  Serial.println("Pin is ok))))");

if ( (sendATcommand("AT+CREG?", "+CREG: 0,1", 1000) || sendATcommand("AT+CREG?", "+CREG: 0,5", 1000)) == 1 ) {
   Serial.println("NET ONLINE!");
}
if ( sendATcommand("AT+SAPBR=3,1,\"Contype\",\"GPRS\"", "OK", 2000) == 1 ) {
   Serial.println("GPRS yes!");
}
if ( sendATcommand("AT+SAPBR=3,1,\"APN\",\"internet\"", "OK", 2000) == 1 ) {
   Serial.println("APN yes!");
}
if ( sendATcommand("AT+SAPBR=3,1,\"USER\",\"\"", "OK", 2000) == 1 ) {
   Serial.println("User yes!");
}
if (sendATcommand("AT+SAPBR=3,1,\"PWD\",\"\"", "OK", 2000) == 1 ) {
   Serial.println("Pass yes!");
}
if (sendATcommand("AT+SAPBR=1,1", "OK", 20000) == 1 ) {
   Serial.println("Bearer sent!");
}
delay(1000);
    // Initializes HTTP service
    if (sendATcommand("AT+HTTPINIT", "OK", 10000) == 1)
    {
       Serial.println("HTTP ready!");
        // Sets CID parameter
        if (sendATcommand("AT+HTTPPARA=\"CID\",1", "OK", 5000) == 1)
        {
          Serial.println("HTTP params set!");
            // Sets url 
            Serial2.print("AT+HTTPPARA=\"URL\",\"http://gps.scienceukraine.in.ua/gps.php?visor=false&latitude=42.669578&longitude=-0.957495&time=20130609130751&satellites=11&speedOTG=122.5&course=120");
          /*  Serial2.print(""); */
            if ( sendATcommand("\"", "OK", 5000) == 1)
            {
               Serial.println("message formed!");
                // Starts GET action
                if (sendATcommand("AT+HTTPACTION=0", "+HTTPACTION:0,200", 30000) == 1)
                {
                    Serial.println(F("Done!"));
                }
                else
                {
                    Serial.println(F("Error getting url"));
                }

            }
            else
            {
                Serial.println(F("Error setting the url"));
            }
        }
        else
        {
            Serial.println(F("Error setting the CID"));
        }    
    }
    else
    {
        Serial.println(F("Error initializating"));
    }

    sendATcommand("AT+HTTPTERM", "OK", 5000);
}

int8_t sendATcommand(char* ATcommand, char* expected_answer, unsigned int timeout){

    uint8_t x=0,  answer=0;
    char response[100];
    unsigned long previous;

    memset(response, '\0', 100);  
    
    delay(100);
    
    while( Serial2.available() > 0) Serial2.read();   
    
    if (ATcommand[0] != '\0')
    {
        Serial2.println(ATcommand);    // Посыл АТ-команды
    }

    x = 0;
    previous = millis();

    // this loop waits for the answer
    do{
        if(Serial2.available() != 0){   
            response[x] = Serial2.read();
            //Serial.print(response[x]);
            x++;
            if (strstr(response, expected_answer) != NULL)    // проверяем порт на наличие "ОК"
            {
                answer = 1;
            }
        }
    }while((answer == 0) && ((millis() - previous) < timeout));    // Ждем ответа от модуля

    return answer;
}