2019-03-26 11:53:21 +01:00
|
|
|
|
// swad_language.c: user's settings on language
|
2017-12-09 18:40:04 +01:00
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
SWAD (Shared Workspace At a Distance),
|
|
|
|
|
is a web platform developed at the University of Granada (Spain),
|
|
|
|
|
and used to support university teaching.
|
|
|
|
|
|
|
|
|
|
This file is part of SWAD core.
|
2022-09-21 10:46:14 +02:00
|
|
|
|
Copyright (C) 1999-2022 Antonio Ca<EFBFBD>as Vargas
|
2017-12-09 18:40:04 +01:00
|
|
|
|
|
|
|
|
|
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/>.
|
|
|
|
|
*/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/********************************** Headers **********************************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
2022-01-03 02:47:16 +01:00
|
|
|
|
#define _GNU_SOURCE // For asprintf
|
|
|
|
|
#include <stdio.h> // For asprintf
|
2022-04-25 18:27:24 +02:00
|
|
|
|
#include <stdlib.h> // For free
|
|
|
|
|
#include <string.h> // For strcasecmp
|
2021-12-02 08:39:18 +01:00
|
|
|
|
|
2022-10-19 18:07:49 +02:00
|
|
|
|
#include "swad_alert.h"
|
2017-12-09 18:40:04 +01:00
|
|
|
|
#include "swad_box.h"
|
|
|
|
|
#include "swad_database.h"
|
2022-01-03 02:47:16 +01:00
|
|
|
|
#include "swad_error.h"
|
2020-04-14 17:15:17 +02:00
|
|
|
|
#include "swad_figure.h"
|
2018-11-09 20:47:39 +01:00
|
|
|
|
#include "swad_form.h"
|
2017-12-09 18:40:04 +01:00
|
|
|
|
#include "swad_global.h"
|
2019-11-05 08:46:38 +01:00
|
|
|
|
#include "swad_HTML.h"
|
2017-12-09 18:40:04 +01:00
|
|
|
|
#include "swad_language.h"
|
2022-10-19 18:07:49 +02:00
|
|
|
|
#include "swad_parameter.h"
|
2019-03-26 11:53:21 +01:00
|
|
|
|
#include "swad_setting.h"
|
2021-10-18 23:16:56 +02:00
|
|
|
|
#include "swad_setting_database.h"
|
2022-01-03 02:47:16 +01:00
|
|
|
|
#include "swad_user_database.h"
|
2017-12-09 18:40:04 +01:00
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/*************** External global variables from others modules ***************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
extern struct Globals Gbl;
|
|
|
|
|
|
2018-12-08 16:43:13 +01:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/****************************** Public constants *****************************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
const char *Lan_STR_LANG_ID[1 + Lan_NUM_LANGUAGES] = // ISO 639-1 language codes
|
2019-11-21 16:47:07 +01:00
|
|
|
|
{
|
|
|
|
|
[Lan_LANGUAGE_UNKNOWN] = "",
|
|
|
|
|
[Lan_LANGUAGE_CA ] = "ca",
|
|
|
|
|
[Lan_LANGUAGE_DE ] = "de",
|
|
|
|
|
[Lan_LANGUAGE_EN ] = "en",
|
|
|
|
|
[Lan_LANGUAGE_ES ] = "es",
|
|
|
|
|
[Lan_LANGUAGE_FR ] = "fr",
|
|
|
|
|
[Lan_LANGUAGE_GN ] = "gn",
|
|
|
|
|
[Lan_LANGUAGE_IT ] = "it",
|
|
|
|
|
[Lan_LANGUAGE_PL ] = "pl",
|
|
|
|
|
[Lan_LANGUAGE_PT ] = "pt",
|
2022-06-22 01:33:08 +02:00
|
|
|
|
[Lan_LANGUAGE_TR ] = "tr",
|
2019-11-21 16:47:07 +01:00
|
|
|
|
};
|
2018-12-08 16:43:13 +01:00
|
|
|
|
|
2017-12-09 18:40:04 +01:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/****************************** Private prototypes ***************************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
2020-04-08 03:41:05 +02:00
|
|
|
|
static void Lan_PutIconsLanguage (__attribute__((unused)) void *Args);
|
2017-12-09 18:40:04 +01:00
|
|
|
|
|
2020-04-08 19:42:03 +02:00
|
|
|
|
static void Lan_PutParamLanguage (void *Language);
|
2017-12-09 18:40:04 +01:00
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
2019-03-26 11:53:21 +01:00
|
|
|
|
/*************** Put link to change language (edit settings) *****************/
|
2017-12-09 18:40:04 +01:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
void Lan_PutLinkToChangeLanguage (void)
|
|
|
|
|
{
|
2020-03-26 02:54:30 +01:00
|
|
|
|
Lay_PutContextualLinkIconText (ActReqEdiSet,NULL,
|
|
|
|
|
NULL,NULL,
|
2021-12-22 00:20:06 +01:00
|
|
|
|
"globe-americas.svg",Ico_BLACK,
|
2021-12-22 18:54:43 +01:00
|
|
|
|
"Change language",NULL);
|
2017-12-09 18:40:04 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
2019-03-26 11:53:21 +01:00
|
|
|
|
/************** Put a selector to select language in settings ****************/
|
2017-12-09 18:40:04 +01:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
void Lan_PutBoxToSelectLanguage (void)
|
|
|
|
|
{
|
2019-03-26 11:53:21 +01:00
|
|
|
|
extern const char *Hlp_PROFILE_Settings_language;
|
2017-12-09 18:40:04 +01:00
|
|
|
|
extern const char *Txt_Language;
|
|
|
|
|
|
2020-03-26 02:54:30 +01:00
|
|
|
|
Box_BoxBegin (NULL,Txt_Language,
|
2020-04-08 03:41:05 +02:00
|
|
|
|
Lan_PutIconsLanguage,NULL,
|
2019-03-26 11:53:21 +01:00
|
|
|
|
Hlp_PROFILE_Settings_language,Box_NOT_CLOSABLE);
|
2021-07-08 15:00:17 +02:00
|
|
|
|
Lan_PutSelectorToSelectLanguage ();
|
2019-10-25 22:48:34 +02:00
|
|
|
|
Box_BoxEnd ();
|
2017-12-09 18:40:04 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
2019-03-26 11:53:21 +01:00
|
|
|
|
/**************** Put contextual icons in language setting *******************/
|
2017-12-09 18:40:04 +01:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
2020-04-08 03:41:05 +02:00
|
|
|
|
static void Lan_PutIconsLanguage (__attribute__((unused)) void *Args)
|
2017-12-09 18:40:04 +01:00
|
|
|
|
{
|
2020-04-08 03:41:05 +02:00
|
|
|
|
/***** Put icon to show a figure *****/
|
|
|
|
|
Fig_PutIconToShowFigure (Fig_LANGUAGES);
|
2017-12-09 18:40:04 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/********************* Put a selector to select language *********************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
void Lan_PutSelectorToSelectLanguage (void)
|
|
|
|
|
{
|
2018-12-08 16:43:13 +01:00
|
|
|
|
extern const char *Txt_STR_LANG_NAME[1 + Lan_NUM_LANGUAGES];
|
|
|
|
|
Lan_Language_t Lan;
|
2019-11-06 08:59:15 +01:00
|
|
|
|
unsigned LanUnsigned;
|
2017-12-09 18:40:04 +01:00
|
|
|
|
|
2021-03-02 00:54:26 +01:00
|
|
|
|
Frm_BeginForm (ActReqChgLan);
|
2021-07-08 15:00:17 +02:00
|
|
|
|
HTM_SELECT_Begin (HTM_SUBMIT_ON_CHANGE,
|
2022-03-30 00:46:18 +02:00
|
|
|
|
"name=\"Lan\" class=\"INPUT_%s\""
|
2021-12-15 23:54:57 +01:00
|
|
|
|
" style=\"width:112px; margin:0;\"",
|
2022-04-05 01:00:24 +02:00
|
|
|
|
The_GetSuffix ());
|
2021-07-08 15:00:17 +02:00
|
|
|
|
for (Lan = (Lan_Language_t) 1;
|
|
|
|
|
Lan <= (Lan_Language_t) Lan_NUM_LANGUAGES;
|
|
|
|
|
Lan++)
|
|
|
|
|
{
|
|
|
|
|
LanUnsigned = (unsigned) Lan;
|
|
|
|
|
HTM_OPTION (HTM_Type_UNSIGNED,&LanUnsigned,
|
|
|
|
|
Lan == Gbl.Prefs.Language,false,
|
|
|
|
|
"%s",Txt_STR_LANG_NAME[Lan]);
|
|
|
|
|
}
|
|
|
|
|
HTM_SELECT_End ();
|
2018-11-09 20:47:39 +01:00
|
|
|
|
Frm_EndForm ();
|
2017-12-09 18:40:04 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/********* Ask user if he/she really wants to change the language ************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
void Lan_AskChangeLanguage (void)
|
|
|
|
|
{
|
2018-12-08 16:43:13 +01:00
|
|
|
|
extern const char *Txt_Do_you_want_to_change_your_language_to_LANGUAGE[1 + Lan_NUM_LANGUAGES];
|
|
|
|
|
extern const char *Txt_Do_you_want_to_change_the_language_to_LANGUAGE[1 + Lan_NUM_LANGUAGES];
|
|
|
|
|
extern const char *Txt_Switch_to_LANGUAGE[1 + Lan_NUM_LANGUAGES];
|
|
|
|
|
Lan_Language_t CurrentLanguage = Gbl.Prefs.Language;
|
2017-12-09 18:40:04 +01:00
|
|
|
|
|
|
|
|
|
/***** Get param language *****/
|
|
|
|
|
Gbl.Prefs.Language = Lan_GetParamLanguage (); // Change temporarily language to set form action
|
|
|
|
|
|
|
|
|
|
/***** Request confirmation *****/
|
2020-03-26 02:54:30 +01:00
|
|
|
|
Ale_ShowAlertAndButton (ActChgLan,NULL,NULL,
|
2020-04-08 19:42:03 +02:00
|
|
|
|
Lan_PutParamLanguage,&Gbl.Prefs.Language,
|
2017-12-09 18:40:04 +01:00
|
|
|
|
Btn_CONFIRM_BUTTON,
|
2019-02-17 01:14:55 +01:00
|
|
|
|
Txt_Switch_to_LANGUAGE[Gbl.Prefs.Language],
|
|
|
|
|
Ale_QUESTION,Gbl.Usrs.Me.Logged ? Txt_Do_you_want_to_change_your_language_to_LANGUAGE[Gbl.Prefs.Language] :
|
|
|
|
|
Txt_Do_you_want_to_change_the_language_to_LANGUAGE[Gbl.Prefs.Language]);
|
2017-12-09 18:40:04 +01:00
|
|
|
|
|
|
|
|
|
Gbl.Prefs.Language = CurrentLanguage; // Restore current language
|
|
|
|
|
|
2019-03-26 11:53:21 +01:00
|
|
|
|
/***** Display settings *****/
|
|
|
|
|
Set_EditSettings ();
|
2017-12-09 18:40:04 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/******************************* Change language *****************************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
2020-04-08 19:42:03 +02:00
|
|
|
|
static void Lan_PutParamLanguage (void *Language)
|
2017-12-09 18:40:04 +01:00
|
|
|
|
{
|
2020-04-08 19:42:03 +02:00
|
|
|
|
if (Language)
|
|
|
|
|
Par_PutHiddenParamUnsigned (NULL,"Lan",(unsigned) *((Lan_Language_t *) Language));
|
2017-12-09 18:40:04 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/******************************* Change language *****************************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
void Lan_ChangeLanguage (void)
|
|
|
|
|
{
|
|
|
|
|
/***** Get param language *****/
|
|
|
|
|
Gbl.Prefs.Language = Lan_GetParamLanguage ();
|
|
|
|
|
|
|
|
|
|
/***** Store language in database *****/
|
|
|
|
|
if (Gbl.Usrs.Me.Logged &&
|
|
|
|
|
Gbl.Prefs.Language != Gbl.Usrs.Me.UsrDat.Prefs.Language)
|
|
|
|
|
Lan_UpdateMyLanguageToCurrentLanguage ();
|
|
|
|
|
|
2019-03-26 11:53:21 +01:00
|
|
|
|
/***** Set settings from current IP *****/
|
|
|
|
|
Set_SetSettingsFromIP ();
|
2017-12-09 18:40:04 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/**************** Update my language to the current language *****************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
void Lan_UpdateMyLanguageToCurrentLanguage (void)
|
|
|
|
|
{
|
|
|
|
|
/***** Set my language to the current language *****/
|
|
|
|
|
Gbl.Usrs.Me.UsrDat.Prefs.Language = Gbl.Prefs.Language;
|
|
|
|
|
|
|
|
|
|
/***** Update my language in database *****/
|
2021-09-22 13:20:57 +02:00
|
|
|
|
Set_DB_UpdateMySettingsAboutLanguage ();
|
2017-12-09 18:40:04 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/*************************** Get parameter language **************************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
2018-12-08 16:43:13 +01:00
|
|
|
|
Lan_Language_t Lan_GetParamLanguage (void)
|
2017-12-09 18:40:04 +01:00
|
|
|
|
{
|
2018-12-09 10:46:57 +01:00
|
|
|
|
extern const unsigned Txt_Current_CGI_SWAD_Language;
|
2017-12-09 18:40:04 +01:00
|
|
|
|
|
2018-12-08 16:43:13 +01:00
|
|
|
|
return (Lan_Language_t)
|
2017-12-09 18:40:04 +01:00
|
|
|
|
Par_GetParToUnsignedLong ("Lan",
|
|
|
|
|
1,
|
2018-12-08 16:43:13 +01:00
|
|
|
|
Lan_NUM_LANGUAGES,
|
2018-12-09 10:46:57 +01:00
|
|
|
|
(unsigned long) Txt_Current_CGI_SWAD_Language);
|
2017-12-09 18:40:04 +01:00
|
|
|
|
}
|
2021-12-02 08:39:18 +01:00
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/************************** Get language from string *************************/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
Lan_Language_t Lan_GetLanguageFromStr (const char *Str)
|
|
|
|
|
{
|
|
|
|
|
extern const char *Lan_STR_LANG_ID[1 + Lan_NUM_LANGUAGES];
|
|
|
|
|
Lan_Language_t Lan;
|
|
|
|
|
|
|
|
|
|
for (Lan = (Lan_Language_t) 1;
|
|
|
|
|
Lan <= (Lan_Language_t) Lan_NUM_LANGUAGES;
|
|
|
|
|
Lan++)
|
|
|
|
|
if (!strcasecmp (Str,Lan_STR_LANG_ID[Lan]))
|
|
|
|
|
return Lan;
|
|
|
|
|
|
|
|
|
|
return Lan_LANGUAGE_UNKNOWN;
|
|
|
|
|
}
|
2022-01-03 02:47:16 +01:00
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/********* Get and show number of users who have chosen a language ***********/
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
void Lan_GetAndShowNumUsrsPerLanguage (void)
|
|
|
|
|
{
|
|
|
|
|
extern const char *Hlp_ANALYTICS_Figures_language;
|
|
|
|
|
extern const char *Txt_FIGURE_TYPES[Fig_NUM_FIGURES];
|
|
|
|
|
extern const char *Txt_Language;
|
|
|
|
|
extern const char *Lan_STR_LANG_ID[1 + Lan_NUM_LANGUAGES];
|
|
|
|
|
extern const char *Txt_STR_LANG_NAME[1 + Lan_NUM_LANGUAGES];
|
|
|
|
|
extern const char *Txt_Number_of_users;
|
|
|
|
|
extern const char *Txt_PERCENT_of_users;
|
|
|
|
|
Lan_Language_t Lan;
|
|
|
|
|
char *SubQuery;
|
|
|
|
|
unsigned NumUsrs[1 + Lan_NUM_LANGUAGES];
|
|
|
|
|
unsigned NumUsrsTotal = 0;
|
|
|
|
|
|
|
|
|
|
/***** Begin box and table *****/
|
|
|
|
|
Box_BoxTableBegin (NULL,Txt_FIGURE_TYPES[Fig_LANGUAGES],
|
|
|
|
|
NULL,NULL,
|
|
|
|
|
Hlp_ANALYTICS_Figures_language,Box_NOT_CLOSABLE,2);
|
|
|
|
|
|
|
|
|
|
/***** Heading row *****/
|
|
|
|
|
HTM_TR_Begin (NULL);
|
|
|
|
|
HTM_TH (Txt_Language ,HTM_HEAD_LEFT);
|
|
|
|
|
HTM_TH (Txt_Number_of_users ,HTM_HEAD_RIGHT);
|
|
|
|
|
HTM_TH (Txt_PERCENT_of_users,HTM_HEAD_RIGHT);
|
|
|
|
|
HTM_TR_End ();
|
|
|
|
|
|
|
|
|
|
/***** For each language... *****/
|
|
|
|
|
for (Lan = (Lan_Language_t) 1;
|
|
|
|
|
Lan <= (Lan_Language_t) Lan_NUM_LANGUAGES;
|
|
|
|
|
Lan++)
|
|
|
|
|
{
|
|
|
|
|
/* Get the number of users who have chosen this language from database */
|
|
|
|
|
if (asprintf (&SubQuery,"usr_data.Language='%s'",
|
|
|
|
|
Lan_STR_LANG_ID[Lan]) < 0)
|
|
|
|
|
Err_NotEnoughMemoryExit ();
|
|
|
|
|
NumUsrs[Lan] = Usr_DB_GetNumUsrsWhoChoseAnOption (SubQuery);
|
|
|
|
|
free (SubQuery);
|
|
|
|
|
|
|
|
|
|
/* Update total number of users */
|
|
|
|
|
NumUsrsTotal += NumUsrs[Lan];
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/***** Write number of users who have chosen each language *****/
|
|
|
|
|
for (Lan = (Lan_Language_t) 1;
|
|
|
|
|
Lan <= (Lan_Language_t) Lan_NUM_LANGUAGES;
|
|
|
|
|
Lan++)
|
|
|
|
|
{
|
|
|
|
|
HTM_TR_Begin (NULL);
|
|
|
|
|
|
2022-04-05 01:00:24 +02:00
|
|
|
|
HTM_TD_Begin ("class=\"LM DAT_%s\"",The_GetSuffix ());
|
2022-01-03 02:47:16 +01:00
|
|
|
|
HTM_Txt (Txt_STR_LANG_NAME[Lan]);
|
|
|
|
|
HTM_TD_End ();
|
|
|
|
|
|
2022-04-05 01:00:24 +02:00
|
|
|
|
HTM_TD_Begin ("class=\"RM DAT_%s\"",The_GetSuffix ());
|
2022-01-03 02:47:16 +01:00
|
|
|
|
HTM_Unsigned (NumUsrs[Lan]);
|
|
|
|
|
HTM_TD_End ();
|
|
|
|
|
|
2022-04-05 01:00:24 +02:00
|
|
|
|
HTM_TD_Begin ("class=\"RM DAT_%s\"",The_GetSuffix ());
|
2022-01-03 02:47:16 +01:00
|
|
|
|
HTM_Percentage (NumUsrsTotal ? (double) NumUsrs[Lan] * 100.0 /
|
|
|
|
|
(double) NumUsrsTotal :
|
|
|
|
|
0);
|
|
|
|
|
HTM_TD_End ();
|
|
|
|
|
|
|
|
|
|
HTM_TR_End ();
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/***** End table and box *****/
|
|
|
|
|
Box_BoxTableEnd ();
|
|
|
|
|
}
|