
/*
 * Copyright (c) 2010-2022 Belledonne Communications SARL.
 *
 * This file is part of Liblinphone
 * (see https://gitlab.linphone.org/BC/public/liblinphone).
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Affero General Public License as
 * published by the Free Software Foundation, either version 3 of the
 * License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Affero General Public License for more details.
 *
 * You should have received a copy of the GNU Affero General Public License
 * along with this program. If not, see <http://www.gnu.org/licenses/>.
 */

/**
 * @defgroup notify_tutorials Generic subscribe/notify example
 * @ingroup tutorials
 *This program is a _very_ simple usage example of liblinphone.
 *It demonstrates how to listen to a SIP subscription.
 *It then sends notify requests back periodically.
 *first argument must be like sip:jehan@sip.linphone.org , second must be password .
 *<br>
 *ex registration sip:jehan@sip.linphone.org secret
 *<br>Registration is cleared on SIGINT
 *<br>
 *@include registration.c

 *
 */

#define DEBUG_LOGS 1

#include "linphone/core.h"

#include <signal.h>

static bool_t running = TRUE;

static void stop(int signum) {
	running = FALSE;
}

typedef struct MyAppData {
	LinphoneEvent *ev;
} MyAppData;

/**
 * Registration state notification callback
 */
static void registration_state_changed(LinphoneCore *lc,
                                       LinphoneProxyConfig *cfg,
                                       LinphoneRegistrationState cstate,
                                       const char *message) {
	printf("New registration state %s for user id [%s] at proxy [%s]\n", linphone_registration_state_to_string(cstate),
	       linphone_proxy_config_get_identity(cfg), linphone_proxy_config_get_addr(cfg));
}

static void subscription_state_changed(LinphoneCore *lc, LinphoneEvent *ev, LinphoneSubscriptionState state) {
	MyAppData *data = (MyAppData *)linphone_core_get_user_data(lc);
	if (state == LinphoneSubscriptionIncomingReceived) {
		printf("Receiving new subscription for event %s\n", linphone_event_get_name(ev));
		if (data->ev == NULL) {
			linphone_event_accept_subscription(ev);
			data->ev = linphone_event_ref(ev);
		} else {
			linphone_event_deny_subscription(ev, LinphoneReasonBusy);
		}
	} else if (state == LinphoneSubscriptionTerminated) {
		if (data->ev == ev) {
			linphone_event_unref(data->ev);
			data->ev = NULL;
		}
	}
}

LinphoneCore *lc;
int main(int argc, char *argv[]) {
	LinphoneCoreVTable vtable = {0};
	MyAppData *data = ms_new0(MyAppData, 1);
	char *identity = NULL;
	char *password = NULL;
	int i;
	LinphoneProxyConfig *proxy_cfg;
	LinphoneAddress *from;
	LinphoneAuthInfo *info;
	const char *server_addr;

	/* takes   sip uri  identity from the command line arguments */
	if (argc > 1) {
		identity = argv[1];
	}

	/* takes   password from the command line arguments */
	if (argc > 2) {
		password = argv[2];
	}

	signal(SIGINT, stop);

#ifdef DEBUG_LOGS
	linphone_core_enable_logs(NULL); /*enable liblinphone logs.*/
#endif
	/*
	 Fill the LinphoneCoreVTable with application callbacks.
	 All are optional. Here we only use the registration_state_changed callbacks
	 in order to get notifications about the progress of the registration.
	 */
	vtable.registration_state_changed = registration_state_changed;
	vtable.subscription_state_changed = subscription_state_changed;

	/*
	 Instanciate a LinphoneCore object given the LinphoneCoreVTable
	*/
	lc = linphone_core_new(&vtable, NULL, NULL, data);

	/*create proxy config*/
	proxy_cfg = linphone_core_create_proxy_config(lc);
	/*parse identity*/
	from = linphone_address_new(identity);
	if (from == NULL) {
		printf("%s not a valid sip uri, must be like sip:toto@sip.linphone.org \n", identity);
		goto end;
	}
	if (password != NULL) {
		info = linphone_auth_info_new(linphone_address_get_username(from), NULL, password, NULL, NULL,
		                              NULL);   /*create authentication structure from identity*/
		linphone_core_add_auth_info(lc, info); /*add authentication info to LinphoneCore*/
	}

	// configure proxy entries
	linphone_proxy_config_set_identity_address(proxy_cfg, from);   /*set identity with user name and domain*/
	server_addr = linphone_address_get_domain(from);               /*extract domain address from identity*/
	linphone_proxy_config_set_server_addr(proxy_cfg, server_addr); /* we assume domain = proxy server address*/
	linphone_proxy_config_enable_register(proxy_cfg, TRUE);        /*activate registration for this proxy config*/
	linphone_address_unref(from);                                  /*release resource*/

	linphone_core_add_proxy_config(lc, proxy_cfg);         /*add proxy config to linphone core*/
	linphone_core_set_default_proxy_config(lc, proxy_cfg); /*set to default proxy*/

	i = 0;
	/* main loop for receiving notifications and doing background linphonecore work: */
	while (running) {
		linphone_core_iterate(lc); /* first iterate initiates registration */
		ms_usleep(50000);
		++i;
		if (data->ev && i % 100 == 0) {
			LinphoneContent *content = linphone_core_create_content(lc);
			linphone_content_set_type(content, "application");
			linphone_content_set_subtype(content, "goodxml");
			linphone_content_set_utf8_text(content, "really cool");
			linphone_event_notify(data->ev, content);
			linphone_content_unref(content);
		}
	}

	proxy_cfg = linphone_core_get_default_proxy_config(lc);  /* get default proxy config*/
	linphone_proxy_config_edit(proxy_cfg);                   /*start editing proxy configuration*/
	linphone_proxy_config_enable_register(proxy_cfg, FALSE); /*de-activate registration for this proxy config*/
	linphone_proxy_config_done(proxy_cfg);                   /*initiate REGISTER with expire = 0*/

	if (data->ev) {
		linphone_event_terminate(data->ev);
	}

	while (linphone_proxy_config_get_state(proxy_cfg) != LinphoneRegistrationCleared) {
		linphone_core_iterate(lc); /*to make sure we receive call backs before shutting down*/
		ms_usleep(50000);
	}

end:
	printf("Shutting down...\n");
	linphone_core_destroy(lc);
	ms_free(data);
	printf("Exited\n");
	return 0;
}
