mirror of https://github.com/acanas/swad-core.git
Version 20.79: May 20, 2021 New module swad_connected_database for database queries related to connected users.
This commit is contained in:
parent
b206217046
commit
35c427b08f
5
Makefile
5
Makefile
|
@ -34,8 +34,9 @@ OBJS = swad_account.o swad_account_database.o swad_action.o swad_agenda.o \
|
|||
swad_button.o \
|
||||
swad_calendar.o swad_call_for_exam.o swad_center.o \
|
||||
swad_center_config.o swad_chat.o swad_chat_database.o swad_config.o \
|
||||
swad_connected.o swad_cookie.o swad_country.o swad_country_config.o \
|
||||
swad_course.o swad_course_config.o swad_cryptography.o \
|
||||
swad_connected.o swad_connected_database.o swad_cookie.o swad_country.o \
|
||||
swad_country_config.o swad_course.o swad_course_config.o \
|
||||
swad_cryptography.o \
|
||||
swad_database.o swad_date.o swad_degree.o swad_degree_config.o \
|
||||
swad_degree_type.o swad_department.o swad_duplicate.o \
|
||||
swad_enrolment.o swad_error.o swad_exam.o swad_exam_log.o \
|
||||
|
|
|
@ -34,6 +34,7 @@
|
|||
#include "swad_attendance_database.h"
|
||||
#include "swad_box.h"
|
||||
#include "swad_calendar.h"
|
||||
#include "swad_connected_database.h"
|
||||
#include "swad_database.h"
|
||||
#include "swad_duplicate.h"
|
||||
#include "swad_enrolment.h"
|
||||
|
|
|
@ -602,13 +602,14 @@ TODO: FIX BUG, URGENT! En las fechas como par
|
|||
|
||||
TODO: En las encuestas, que los estudiantes no puedan ver los resultados hasta que no finalice el plazo.
|
||||
*/
|
||||
#define Log_PLATFORM_VERSION "SWAD 20.78.2 (2021-05-20)"
|
||||
#define Log_PLATFORM_VERSION "SWAD 20.79 (2021-05-20)"
|
||||
#define CSS_FILE "swad20.45.css"
|
||||
#define JS_FILE "swad20.69.1.js"
|
||||
/*
|
||||
TODO: Rename CENTRE to CENTER in help wiki.
|
||||
TODO: Rename ASSESSMENT.Announcements to ASSESSMENT.Calls_for_exams
|
||||
|
||||
Version 20.79: May 20, 2021 New module swad_connected_database for database queries related to connected users. (311415 lines)
|
||||
Version 20.78.2: May 20, 2021 Code formatting in games and matches. (311326 lines)
|
||||
Version 20.78.1: May 20, 2021 Fixed bug in matches. Reported by Jesús Garrido Alcázar. (311317 lines)
|
||||
Version 20.78: May 19, 2021 New module swad_chat_database for database queries related to chat. (311327 lines)
|
||||
|
|
531
swad_connected.c
531
swad_connected.c
|
@ -34,6 +34,8 @@
|
|||
#include <string.h> // For string functions
|
||||
|
||||
#include "swad_box.h"
|
||||
#include "swad_connected.h"
|
||||
#include "swad_connected_database.h"
|
||||
#include "swad_database.h"
|
||||
#include "swad_error.h"
|
||||
#include "swad_form.h"
|
||||
|
@ -72,7 +74,8 @@ static void Con_ShowConnectedUsrsWithARoleBelongingToCurrentLocationOnMainZone (
|
|||
static void Con_ShowConnectedUsrsWithARoleBelongingToCurrentCrsOnRightColumn (Rol_Role_t Role);
|
||||
static unsigned Con_GetConnectedUsrsTotal (Rol_Role_t Role);
|
||||
|
||||
static void Con_GetNumConnectedUsrsWithARoleBelongingCurrentLocation (Rol_Role_t Role,struct ConnectedUsrs *Usrs);
|
||||
static void Con_GetNumConnectedWithARoleBelongingToCurrentScope (Rol_Role_t Role,
|
||||
struct ConnectedUsrs *Usrs);
|
||||
static void Con_ComputeConnectedUsrsWithARoleCurrentCrsOneByOne (Rol_Role_t Role);
|
||||
static void Con_ShowConnectedUsrsCurrentCrsOneByOneOnRightColumn (Rol_Role_t Role);
|
||||
static void Con_WriteRowConnectedUsrOnRightColumn (Rol_Role_t Role);
|
||||
|
@ -103,13 +106,16 @@ void Con_ShowConnectedUsrs (void)
|
|||
/***** Begin box *****/
|
||||
/* Current time */
|
||||
if (asprintf (&Title,"%s"
|
||||
"<div id=\"connected_current_time\"></div>",
|
||||
"<div id=\"connected_current_time\">"
|
||||
"</div>",
|
||||
Txt_Connected_users) < 0)
|
||||
Err_NotEnoughMemoryExit ();
|
||||
Box_BoxBegin (NULL,Title,
|
||||
Con_PutIconToUpdateConnected,NULL,
|
||||
Hlp_USERS_Connected,Box_NOT_CLOSABLE);
|
||||
free (Title);
|
||||
|
||||
/***** Current time *****/
|
||||
Dat_WriteLocalDateHMSFromUTC ("connected_current_time",Gbl.StartExecutionTimeUTC,
|
||||
Gbl.Prefs.DateFormat,Dat_SEPARATOR_COMMA,
|
||||
false,false,true,0x7);
|
||||
|
@ -133,11 +139,16 @@ static void Con_PutIconToUpdateConnected (__attribute__((unused)) void *Args)
|
|||
{
|
||||
extern const char *Txt_Update;
|
||||
|
||||
/***** Begin form *****/
|
||||
Frm_BeginForm (ActLstCon);
|
||||
Sco_PutParamScope ("ScopeCon",Gbl.Scope.Current);
|
||||
|
||||
/* Button */
|
||||
HTM_BUTTON_Animated_Begin (Txt_Update,"BT_LINK",NULL);
|
||||
Ico_PutCalculateIcon (Txt_Update);
|
||||
HTM_BUTTON_End ();
|
||||
|
||||
/***** End form *****/
|
||||
Frm_EndForm ();
|
||||
}
|
||||
|
||||
|
@ -179,7 +190,7 @@ void Con_ShowGlobalConnectedUsrs (void)
|
|||
HTM_TxtF ("%u %s",Gbl.Session.NumSessions,
|
||||
Gbl.Session.NumSessions == 1 ? Txt_session :
|
||||
Txt_sessions);
|
||||
/* End link to view more details about connected users */
|
||||
|
||||
HTM_BUTTON_End ();
|
||||
Frm_EndForm ();
|
||||
|
||||
|
@ -252,7 +263,7 @@ void Con_ComputeConnectedUsrsBelongingToCurrentCrs (void)
|
|||
static void Con_ComputeConnectedUsrsWithARoleBelongingToCurrentCrs (Rol_Role_t Role)
|
||||
{
|
||||
/***** Get number of connected users who belong to current course *****/
|
||||
Con_GetNumConnectedUsrsWithARoleBelongingCurrentLocation (Role,&Gbl.Usrs.Connected.Usrs[Role]);
|
||||
Con_GetNumConnectedWithARoleBelongingToCurrentScope (Role,&Gbl.Usrs.Connected.Usrs[Role]);
|
||||
|
||||
/***** Get list connected users belonging to this course *****/
|
||||
Con_ComputeConnectedUsrsWithARoleCurrentCrsOneByOne (Role);
|
||||
|
@ -271,8 +282,10 @@ static void Con_ShowConnectedUsrsBelongingToLocation (void)
|
|||
HTM_DIV_Begin ("class=\"CONNECTED\"");
|
||||
|
||||
/***** Number of connected users who belong to scope *****/
|
||||
Con_GetNumConnectedUsrsWithARoleBelongingCurrentLocation (Rol_UNK,&Usrs);
|
||||
Con_GetNumConnectedWithARoleBelongingToCurrentScope (Rol_UNK,&Usrs);
|
||||
HTM_DIV_Begin ("class=\"CONNECTED_TXT\"");
|
||||
|
||||
/* Write number of connected users */
|
||||
HTM_TxtF ("%u %s ",Usrs.NumUsrs,Txt_from);
|
||||
|
||||
/* Put form to change scope */
|
||||
|
@ -323,7 +336,7 @@ void Con_ShowConnectedUsrsBelongingToCurrentCrs (void)
|
|||
// is dynamically updated via AJAX
|
||||
HTM_BUTTON_SUBMIT_Begin (Txt_Connected_users,"BT_LINK CONNECTED_TXT",NULL);
|
||||
Str_Copy (CourseName,Gbl.Hierarchy.Crs.ShrtName,sizeof (CourseName) - 1);
|
||||
Con_GetNumConnectedUsrsWithARoleBelongingCurrentLocation (Rol_UNK,&Usrs);
|
||||
Con_GetNumConnectedWithARoleBelongingToCurrentScope (Rol_UNK,&Usrs);
|
||||
HTM_TxtF ("%u %s %s",Usrs.NumUsrs,Txt_from,CourseName);
|
||||
HTM_BUTTON_End ();
|
||||
Frm_EndForm ();
|
||||
|
@ -353,7 +366,7 @@ static void Con_ShowConnectedUsrsWithARoleBelongingToCurrentLocationOnMainZone (
|
|||
struct ConnectedUsrs Usrs;
|
||||
|
||||
/***** Write number of connected users who belong to current course *****/
|
||||
Con_GetNumConnectedUsrsWithARoleBelongingCurrentLocation (Role,&Usrs);
|
||||
Con_GetNumConnectedWithARoleBelongingToCurrentScope (Role,&Usrs);
|
||||
if (Usrs.NumUsrs)
|
||||
{
|
||||
HTM_TR_Begin (NULL);
|
||||
|
@ -390,13 +403,11 @@ static void Con_ShowConnectedUsrsWithARoleBelongingToCurrentCrsOnRightColumn (Ro
|
|||
Gbl.Usrs.Connected.NumUsrsToList = Cfg_MAX_CONNECTED_SHOWN;
|
||||
|
||||
HTM_TR_Begin (NULL);
|
||||
|
||||
HTM_TD_Begin ("colspan=\"3\" class=\"CON_USR_NARROW_TIT\"");
|
||||
HTM_TxtF ("%u %s",NumUsrsThisRole,
|
||||
NumUsrsThisRole == 1 ? Txt_ROLES_SINGUL_abc[Role][UsrSex] :
|
||||
Txt_ROLES_PLURAL_abc[Role][UsrSex]);
|
||||
HTM_TD_End ();
|
||||
|
||||
HTM_TR_End ();
|
||||
|
||||
/***** I can see connected users *****/
|
||||
|
@ -406,7 +417,6 @@ static void Con_ShowConnectedUsrsWithARoleBelongingToCurrentCrsOnRightColumn (Ro
|
|||
if (Gbl.Usrs.Connected.NumUsrsToList < Gbl.Usrs.Connected.NumUsrs)
|
||||
{
|
||||
HTM_TR_Begin (NULL);
|
||||
|
||||
HTM_TD_Begin ("colspan=\"3\" class=\"CT\"");
|
||||
Frm_BeginFormUnique (ActLstCon); // Must be unique because
|
||||
// the list of connected users
|
||||
|
@ -416,55 +426,11 @@ static void Con_ShowConnectedUsrsWithARoleBelongingToCurrentCrsOnRightColumn (Ro
|
|||
Txt_Connected_users,"ICO16x16");
|
||||
Frm_EndForm ();
|
||||
HTM_TD_End ();
|
||||
|
||||
HTM_TR_End ();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/********************* Modify my entry in connected list *********************/
|
||||
/*****************************************************************************/
|
||||
|
||||
void Con_UpdateMeInConnectedList (void)
|
||||
{
|
||||
/***** Update my entry in connected list.
|
||||
The role which is stored is the role of the last click *****/
|
||||
DB_QueryREPLACE ("can not update list of connected users",
|
||||
"REPLACE INTO usr_connected"
|
||||
" (UsrCod,RoleInLastCrs,LastCrsCod,LastTime)"
|
||||
" VALUES"
|
||||
" (%ld,%u,%ld,NOW())",
|
||||
Gbl.Usrs.Me.UsrDat.UsrCod,
|
||||
(unsigned) Gbl.Usrs.Me.Role.Logged,
|
||||
Gbl.Hierarchy.Crs.CrsCod);
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/************************** Remove old connected uses ************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
void Con_DB_RemoveOldConnected (void)
|
||||
{
|
||||
DB_QueryDELETE ("can not remove old users from list of connected users",
|
||||
"DELETE FROM usr_connected"
|
||||
" WHERE UsrCod NOT IN"
|
||||
" (SELECT DISTINCT(UsrCod)"
|
||||
" FROM ses_sessions)");
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/************* Remove a given user from list of connected users **************/
|
||||
/*****************************************************************************/
|
||||
|
||||
void Con_DB_RemoveUsrFromConnected (long UsrCod)
|
||||
{
|
||||
DB_QueryDELETE ("can not remove a user from table of connected users",
|
||||
"DELETE FROM usr_connected"
|
||||
" WHERE UsrCod=%ld",
|
||||
UsrCod);
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/********************* Get connected users with a role ***********************/
|
||||
/*****************************************************************************/
|
||||
|
@ -475,20 +441,16 @@ static unsigned Con_GetConnectedUsrsTotal (Rol_Role_t Role)
|
|||
return 0;
|
||||
|
||||
/***** Get number of connected users with a role from database *****/
|
||||
return (unsigned)
|
||||
DB_QueryCOUNT ("can not get number of connected users",
|
||||
"SELECT COUNT(*)"
|
||||
" FROM usr_connected"
|
||||
" WHERE RoleInLastCrs=%u",
|
||||
(unsigned) Role);
|
||||
return Con_DB_GetConnectedUsrsTotal (Role);
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/************** Get connected users belonging to current course **************/
|
||||
/************** Get connected users belonging to current scope ***************/
|
||||
/*****************************************************************************/
|
||||
// Return user's sex in UsrSex
|
||||
|
||||
static void Con_GetNumConnectedUsrsWithARoleBelongingCurrentLocation (Rol_Role_t Role,struct ConnectedUsrs *Usrs)
|
||||
static void Con_GetNumConnectedWithARoleBelongingToCurrentScope (Rol_Role_t Role,
|
||||
struct ConnectedUsrs *Usrs)
|
||||
{
|
||||
extern const char *Usr_StringsSexDB[Usr_NUM_SEXS];
|
||||
MYSQL_RES *mysql_res;
|
||||
|
@ -496,272 +458,13 @@ static void Con_GetNumConnectedUsrsWithARoleBelongingCurrentLocation (Rol_Role_t
|
|||
unsigned NumSexs;
|
||||
Usr_Sex_t Sex;
|
||||
|
||||
/***** Get number of connected users who belong to current course from database *****/
|
||||
switch (Role)
|
||||
{
|
||||
case Rol_UNK: // Here Rol_UNK means "any role"
|
||||
switch (Gbl.Scope.Current)
|
||||
{
|
||||
case Hie_Lvl_SYS: // Show connected users in the whole platform
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE usr_connected.UsrCod=usr_data.UsrCod");
|
||||
break;
|
||||
case Hie_Lvl_CTY: // Show connected users in the current country
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM ins_instits,"
|
||||
"ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE ins_instits.CtyCod=%ld"
|
||||
" AND ins_instits.InsCod=ctr_centers.InsCod"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Cty.CtyCod);
|
||||
break;
|
||||
case Hie_Lvl_INS: // Show connected users in the current institution
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE ctr_centers.InsCod=%ld"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Ins.InsCod);
|
||||
break;
|
||||
case Hie_Lvl_CTR: // Show connected users in the current center
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE deg_degrees.CtrCod=%ld"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Ctr.CtrCod);
|
||||
break;
|
||||
case Hie_Lvl_DEG: // Show connected users in the current degree
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE crs_courses.DegCod=%ld"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Deg.DegCod);
|
||||
break;
|
||||
case Hie_Lvl_CRS: // Show connected users in the current course
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE crs_users.CrsCod=%ld"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Crs.CrsCod);
|
||||
break;
|
||||
default:
|
||||
Err_WrongScopeExit ();
|
||||
break;
|
||||
}
|
||||
break;
|
||||
case Rol_GST:
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE usr_connected.UsrCod NOT IN"
|
||||
" (SELECT UsrCod"
|
||||
" FROM crs_users)"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod");
|
||||
break;
|
||||
case Rol_STD:
|
||||
case Rol_NET:
|
||||
case Rol_TCH:
|
||||
switch (Gbl.Scope.Current)
|
||||
{
|
||||
case Hie_Lvl_SYS: // Show connected users in the whole platform
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM usr_connected,"
|
||||
"crs_users,"
|
||||
"usr_data"
|
||||
" WHERE usr_connected.UsrCod=crs_users.UsrCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_CTY: // Show connected users in the current country
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM ins_instits,"
|
||||
"ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE ins_instits.CtyCod=%ld"
|
||||
" AND ins_instits.InsCod=ctr_centers.InsCod"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Cty.CtyCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_INS: // Show connected users in the current institution
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE ctr_centers.InsCod=%ld"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Ins.InsCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_CTR: // Show connected users in the current center
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE deg_degrees.CtrCod=%ld"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Ctr.CtrCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_DEG: // Show connected users in the current degree
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE crs_courses.DegCod=%ld"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Deg.DegCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_CRS: // Show connected users in the current course
|
||||
DB_QuerySELECT (&mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE crs_users.CrsCod=%ld"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Crs.CrsCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
default:
|
||||
Err_WrongScopeExit ();
|
||||
break;
|
||||
}
|
||||
break;
|
||||
default:
|
||||
Err_WrongRoleExit ();
|
||||
break;
|
||||
}
|
||||
/***** Default values *****/
|
||||
Usrs->NumUsrs = 0;
|
||||
Usrs->Sex = Usr_SEX_UNKNOWN;
|
||||
|
||||
/***** Get number of connected users who belong to current course from database *****/
|
||||
if (Con_DB_GetNumConnectedFromCurrentLocation (&mysql_res,Role))
|
||||
{
|
||||
row = mysql_fetch_row (mysql_res);
|
||||
|
||||
/***** Get number of users (row[0]) *****/
|
||||
|
@ -773,7 +476,6 @@ static void Con_GetNumConnectedUsrsWithARoleBelongingCurrentLocation (Rol_Role_t
|
|||
Err_ShowErrorAndExit ("Error when getting number of sexs in connected users who belong to this location.");
|
||||
|
||||
/***** Get users' sex (row[2]) *****/
|
||||
Usrs->Sex = Usr_SEX_UNKNOWN;
|
||||
if (NumSexs == 1)
|
||||
for (Sex = (Usr_Sex_t) 0;
|
||||
Sex <= (Usr_Sex_t) (Usr_NUM_SEXS - 1);
|
||||
|
@ -783,6 +485,7 @@ static void Con_GetNumConnectedUsrsWithARoleBelongingCurrentLocation (Rol_Role_t
|
|||
Usrs->Sex = Sex;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
/***** Free structure that stores the query result *****/
|
||||
DB_FreeMySQLResult (&mysql_res);
|
||||
|
@ -800,20 +503,8 @@ static void Con_ComputeConnectedUsrsWithARoleCurrentCrsOneByOne (Rol_Role_t Role
|
|||
unsigned NumUsr = Gbl.Usrs.Connected.NumUsrs; // Save current number of users
|
||||
|
||||
/***** Get connected users who belong to current course from database *****/
|
||||
NumUsrs = (unsigned)
|
||||
DB_QuerySELECT (&mysql_res,"can not get list of connected users"
|
||||
" who belong to this course",
|
||||
"SELECT usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE crs_users.CrsCod=%ld"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Crs.CrsCod,
|
||||
(unsigned) Role);
|
||||
NumUsrs = Con_DB_GetConnectedFromCurrentLocation (&mysql_res,Role);
|
||||
|
||||
Gbl.Usrs.Connected.NumUsrs += NumUsrs;
|
||||
Gbl.Usrs.Connected.NumUsrsToList += NumUsrs;
|
||||
if (Gbl.Usrs.Connected.NumUsrsToList > Cfg_MAX_CONNECTED_SHOWN)
|
||||
|
@ -976,161 +667,7 @@ static void Con_ShowConnectedUsrsCurrentLocationOneByOneOnMainZone (Rol_Role_t R
|
|||
Role == Rol_TCH)); // ...or teacher
|
||||
|
||||
/***** Get connected users who belong to current location from database *****/
|
||||
switch (Role)
|
||||
{
|
||||
case Rol_GST:
|
||||
NumUsrs = (unsigned)
|
||||
DB_QuerySELECT (&mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT UsrCod," // row[0]
|
||||
"LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(LastTime) AS Dif" // row[2]
|
||||
" FROM usr_connected"
|
||||
" WHERE UsrCod NOT IN"
|
||||
" (SELECT UsrCod"
|
||||
" FROM crs_users)"
|
||||
" ORDER BY Dif");
|
||||
break;
|
||||
case Rol_STD:
|
||||
case Rol_NET:
|
||||
case Rol_TCH:
|
||||
switch (Gbl.Scope.Current)
|
||||
{
|
||||
case Hie_Lvl_SYS: // Show connected users in the whole platform
|
||||
NumUsrs = (unsigned)
|
||||
DB_QuerySELECT (&mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM usr_connected,"
|
||||
"crs_users"
|
||||
" WHERE usr_connected.UsrCod=crs_users.UsrCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" ORDER BY Dif",
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_CTY: // Show connected users in the current country
|
||||
NumUsrs = (unsigned)
|
||||
DB_QuerySELECT (&mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM ins_instits,"
|
||||
"ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE ins_instits.CtyCod=%ld"
|
||||
" AND ins_instits.InsCod=ctr_centers.InsCod"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Cty.CtyCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_INS: // Show connected users in the current institution
|
||||
NumUsrs = (unsigned)
|
||||
DB_QuerySELECT (&mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE ctr_centers.InsCod=%ld"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Ins.InsCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_CTR: // Show connected users in the current center
|
||||
NumUsrs = (unsigned)
|
||||
DB_QuerySELECT (&mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE deg_degrees.CtrCod=%ld"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Ctr.CtrCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_DEG: // Show connected users in the current degree
|
||||
NumUsrs = (unsigned)
|
||||
DB_QuerySELECT (&mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE crs_courses.DegCod=%ld"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Deg.DegCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
case Hie_Lvl_CRS: // Show connected users in the current course
|
||||
NumUsrs = (unsigned)
|
||||
DB_QuerySELECT (&mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE crs_users.CrsCod=%ld"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Crs.CrsCod,
|
||||
(unsigned) Role);
|
||||
break;
|
||||
default:
|
||||
Err_WrongScopeExit ();
|
||||
break;
|
||||
}
|
||||
break;
|
||||
default:
|
||||
Err_WrongRoleExit ();
|
||||
break;
|
||||
}
|
||||
NumUsrs = Con_DB_GetConnectedFromCurrentLocation (&mysql_res,Role);
|
||||
if (NumUsrs)
|
||||
{
|
||||
/***** Initialize structure with user's data *****/
|
||||
|
|
|
@ -54,9 +54,6 @@ void Con_ShowConnectedUsrs (void);
|
|||
void Con_ShowGlobalConnectedUsrs (void);
|
||||
void Con_ComputeConnectedUsrsBelongingToCurrentCrs (void);
|
||||
void Con_ShowConnectedUsrsBelongingToCurrentCrs (void);
|
||||
void Con_UpdateMeInConnectedList (void);
|
||||
void Con_DB_RemoveOldConnected (void);
|
||||
void Con_DB_RemoveUsrFromConnected (long UsrCod);
|
||||
|
||||
void Con_WriteScriptClockConnected (void);
|
||||
|
||||
|
|
|
@ -0,0 +1,530 @@
|
|||
// swad_connected_database.c: connected users operations with database
|
||||
|
||||
/*
|
||||
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.
|
||||
Copyright (C) 1999-2021 Antonio Cañas Vargas
|
||||
|
||||
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 *********************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
#include "swad_connected.h"
|
||||
#include "swad_connected_database.h"
|
||||
#include "swad_database.h"
|
||||
#include "swad_error.h"
|
||||
#include "swad_global.h"
|
||||
|
||||
/*****************************************************************************/
|
||||
/*************************** Private constants *******************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
/*****************************************************************************/
|
||||
/************** External global variables from others modules ****************/
|
||||
/*****************************************************************************/
|
||||
|
||||
extern struct Globals Gbl;
|
||||
|
||||
/*****************************************************************************/
|
||||
/**************************** Private prototypes *****************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
/*****************************************************************************/
|
||||
/********************* Get connected users with a role ***********************/
|
||||
/*****************************************************************************/
|
||||
|
||||
unsigned Con_DB_GetConnectedUsrsTotal (Rol_Role_t Role)
|
||||
{
|
||||
/***** Get number of connected users with a role from database *****/
|
||||
return (unsigned)
|
||||
DB_QueryCOUNT ("can not get number of connected users",
|
||||
"SELECT COUNT(*)"
|
||||
" FROM usr_connected"
|
||||
" WHERE RoleInLastCrs=%u",
|
||||
(unsigned) Role);
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/************ Get connected users belonging to current location **************/
|
||||
/*****************************************************************************/
|
||||
|
||||
unsigned Con_DB_GetNumConnectedFromCurrentLocation (MYSQL_RES **mysql_res,Rol_Role_t Role)
|
||||
{
|
||||
/***** Get number of connected users who belong to current course from database *****/
|
||||
switch (Role)
|
||||
{
|
||||
case Rol_UNK: // Here Rol_UNK means "any role"
|
||||
switch (Gbl.Scope.Current)
|
||||
{
|
||||
case Hie_Lvl_SYS: // Get connected users in the whole platform
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE usr_connected.UsrCod=usr_data.UsrCod");
|
||||
case Hie_Lvl_CTY: // Get connected users in the current country
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM ins_instits,"
|
||||
"ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE ins_instits.CtyCod=%ld"
|
||||
" AND ins_instits.InsCod=ctr_centers.InsCod"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Cty.CtyCod);
|
||||
case Hie_Lvl_INS: // Get connected users in the current institution
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE ctr_centers.InsCod=%ld"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Ins.InsCod);
|
||||
case Hie_Lvl_CTR: // Get connected users in the current center
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE deg_degrees.CtrCod=%ld"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Ctr.CtrCod);
|
||||
case Hie_Lvl_DEG: // Get connected users in the current degree
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE crs_courses.DegCod=%ld"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Deg.DegCod);
|
||||
case Hie_Lvl_CRS: // Get connected users in the current course
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE crs_users.CrsCod=%ld"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Crs.CrsCod);
|
||||
default:
|
||||
Err_WrongScopeExit ();
|
||||
}
|
||||
return 0; // Not reached
|
||||
case Rol_GST:
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE usr_connected.UsrCod NOT IN"
|
||||
" (SELECT UsrCod"
|
||||
" FROM crs_users)"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod");
|
||||
case Rol_STD:
|
||||
case Rol_NET:
|
||||
case Rol_TCH:
|
||||
switch (Gbl.Scope.Current)
|
||||
{
|
||||
case Hie_Lvl_SYS: // Get connected users in the whole platform
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM usr_connected,"
|
||||
"crs_users,"
|
||||
"usr_data"
|
||||
" WHERE usr_connected.UsrCod=crs_users.UsrCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_CTY: // Get connected users in the current country
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM ins_instits,"
|
||||
"ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE ins_instits.CtyCod=%ld"
|
||||
" AND ins_instits.InsCod=ctr_centers.InsCod"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Cty.CtyCod,
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_INS: // Get connected users in the current institution
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE ctr_centers.InsCod=%ld"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Ins.InsCod,
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_CTR: // Get connected users in the current center
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE deg_degrees.CtrCod=%ld"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Ctr.CtrCod,
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_DEG: // Get connected users in the current degree
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE crs_courses.DegCod=%ld"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Deg.DegCod,
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_CRS: // Get connected users in the current course
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get number"
|
||||
" of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT COUNT(DISTINCT usr_connected.UsrCod)," // row[0]
|
||||
"COUNT(DISTINCT usr_data.Sex)," // row[1]
|
||||
"MIN(usr_data.Sex)" // row[2]
|
||||
" FROM crs_users,"
|
||||
"usr_connected,"
|
||||
"usr_data"
|
||||
" WHERE crs_users.CrsCod=%ld"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" AND usr_connected.UsrCod=usr_data.UsrCod",
|
||||
Gbl.Hierarchy.Crs.CrsCod,
|
||||
(unsigned) Role);
|
||||
default:
|
||||
Err_WrongScopeExit ();
|
||||
}
|
||||
return 0; // Not reached
|
||||
default:
|
||||
Err_WrongRoleExit ();
|
||||
return 0; // Not reached
|
||||
}
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/***** Get connected users who belong to current location from database ******/
|
||||
/*****************************************************************************/
|
||||
|
||||
unsigned Con_DB_GetConnectedFromCurrentLocation (MYSQL_RES **mysql_res,Rol_Role_t Role)
|
||||
{
|
||||
switch (Role)
|
||||
{
|
||||
case Rol_GST:
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT UsrCod," // row[0]
|
||||
"LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(LastTime) AS Dif" // row[2]
|
||||
" FROM usr_connected"
|
||||
" WHERE UsrCod NOT IN"
|
||||
" (SELECT UsrCod"
|
||||
" FROM crs_users)"
|
||||
" ORDER BY Dif");
|
||||
case Rol_STD:
|
||||
case Rol_NET:
|
||||
case Rol_TCH:
|
||||
switch (Gbl.Scope.Current)
|
||||
{
|
||||
case Hie_Lvl_SYS: // Show connected users in the whole platform
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM usr_connected,"
|
||||
"crs_users"
|
||||
" WHERE usr_connected.UsrCod=crs_users.UsrCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" ORDER BY Dif",
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_CTY: // Show connected users in the current country
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM ins_instits,"
|
||||
"ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE ins_instits.CtyCod=%ld"
|
||||
" AND ins_instits.InsCod=ctr_centers.InsCod"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Cty.CtyCod,
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_INS: // Show connected users in the current institution
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM ctr_centers,"
|
||||
"deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE ctr_centers.InsCod=%ld"
|
||||
" AND ctr_centers.CtrCod=deg_degrees.CtrCod"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Ins.InsCod,
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_CTR: // Show connected users in the current center
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM deg_degrees,"
|
||||
"crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE deg_degrees.CtrCod=%ld"
|
||||
" AND deg_degrees.DegCod=crs_courses.DegCod"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Ctr.CtrCod,
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_DEG: // Show connected users in the current degree
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT DISTINCTROW "
|
||||
"usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM crs_courses,"
|
||||
"crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE crs_courses.DegCod=%ld"
|
||||
" AND crs_courses.CrsCod=crs_users.CrsCod"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Deg.DegCod,
|
||||
(unsigned) Role);
|
||||
case Hie_Lvl_CRS: // Show connected users in the current course
|
||||
return (unsigned)
|
||||
DB_QuerySELECT (mysql_res,"can not get list of connected users"
|
||||
" who belong to this location",
|
||||
"SELECT usr_connected.UsrCod," // row[0]
|
||||
"usr_connected.LastCrsCod," // row[1]
|
||||
"UNIX_TIMESTAMP()-"
|
||||
"UNIX_TIMESTAMP(usr_connected.LastTime) AS Dif" // row[2]
|
||||
" FROM crs_users,"
|
||||
"usr_connected"
|
||||
" WHERE crs_users.CrsCod=%ld"
|
||||
" AND crs_users.Role=%u"
|
||||
" AND crs_users.UsrCod=usr_connected.UsrCod"
|
||||
" ORDER BY Dif",
|
||||
Gbl.Hierarchy.Crs.CrsCod,
|
||||
(unsigned) Role);
|
||||
default:
|
||||
Err_WrongScopeExit ();
|
||||
}
|
||||
return 0; // Not reached
|
||||
default:
|
||||
Err_WrongRoleExit ();
|
||||
return 0; // Not reached
|
||||
}
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/********************* Modify my entry in connected list *********************/
|
||||
/*****************************************************************************/
|
||||
|
||||
void Con_DB_UpdateMeInConnectedList (void)
|
||||
{
|
||||
/***** Update my entry in connected list.
|
||||
The role which is stored is the role of the last click *****/
|
||||
DB_QueryREPLACE ("can not update list of connected users",
|
||||
"REPLACE INTO usr_connected"
|
||||
" (UsrCod,RoleInLastCrs,LastCrsCod,LastTime)"
|
||||
" VALUES"
|
||||
" (%ld,%u,%ld,NOW())",
|
||||
Gbl.Usrs.Me.UsrDat.UsrCod,
|
||||
(unsigned) Gbl.Usrs.Me.Role.Logged,
|
||||
Gbl.Hierarchy.Crs.CrsCod);
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/************************** Remove old connected uses ************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
void Con_DB_RemoveOldConnected (void)
|
||||
{
|
||||
DB_QueryDELETE ("can not remove old users from list of connected users",
|
||||
"DELETE FROM usr_connected"
|
||||
" WHERE UsrCod NOT IN"
|
||||
" (SELECT DISTINCT(UsrCod)"
|
||||
" FROM ses_sessions)");
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/************* Remove a given user from list of connected users **************/
|
||||
/*****************************************************************************/
|
||||
|
||||
void Con_DB_RemoveUsrFromConnected (long UsrCod)
|
||||
{
|
||||
DB_QueryDELETE ("can not remove a user from table of connected users",
|
||||
"DELETE FROM usr_connected"
|
||||
" WHERE UsrCod=%ld",
|
||||
UsrCod);
|
||||
}
|
|
@ -0,0 +1,53 @@
|
|||
// swad_connected_database.h: connected users operations with database
|
||||
|
||||
#ifndef _SWAD_CON_DB
|
||||
#define _SWAD_CON_DB
|
||||
/*
|
||||
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.
|
||||
Copyright (C) 1999-2021 Antonio Cañas Vargas
|
||||
|
||||
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 *********************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
#include "swad_role.h"
|
||||
|
||||
/*****************************************************************************/
|
||||
/***************************** Public constants ******************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
/*****************************************************************************/
|
||||
/******************************** Public types *******************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
/*****************************************************************************/
|
||||
/***************************** Public prototypes *****************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
unsigned Con_DB_GetConnectedUsrsTotal (Rol_Role_t Role);
|
||||
unsigned Con_DB_GetNumConnectedFromCurrentLocation (MYSQL_RES **mysql_res,Rol_Role_t Role);
|
||||
unsigned Con_DB_GetConnectedFromCurrentLocation (MYSQL_RES **mysql_res,Rol_Role_t Role);
|
||||
|
||||
void Con_DB_UpdateMeInConnectedList (void);
|
||||
|
||||
void Con_DB_RemoveOldConnected (void);
|
||||
void Con_DB_RemoveUsrFromConnected (long UsrCod);
|
||||
|
||||
#endif
|
|
@ -33,7 +33,7 @@
|
|||
#include "swad_action.h"
|
||||
#include "swad_announcement.h"
|
||||
#include "swad_config.h"
|
||||
#include "swad_connected.h"
|
||||
#include "swad_connected_database.h"
|
||||
#include "swad_database.h"
|
||||
#include "swad_error.h"
|
||||
#include "swad_firewall.h"
|
||||
|
|
|
@ -25,6 +25,7 @@
|
|||
/*********************************** Headers *********************************/
|
||||
/*****************************************************************************/
|
||||
|
||||
#include "swad_connected_database.h"
|
||||
#include "swad_database.h"
|
||||
#include "swad_form.h"
|
||||
#include "swad_global.h"
|
||||
|
@ -555,7 +556,7 @@ void Rol_ChangeMyRole (void)
|
|||
Ses_UpdateSessionDataInDB ();
|
||||
|
||||
/* ...and update logged role in list of connected */
|
||||
Con_UpdateMeInConnectedList ();
|
||||
Con_DB_UpdateMeInConnectedList ();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
@ -30,7 +30,7 @@
|
|||
#include <stdio.h> // For sprintf
|
||||
#include <string.h> // For string functions
|
||||
|
||||
#include "swad_connected.h"
|
||||
#include "swad_connected_database.h"
|
||||
#include "swad_database.h"
|
||||
#include "swad_error.h"
|
||||
#include "swad_global.h"
|
||||
|
@ -91,7 +91,7 @@ void Ses_CreateSession (void)
|
|||
Ses_InsertSessionInDB ();
|
||||
|
||||
/***** Update time and course in connected list *****/
|
||||
Con_UpdateMeInConnectedList ();
|
||||
Con_DB_UpdateMeInConnectedList ();
|
||||
|
||||
/***** Update number of open sessions in order to show them properly *****/
|
||||
Ses_GetNumSessions ();
|
||||
|
|
|
@ -42,7 +42,7 @@
|
|||
#include "swad_box.h"
|
||||
#include "swad_calendar.h"
|
||||
#include "swad_config.h"
|
||||
#include "swad_connected.h"
|
||||
#include "swad_connected_database.h"
|
||||
#include "swad_course.h"
|
||||
#include "swad_database.h"
|
||||
#include "swad_department.h"
|
||||
|
@ -3093,7 +3093,7 @@ void Usr_ChkUsrAndGetUsrData (void)
|
|||
{
|
||||
Act_AdjustCurrentAction ();
|
||||
Ses_UpdateSessionDataInDB ();
|
||||
Con_UpdateMeInConnectedList ();
|
||||
Con_DB_UpdateMeInConnectedList ();
|
||||
}
|
||||
}
|
||||
else
|
||||
|
|
Loading…
Reference in New Issue