Subversion Repositories Kolibri OS

/* Copyright (C) 2019-2021 Logaev Maxim (turbocat2001), GPLv2 */

/*

    Info: App uses api from openweathermap.org.

    The standard configuration uses my token and the city of Moscow.

    You can always change it in the weather.json file.

    weather.json configuration example:

    {

        "Celsius": false,                                   // Enabled fahrenheit (Optional)

        "Location": "Berlin",                               // city Berlin

        "Token": "19ffa14b3dc0e238175829461d1788b8",        // OpenWeatherMap token

        "Lang": "ru",                                       // Language (Optional)

        "AutoUpdate": 5                                     // In minutes. 0 - disabled (Optional)

    }

*/

#include 

#include 

#include 

#include 

#include "json/json.h"

#include 

#include 

#include 

#define VERSION  "Weather 1.6e"

enum BUTTONS{

    BTN_QUIT = 1,

    BTN_UPDATE = 2

};

#define START_YPOS 34

#define UTF8_W 8

#define CP866_W 6

#define JSON_OBJ(X) value->u.object.values[X]

#define OK 200

unsigned WINDOW_W = 230;

#define API       "api.openweathermap.org/data/2.5/weather?q=%s&appid=%s&units=%s&lang=%s"

#define IMAGE_URL "openweathermap.org/img/w/%s.png"

Image *blend=NULL;

const char *config1_name = "/sys/Settings/weather.json";

const char *config2_name = "/kolibrios/Settings/weather.json";

unsigned char char_size=1;

uint64_t auto_update_time = 0;

char *wind_speed_str, *pressure_str, *visibility_str, *humidity_str, *update_str, *wind_deg_str;

char lang[3]="en";

char format_temp_str[6];

char full_url[512];

char full_url_image[256];

char temp_char='K';

ksys_colors_table_t sys_color_table;

ksys_pos_t win_pos;

#pragma pack(push,1)

struct open_weather_data{

    char    city[100];

    int     wind_speed;

    int     wind_deg;

    int     pressure;

    int     humidity;

    char    weath_desc[100];

    int     visibility;

    int     timezone;

    char    image_code[4];

    int     temp;

}myw;

#pragma pack(pop)

void notify_show(char *text){

    _ksys_exec("/sys/@notify", text);

}

void* safe_malloc(size_t size)

{

    void *p=malloc(size);

    if(p==NULL){

       notify_show("'Memory allocation error!' -E");

       exit(0);

    }else{

        return p;

    }

}

void draw_format_text_sys(int x, int y, ksys_color_t color, const char *format_str, ... ) // Форматированный вывод в окно

{

    char tmp_buff[100];

    va_list ap;

    va_start (ap, format_str);

    vsnprintf(tmp_buff, sizeof tmp_buff ,format_str, ap);

    va_end(ap);

    _ksys_draw_text(tmp_buff, x, y , 0, color);

}

void find_and_set(json_value *value, struct open_weather_data* weather) // Ищем значения в json и заполняем структуру "myw"

{

    for(int i=0; iu.object.length; i++){

        if(!strcmp(JSON_OBJ(i).name, "main")){

            if(JSON_OBJ(i).value->u.object.values[0].value->type==json_double)

            {

                weather->temp = (int)JSON_OBJ(i).value->u.object.values[0].value->u.dbl;

            }else{

                weather->temp = JSON_OBJ(i).value->u.object.values[0].value->u.integer;

            }

            weather->pressure = JSON_OBJ(i).value->u.object.values[4].value->u.integer;

            weather->humidity = JSON_OBJ(i).value->u.object.values[5].value->u.integer;

        }

        if(!strcmp(JSON_OBJ(i).name, "name")){

            if(!strcmp(&JSON_OBJ(i).value->u.string.ptr[JSON_OBJ(i).value->u.string.length-3], "’")){

                strncpy(weather->city, JSON_OBJ(i).value->u.string.ptr, JSON_OBJ(i).value->u.string.length-3);

            }else{

                strcpy(weather->city, JSON_OBJ(i).value->u.string.ptr);

            }

        }

        if(!strcmp(JSON_OBJ(i).name, "weather")){

           strcpy(weather->weath_desc, JSON_OBJ(i).value->u.array.values[0]->u.object.values[2].value->u.string.ptr);

           strcpy(weather->image_code, JSON_OBJ(i).value->u.array.values[0]->u.object.values[3].value->u.string.ptr);

        }

        if(!strcmp(JSON_OBJ(i).name, "wind")){

            weather->wind_deg = JSON_OBJ(i).value->u.object.values[1].value->u.integer;

            if(JSON_OBJ(i).value->u.object.values[0].value->type==json_double)

            {

                weather->wind_speed = (int)JSON_OBJ(i).value->u.object.values[0].value->u.dbl;

            }else{

                weather->wind_speed = JSON_OBJ(i).value->u.object.values[0].value->u.integer;

            }

        }

        if(!strcmp(JSON_OBJ(i).name, "visibility")){

            weather->visibility = JSON_OBJ(i).value->u.integer;

        }

        if(!strcmp(JSON_OBJ(i).name, "timezone")){

            weather->timezone = JSON_OBJ(i).value->u.integer/60/60;

        }

        if(!strcmp(JSON_OBJ(i).name, "message")){

            char *errmsg = safe_malloc(weather->timezone = JSON_OBJ(i).value->u.string.length+6);

            sprintf(errmsg,"'%s!' -E", JSON_OBJ(i).value->u.string.ptr);

            notify_show(errmsg);

            free(errmsg);

        }

    }

}

http_msg* get_json(char *city, char *Token, char* Units)

{

    sprintf(full_url, API, city, Token, Units, lang);

    http_msg *h = http_get(full_url, 0,  HTTP_FLAG_BLOCK, "");

    http_long_receive(h);

    if (h->status == OK || h->status == 404) {

        return h;

    } else {

        http_free(h);

        return NULL;

    }

}

void get_image() // Функция загрузки изображения

{

    sprintf(full_url_image, IMAGE_URL, myw.image_code);

    http_msg *h= http_get(full_url_image, 0, HTTP_FLAG_BLOCK, "");

    http_long_receive(h);

    if (h->status == OK) {

        Image *image = img_decode(h->content_ptr, h->content_length, 0); // Декодирование RAW данных в данные изображения

        if (image->Type != IMAGE_BPP32) {

            image = img_convert(image, NULL, IMAGE_BPP32, 0, 0); // Конвертируем картику в BPP32

                if (!image) {

                notify_show("'Convetring image error!' -E");

                exit(0);

            }

        }

        blend = img_create(64, 64, IMAGE_BPP32);  // Создаём фон для картинки

        img_fill_color(blend, 64, 64, sys_color_table.work_area); // Заливаем фон цветом окна

        Image* image2 = img_scale(image, 0, 0, 50, 50, NULL, LIBIMG_SCALE_STRETCH , LIBIMG_INTER_BILINEAR, 64, 64); // Растягиваем изображение

        img_blend(blend, image2, 0, 0, 0, 0, 64, 64);  // Смешиваем растянутую картинку и фон для получения прозрачности

        img_destroy(image);  // Уничтожаем исходную картинку

        img_destroy(image2); // Уничтажаем растянутую картинку

    }else{

       notify_show("'Image not loaded!!' -W");

    }

    if(h!=NULL){

        http_free(h);

    }

}

void redraw_gui() // Перересовываем интерфейс

{

    _ksys_start_draw();   // Начинам прорисовку

    int new_win_w = (strlen(myw.city)/char_size+12)*(UTF8_W+char_size-1); // Если название города не влезает в окно

    if(new_win_w

        new_win_w=WINDOW_W;

    }

    // Рисуем окно

    _ksys_create_window(win_pos.x, win_pos.y, new_win_w, START_YPOS+220, VERSION, sys_color_table.work_area, 0x14);

    // Выводим жирным шрифтом название локации и временной зоны

    draw_format_text_sys(20, START_YPOS, 0xB0000000 | sys_color_table.work_text, "%s (UTC%+d)", myw.city, myw.timezone);

    draw_format_text_sys(21, START_YPOS, 0xB0000000 | sys_color_table.work_text, "%s (UTC%+d)", myw.city, myw.timezone);

    // Выводим изображение

    img_draw(blend, 10, START_YPOS+30, 64,64,0,0);

    // Выводим жирным шрифтом название локации и временной зоны

    draw_format_text_sys(20, START_YPOS+20, 0xb0000000 | sys_color_table.work_text, myw.weath_desc);

    draw_format_text_sys(21, START_YPOS+20, 0xb0000000 | sys_color_table.work_text, myw.weath_desc);

    // Выводим жирным шрифтом название локации и временной зоны

    draw_format_text_sys(100, START_YPOS+45, 0xb1000000 | sys_color_table.work_text, format_temp_str, myw.temp);

    draw_format_text_sys(101, START_YPOS+46, 0xb1000000 | sys_color_table.work_text, format_temp_str, myw.temp);

    // Выводим обычным шрифтом

    draw_format_text_sys(20, START_YPOS+80,  0xb0000000 | sys_color_table.work_text, pressure_str,myw.pressure);

    draw_format_text_sys(20, START_YPOS+100, 0xb0000000 | sys_color_table.work_text, humidity_str, myw.humidity, "%");

    draw_format_text_sys(20, START_YPOS+120, 0xb0000000 | sys_color_table.work_text, wind_speed_str, myw.wind_speed);

    draw_format_text_sys(20, START_YPOS+140, 0xb0000000 | sys_color_table.work_text, wind_deg_str, myw.wind_deg);

    draw_format_text_sys(20, START_YPOS+160, 0xb0000000 | sys_color_table.work_text, visibility_str, myw.visibility);

    // Определяем кнопку

    _ksys_define_button(new_win_w/2-60, START_YPOS+180, 120, 30, BTN_UPDATE, sys_color_table.work_button);

    _ksys_draw_text(update_str, (new_win_w/2)-(UTF8_W*strlen(update_str)/2/char_size), START_YPOS+190, 0, 0xb0000000 | sys_color_table.work_button_text);

    _ksys_end_draw();

}

void get_config(char **city, char **token, char **units) // Загружаем конфиг

{

    ksys_ufile_t config_j;

    config_j = _ksys_load_file(config1_name);

    if(!config_j.size){

        config_j = _ksys_load_file(config2_name);

        if(!config_j.size){

            notify_show("'Configuration file not found!' -E");

            exit(0);

        }

    }

    json_value* value =json_parse (config_j.data, config_j.size); // Парсим конфиг

    for(int i=0; iu.object.length; i++){

        if(!strcmp(JSON_OBJ(i).name, "Location") && JSON_OBJ(i).value->type==json_string){

            *city = JSON_OBJ(i).value->u.string.ptr;  // Получаем название города

        }

        else if(!strcmp(JSON_OBJ(i).name, "Token") && JSON_OBJ(i).value->type==json_string){

            *token = JSON_OBJ(i).value->u.string.ptr; // Получаем токен

        }

        else if(!strcmp(JSON_OBJ(i).name, "Celsius") && JSON_OBJ(i).value->type==json_boolean){

            if(JSON_OBJ(i).value->u.boolean){

                *units = "metric";

                temp_char = 'C';

            }else{

                *units = "imperial";

                temp_char = 'F';

            }

        }

        else if(!strcmp(JSON_OBJ(i).name, "Lang") && JSON_OBJ(i).value->type==json_string){

            strncpy(lang, JSON_OBJ(i).value->u.string.ptr,2); // Получаем язык

        }

        else if(!strcmp(JSON_OBJ(i).name, "AutoUpdate") && JSON_OBJ(i).value->type==json_integer){

            auto_update_time = JSON_OBJ(i).value->u.integer; // Получаем время автообновлений данных

        }

    }

    if(*city==NULL || *token ==NULL){

         notify_show("'Invalid config!' -E");

         exit(0);

    }

    free(config_j.data);

}

void update(char* city, char* token, char* units) // Обновление данных

{

    if(blend!=NULL){

        img_destroy(blend); // Уничтожение картинику с прозрачностью

        blend = NULL;

    }

    memset(&myw, 0, sizeof myw); // Обнуляем структуру

    strcpy(myw.city,"None");

    strcpy(myw.weath_desc,"unknown");

    http_msg *json_file = get_json(city, token, units); // Получаем данные о погоде в формате json

    if(json_file != NULL){

        json_value* value=json_parse(json_file->content_ptr, json_file->content_length); // Парсим json файл

        find_and_set(value, &myw);  //  Ищем значения в json

        sprintf(format_temp_str, "%s°%c","%d",temp_char); // Формируем строку для вывода температуры

        get_image(); // Получаем картинку

        json_value_free(value); // Уничтожаем полученные json значения

        http_free(json_file);

    }else{

       notify_show("'Connection error!' -E");

    }

}

void set_lang()

{

    if(!strcmp(lang, "ru")){

        wind_speed_str = "Скорость ветра:    %d м/с";

        pressure_str   = "Давление:          %d гПa";

        visibility_str = "Видимость:         %d м";

        humidity_str   = "Влажность:         %d %s";

        update_str     = "Обновить";

        wind_deg_str   = "Направление ветра: %d°";

        WINDOW_W = 250;

        char_size = 2;

    }else if(!strcmp(lang, "de")){

        wind_speed_str = "Windgeschwindigkeit: %d m/s";

        pressure_str   = "Druck:               %d hPa";

        visibility_str = "Sichtbarkeit:        %d m";

        humidity_str   = "Luftfeuchtigkeit:    %d %s";

        wind_deg_str   = "Windrichtung         %d°";

        WINDOW_W = 270;

        update_str     = "Aktualisieren";

    }else{

        pressure_str   = "Pressure:       %d hPa";

        humidity_str   = "Humidity:       %d %s";

        visibility_str = "Visibility:     %d m";

        wind_speed_str = "Wind speed:     %d m/s";

        wind_deg_str   = "Wind direction: %d°";

        update_str     = "Refresh";

    }

}

int main()

{

    win_pos = _ksys_get_mouse_pos(KSYS_MOUSE_SCREEN_POS); // Получаем позицию курсора

    _ksys_get_system_colors(&sys_color_table); // Получаем таблица цветов

    char *city=NULL, *token=NULL, *units=NULL; // Указатели на токен, название города, систему мер

    get_config(&city, &token, &units); // Загружаем конфиг

    set_lang();  // Установить язык приложения

    update(city, token, units);

    uint32_t (*event)();

    if(auto_update_time<=0){

        event = _ksys_get_event;

    }else{

        event = _ksys_wait_event;

    }

    while(1){

        switch(event(6000*auto_update_time)){ // Получаем системное событие

            case KSYS_EVENT_NONE:        // Нет события

                update(city, token, units);

                debug_printf("Weather: Update\n");

                break;

            case KSYS_EVENT_REDRAW:      // Событие перерисовки

                redraw_gui();

                break;

            case KSYS_EVENT_BUTTON:      // Событие кнопок

                switch (_ksys_get_button()){

                    case BTN_UPDATE:

                        update(city, token, units);

                        redraw_gui();

                        break;

                    case BTN_QUIT:          // Кнопка выхода

                        exit(0);

                        break;

                }

                break;

        }

    }

    return 0;

}