API with Mitsubishi MELCloud for heatingpumps

Code:

email = 'test@test.com'

password = '123456'



https = require('ssl.https')

json = require('json')

ltn12 = require('ltn12')



function encodepost(t)

  local res = {}

  local esc = require('socket.url').escape



  for k, v in pairs(t) do

    res[ #res + 1 ] = esc(k) .. '=' .. esc(v)

  end



  return table.concat(res, '&')

end



function login(email, password)

  local url = 'https://app.melcloud.com/Mitsubishi.Wifi.Client/Login/ClientLogin'

  local data = encodepost({

    AppVersion = '1.9.3.0',

    Language = '7',

    CaptchaChallenge = '',

    CaptchaResponse = '',

    Persist = 'true',

    Email = email,

    Password = password,

  })



  local res, code = https.request(url, data)



  if res then

    resp = json.pdecode(res)



    if type(resp) ~= 'table' then

      return nil, 'failed to decode reply data'

    elseif resp.ErrorId ~= json.null then

      return nil, 'cloud login failed'

    else

      return resp.LoginData.ContextKey

    end

  else

    return nil, 'login request failed'

  end

end



function getdevices(key)

  local url = 'https://app.melcloud.com/Mitsubishi.Wifi.Client/User/ListDevices'

  local tbl = {}



  local res, code = https.request({

    url = url,

    headers = {

      ['X-MitsContextKey'] = key

    },

    sink = ltn12.sink.table(tbl),

  })



  if res then

    local data = table.concat(tbl)

    return json.pdecode(data)

  else

    return nil, 'get devices request failed'

  end

end



key, err = login(email, password)

if key then

  items, err = getdevices(key)



  if items then

    for _, item in ipairs(items) do

      local devs = item.Structure.Devices

      for _, dev in ipairs(devs) do

        log(dev)

      end

    end

  else

    log(err)

  end

else

  log(err)

end

Code:

const request = require('request');

const link_kueche = 'http://192.168.1.12/get/json/v1/1/temps/1/';



// Datenpunkte erzeugen

//Küche

createState('Controme.kueche.frt_temp', 0, {type: "number", unit: '°C'});

createState('Controme.kueche.rl_temp', 0, {type: "number", unit: '°C'});

createState('Controme.kueche.frt_akt', 0, {type: "string", unit: ''});

createState('Controme.kueche.rl_akt', 0, {type: "string", unit: ''});

createState('Controme.kueche.solltemperatur', 0, {type: "number", unit: '°C'});



function controme_kueche() {

    request(link_kueche, function(error,response, body) {

        if(error) log('Fehler request: ' + error, 'error');

        

        else if(body.indexOf('html') == -1) {

            log(body);

            var sensoren = JSON.parse(body)[0].sensoren;

            var solltemp = JSON.parse(body)[0];

            

            var rl_temp = sensoren[0].wert;

            setState('Controme.kueche.rl_temp', Math.round(10*rl_temp)/10, true);

            var frt_temp = sensoren[1].wert.Temperatur;

            setState('Controme.kueche.frt_temp', Math.round(10*frt_temp)/10, true);

            var rl_akt = sensoren[0].letzte_uebertragung;

            setState('Controme.kueche.rl_akt', rl_akt, true);

            var frt_akt = sensoren[1].letzte_uebertragung;

            setState('Controme.kueche.frt_akt', frt_akt, true);

            var soll = solltemp.solltemperatur;

            setState('Controme.kueche.solltemperatur', Math.round(10*soll)/10, true);

                 }    

    });

}



function alledaten() {

    controme_kueche();

    controme_schlafzimmer();

    controme_wohnzimmer();

    controme_abstellkammer();

    controme_badezimmer();

    controme_flur();

    controme_arbeitszimmer();

    controme_esszimmer();

    controme_hkv();

    controme_vsensor1();

}

schedule('*/1 * * * *', alledaten); // alle 15 Minuten