// swad_record.c: users' record cards /* 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-2019 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 . */ /*****************************************************************************/ /********************************* Headers ***********************************/ /*****************************************************************************/ #define _GNU_SOURCE // For asprintf #include // For PATH_MAX #include // For NULL #include // For asprintf #include // For calloc #include #include "swad_account.h" #include "swad_action.h" #include "swad_box.h" #include "swad_config.h" #include "swad_database.h" #include "swad_enrolment.h" #include "swad_follow.h" #include "swad_form.h" #include "swad_global.h" #include "swad_HTML.h" #include "swad_ID.h" #include "swad_logo.h" #include "swad_network.h" #include "swad_parameter.h" #include "swad_photo.h" #include "swad_privacy.h" #include "swad_QR.h" #include "swad_record.h" #include "swad_role.h" #include "swad_setting.h" #include "swad_user.h" /*****************************************************************************/ /************** External global variables from others modules ****************/ /*****************************************************************************/ extern struct Globals Gbl; /*****************************************************************************/ /***************************** Private constants *****************************/ /*****************************************************************************/ #define Rec_INSTITUTION_LOGO_SIZE 64 #define Rec_DEGREE_LOGO_SIZE 64 #define Rec_USR_MIN_AGE 12 // years old #define Rec_USR_MAX_AGE 120 // years old #define Rec_SHOW_OFFICE_HOURS_DEFAULT true #define Rec_MY_INS_CTR_DPT_ID "my_ins_ctr_dpt_section" /*****************************************************************************/ /***************************** Private prototypes ****************************/ /*****************************************************************************/ static void Rec_WriteHeadingRecordFields (void); static void Rec_PutParamFielCod (void); static void Rec_GetFieldByCod (long FieldCod,char Name[Rec_MAX_BYTES_NAME_FIELD + 1], unsigned *NumLines,Rec_VisibilityRecordFields_t *Visibility); static void Rec_ListRecordsGsts (Rec_SharedRecordViewType_t TypeOfView); static void Rec_ShowRecordOneStdCrs (void); static void Rec_ListRecordsStds (Rec_SharedRecordViewType_t ShaTypeOfView, Rec_CourseRecordViewType_t CrsTypeOfView); static void Rec_ShowRecordOneTchCrs (void); static void Rec_ListRecordsTchs (Rec_SharedRecordViewType_t TypeOfView); static void Rec_ShowLinkToPrintPreviewOfRecords (void); static void Rec_GetParamRecordsPerPage (void); static void Rec_WriteFormShowOfficeHoursOneTch (bool ShowOfficeHours); static void Rec_WriteFormShowOfficeHoursSeveralTchs (bool ShowOfficeHours); static void Rec_PutParamsShowOfficeHoursOneTch (void); static void Rec_PutParamsShowOfficeHoursSeveralTchs (void); static bool Rec_GetParamShowOfficeHours (void); static void Rec_ShowCrsRecord (Rec_CourseRecordViewType_t TypeOfView, struct UsrData *UsrDat,const char *Anchor); static void Rec_ShowMyCrsRecordUpdated (void); static bool Rec_CheckIfICanEditField (Rec_VisibilityRecordFields_t Visibility); static void Rec_PutIconsCommands (void); static void Rec_PutParamsMyTsts (void); static void Rec_PutParamsStdTsts (void); static void Rec_PutParamsWorks (void); static void Rec_PutParamsStudent (void); static void Rec_PutParamsMsgUsr (void); static void Rec_ShowInstitutionInHead (struct Instit *Ins,bool PutFormLinks); static void Rec_ShowPhoto (struct UsrData *UsrDat); static void Rec_ShowFullName (struct UsrData *UsrDat); static void Rec_ShowNickname (struct UsrData *UsrDat,bool PutFormLinks); static void Rec_ShowCountryInHead (struct UsrData *UsrDat,bool ShowData); static void Rec_ShowWebsAndSocialNets (struct UsrData *UsrDat, Rec_SharedRecordViewType_t TypeOfView); static void Rec_ShowEmail (struct UsrData *UsrDat); static void Rec_ShowUsrIDs (struct UsrData *UsrDat,const char *Anchor); static void Rec_ShowRole (struct UsrData *UsrDat, Rec_SharedRecordViewType_t TypeOfView); static void Rec_ShowSurname1 (struct UsrData *UsrDat,bool PutForm); static void Rec_ShowSurname2 (struct UsrData *UsrDat,bool PutForm); static void Rec_ShowFirstName (struct UsrData *UsrDat,bool PutForm); static void Rec_ShowCountry (struct UsrData *UsrDat,bool PutForm); static void Rec_ShowOriginPlace (struct UsrData *UsrDat,bool ShowData,bool PutForm); static void Rec_ShowDateOfBirth (struct UsrData *UsrDat,bool ShowData,bool PutForm); static void Rec_ShowLocalAddress (struct UsrData *UsrDat,bool ShowData,bool PutForm); static void Rec_ShowLocalPhone (struct UsrData *UsrDat,bool ShowData,bool PutForm); static void Rec_ShowFamilyAddress (struct UsrData *UsrDat,bool ShowData,bool PutForm); static void Rec_ShowFamilyPhone (struct UsrData *UsrDat,bool ShowData,bool PutForm); static void Rec_ShowComments (struct UsrData *UsrDat,bool ShowData,bool PutForm); static void Rec_ShowTeacherRows (struct UsrData *UsrDat,struct Instit *Ins, bool ShowData); static void Rec_ShowInstitution (struct Instit *Ins,bool ShowData); static void Rec_ShowCentre (struct UsrData *UsrDat,bool ShowData); static void Rec_ShowDepartment (struct UsrData *UsrDat,bool ShowData); static void Rec_ShowOffice (struct UsrData *UsrDat,bool ShowData); static void Rec_ShowOfficePhone (struct UsrData *UsrDat,bool ShowData); static void Rec_WriteLinkToDataProtectionClause (void); static void Rec_GetUsrExtraDataFromRecordForm (struct UsrData *UsrDat); static void Rec_GetUsrCommentsFromForm (struct UsrData *UsrDat); static void Rec_ShowFormMyInsCtrDpt (bool IAmATeacher); /*****************************************************************************/ /*************** Create, edit and remove fields of records *******************/ /*****************************************************************************/ void Rec_ReqEditRecordFields (void) { extern const char *Hlp_USERS_Students_course_record_card; extern const char *Txt_There_are_no_record_fields_in_the_course_X; extern const char *Txt_Record_fields; /***** Get list of fields of records in current course *****/ Rec_GetListRecordFieldsInCurrentCrs (); /***** List the current fields of records for edit them *****/ if (Gbl.Crs.Records.LstFields.Num) // Fields found... { /* Begin box and table */ Box_BoxTableBegin (NULL,Txt_Record_fields,NULL, Hlp_USERS_Students_course_record_card,Box_NOT_CLOSABLE,2); Rec_ListFieldsRecordsForEdition (); /* End table and box */ Box_BoxTableEnd (); } else // No fields of records found for current course in the database Ale_ShowAlert (Ale_INFO,Txt_There_are_no_record_fields_in_the_course_X, Gbl.Hierarchy.Crs.FullName); /***** Put a form to create a new record field *****/ Rec_ShowFormCreateRecordField (); /* Free list of fields of records */ Rec_FreeListFields (); } /*****************************************************************************/ /****** Create a list with the fields of records from current course *********/ /*****************************************************************************/ void Rec_GetListRecordFieldsInCurrentCrs (void) { MYSQL_RES *mysql_res; MYSQL_ROW row; unsigned long NumRow; unsigned Vis; if (++Gbl.Crs.Records.LstFields.NestedCalls > 1) // If the list is already created, don't do anything return; /***** Get fields of records in a course from database *****/ Gbl.Crs.Records.LstFields.Num = (unsigned) DB_QuerySELECT (&mysql_res,"can not get fields of records" " in a course", "SELECT FieldCod,FieldName,NumLines,Visibility" " FROM crs_record_fields" " WHERE CrsCod=%ld ORDER BY FieldName", Gbl.Hierarchy.Crs.CrsCod); /***** Get the fields of records *****/ if (Gbl.Crs.Records.LstFields.Num) { /***** Create a list of fields *****/ if ((Gbl.Crs.Records.LstFields.Lst = (struct RecordField *) calloc (Gbl.Crs.Records.LstFields.Num,sizeof (struct RecordField))) == NULL) Lay_NotEnoughMemoryExit (); /***** Get the fields *****/ for (NumRow = 0; NumRow < Gbl.Crs.Records.LstFields.Num; NumRow++) { /* Get next field */ row = mysql_fetch_row (mysql_res); /* Get the code of field (row[0]) */ if ((Gbl.Crs.Records.LstFields.Lst[NumRow].FieldCod = Str_ConvertStrCodToLongCod (row[0])) < 0) Lay_ShowErrorAndExit ("Wrong code of field."); /* Name of the field (row[1]) */ Str_Copy (Gbl.Crs.Records.LstFields.Lst[NumRow].Name,row[1], Rec_MAX_BYTES_NAME_FIELD); /* Number of lines (row[2]) */ Gbl.Crs.Records.LstFields.Lst[NumRow].NumLines = Rec_ConvertToNumLinesField (row[2]); /* Visible or editable by students? (row[3]) */ if (sscanf (row[3],"%u",&Vis) != 1) Lay_ShowErrorAndExit ("Error when getting field of record in current course."); if (Vis < Rec_NUM_TYPES_VISIBILITY) Gbl.Crs.Records.LstFields.Lst[NumRow].Visibility = (Rec_VisibilityRecordFields_t) Vis; else Gbl.Crs.Records.LstFields.Lst[NumRow].Visibility = Rec_VISIBILITY_DEFAULT; } } /***** Free structure that stores the query result *****/ DB_FreeMySQLResult (&mysql_res); } /*****************************************************************************/ /********* List the fields of records already present in database ************/ /*****************************************************************************/ void Rec_ListFieldsRecordsForEdition (void) { extern const char *Txt_RECORD_FIELD_VISIBILITY_MENU[Rec_NUM_TYPES_VISIBILITY]; unsigned NumField; Rec_VisibilityRecordFields_t Vis; unsigned VisUnsigned; char StrNumLines[Cns_MAX_DECIMAL_DIGITS_UINT + 1]; /***** Write heading *****/ Rec_WriteHeadingRecordFields (); /***** List the fields *****/ for (NumField = 0; NumField < Gbl.Crs.Records.LstFields.Num; NumField++) { HTM_TR_Begin (NULL); /* Write icon to remove the field */ HTM_TD_Begin ("class=\"BM\""); Frm_StartForm (ActReqRemFie); Par_PutHiddenParamLong (NULL,"FieldCod",Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod); Ico_PutIconRemove (); Frm_EndForm (); HTM_TD_End (); /* Name of the field */ HTM_TD_Begin ("class=\"LM\""); Frm_StartForm (ActRenFie); Par_PutHiddenParamLong (NULL,"FieldCod",Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod); HTM_INPUT_TEXT ("FieldName",Rec_MAX_CHARS_NAME_FIELD, Gbl.Crs.Records.LstFields.Lst[NumField].Name,true, "class=\"REC_FIELDNAME\""); Frm_EndForm (); HTM_TD_End (); /* Number of lines in the form */ HTM_TD_Begin ("class=\"CM\""); Frm_StartForm (ActChgRowFie); Par_PutHiddenParamLong (NULL,"FieldCod",Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod); snprintf (StrNumLines,sizeof (StrNumLines), "%u", Gbl.Crs.Records.LstFields.Lst[NumField].NumLines); HTM_INPUT_TEXT ("NumLines",Cns_MAX_DECIMAL_DIGITS_UINT,StrNumLines,true, "size=\"2\""); Frm_EndForm (); HTM_TD_End (); /* Visibility of a field */ HTM_TD_Begin ("class=\"CM\""); Frm_StartForm (ActChgVisFie); Par_PutHiddenParamLong (NULL,"FieldCod",Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod); HTM_SELECT_Begin (true, "name=\"Visibility\""); for (Vis = (Rec_VisibilityRecordFields_t) 0; Vis <= (Rec_VisibilityRecordFields_t) (Rec_NUM_TYPES_VISIBILITY - 1); Vis++) { VisUnsigned = (unsigned) Vis; HTM_OPTION (HTM_Type_UNSIGNED,&VisUnsigned, Gbl.Crs.Records.LstFields.Lst[NumField].Visibility == Vis,false, "%s",Txt_RECORD_FIELD_VISIBILITY_MENU[Vis]); } HTM_SELECT_End (); Frm_EndForm (); HTM_TD_End (); HTM_TR_End (); } } /*****************************************************************************/ /******************* Show form to create a new record field ******************/ /*****************************************************************************/ void Rec_ShowFormCreateRecordField (void) { extern const char *Hlp_USERS_Students_course_record_card; extern const char *Txt_New_record_field; extern const char *Txt_RECORD_FIELD_VISIBILITY_MENU[Rec_NUM_TYPES_VISIBILITY]; extern const char *Txt_Create_record_field; Rec_VisibilityRecordFields_t Vis; unsigned VisUnsigned; char StrNumLines[Cns_MAX_DECIMAL_DIGITS_UINT + 1]; /***** Begin form *****/ Frm_StartForm (ActNewFie); /***** Begin box and table *****/ Box_BoxTableBegin (NULL,Txt_New_record_field,NULL, Hlp_USERS_Students_course_record_card,Box_NOT_CLOSABLE,2); /***** Write heading *****/ Rec_WriteHeadingRecordFields (); /***** Write disabled icon to remove the field *****/ HTM_TR_Begin (NULL); HTM_TD_Begin ("class=\"BM\""); Ico_PutIconRemovalNotAllowed (); HTM_TD_End (); /***** Field name *****/ HTM_TD_Begin ("class=\"LM\""); HTM_INPUT_TEXT ("FieldName",Rec_MAX_CHARS_NAME_FIELD,Gbl.Crs.Records.Field.Name,false, "class=\"REC_FIELDNAME\" required=\"required\""); HTM_TD_End (); /***** Number of lines in form ******/ HTM_TD_Begin ("class=\"CM\""); snprintf (StrNumLines,sizeof (StrNumLines), "%u", Gbl.Crs.Records.Field.NumLines); HTM_INPUT_TEXT ("NumLines",Cns_MAX_DECIMAL_DIGITS_UINT,StrNumLines,false, "size=\"2\" required=\"required\""); HTM_TD_End (); /***** Visibility to students *****/ HTM_TD_Begin ("class=\"CM\""); HTM_SELECT_Begin (false, "name=\"Visibility\""); for (Vis = (Rec_VisibilityRecordFields_t) 0; Vis <= (Rec_VisibilityRecordFields_t) (Rec_NUM_TYPES_VISIBILITY - 1); Vis++) { VisUnsigned = (unsigned) Vis; HTM_OPTION (HTM_Type_UNSIGNED,&VisUnsigned, Gbl.Crs.Records.Field.Visibility == Vis,false, "%s",Txt_RECORD_FIELD_VISIBILITY_MENU[Vis]); } HTM_SELECT_End (); HTM_TD_End (); HTM_TR_End (); /***** End table, send button and end box *****/ Box_BoxTableWithButtonEnd (Btn_CREATE_BUTTON,Txt_Create_record_field); /***** End form *****/ Frm_EndForm (); } /*****************************************************************************/ /************************** Write heading of groups **************************/ /*****************************************************************************/ static void Rec_WriteHeadingRecordFields (void) { extern const char *Txt_Field_BR_name; extern const char *Txt_No_of_BR_lines; extern const char *Txt_Visible_by_BR_the_student; HTM_TR_Begin (NULL); HTM_TH_Empty (1); HTM_TH (1,1,"CM",Txt_Field_BR_name); HTM_TH (1,1,"CM",Txt_No_of_BR_lines); HTM_TH (1,1,"CM",Txt_Visible_by_BR_the_student); HTM_TR_End (); } /*****************************************************************************/ /*************** Receive data from a form of record fields *******************/ /*****************************************************************************/ void Rec_ReceiveFormField (void) { extern const char *Txt_The_record_field_X_already_exists; extern const char *Txt_You_must_specify_the_name_of_the_new_record_field; /***** Get parameters from the form *****/ /* Get the name of the field */ Par_GetParToText ("FieldName",Gbl.Crs.Records.Field.Name, Rec_MAX_BYTES_NAME_FIELD); /* Get the number of lines */ Gbl.Crs.Records.Field.NumLines = (unsigned) Par_GetParToUnsignedLong ("NumLines", Rec_MIN_LINES_IN_EDITION_FIELD, Rec_MAX_LINES_IN_EDITION_FIELD, Rec_DEF_LINES_IN_EDITION_FIELD); /* Get the field visibility by students */ Gbl.Crs.Records.Field.Visibility = (Rec_VisibilityRecordFields_t) Par_GetParToUnsignedLong ("Visibility", 0, Rec_NUM_TYPES_VISIBILITY - 1, (unsigned long) Rec_VISIBILITY_DEFAULT); if (Gbl.Crs.Records.Field.Name[0]) // If there's a name { /***** If the field already was in the database... *****/ if (Rec_CheckIfRecordFieldIsRepeated (Gbl.Crs.Records.Field.Name)) Ale_ShowAlert (Ale_ERROR,Txt_The_record_field_X_already_exists, Gbl.Crs.Records.Field.Name); else // Add the new field to the database Rec_CreateRecordField (); } else // If there is not name Ale_ShowAlert (Ale_ERROR,Txt_You_must_specify_the_name_of_the_new_record_field); /***** Show the form again *****/ Rec_ReqEditRecordFields (); } /*****************************************************************************/ /********* Get number of lines of the form to edit a record field ************/ /*****************************************************************************/ unsigned Rec_ConvertToNumLinesField (const char *StrNumLines) { unsigned NumLines; if (sscanf (StrNumLines,"%u",&NumLines) != 1) return Rec_DEF_LINES_IN_EDITION_FIELD; else if (NumLines < Rec_MIN_LINES_IN_EDITION_FIELD) return Rec_MIN_LINES_IN_EDITION_FIELD; else if (NumLines > Rec_MAX_LINES_IN_EDITION_FIELD) return Rec_MAX_LINES_IN_EDITION_FIELD; return NumLines; } /*****************************************************************************/ /* Check if the name of the field of record equals any of the existing ones **/ /*****************************************************************************/ bool Rec_CheckIfRecordFieldIsRepeated (const char *FieldName) { bool FieldIsRepeated = false; MYSQL_RES *mysql_res; MYSQL_ROW row; unsigned long NumRows; unsigned long NumRow; /* Query database */ if ((NumRows = Rec_GetAllFieldsInCurrCrs (&mysql_res)) > 0) // If se han encontrado groups... /* Compare with all the tipos of group from the database */ for (NumRow = 0; NumRow < NumRows; NumRow++) { /* Get next type of group */ row = mysql_fetch_row (mysql_res); /* The name of the field is in row[1] */ if (!strcasecmp (FieldName,row[1])) { FieldIsRepeated = true; break; } } /* Free structure that stores the query result */ DB_FreeMySQLResult (&mysql_res); return FieldIsRepeated; } /*****************************************************************************/ /******* Get the fields of records already present in current course *********/ /*****************************************************************************/ unsigned long Rec_GetAllFieldsInCurrCrs (MYSQL_RES **mysql_res) { /***** Get fields of records in current course from database *****/ return DB_QuerySELECT (mysql_res,"can not get fields of records" " in a course", "SELECT FieldCod,FieldName,Visibility" " FROM crs_record_fields" " WHERE CrsCod=%ld ORDER BY FieldName", Gbl.Hierarchy.Crs.CrsCod); } /*****************************************************************************/ /************************* Create a field of record **************************/ /*****************************************************************************/ void Rec_CreateRecordField (void) { extern const char *Txt_Created_new_record_field_X; /***** Create the new field *****/ DB_QueryINSERT ("can not create field of record", "INSERT INTO crs_record_fields" " (CrsCod,FieldName,NumLines,Visibility)" " VALUES" " (%ld,'%s',%u,%u)", Gbl.Hierarchy.Crs.CrsCod, Gbl.Crs.Records.Field.Name, Gbl.Crs.Records.Field.NumLines, (unsigned) Gbl.Crs.Records.Field.Visibility); /***** Write message of success *****/ Ale_ShowAlert (Ale_SUCCESS,Txt_Created_new_record_field_X, Gbl.Crs.Records.Field.Name); } /*****************************************************************************/ /**************** Request the removing of a field of records *****************/ /*****************************************************************************/ void Rec_ReqRemField (void) { unsigned NumRecords; /***** Get the code of field *****/ if ((Gbl.Crs.Records.Field.FieldCod = Rec_GetFieldCod ()) == -1) Lay_ShowErrorAndExit ("Code of field is missing."); /***** Check if exists any record with that field filled *****/ if ((NumRecords = Rec_CountNumRecordsInCurrCrsWithField (Gbl.Crs.Records.Field.FieldCod))) // There are records with that field filled Rec_AskConfirmRemFieldWithRecords (NumRecords); else // There are no records with that field filled Rec_RemoveFieldFromDB (); } /*****************************************************************************/ /************ Get a parameter with a code of field of records ****************/ /*****************************************************************************/ long Rec_GetFieldCod (void) { /***** Get the code of the field *****/ return Par_GetParToLong ("FieldCod"); } /*****************************************************************************/ /*************** Get the number of records with a field filled ***************/ /*****************************************************************************/ unsigned Rec_CountNumRecordsInCurrCrsWithField (long FieldCod) { /***** Get number of cards with a given field in a course from database *****/ return (unsigned) DB_QueryCOUNT ("can not get number of records" " with a given field not empty in a course", "SELECT COUNT(*) FROM crs_records" " WHERE FieldCod=%ld", FieldCod); } /*****************************************************************************/ /******* Request confirmation for the removing of a field with records *******/ /*****************************************************************************/ void Rec_AskConfirmRemFieldWithRecords (unsigned NumRecords) { extern const char *Txt_Do_you_really_want_to_remove_the_field_X_from_the_records_of_Y_Z_; extern const char *Txt_Remove_record_field; /***** Get from the database the name of the field *****/ Rec_GetFieldByCod (Gbl.Crs.Records.Field.FieldCod, Gbl.Crs.Records.Field.Name, &Gbl.Crs.Records.Field.NumLines, &Gbl.Crs.Records.Field.Visibility); /***** Show question and button to remove my photo *****/ Ale_ShowAlertAndButton (ActRemFie,NULL,NULL,Rec_PutParamFielCod, Btn_REMOVE_BUTTON,Txt_Remove_record_field, Ale_QUESTION,Txt_Do_you_really_want_to_remove_the_field_X_from_the_records_of_Y_Z_, Gbl.Crs.Records.Field.Name,Gbl.Hierarchy.Crs.FullName, NumRecords); /***** List record fields again *****/ Rec_ReqEditRecordFields (); } /*****************************************************************************/ /************** Remove from the database a field of records ******************/ /*****************************************************************************/ void Rec_RemoveFieldFromDB (void) { extern const char *Txt_Record_field_X_removed; /***** Get from the database the name of the field *****/ Rec_GetFieldByCod (Gbl.Crs.Records.Field.FieldCod, Gbl.Crs.Records.Field.Name, &Gbl.Crs.Records.Field.NumLines, &Gbl.Crs.Records.Field.Visibility); /***** Remove field from all records *****/ DB_QueryDELETE ("can not remove field from all students' records", "DELETE FROM crs_records WHERE FieldCod=%ld", Gbl.Crs.Records.Field.FieldCod); /***** Remove the field *****/ DB_QueryDELETE ("can not remove field of record", "DELETE FROM crs_record_fields WHERE FieldCod=%ld", Gbl.Crs.Records.Field.FieldCod); /***** Write message to show the change made *****/ Ale_ShowAlert (Ale_SUCCESS,Txt_Record_field_X_removed, Gbl.Crs.Records.Field.Name); /***** Show the form again *****/ Rec_ReqEditRecordFields (); } /*****************************************************************************/ /********************** Put parameter with field code ************************/ /*****************************************************************************/ static void Rec_PutParamFielCod (void) { Par_PutHiddenParamLong (NULL,"FieldCod",Gbl.Crs.Records.Field.FieldCod); } /*****************************************************************************/ /************** Get the data of a field of records from its code *************/ /*****************************************************************************/ static void Rec_GetFieldByCod (long FieldCod,char Name[Rec_MAX_BYTES_NAME_FIELD + 1], unsigned *NumLines,Rec_VisibilityRecordFields_t *Visibility) { MYSQL_RES *mysql_res; MYSQL_ROW row; unsigned long NumRows; unsigned Vis; /***** Get a field of a record in a course from database *****/ NumRows = DB_QuerySELECT (&mysql_res,"can not get a field of a record" " in a course", "SELECT FieldName,NumLines,Visibility" " FROM crs_record_fields" " WHERE CrsCod=%ld AND FieldCod=%ld", Gbl.Hierarchy.Crs.CrsCod,FieldCod); /***** Count number of rows in result *****/ if (NumRows != 1) Lay_ShowErrorAndExit ("Error when getting a field of a record in a course."); /***** Get the field *****/ row = mysql_fetch_row (mysql_res); /* Name of the field */ Str_Copy (Name,row[0], Rec_MAX_BYTES_NAME_FIELD); /* Number of lines of the field (row[1]) */ *NumLines = Rec_ConvertToNumLinesField (row[1]); /* Visible or editable by students? (row[2]) */ if (sscanf (row[2],"%u",&Vis) != 1) Lay_ShowErrorAndExit ("Error when getting a field of a record in a course."); if (Vis < Rec_NUM_TYPES_VISIBILITY) *Visibility = (Rec_VisibilityRecordFields_t) Vis; else *Visibility = Rec_VISIBILITY_DEFAULT; /***** Free structure that stores the query result *****/ DB_FreeMySQLResult (&mysql_res); } /*****************************************************************************/ /************************* Remove a field of records *************************/ /*****************************************************************************/ void Rec_RemoveField (void) { /***** Get the code of the field *****/ if ((Gbl.Crs.Records.Field.FieldCod = Rec_GetFieldCod ()) == -1) Lay_ShowErrorAndExit ("Code of field is missing."); /***** Borrarlo from the database *****/ Rec_RemoveFieldFromDB (); } /*****************************************************************************/ /************************** Rename a field of records ************************/ /*****************************************************************************/ void Rec_RenameField (void) { extern const char *Txt_The_record_field_X_already_exists; extern const char *Txt_The_record_field_X_has_been_renamed_as_Y; extern const char *Txt_The_name_of_the_field_X_has_not_changed; char NewFieldName[Rec_MAX_BYTES_NAME_FIELD + 1]; /***** Get parameters of the form *****/ /* Get the code of the field */ if ((Gbl.Crs.Records.Field.FieldCod = Rec_GetFieldCod ()) == -1) Lay_ShowErrorAndExit ("Code of field is missing."); /* Get the new group name */ Par_GetParToText ("FieldName",NewFieldName,Rec_MAX_BYTES_NAME_FIELD); /***** Get from the database the old field name *****/ Rec_GetFieldByCod (Gbl.Crs.Records.Field.FieldCod, Gbl.Crs.Records.Field.Name, &Gbl.Crs.Records.Field.NumLines, &Gbl.Crs.Records.Field.Visibility); /***** Check if new name is empty *****/ if (NewFieldName[0]) { /***** Check if the name of the olde field match the new one (this happens when return is pressed without changes) *****/ if (strcmp (Gbl.Crs.Records.Field.Name,NewFieldName)) // Different names { /***** If the group ya estaba in the database... *****/ if (Rec_CheckIfRecordFieldIsRepeated (NewFieldName)) Ale_ShowAlert (Ale_ERROR,Txt_The_record_field_X_already_exists, NewFieldName); else { /* Update the table of fields changing then old name by the new one */ DB_QueryUPDATE ("can not update name of field of record", "UPDATE crs_record_fields SET FieldName='%s'" " WHERE FieldCod=%ld", NewFieldName,Gbl.Crs.Records.Field.FieldCod); /***** Write message to show the change made *****/ Ale_ShowAlert (Ale_SUCCESS,Txt_The_record_field_X_has_been_renamed_as_Y, Gbl.Crs.Records.Field.Name,NewFieldName); } } else // The same name Ale_ShowAlert (Ale_INFO,Txt_The_name_of_the_field_X_has_not_changed, NewFieldName); } else Ale_ShowAlertYouCanNotLeaveFieldEmpty (); /***** Show the form again *****/ Str_Copy (Gbl.Crs.Records.Field.Name,NewFieldName, Rec_MAX_BYTES_NAME_FIELD); Rec_ReqEditRecordFields (); } /*****************************************************************************/ /********* Change number of lines of the form of a field of records **********/ /*****************************************************************************/ void Rec_ChangeLinesField (void) { extern const char *Txt_The_number_of_editing_lines_in_the_record_field_X_has_not_changed; extern const char *Txt_From_now_on_the_number_of_editing_lines_of_the_field_X_is_Y; unsigned NewNumLines; /***** Get parameters of the form *****/ /* Get the code of field */ if ((Gbl.Crs.Records.Field.FieldCod = Rec_GetFieldCod ()) == -1) Lay_ShowErrorAndExit ("Code of field is missing."); /* Get the new number of lines */ NewNumLines = (unsigned) Par_GetParToUnsignedLong ("NumLines", Rec_MIN_LINES_IN_EDITION_FIELD, Rec_MAX_LINES_IN_EDITION_FIELD, Rec_DEF_LINES_IN_EDITION_FIELD); /* Get from the database the number of lines of the field */ Rec_GetFieldByCod (Gbl.Crs.Records.Field.FieldCod,Gbl.Crs.Records.Field.Name,&Gbl.Crs.Records.Field.NumLines,&Gbl.Crs.Records.Field.Visibility); /***** Check if the old number of rows matches the new one (this happens when return is pressed without changes) *****/ if (Gbl.Crs.Records.Field.NumLines == NewNumLines) Ale_ShowAlert (Ale_INFO,Txt_The_number_of_editing_lines_in_the_record_field_X_has_not_changed, Gbl.Crs.Records.Field.Name); else { /***** Update of the table of fields changing the old maximum of students by the new one *****/ DB_QueryUPDATE ("can not update the number of lines of a record field", "UPDATE crs_record_fields SET NumLines=%u" " WHERE FieldCod=%ld", NewNumLines,Gbl.Crs.Records.Field.FieldCod); /***** Write message to show the change made *****/ Ale_ShowAlert (Ale_SUCCESS,Txt_From_now_on_the_number_of_editing_lines_of_the_field_X_is_Y, Gbl.Crs.Records.Field.Name,NewNumLines); } /***** Show the form again *****/ Gbl.Crs.Records.Field.NumLines = NewNumLines; Rec_ReqEditRecordFields (); } /*****************************************************************************/ /************ Change wisibility by students of a field of records ************/ /*****************************************************************************/ void Rec_ChangeVisibilityField (void) { extern const char *Txt_The_visibility_of_the_record_field_X_has_not_changed; extern const char *Txt_RECORD_FIELD_VISIBILITY_MSG[Rec_NUM_TYPES_VISIBILITY]; Rec_VisibilityRecordFields_t NewVisibility; /***** Get parameters of the form *****/ /* Get the code of field */ if ((Gbl.Crs.Records.Field.FieldCod = Rec_GetFieldCod ()) == -1) Lay_ShowErrorAndExit ("Code of field is missing."); /* Get the new visibility of the field */ NewVisibility = (Rec_VisibilityRecordFields_t) Par_GetParToUnsignedLong ("Visibility", 0, Rec_NUM_TYPES_VISIBILITY - 1, (unsigned long) Rec_VISIBILITY_DEFAULT); /* Get from the database the visibility of the field */ Rec_GetFieldByCod (Gbl.Crs.Records.Field.FieldCod,Gbl.Crs.Records.Field.Name,&Gbl.Crs.Records.Field.NumLines,&Gbl.Crs.Records.Field.Visibility); /***** Check if the old visibility matches the new one (this happens when return is pressed without changes) *****/ if (Gbl.Crs.Records.Field.Visibility == NewVisibility) Ale_ShowAlert (Ale_INFO,Txt_The_visibility_of_the_record_field_X_has_not_changed, Gbl.Crs.Records.Field.Name); else { /***** Update of the table of fields changing the old visibility by the new *****/ DB_QueryUPDATE ("can not update the visibility of a record field", "UPDATE crs_record_fields SET Visibility=%u" " WHERE FieldCod=%ld", (unsigned) NewVisibility, Gbl.Crs.Records.Field.FieldCod); /***** Write message to show the change made *****/ Ale_ShowAlert (Ale_SUCCESS,Txt_RECORD_FIELD_VISIBILITY_MSG[NewVisibility], Gbl.Crs.Records.Field.Name); } /***** Show the form again *****/ Gbl.Crs.Records.Field.Visibility = NewVisibility; Rec_ReqEditRecordFields (); } /*****************************************************************************/ /********************** Liberar list of fields of records ********************/ /*****************************************************************************/ void Rec_FreeListFields (void) { if (Gbl.Crs.Records.LstFields.NestedCalls > 0) if (--Gbl.Crs.Records.LstFields.NestedCalls == 0) if (Gbl.Crs.Records.LstFields.Lst) { free (Gbl.Crs.Records.LstFields.Lst); Gbl.Crs.Records.LstFields.Lst = NULL; Gbl.Crs.Records.LstFields.Num = 0; } } /*****************************************************************************/ /******************* Put a link to list official students ********************/ /*****************************************************************************/ void Rec_PutLinkToEditRecordFields (void) { extern const char *Txt_Edit_record_fields; /***** Link to edit record fields *****/ Lay_PutContextualLinkIconText (ActEdiRecFie,NULL,NULL, "pen.svg", Txt_Edit_record_fields); } /*****************************************************************************/ /*********************** Draw records of several guests **********************/ /*****************************************************************************/ void Rec_ListRecordsGstsShow (void) { Gbl.Action.Original = ActSeeRecSevGst; // Used to know where to go when confirming ID Rec_ListRecordsGsts (Rec_SHA_RECORD_LIST); } void Rec_ListRecordsGstsPrint (void) { /***** List records ready to be printed *****/ Rec_ListRecordsGsts (Rec_SHA_RECORD_PRINT); } static void Rec_ListRecordsGsts (Rec_SharedRecordViewType_t TypeOfView) { unsigned NumUsr = 0; const char *Ptr; struct UsrData UsrDat; char RecordSectionId[32]; /***** Get list of selected users if not already got *****/ Usr_GetListsSelectedEncryptedUsrsCods (&Gbl.Usrs.Selected); /***** Assign users listing type depending on current action *****/ Gbl.Usrs.Listing.RecsUsrs = Rec_RECORD_USERS_GUESTS; /***** Get parameter with number of user records per page (only for printing) *****/ if (TypeOfView == Rec_SHA_RECORD_PRINT) Rec_GetParamRecordsPerPage (); if (TypeOfView == Rec_SHA_RECORD_LIST) // Listing several records { /***** Contextual menu *****/ Mnu_ContextMenuBegin (); /* Print view */ Frm_StartForm (ActPrnRecSevGst); Usr_PutHiddenParSelectedUsrsCods (&Gbl.Usrs.Selected); Rec_ShowLinkToPrintPreviewOfRecords (); Frm_EndForm (); Mnu_ContextMenuEnd (); } /***** Initialize structure with user's data *****/ Usr_UsrDataConstructor (&UsrDat); UsrDat.Accepted = false; // Guests have no courses,... // ...so they have not accepted... // ...inscription in any course /***** List the records *****/ Ptr = Gbl.Usrs.Selected.List[Rol_UNK]; while (*Ptr) { Par_GetNextStrUntilSeparParamMult (&Ptr,UsrDat.EncryptedUsrCod, Cry_BYTES_ENCRYPTED_STR_SHA256_BASE64); Usr_GetUsrCodFromEncryptedUsrCod (&UsrDat); if (Usr_ChkUsrCodAndGetAllUsrDataFromUsrCod (&UsrDat,Usr_DONT_GET_PREFS)) // Get from the database the data of the student { /* Start container for this user */ snprintf (RecordSectionId,sizeof (RecordSectionId), "record_%u", NumUsr); HTM_SECTION_Begin (RecordSectionId); if (Gbl.Action.Act == ActPrnRecSevGst && NumUsr != 0 && (NumUsr % Gbl.Usrs.Listing.RecsPerPag) == 0) HTM_DIV_Begin ("class=\"REC_USR\" style=\"page-break-before:always;\""); else HTM_DIV_Begin ("class=\"REC_USR\""); /* Show optional alert */ if (UsrDat.UsrCod == Gbl.Usrs.Other.UsrDat.UsrCod) // Selected user Ale_ShowAlerts (NULL); /* Shared record */ HTM_DIV_Begin ("class=\"REC_LEFT\""); Rec_ShowSharedUsrRecord (TypeOfView,&UsrDat,RecordSectionId); HTM_DIV_End (); /* End container for this user */ HTM_DIV_End (); HTM_SECTION_End (); NumUsr++; } } /***** Free memory used for user's data *****/ Usr_UsrDataDestructor (&UsrDat); /***** Free memory used by list of selected users' codes *****/ Usr_FreeListsSelectedEncryptedUsrsCods (&Gbl.Usrs.Selected); } /*****************************************************************************/ /********** Get user's data and draw record of one unique student ************/ /*****************************************************************************/ void Rec_GetUsrAndShowRecOneStdCrs (void) { /***** Get the selected student *****/ Usr_GetParamOtherUsrCodEncryptedAndGetListIDs (); if (Usr_ChkUsrCodAndGetAllUsrDataFromUsrCod (&Gbl.Usrs.Other.UsrDat,Usr_DONT_GET_PREFS)) // Get from the database the data of the student if (Usr_CheckIfICanViewRecordStd (&Gbl.Usrs.Other.UsrDat)) Rec_ShowRecordOneStdCrs (); } /*****************************************************************************/ /******************** Draw record of one unique student **********************/ /*****************************************************************************/ static void Rec_ShowRecordOneStdCrs (void) { bool ItsMe; /***** Get if student has accepted enrolment in current course *****/ Gbl.Usrs.Other.UsrDat.Accepted = Usr_CheckIfUsrHasAcceptedInCurrentCrs (&Gbl.Usrs.Other.UsrDat); /***** Assign users listing type depending on current action *****/ Gbl.Usrs.Listing.RecsUsrs = Rec_RECORD_USERS_STUDENTS; /***** Get list of fields of records in current course *****/ Rec_GetListRecordFieldsInCurrentCrs (); /***** Contextual menu *****/ Mnu_ContextMenuBegin (); /* Edit record fields */ if (Gbl.Usrs.Me.Role.Logged == Rol_TCH) Rec_PutLinkToEditRecordFields (); /* Print view */ Frm_StartForm (ActPrnRecSevStd); Usr_CreateListSelectedUsrsCodsAndFillWithOtherUsr (&Gbl.Usrs.Selected); Usr_PutHiddenParSelectedUsrsCods (&Gbl.Usrs.Selected); Usr_FreeListsSelectedEncryptedUsrsCods (&Gbl.Usrs.Selected); Rec_ShowLinkToPrintPreviewOfRecords (); Frm_EndForm (); Mnu_ContextMenuEnd (); /***** Show optional alert (result of editing data in course record) *****/ Ale_ShowAlerts (NULL); /***** Start container for this user *****/ HTM_DIV_Begin ("class=\"REC_USR\""); /***** Shared record *****/ HTM_DIV_Begin ("class=\"REC_LEFT\""); Rec_ShowSharedUsrRecord (Rec_SHA_RECORD_LIST,&Gbl.Usrs.Other.UsrDat,NULL); HTM_DIV_End (); /***** Record of the student in the course *****/ if (Gbl.Crs.Records.LstFields.Num) // There are fields in the record { switch (Gbl.Usrs.Me.Role.Logged) { case Rol_STD: ItsMe = Usr_ItsMe (Gbl.Usrs.Other.UsrDat.UsrCod); if (ItsMe) { HTM_DIV_Begin ("class=\"REC_RIGHT\""); Rec_ShowCrsRecord (Rec_CRS_MY_RECORD_AS_STUDENT_FORM,&Gbl.Usrs.Other.UsrDat,NULL); HTM_DIV_End (); } break; case Rol_NET: case Rol_TCH: case Rol_SYS_ADM: HTM_DIV_Begin ("class=\"REC_RIGHT\""); Rec_ShowCrsRecord (Rec_CRS_LIST_ONE_RECORD,&Gbl.Usrs.Other.UsrDat,NULL); HTM_DIV_End (); break; default: break; } } /***** End container for this user *****/ HTM_DIV_End (); /***** Free list of fields of records *****/ Rec_FreeListFields (); } /*****************************************************************************/ /******************** Draw records of several students ***********************/ /*****************************************************************************/ void Rec_ListRecordsStdsShow (void) { Gbl.Action.Original = ActSeeRecSevStd; // Used to know where to go when confirming ID... // ...or changing course record Rec_ListRecordsStds (Rec_SHA_RECORD_LIST, Rec_CRS_LIST_SEVERAL_RECORDS); } void Rec_ListRecordsStdsPrint (void) { /***** List records ready to be printed *****/ Rec_ListRecordsStds (Rec_SHA_RECORD_PRINT, Rec_CRS_PRINT_SEVERAL_RECORDS); } static void Rec_ListRecordsStds (Rec_SharedRecordViewType_t ShaTypeOfView, Rec_CourseRecordViewType_t CrsTypeOfView) { unsigned NumUsr = 0; const char *Ptr; struct UsrData UsrDat; bool ItsMe; char RecordSectionId[32]; /***** Get list of selected users if not already got *****/ Usr_GetListsSelectedEncryptedUsrsCods (&Gbl.Usrs.Selected); /***** Assign users listing type depending on current action *****/ Gbl.Usrs.Listing.RecsUsrs = Rec_RECORD_USERS_STUDENTS; /***** Get parameter with number of user records per page (only for printing) *****/ if (ShaTypeOfView == Rec_SHA_RECORD_PRINT) Rec_GetParamRecordsPerPage (); /***** Get list of fields of records in current course *****/ Rec_GetListRecordFieldsInCurrentCrs (); if (ShaTypeOfView == Rec_SHA_RECORD_LIST) { /***** Contextual menu *****/ Mnu_ContextMenuBegin (); /* Edit record fields */ if (Gbl.Usrs.Me.Role.Logged == Rol_TCH) Rec_PutLinkToEditRecordFields (); /* Print view */ Frm_StartForm (ActPrnRecSevStd); Usr_PutHiddenParSelectedUsrsCods (&Gbl.Usrs.Selected); Rec_ShowLinkToPrintPreviewOfRecords (); Frm_EndForm (); Mnu_ContextMenuEnd (); } /***** Initialize structure with user's data *****/ Usr_UsrDataConstructor (&UsrDat); /***** List the records *****/ Ptr = Gbl.Usrs.Selected.List[Rol_UNK]; while (*Ptr) { Par_GetNextStrUntilSeparParamMult (&Ptr,UsrDat.EncryptedUsrCod, Cry_BYTES_ENCRYPTED_STR_SHA256_BASE64); Usr_GetUsrCodFromEncryptedUsrCod (&UsrDat); if (Usr_ChkUsrCodAndGetAllUsrDataFromUsrCod (&UsrDat,Usr_DONT_GET_PREFS)) // Get from the database the data of the student if (Usr_CheckIfUsrBelongsToCurrentCrs (&UsrDat)) { /* Check if this user has accepted his/her inscription in the current course */ UsrDat.Accepted = Usr_CheckIfUsrHasAcceptedInCurrentCrs (&UsrDat); /* Start container for this user */ snprintf (RecordSectionId,sizeof (RecordSectionId), "record_%u", NumUsr); HTM_SECTION_Begin (RecordSectionId); if (Gbl.Action.Act == ActPrnRecSevStd && NumUsr != 0 && (NumUsr % Gbl.Usrs.Listing.RecsPerPag) == 0) HTM_DIV_Begin ("class=\"REC_USR\" style=\"page-break-before:always;\""); else HTM_DIV_Begin ("class=\"REC_USR\""); /* Show optional alert */ if (UsrDat.UsrCod == Gbl.Usrs.Other.UsrDat.UsrCod) // Selected user Ale_ShowAlerts (NULL); /* Shared record */ HTM_DIV_Begin ("class=\"REC_LEFT\""); Rec_ShowSharedUsrRecord (ShaTypeOfView,&UsrDat,RecordSectionId); HTM_DIV_End (); /* Record of the student in the course */ if (Gbl.Crs.Records.LstFields.Num) // There are fields in the record { ItsMe = Usr_ItsMe (UsrDat.UsrCod); if ( Gbl.Usrs.Me.Role.Logged == Rol_NET || Gbl.Usrs.Me.Role.Logged == Rol_TCH || Gbl.Usrs.Me.Role.Logged == Rol_SYS_ADM || (Gbl.Usrs.Me.Role.Logged == Rol_STD && // I am student in this course... ItsMe)) // ...and it's me { HTM_DIV_Begin ("class=\"REC_RIGHT\""); Rec_ShowCrsRecord (CrsTypeOfView,&UsrDat,RecordSectionId); HTM_DIV_End (); } } /* End container for this user */ HTM_DIV_End (); HTM_SECTION_End (); NumUsr++; } } /***** Free memory used for user's data *****/ Usr_UsrDataDestructor (&UsrDat); /***** Free list of fields of records *****/ Rec_FreeListFields (); /***** Free memory used by list of selected users' codes *****/ Usr_FreeListsSelectedEncryptedUsrsCods (&Gbl.Usrs.Selected); } /*****************************************************************************/ /********** Get user's data and draw record of one unique teacher ************/ /*****************************************************************************/ void Rec_GetUsrAndShowRecOneTchCrs (void) { /***** Get the selected teacher *****/ Usr_GetParamOtherUsrCodEncryptedAndGetListIDs (); /***** Show the record *****/ if (Usr_ChkUsrCodAndGetAllUsrDataFromUsrCod (&Gbl.Usrs.Other.UsrDat,Usr_DONT_GET_PREFS)) // Get from the database the data of the teacher if (Usr_CheckIfICanViewRecordTch (&Gbl.Usrs.Other.UsrDat)) Rec_ShowRecordOneTchCrs (); } /*****************************************************************************/ /******************** Draw record of one unique teacher **********************/ /*****************************************************************************/ static void Rec_ShowRecordOneTchCrs (void) { extern const char *Hlp_USERS_Teachers_timetable; extern const char *Txt_TIMETABLE_TYPES[TT_NUM_TIMETABLE_TYPES]; char Width[Cns_MAX_DECIMAL_DIGITS_UINT + 2 + 1]; bool ShowOfficeHours; /***** Width for office hours *****/ snprintf (Width,sizeof (Width), "%upx", Rec_RECORD_WIDTH); /***** Get if teacher has accepted enrolment in current course *****/ Gbl.Usrs.Other.UsrDat.Accepted = Usr_CheckIfUsrHasAcceptedInCurrentCrs (&Gbl.Usrs.Other.UsrDat); /***** Assign users listing type depending on current action *****/ Gbl.Usrs.Listing.RecsUsrs = Rec_RECORD_USERS_TEACHERS; /***** Get if I want to see teachers' office hours in teachers' records *****/ ShowOfficeHours = Rec_GetParamShowOfficeHours (); /***** Contextual menu *****/ Mnu_ContextMenuBegin (); /* Show office hours? */ Rec_WriteFormShowOfficeHoursOneTch (ShowOfficeHours); /* Print view */ Frm_StartForm (ActPrnRecSevTch); Usr_CreateListSelectedUsrsCodsAndFillWithOtherUsr (&Gbl.Usrs.Selected); Usr_PutHiddenParSelectedUsrsCods (&Gbl.Usrs.Selected); Usr_FreeListsSelectedEncryptedUsrsCods (&Gbl.Usrs.Selected); Par_PutHiddenParamChar ("ParamOfficeHours",'Y'); Par_PutHiddenParamChar ("ShowOfficeHours",ShowOfficeHours ? 'Y' : 'N'); Rec_ShowLinkToPrintPreviewOfRecords (); Frm_EndForm (); Mnu_ContextMenuEnd (); /***** Start container for this user *****/ HTM_DIV_Begin ("class=\"REC_USR\""); /***** Shared record *****/ HTM_DIV_Begin ("class=\"REC_LEFT\""); Rec_ShowSharedUsrRecord (Rec_SHA_RECORD_LIST,&Gbl.Usrs.Other.UsrDat,NULL); HTM_DIV_End (); /***** Office hours *****/ if (ShowOfficeHours) { HTM_DIV_Begin ("class=\"REC_RIGHT\""); Gbl.TimeTable.Type = TT_TUTORING_TIMETABLE; Box_BoxBegin (Width,Txt_TIMETABLE_TYPES[Gbl.TimeTable.Type],NULL, Hlp_USERS_Teachers_timetable,Box_NOT_CLOSABLE); TT_ShowTimeTable (Gbl.Usrs.Other.UsrDat.UsrCod); Box_BoxEnd (); HTM_DIV_End (); } /***** Start container for this user *****/ HTM_DIV_End (); } /*****************************************************************************/ /******************** Draw records of several teachers ***********************/ /*****************************************************************************/ void Rec_ListRecordsTchsShow (void) { Gbl.Action.Original = ActSeeRecSevTch; // Used to know where to go when confirming ID Rec_ListRecordsTchs (Rec_SHA_RECORD_LIST); } void Rec_ListRecordsTchsPrint (void) { /***** List records ready to be printed *****/ Rec_ListRecordsTchs (Rec_SHA_RECORD_PRINT); } static void Rec_ListRecordsTchs (Rec_SharedRecordViewType_t TypeOfView) { extern const char *Hlp_USERS_Teachers_timetable; extern const char *Txt_TIMETABLE_TYPES[TT_NUM_TIMETABLE_TYPES]; unsigned NumUsr = 0; const char *Ptr; struct UsrData UsrDat; char RecordSectionId[32]; bool ShowOfficeHours; char Width[Cns_MAX_DECIMAL_DIGITS_UINT + 2 + 1]; /***** Get list of selected users if not already got *****/ Usr_GetListsSelectedEncryptedUsrsCods (&Gbl.Usrs.Selected); /***** Width for office hours *****/ snprintf (Width,sizeof (Width), "%upx", Rec_RECORD_WIDTH); /***** Assign users listing type depending on current action *****/ Gbl.Usrs.Listing.RecsUsrs = Rec_RECORD_USERS_TEACHERS; /***** Get if I want to see teachers' office hours in teachers' records *****/ ShowOfficeHours = Rec_GetParamShowOfficeHours (); /***** Get parameter with number of user records per page (only for printing) *****/ if (Gbl.Action.Act == ActPrnRecSevTch) Rec_GetParamRecordsPerPage (); if (Gbl.Action.Act == ActSeeRecSevTch) { /***** Contextual menu *****/ Mnu_ContextMenuBegin (); /* Show office hours? */ Rec_WriteFormShowOfficeHoursSeveralTchs (ShowOfficeHours); /* Print view */ Frm_StartForm (ActPrnRecSevTch); Usr_PutHiddenParSelectedUsrsCods (&Gbl.Usrs.Selected); Par_PutHiddenParamChar ("ParamOfficeHours",'Y'); Par_PutHiddenParamChar ("ShowOfficeHours", ShowOfficeHours ? 'Y' : 'N'); Rec_ShowLinkToPrintPreviewOfRecords (); Frm_EndForm (); Mnu_ContextMenuEnd (); } /***** Initialize structure with user's data *****/ Usr_UsrDataConstructor (&UsrDat); /***** List the records *****/ Ptr = Gbl.Usrs.Selected.List[Rol_UNK]; while (*Ptr) { Par_GetNextStrUntilSeparParamMult (&Ptr,UsrDat.EncryptedUsrCod, Cry_BYTES_ENCRYPTED_STR_SHA256_BASE64); Usr_GetUsrCodFromEncryptedUsrCod (&UsrDat); if (Usr_ChkUsrCodAndGetAllUsrDataFromUsrCod (&UsrDat,Usr_DONT_GET_PREFS)) // Get from the database the data of the student if (Usr_CheckIfUsrBelongsToCurrentCrs (&UsrDat)) { /* Check if this user has accepted his/her inscription in the current course */ UsrDat.Accepted = Usr_CheckIfUsrHasAcceptedInCurrentCrs (&UsrDat); /* Start container for this user */ snprintf (RecordSectionId,sizeof (RecordSectionId), "record_%u", NumUsr); HTM_SECTION_Begin (RecordSectionId); if (Gbl.Action.Act == ActPrnRecSevTch && NumUsr != 0 && (NumUsr % Gbl.Usrs.Listing.RecsPerPag) == 0) HTM_DIV_Begin ("class=\"REC_USR\" style=\"page-break-before:always;\""); else HTM_DIV_Begin ("class=\"REC_USR\""); /* Show optional alert */ if (UsrDat.UsrCod == Gbl.Usrs.Other.UsrDat.UsrCod) // Selected user Ale_ShowAlerts (NULL); /* Shared record */ HTM_DIV_Begin ("class=\"REC_LEFT\""); Rec_ShowSharedUsrRecord (TypeOfView,&UsrDat,RecordSectionId); HTM_DIV_End (); /* Office hours */ if (ShowOfficeHours) { HTM_DIV_Begin ("class=\"REC_RIGHT\""); Gbl.TimeTable.Type = TT_TUTORING_TIMETABLE; Box_BoxBegin (Width,Txt_TIMETABLE_TYPES[Gbl.TimeTable.Type],NULL, Hlp_USERS_Teachers_timetable,Box_NOT_CLOSABLE); TT_ShowTimeTable (UsrDat.UsrCod); Box_BoxEnd (); HTM_DIV_End (); } /* End container for this user */ HTM_DIV_End (); HTM_SECTION_End (); NumUsr++; } } /***** Free memory used for user's data *****/ Usr_UsrDataDestructor (&UsrDat); /***** Free memory used by list of selected users' codes *****/ Usr_FreeListsSelectedEncryptedUsrsCods (&Gbl.Usrs.Selected); } /*****************************************************************************/ /*************** Show a link to print preview of users' records **************/ /*****************************************************************************/ static void Rec_ShowLinkToPrintPreviewOfRecords (void) { extern const char *The_ClassFormLinkOutBoxBold[The_NUM_THEMES]; extern const char *The_ClassFormInBox[The_NUM_THEMES]; extern const char *Txt_Print; extern const char *Txt_record_cards_per_page; unsigned i; HTM_BUTTON_SUBMIT_Begin (Txt_Print,The_ClassFormLinkOutBoxBold[Gbl.Prefs.Theme],NULL); Ico_PutIconTextLink ("print.svg",Txt_Print); HTM_BUTTON_End (); HTM_LABEL_Begin ("class=\"%s\"",The_ClassFormInBox[Gbl.Prefs.Theme]); HTM_Txt ("("); HTM_SELECT_Begin (false, "name=\"RecsPerPag\""); for (i = Rec_MIN_RECORDS_PER_PAGE; i <= Rec_MAX_RECORDS_PER_PAGE; i++) HTM_OPTION (HTM_Type_UNSIGNED,&i, i == Gbl.Usrs.Listing.RecsPerPag,false, "%u",i); HTM_SELECT_End (); HTM_TxtF (" %s)",Txt_record_cards_per_page); HTM_LABEL_End (); } /*****************************************************************************/ /** Get parameter with number of user records per page (only for printing) ***/ /*****************************************************************************/ static void Rec_GetParamRecordsPerPage (void) { Gbl.Usrs.Listing.RecsPerPag = (unsigned) Par_GetParToUnsignedLong ("RecsPerPag", Rec_MIN_RECORDS_PER_PAGE, Rec_MAX_RECORDS_PER_PAGE, Rec_DEF_RECORDS_PER_PAGE); } /*****************************************************************************/ /*********** Write a form to select whether show all office hours ************/ /*****************************************************************************/ static void Rec_WriteFormShowOfficeHoursOneTch (bool ShowOfficeHours) { extern const char *Txt_Show_office_hours; Lay_PutContextualCheckbox (ActSeeRecOneTch,Rec_PutParamsShowOfficeHoursOneTch, "ShowOfficeHours", ShowOfficeHours,false, Txt_Show_office_hours, Txt_Show_office_hours); } static void Rec_WriteFormShowOfficeHoursSeveralTchs (bool ShowOfficeHours) { extern const char *Txt_Show_office_hours; Lay_PutContextualCheckbox (ActSeeRecSevTch,Rec_PutParamsShowOfficeHoursSeveralTchs, "ShowOfficeHours", ShowOfficeHours,false, Txt_Show_office_hours, Txt_Show_office_hours); } static void Rec_PutParamsShowOfficeHoursOneTch (void) { Usr_PutParamOtherUsrCodEncrypted (); Par_PutHiddenParamChar ("ParamOfficeHours",'Y'); } static void Rec_PutParamsShowOfficeHoursSeveralTchs (void) { Usr_PutHiddenParSelectedUsrsCods (&Gbl.Usrs.Selected); Par_PutHiddenParamChar ("ParamOfficeHours",'Y'); } /*****************************************************************************/ /********** Get parameter to show (or not) teachers' office hours ************/ /*****************************************************************************/ // Returns true if office hours must be shown static bool Rec_GetParamShowOfficeHours (void) { if (Par_GetParToBool ("ParamOfficeHours")) return Par_GetParToBool ("ShowOfficeHours"); return Rec_SHOW_OFFICE_HOURS_DEFAULT; } /*****************************************************************************/ /*************** Update my record in the course and show it ******************/ /*****************************************************************************/ void Rec_UpdateAndShowMyCrsRecord (void) { /***** Get list of fields of records in current course *****/ Rec_GetListRecordFieldsInCurrentCrs (); /***** Allocate memory for the texts of the fields *****/ Rec_AllocMemFieldsRecordsCrs (); /***** Get data of the record from the form *****/ Rec_GetFieldsCrsRecordFromForm (); /***** Update the record *****/ Rec_UpdateCrsRecord (Gbl.Usrs.Me.UsrDat.UsrCod); /***** Show updated record *****/ Rec_ShowMyCrsRecordUpdated (); /***** Free memory used for some fields *****/ Rec_FreeMemFieldsRecordsCrs (); } /*****************************************************************************/ /***** Update record in the course of one student and show records again *****/ /*****************************************************************************/ void Rec_UpdateAndShowOtherCrsRecord (void) { extern const char *Txt_Student_record_card_in_this_course_has_been_updated; long OriginalActCod; /***** Get where we came from *****/ OriginalActCod = Par_GetParToLong ("OriginalActCod"); Gbl.Action.Original = Act_GetActionFromActCod (OriginalActCod); /***** Get the user whose record we want to modify *****/ Usr_GetParamOtherUsrCodEncryptedAndGetListIDs (); Usr_ChkUsrCodAndGetAllUsrDataFromUsrCod (&Gbl.Usrs.Other.UsrDat,Usr_DONT_GET_PREFS); /***** Get list of fields of records in current course *****/ Rec_GetListRecordFieldsInCurrentCrs (); /***** Allocate memory for the texts of the fields *****/ Rec_AllocMemFieldsRecordsCrs (); /***** Get data of the record from the form *****/ Rec_GetFieldsCrsRecordFromForm (); /***** Update the record *****/ Rec_UpdateCrsRecord (Gbl.Usrs.Other.UsrDat.UsrCod); Ale_CreateAlert (Ale_SUCCESS,NULL, Txt_Student_record_card_in_this_course_has_been_updated); /***** Show one or multiple records *****/ switch (Gbl.Action.Original) { case ActSeeRecSevStd: /* Show multiple records again (including the updated one) */ Rec_ListRecordsStdsShow (); break; default: /* Show only the updated record of one student */ Rec_ShowRecordOneStdCrs (); break; } /***** Free memory used for some fields *****/ Rec_FreeMemFieldsRecordsCrs (); } /*****************************************************************************/ /************************* Show shared record card ***************************/ /*****************************************************************************/ // Show form or only data depending on TypeOfView static void Rec_ShowCrsRecord (Rec_CourseRecordViewType_t TypeOfView, struct UsrData *UsrDat,const char *Anchor) { extern const char *Hlp_USERS_Students_course_record_card; extern const char *The_ClassFormInBox[The_NUM_THEMES]; extern const char *Txt_RECORD_FIELD_VISIBILITY_RECORD[Rec_NUM_TYPES_VISIBILITY]; extern const char *Txt_Save_changes; const char *Rec_RecordHelp[Rec_COURSE_NUM_VIEW_TYPES] = { [Rec_CRS_MY_RECORD_AS_STUDENT_FORM ] = Hlp_USERS_Students_course_record_card, [Rec_CRS_MY_RECORD_AS_STUDENT_CHECK] = Hlp_USERS_Students_course_record_card, [Rec_CRS_LIST_ONE_RECORD ] = Hlp_USERS_Students_course_record_card, [Rec_CRS_LIST_SEVERAL_RECORDS ] = Hlp_USERS_Students_course_record_card, [Rec_CRS_PRINT_ONE_RECORD ] = NULL, [Rec_CRS_PRINT_SEVERAL_RECORDS ] = NULL, }; char StrRecordWidth[Cns_MAX_DECIMAL_DIGITS_UINT + 1]; bool ItsMe; bool ICanEdit = false; unsigned NumField; MYSQL_RES *mysql_res; MYSQL_ROW row = NULL; // Initialized to avoid warning bool ShowField; bool ThisFieldHasText; bool ICanEditThisField; char Text[Cns_MAX_BYTES_TEXT + 1]; switch (Gbl.Usrs.Me.Role.Logged) { case Rol_STD: // I am a student ItsMe = Usr_ItsMe (UsrDat->UsrCod); if (ItsMe) { switch (TypeOfView) { case Rec_CRS_LIST_ONE_RECORD: case Rec_CRS_LIST_SEVERAL_RECORDS: // When listing records, I can see only my record as student TypeOfView = Rec_CRS_MY_RECORD_AS_STUDENT_FORM; break; case Rec_CRS_MY_RECORD_AS_STUDENT_FORM: case Rec_CRS_MY_RECORD_AS_STUDENT_CHECK: case Rec_CRS_PRINT_ONE_RECORD: case Rec_CRS_PRINT_SEVERAL_RECORDS: break; default: Lay_NoPermissionExit (); break; } if (TypeOfView == Rec_CRS_MY_RECORD_AS_STUDENT_FORM) /* Check if I can edit any of the record fields */ for (NumField = 0; NumField < Gbl.Crs.Records.LstFields.Num; NumField++) if (Gbl.Crs.Records.LstFields.Lst[NumField].Visibility == Rec_EDITABLE_FIELD) { ICanEdit = true; Frm_StartForm (ActRcvRecCrs); break; } } else // Not me ==> I am a student trying to do something forbidden Lay_NoPermissionExit (); break; case Rol_NET: break; case Rol_TCH: case Rol_SYS_ADM: if (TypeOfView == Rec_CRS_LIST_ONE_RECORD || TypeOfView == Rec_CRS_LIST_SEVERAL_RECORDS) { ICanEdit = true; Frm_StartFormAnchor (ActRcvRecOthUsr,Anchor); Par_PutHiddenParamLong (NULL,"OriginalActCod", Act_GetActCod (ActSeeRecSevStd)); // Original action, used to know where we came from Usr_PutParamUsrCodEncrypted (UsrDat->EncryptedUsrCod); if (TypeOfView == Rec_CRS_LIST_SEVERAL_RECORDS) Usr_PutHiddenParSelectedUsrsCods (&Gbl.Usrs.Selected); } break; default: Rol_WrongRoleExit (); } /***** Begin box and table *****/ snprintf (StrRecordWidth,sizeof (StrRecordWidth), "%upx", Rec_RECORD_WIDTH); Box_BoxTableBegin (StrRecordWidth,NULL,NULL, Rec_RecordHelp[TypeOfView],Box_NOT_CLOSABLE,2); /***** Write heading *****/ HTM_TR_Begin (NULL); HTM_TD_Begin ("colspan=\"2\" class=\"LT\""); HTM_TABLE_BeginWide (); HTM_TR_Begin (NULL); HTM_TD_Begin ("class=\"LM\" style=\"width:%upx;\"",Rec_DEGREE_LOGO_SIZE); Lgo_DrawLogo (Hie_DEG,Gbl.Hierarchy.Deg.DegCod, Gbl.Hierarchy.Deg.ShrtName,Rec_DEGREE_LOGO_SIZE,NULL,true); HTM_TD_End (); HTM_TD_Begin ("class=\"REC_HEAD CM\""); HTM_Txt (Gbl.Hierarchy.Deg.FullName); HTM_BR (); HTM_Txt (Gbl.Hierarchy.Crs.FullName); HTM_BR (); HTM_Txt (UsrDat->FullName); HTM_TD_End (); HTM_TR_End (); HTM_TABLE_End (); HTM_TD_End (); HTM_TR_End (); /***** Fields of the record that depends on the course *****/ for (NumField = 0, Gbl.RowEvenOdd = 0; NumField < Gbl.Crs.Records.LstFields.Num; NumField++, Gbl.RowEvenOdd = 1 - Gbl.RowEvenOdd) { ShowField = !(TypeOfView == Rec_CRS_MY_RECORD_AS_STUDENT_FORM || TypeOfView == Rec_CRS_MY_RECORD_AS_STUDENT_CHECK) || Gbl.Crs.Records.LstFields.Lst[NumField].Visibility != Rec_HIDDEN_FIELD; // If the field must be shown... if (ShowField) { /* Can I edit this field? */ switch (Gbl.Usrs.Me.Role.Logged) { case Rol_STD: ICanEditThisField = (TypeOfView == Rec_CRS_MY_RECORD_AS_STUDENT_FORM && Gbl.Crs.Records.LstFields.Lst[NumField].Visibility == Rec_EDITABLE_FIELD); break; case Rol_TCH: case Rol_SYS_ADM: ICanEditThisField = (TypeOfView == Rec_CRS_LIST_ONE_RECORD || TypeOfView == Rec_CRS_LIST_SEVERAL_RECORDS); break; default: ICanEditThisField = false; break; } /* Name of the field */ HTM_TR_Begin (NULL); HTM_TD_Begin ("class=\"REC_C1_BOT %s RT COLOR%u\"", ICanEditThisField ? The_ClassFormInBox[Gbl.Prefs.Theme] : "REC_DAT_SMALL", Gbl.RowEvenOdd); HTM_TxtF ("%s:",Gbl.Crs.Records.LstFields.Lst[NumField].Name); if (TypeOfView == Rec_CRS_LIST_ONE_RECORD || TypeOfView == Rec_CRS_LIST_SEVERAL_RECORDS) { HTM_SPAN_Begin ("class=\"DAT_SMALL\""); HTM_NBSP (); HTM_TxtF ("(%s)",Txt_RECORD_FIELD_VISIBILITY_RECORD[Gbl.Crs.Records.LstFields.Lst[NumField].Visibility]); HTM_SPAN_End (); } HTM_TD_End (); /* Get the text of the field */ if (Rec_GetFieldFromCrsRecord (UsrDat->UsrCod,Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod,&mysql_res)) { ThisFieldHasText = true; row = mysql_fetch_row (mysql_res); } else ThisFieldHasText = false; /* Write form, text, or nothing depending on the user's role and the visibility of the field */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LT COLOR%u\"",Gbl.RowEvenOdd); if (ICanEditThisField) // Show with form { HTM_TEXTAREA_Begin ("name=\"Field%ld\" rows=\"%u\"" " class=\"REC_C2_BOT_INPUT\"", Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod, Gbl.Crs.Records.LstFields.Lst[NumField].NumLines); if (ThisFieldHasText) HTM_Txt (row[0]); HTM_TEXTAREA_End (); } else // Show without form { if (ThisFieldHasText) { Str_Copy (Text,row[0], Cns_MAX_BYTES_TEXT); Str_ChangeFormat (Str_FROM_HTML,Str_TO_RIGOROUS_HTML, Text,Cns_MAX_BYTES_TEXT,false); HTM_Txt (Text); } else HTM_Hyphen (); } HTM_TD_End (); HTM_TR_End (); /* Free structure that stores the query result */ DB_FreeMySQLResult (&mysql_res); } } /***** End box *****/ if (ICanEdit) { /* End table, send button and end box */ Box_BoxTableWithButtonEnd (Btn_CONFIRM_BUTTON,Txt_Save_changes); /* End form */ Frm_EndForm (); } else /* End table and box */ Box_BoxTableEnd (); } /*****************************************************************************/ /************** Get the text of a field of a record of course ****************/ /*****************************************************************************/ unsigned long Rec_GetFieldFromCrsRecord (long UsrCod,long FieldCod,MYSQL_RES **mysql_res) { /***** Get the text of a field of a record from database *****/ return DB_QuerySELECT (mysql_res,"can not get the text" " of a field of a record", "SELECT Txt FROM crs_records" " WHERE FieldCod=%ld AND UsrCod=%ld", FieldCod,UsrCod); } /*****************************************************************************/ /****************** Get the fields of the record from form *******************/ /*****************************************************************************/ void Rec_GetFieldsCrsRecordFromForm (void) { unsigned NumField; char FieldParamName[5 + Cns_MAX_DECIMAL_DIGITS_LONG + 1]; for (NumField = 0; NumField < Gbl.Crs.Records.LstFields.Num; NumField++) if (Rec_CheckIfICanEditField (Gbl.Crs.Records.LstFields.Lst[NumField].Visibility)) { /* Get text from the form */ snprintf (FieldParamName,sizeof (FieldParamName), "Field%ld", Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod); Par_GetParToHTML (FieldParamName,Gbl.Crs.Records.LstFields.Lst[NumField].Text,Cns_MAX_BYTES_TEXT); } } /*****************************************************************************/ /*************************** Update record of a user *************************/ /*****************************************************************************/ void Rec_UpdateCrsRecord (long UsrCod) { unsigned NumField; MYSQL_RES *mysql_res; bool FieldAlreadyExists; for (NumField = 0; NumField < Gbl.Crs.Records.LstFields.Num; NumField++) if (Rec_CheckIfICanEditField (Gbl.Crs.Records.LstFields.Lst[NumField].Visibility)) { /***** Check if already exists this field for this user in database *****/ FieldAlreadyExists = (Rec_GetFieldFromCrsRecord (UsrCod,Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod,&mysql_res) != 0); DB_FreeMySQLResult (&mysql_res); if (FieldAlreadyExists) { if (Gbl.Crs.Records.LstFields.Lst[NumField].Text[0]) /***** Update text of the field of record course *****/ DB_QueryUPDATE ("can not update field of record", "UPDATE crs_records SET Txt='%s'" " WHERE UsrCod=%ld AND FieldCod=%ld", Gbl.Crs.Records.LstFields.Lst[NumField].Text, UsrCod, Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod); else /***** Remove text of the field of record course *****/ DB_QueryDELETE ("can not remove field of record", "DELETE FROM crs_records" " WHERE UsrCod=%ld AND FieldCod=%ld", UsrCod, Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod); } else if (Gbl.Crs.Records.LstFields.Lst[NumField].Text[0]) /***** Insert text field of record course *****/ DB_QueryINSERT ("can not create field of record", "INSERT INTO crs_records" " (FieldCod,UsrCod,Txt)" " VALUES" " (%ld,%ld,'%s')", Gbl.Crs.Records.LstFields.Lst[NumField].FieldCod, UsrCod, Gbl.Crs.Records.LstFields.Lst[NumField].Text); } } /*****************************************************************************/ /************ Remove fields of record of a user in current course ************/ /*****************************************************************************/ void Rec_RemoveFieldsCrsRecordInCrs (long UsrCod,struct Course *Crs) { /***** Remove text of the field of record course *****/ DB_QueryDELETE ("can not remove user's record in a course", "DELETE FROM crs_records" " WHERE UsrCod=%ld AND FieldCod IN" " (SELECT FieldCod FROM crs_record_fields WHERE CrsCod=%ld)", UsrCod,Crs->CrsCod); } /*****************************************************************************/ /************* Remove fields of record of a user in all courses **************/ /*****************************************************************************/ void Rec_RemoveFieldsCrsRecordAll (long UsrCod) { /***** Remove text of the field of record course *****/ DB_QueryDELETE ("can not remove user's records in all courses", "DELETE FROM crs_records WHERE UsrCod=%ld", UsrCod); } /*****************************************************************************/ /*************** Show my record in the course already updated ****************/ /*****************************************************************************/ static void Rec_ShowMyCrsRecordUpdated (void) { extern const char *Txt_Your_record_card_in_this_course_has_been_updated; /***** Write success message *****/ Ale_ShowAlert (Ale_SUCCESS,Txt_Your_record_card_in_this_course_has_been_updated); /***** Shared record *****/ Rec_ShowSharedUsrRecord (Rec_SHA_RECORD_LIST,&Gbl.Usrs.Me.UsrDat,NULL); /***** Show updated user's record *****/ Rec_ShowCrsRecord (Rec_CRS_MY_RECORD_AS_STUDENT_CHECK,&Gbl.Usrs.Me.UsrDat,NULL); } /*****************************************************************************/ /***** Allocate memory for the text of the field of the record in course *****/ /*****************************************************************************/ void Rec_AllocMemFieldsRecordsCrs (void) { unsigned NumField; for (NumField = 0; NumField < Gbl.Crs.Records.LstFields.Num; NumField++) if (Rec_CheckIfICanEditField (Gbl.Crs.Records.LstFields.Lst[NumField].Visibility)) /* Allocate memory for the texts of the fields */ if ((Gbl.Crs.Records.LstFields.Lst[NumField].Text = (char *) malloc (Cns_MAX_BYTES_TEXT + 1)) == NULL) Lay_NotEnoughMemoryExit (); } /*****************************************************************************/ /**** Free memory used by the texts of the field of the record in course *****/ /*****************************************************************************/ void Rec_FreeMemFieldsRecordsCrs (void) { unsigned NumField; for (NumField = 0; NumField < Gbl.Crs.Records.LstFields.Num; NumField++) if (Rec_CheckIfICanEditField (Gbl.Crs.Records.LstFields.Lst[NumField].Visibility)) /* Free memory of the text of the field */ if (Gbl.Crs.Records.LstFields.Lst[NumField].Text) { free (Gbl.Crs.Records.LstFields.Lst[NumField].Text); Gbl.Crs.Records.LstFields.Lst[NumField].Text = NULL; } } /*****************************************************************************/ /* Check if I can edit a field depending on my role and the field visibility */ /*****************************************************************************/ static bool Rec_CheckIfICanEditField (Rec_VisibilityRecordFields_t Visibility) { // Non-editing teachers can not edit fields return Gbl.Usrs.Me.Role.Logged == Rol_TCH || Gbl.Usrs.Me.Role.Logged == Rol_SYS_ADM || (Gbl.Usrs.Me.Role.Logged == Rol_STD && Visibility == Rec_EDITABLE_FIELD); } /*****************************************************************************/ /*********** Show form to sign up and edit my shared record card *************/ /*****************************************************************************/ void Rec_ShowFormSignUpInCrsWithMySharedRecord (void) { /***** Show the form *****/ Rec_ShowSharedUsrRecord (Rec_SHA_SIGN_UP_IN_CRS_FORM,&Gbl.Usrs.Me.UsrDat,NULL); } /*****************************************************************************/ /*************** Show form to edit the record of a new user ******************/ /*****************************************************************************/ void Rec_ShowFormOtherNewSharedRecord (struct UsrData *UsrDat,Rol_Role_t DefaultRole) { /***** Show the form *****/ /* In this case UsrDat->Roles.InCurrentCrsDB is not the current role in current course. Instead it is initialized with the preferred role. */ UsrDat->Roles.InCurrentCrs.Role = (Gbl.Hierarchy.Level == Hie_CRS) ? DefaultRole : // Course selected Rol_UNK; // No course selected UsrDat->Roles.InCurrentCrs.Valid = true; Rec_ShowSharedUsrRecord (Rec_SHA_OTHER_NEW_USR_FORM,UsrDat,NULL); } /*****************************************************************************/ /********* Show other existing user's shared record to be edited *************/ /*****************************************************************************/ void Rec_ShowOtherSharedRecordEditable (void) { /***** User's record *****/ Rec_ShowSharedUsrRecord (Rec_SHA_OTHER_EXISTING_USR_FORM, &Gbl.Usrs.Other.UsrDat,NULL); } /*****************************************************************************/ /*********************** Show my record after update *************************/ /*****************************************************************************/ void Rec_ShowMySharedRecordUpd (void) { extern const char *Txt_Your_personal_data_have_been_updated; /***** Write alert *****/ Ale_ShowAlert (Ale_SUCCESS,Txt_Your_personal_data_have_been_updated); /***** Show my record and other data *****/ Rec_ShowMySharedRecordAndMore (); } /*****************************************************************************/ /********************** Show user's record for check *************************/ /*****************************************************************************/ void Rec_ShowSharedRecordUnmodifiable (struct UsrData *UsrDat) { /***** Get password, user type and user's data from database *****/ Usr_GetAllUsrDataFromUsrCod (UsrDat,Usr_DONT_GET_PREFS); UsrDat->Accepted = Usr_CheckIfUsrHasAcceptedInCurrentCrs (UsrDat); /***** Show user's record *****/ HTM_DIV_Begin ("class=\"CM\""); Rec_ShowSharedUsrRecord (Rec_SHA_OTHER_USR_CHECK,UsrDat,NULL); HTM_DIV_End (); } /*****************************************************************************/ /************** Show public shared record card of another user ***************/ /*****************************************************************************/ void Rec_ShowPublicSharedRecordOtherUsr (void) { Rec_ShowSharedUsrRecord (Rec_SHA_RECORD_PUBLIC,&Gbl.Usrs.Other.UsrDat,NULL); } /*****************************************************************************/ /************************** Show shared record card **************************/ /*****************************************************************************/ // Show form or only data depending on TypeOfView void Rec_ShowSharedUsrRecord (Rec_SharedRecordViewType_t TypeOfView, struct UsrData *UsrDat,const char *Anchor) { extern const char *Hlp_USERS_SignUp; extern const char *Hlp_PROFILE_Record; extern const char *Hlp_START_Profiles_view_public_profile; extern const char *Hlp_USERS_Guests; extern const char *Hlp_USERS_Students_shared_record_card; extern const char *Hlp_USERS_Teachers_shared_record_card; extern const char *Txt_Sign_up; extern const char *Txt_Save_changes; extern const char *Txt_Register; extern const char *Txt_Confirm; const char *Rec_RecordHelp[Rec_SHARED_NUM_VIEW_TYPES] = { [Rec_SHA_SIGN_UP_IN_CRS_FORM ] = Hlp_USERS_SignUp, [Rec_SHA_MY_RECORD_FORM ] = Hlp_PROFILE_Record, [Rec_SHA_OTHER_EXISTING_USR_FORM] = NULL, [Rec_SHA_OTHER_NEW_USR_FORM ] = NULL, [Rec_SHA_OTHER_USR_CHECK ] = NULL, [Rec_SHA_RECORD_LIST ] = NULL, [Rec_SHA_RECORD_PRINT ] = NULL, [Rec_SHA_RECORD_PUBLIC ] = Hlp_START_Profiles_view_public_profile, }; const char *Rec_RecordListHelp[Rol_NUM_ROLES] = { [Rol_UNK ] = NULL, [Rol_GST ] = Hlp_USERS_Guests, [Rol_USR ] = NULL, [Rol_STD ] = Hlp_USERS_Students_shared_record_card, [Rol_NET ] = Hlp_USERS_Teachers_shared_record_card, [Rol_TCH ] = Hlp_USERS_Teachers_shared_record_card, [Rol_DEG_ADM] = NULL, [Rol_CTR_ADM] = NULL, [Rol_INS_ADM] = NULL, [Rol_SYS_ADM] = NULL, }; char StrRecordWidth[Cns_MAX_DECIMAL_DIGITS_UINT + 1]; bool ItsMe; bool IAmLoggedAsTeacherOrSysAdm; bool CountryForm; bool ICanEdit; bool PutFormLinks; // Put links (forms) inside record card bool ShowData; bool ShowIDRows; bool ShowAddressRows; bool StudentInCurrentCrs; bool TeacherInCurrentCrs; bool ShowTeacherRows; struct Instit Ins; Act_Action_t NextAction; /***** Initializations *****/ ItsMe = Usr_ItsMe (UsrDat->UsrCod); IAmLoggedAsTeacherOrSysAdm = (Gbl.Usrs.Me.Role.Logged == Rol_NET || // My current role is non-editing teacher Gbl.Usrs.Me.Role.Logged == Rol_TCH || // My current role is teacher Gbl.Usrs.Me.Role.Logged == Rol_SYS_ADM); // My current role is system admin CountryForm = (TypeOfView == Rec_SHA_MY_RECORD_FORM); ShowData = (ItsMe || Gbl.Usrs.Me.Role.Logged >= Rol_DEG_ADM || UsrDat->Accepted); ShowIDRows = (TypeOfView != Rec_SHA_RECORD_PUBLIC); StudentInCurrentCrs = UsrDat->Roles.InCurrentCrs.Role == Rol_STD; TeacherInCurrentCrs = UsrDat->Roles.InCurrentCrs.Role == Rol_NET || UsrDat->Roles.InCurrentCrs.Role == Rol_TCH; ShowAddressRows = (TypeOfView == Rec_SHA_MY_RECORD_FORM || ((TypeOfView == Rec_SHA_RECORD_LIST || TypeOfView == Rec_SHA_RECORD_PRINT) && IAmLoggedAsTeacherOrSysAdm && StudentInCurrentCrs)); // He/she is a student in the current course Rol_GetRolesInAllCrssIfNotYetGot (UsrDat); // Get user's roles if not got ShowTeacherRows = (TypeOfView == Rec_SHA_RECORD_LIST || TypeOfView == Rec_SHA_RECORD_PRINT) && TeacherInCurrentCrs; // He/she is a teacher in the current course /* Data form = I can edit fields like surnames and name */ switch (TypeOfView) { case Rec_SHA_MY_RECORD_FORM: case Rec_SHA_OTHER_NEW_USR_FORM: ICanEdit = true; break; case Rec_SHA_OTHER_EXISTING_USR_FORM: ICanEdit = Usr_ICanChangeOtherUsrData (UsrDat); break; default: // In other options, I can not edit user's data ICanEdit = false; break; } Rec_RecordHelp[Rec_SHA_RECORD_LIST] = Rec_RecordListHelp[UsrDat->Roles.InCurrentCrs.Role]; PutFormLinks = !Gbl.Form.Inside && // Only if not inside another form Act_GetBrowserTab (Gbl.Action.Act) == Act_BRW_1ST_TAB; // Only in main browser tab Ins.InsCod = UsrDat->InsCod; if (Ins.InsCod > 0) Ins_GetDataOfInstitutionByCod (&Ins,Ins_GET_BASIC_DATA); /***** Begin box and table *****/ sprintf (StrRecordWidth,"%upx",Rec_RECORD_WIDTH); Gbl.Record.UsrDat = UsrDat; Gbl.Record.TypeOfView = TypeOfView; Box_BoxTableBegin (StrRecordWidth,NULL, TypeOfView == Rec_SHA_OTHER_NEW_USR_FORM ? NULL : // New user ==> don't put icons Rec_PutIconsCommands, Rec_RecordHelp[TypeOfView],Box_NOT_CLOSABLE,2); /***** Institution and user's photo *****/ HTM_TR_Begin (NULL); Rec_ShowInstitutionInHead (&Ins,PutFormLinks); Rec_ShowPhoto (UsrDat); HTM_TR_End (); /***** Full name *****/ HTM_TR_Begin (NULL); Rec_ShowFullName (UsrDat); HTM_TR_End (); /***** User's nickname *****/ HTM_TR_Begin (NULL); Rec_ShowNickname (UsrDat,PutFormLinks); HTM_TR_End (); /***** User's country, web and social networks *****/ HTM_TR_Begin (NULL); Rec_ShowCountryInHead (UsrDat,ShowData); Rec_ShowWebsAndSocialNets (UsrDat,TypeOfView); HTM_TR_End (); if (ShowIDRows || ShowAddressRows || ShowTeacherRows) { HTM_TR_Begin (NULL); HTM_TD_Begin ("colspan=\"3\""); /***** Show email and user's IDs *****/ if (ShowIDRows) { HTM_TABLE_BeginWidePadding (2); /* Show email */ Rec_ShowEmail (UsrDat); /* Show user's IDs */ Rec_ShowUsrIDs (UsrDat,Anchor); HTM_TABLE_End (); } /***** Begin form *****/ switch (TypeOfView) { case Rec_SHA_SIGN_UP_IN_CRS_FORM: Frm_StartForm (ActSignUp); break; case Rec_SHA_MY_RECORD_FORM: Frm_StartForm (ActChgMyData); break; case Rec_SHA_OTHER_EXISTING_USR_FORM: switch (Gbl.Action.Act) { case ActReqMdfStd: NextAction = ActUpdStd; break; case ActReqMdfNET: NextAction = ActUpdNET; break; case ActReqMdfTch: NextAction = ActUpdTch; break; default: NextAction = ActUpdOth; break; } Frm_StartForm (NextAction); Usr_PutParamUsrCodEncrypted (UsrDat->EncryptedUsrCod); // Existing user break; case Rec_SHA_OTHER_NEW_USR_FORM: switch (Gbl.Action.Act) { case ActReqMdfStd: NextAction = ActCreStd; break; case ActReqMdfNET: NextAction = ActCreNET; break; case ActReqMdfTch: NextAction = ActCreTch; break; default: NextAction = ActCreOth; break; } Frm_StartForm (NextAction); ID_PutParamOtherUsrIDPlain (); // New user break; default: break; } HTM_TABLE_BeginWidePadding (2); if (ShowIDRows) { /***** Role or sex *****/ Rec_ShowRole (UsrDat,TypeOfView); /***** Name *****/ Rec_ShowSurname1 (UsrDat,ICanEdit); Rec_ShowSurname2 (UsrDat,ICanEdit); Rec_ShowFirstName (UsrDat,ICanEdit); /***** Country *****/ if (CountryForm) Rec_ShowCountry (UsrDat,ICanEdit); } /***** Address rows *****/ if (ShowAddressRows) { /***** Origin place *****/ Rec_ShowOriginPlace (UsrDat,ShowData,ICanEdit); /***** Date of birth *****/ Rec_ShowDateOfBirth (UsrDat,ShowData,ICanEdit); /***** Local address *****/ Rec_ShowLocalAddress (UsrDat,ShowData,ICanEdit); /***** Local phone *****/ Rec_ShowLocalPhone (UsrDat,ShowData,ICanEdit); /***** Family address *****/ Rec_ShowFamilyAddress (UsrDat,ShowData,ICanEdit); /***** Family phone *****/ Rec_ShowFamilyPhone (UsrDat,ShowData,ICanEdit); /***** User's comments *****/ Rec_ShowComments (UsrDat,ShowData,ICanEdit); } /***** Teacher's rows *****/ if (ShowTeacherRows) Rec_ShowTeacherRows (UsrDat,&Ins,ShowData); HTM_TABLE_End (); /***** Button and end form *****/ switch (TypeOfView) { case Rec_SHA_SIGN_UP_IN_CRS_FORM: Btn_PutConfirmButton (Txt_Sign_up); Frm_EndForm (); break; case Rec_SHA_MY_RECORD_FORM: Btn_PutConfirmButton (Txt_Save_changes); Frm_EndForm (); break; case Rec_SHA_OTHER_NEW_USR_FORM: if (Gbl.Crs.Grps.NumGrps) // This course has groups? Grp_ShowLstGrpsToChgOtherUsrsGrps (UsrDat->UsrCod); Btn_PutConfirmButton (Txt_Register); Frm_EndForm (); break; case Rec_SHA_OTHER_EXISTING_USR_FORM: /***** Show list of groups to register/remove me/user *****/ if (Gbl.Crs.Grps.NumGrps) // This course has groups? { if (ItsMe) { // Don't show groups if I don't belong to course if (Gbl.Usrs.Me.IBelongToCurrentCrs) Grp_ShowLstGrpsToChgMyGrps (); } else // Not me Grp_ShowLstGrpsToChgOtherUsrsGrps (UsrDat->UsrCod); } /***** Which action, register or removing? *****/ if (Enr_PutActionsRegRemOneUsr (ItsMe)) Btn_PutConfirmButton (Txt_Confirm); Frm_EndForm (); break; default: break; } HTM_TD_End (); HTM_TR_End (); } /***** End table and box *****/ Box_BoxTableEnd (); } /*****************************************************************************/ /*********** Show commands (icon to make actions) in record card *************/ /*****************************************************************************/ static void Rec_PutIconsCommands (void) { extern const char *Txt_Edit_my_personal_data; extern const char *Txt_My_public_profile; extern const char *Txt_Another_user_s_profile; extern const char *Txt_View_record_for_this_course; extern const char *Txt_View_record_and_office_hours; extern const char *Txt_Show_agenda; extern const char *Txt_Administer_user; extern const char *Txt_Write_a_message; extern const char *Txt_View_homework; extern const char *Txt_View_test_results; extern const char *Txt_View_attendance; extern const char *Txt_Following_unfollow; extern const char *Txt_Follow; bool ItsMe = Usr_ItsMe (Gbl.Record.UsrDat->UsrCod); bool ICanViewUsrProfile; bool RecipientHasBannedMe; Act_Action_t NextAction; if (!Gbl.Form.Inside && // Only if not inside another form Act_GetBrowserTab (Gbl.Action.Act) == Act_BRW_1ST_TAB && // Only in main browser tab Gbl.Usrs.Me.Logged) // Only if I am logged { ICanViewUsrProfile = Pri_ShowingIsAllowed (Gbl.Record.UsrDat->BaPrfVisibility, Gbl.Record.UsrDat); /***** Start container *****/ HTM_DIV_Begin ("class=\"FRAME_ICO\""); if (ItsMe) /***** Button to edit my record card *****/ Lay_PutContextualLinkOnlyIcon (ActReqEdiRecSha,NULL,NULL, "pen.svg", Txt_Edit_my_personal_data); if (ICanViewUsrProfile) /***** Button to view user's profile *****/ Lay_PutContextualLinkOnlyIcon (ActSeeOthPubPrf,NULL, Rec_PutParamUsrCodEncrypted, "user.svg", ItsMe ? Txt_My_public_profile : Txt_Another_user_s_profile); /***** Button to view user's record card *****/ if (Usr_CheckIfICanViewRecordStd (Gbl.Record.UsrDat)) /* View student's records: common record card and course record card */ Lay_PutContextualLinkOnlyIcon (ActSeeRecOneStd,NULL, Rec_PutParamUsrCodEncrypted, "card.svg", Txt_View_record_for_this_course); else if (Usr_CheckIfICanViewRecordTch (Gbl.Record.UsrDat)) Lay_PutContextualLinkOnlyIcon (ActSeeRecOneTch,NULL, Rec_PutParamUsrCodEncrypted, "card.svg", Txt_View_record_and_office_hours); /***** Button to view user's agenda *****/ if (ItsMe) Lay_PutContextualLinkOnlyIcon (ActSeeMyAgd,NULL,NULL, "calendar.svg", Txt_Show_agenda); else if (Usr_CheckIfICanViewUsrAgenda (Gbl.Record.UsrDat)) Lay_PutContextualLinkOnlyIcon (ActSeeUsrAgd,NULL, Rec_PutParamUsrCodEncrypted, "calendar.svg", Txt_Show_agenda); /***** Button to admin user *****/ if (ItsMe || Gbl.Usrs.Me.Role.Logged == Rol_TCH || Gbl.Usrs.Me.Role.Logged == Rol_DEG_ADM || Gbl.Usrs.Me.Role.Logged == Rol_CTR_ADM || Gbl.Usrs.Me.Role.Logged == Rol_INS_ADM || Gbl.Usrs.Me.Role.Logged == Rol_SYS_ADM) { switch (Gbl.Record.UsrDat->Roles.InCurrentCrs.Role) { case Rol_STD: NextAction = ActReqMdfStd; break; case Rol_NET: NextAction = ActReqMdfNET; break; case Rol_TCH: NextAction = ActReqMdfTch; break; default: // Guest, user or admin NextAction = ActReqMdfOth; break; } Lay_PutContextualLinkOnlyIcon (NextAction,NULL, Rec_PutParamUsrCodEncrypted, "user-cog.svg", Txt_Administer_user); } if (Gbl.Hierarchy.Level == Hie_CRS) // Course selected { if (Gbl.Record.UsrDat->Roles.InCurrentCrs.Role == Rol_STD) // He/she is a student in current course { /***** Button to view student's test exams *****/ if (Usr_CheckIfICanViewTst (Gbl.Record.UsrDat)) { if (ItsMe) Lay_PutContextualLinkOnlyIcon (ActSeeMyTstRes,NULL, Rec_PutParamsMyTsts, "check.svg", Txt_View_test_results); else // Not me Lay_PutContextualLinkOnlyIcon (ActSeeUsrTstRes,NULL, Rec_PutParamsStdTsts, "check.svg", Txt_View_test_results); } /***** Button to view student's assignments and works *****/ if (Usr_CheckIfICanViewAsgWrk (Gbl.Record.UsrDat)) { if (ItsMe) Lay_PutContextualLinkOnlyIcon (ActAdmAsgWrkUsr,NULL,NULL, "folder-open.svg", Txt_View_homework); else // Not me, I am not a student in current course Lay_PutContextualLinkOnlyIcon (ActAdmAsgWrkCrs,NULL, Rec_PutParamsWorks, "folder-open.svg", Txt_View_homework); } /***** Button to view student's attendance *****/ if (Usr_CheckIfICanViewAtt (Gbl.Record.UsrDat)) { if (ItsMe) Lay_PutContextualLinkOnlyIcon (ActSeeLstMyAtt,NULL,NULL, "calendar-check.svg", Txt_View_attendance); else // Not me Lay_PutContextualLinkOnlyIcon (ActSeeLstUsrAtt,NULL, Rec_PutParamsStudent, "calendar-check.svg", Txt_View_attendance); } } } /***** Button to print QR code *****/ QR_PutLinkToPrintQRCode (ActPrnUsrQR,Rec_PutParamUsrCodEncrypted); /***** Button to send a message *****/ RecipientHasBannedMe = Msg_CheckIfUsrIsBanned (Gbl.Usrs.Me.UsrDat.UsrCod, // From: Gbl.Record.UsrDat->UsrCod); // To: if (!RecipientHasBannedMe) Lay_PutContextualLinkOnlyIcon (ActReqMsgUsr,NULL,Rec_PutParamsMsgUsr, "envelope.svg", Txt_Write_a_message); /***** Button to follow / unfollow *****/ if (!ItsMe) // Not me { if (Fol_CheckUsrIsFollowerOf (Gbl.Usrs.Me.UsrDat.UsrCod, Gbl.Record.UsrDat->UsrCod)) // I follow user Lay_PutContextualLinkOnlyIcon (ActUnfUsr,NULL, Rec_PutParamUsrCodEncrypted, "user-check.svg", Txt_Following_unfollow); // Put button to unfollow, even if I can not view user's profile else if (ICanViewUsrProfile) Lay_PutContextualLinkOnlyIcon (ActFolUsr,NULL, Rec_PutParamUsrCodEncrypted, "user-plus.svg", Txt_Follow); // Put button to follow } /***** Button to change user's photo *****/ Pho_PutIconToChangeUsrPhoto (); /***** Button to change user's account *****/ Acc_PutIconToChangeUsrAccount (); /***** End container *****/ HTM_DIV_End (); } } void Rec_PutParamUsrCodEncrypted (void) { Usr_PutParamUsrCodEncrypted (Gbl.Record.UsrDat->EncryptedUsrCod); } static void Rec_PutParamsMyTsts (void) { Dat_SetIniEndDates (); Dat_WriteParamsIniEndDates (); } static void Rec_PutParamsStdTsts (void) { Rec_PutParamsStudent (); Dat_SetIniEndDates (); Dat_WriteParamsIniEndDates (); } static void Rec_PutParamsWorks (void) { Rec_PutParamsStudent (); Par_PutHiddenParamChar ("FullTree",'Y'); // By default, show all files Gbl.FileBrowser.FullTree = true; Brw_PutHiddenParamFullTreeIfSelected (); } static void Rec_PutParamsStudent (void) { Par_PutHiddenParamString (NULL,"UsrCodStd",Gbl.Record.UsrDat->EncryptedUsrCod); Grp_PutParamAllGroups (); } static void Rec_PutParamsMsgUsr (void) { Rec_PutParamUsrCodEncrypted (); Grp_PutParamAllGroups (); Par_PutHiddenParamChar ("ShowOnlyOneRecipient",'Y'); } /*****************************************************************************/ /*********************** Show institution in record card *********************/ /*****************************************************************************/ static void Rec_ShowInstitutionInHead (struct Instit *Ins,bool PutFormLinks) { /***** Institution logo *****/ HTM_TD_Begin ("rowspan=\"4\" class=\"REC_C1_TOP CM\""); if (Ins->InsCod > 0) { /* Form to go to the institution */ if (PutFormLinks) { Frm_StartFormGoTo (ActSeeInsInf); Ins_PutParamInsCod (Ins->InsCod); HTM_BUTTON_SUBMIT_Begin (Ins->FullName,"BT_LINK",NULL); } Lgo_DrawLogo (Hie_INS,Ins->InsCod,Ins->ShrtName, Rec_INSTITUTION_LOGO_SIZE,NULL,true); if (PutFormLinks) { HTM_BUTTON_End (); Frm_EndForm (); } } HTM_TD_End (); /***** Institution name *****/ HTM_TD_Begin ("class=\"REC_C2_TOP REC_HEAD LM\""); if (Ins->InsCod > 0) { /* Form to go to the institution */ if (PutFormLinks) { Frm_StartFormGoTo (ActSeeInsInf); Ins_PutParamInsCod (Ins->InsCod); HTM_BUTTON_SUBMIT_Begin (Ins->FullName,"BT_LINK REC_HEAD",NULL); } HTM_Txt (Ins->FullName); if (PutFormLinks) { HTM_BUTTON_End (); Frm_EndForm (); } } HTM_TD_End (); } /*****************************************************************************/ /********************** Show user's photo in record card *********************/ /*****************************************************************************/ static void Rec_ShowPhoto (struct UsrData *UsrDat) { char PhotoURL[PATH_MAX + 1]; bool ShowPhoto = Pho_ShowingUsrPhotoIsAllowed (UsrDat,PhotoURL); /***** User's photo *****/ HTM_TD_Begin ("rowspan=\"3\" class=\"REC_C3_TOP CT\""); Pho_ShowUsrPhoto (UsrDat,ShowPhoto ? PhotoURL : NULL, "PHOTO186x248",Pho_ZOOM,false); HTM_TD_End (); } /*****************************************************************************/ /*************************** Show user's full name ***************************/ /*****************************************************************************/ static void Rec_ShowFullName (struct UsrData *UsrDat) { HTM_TD_Begin ("class=\"REC_C2_MID LT\""); HTM_DIV_Begin ("class=\"REC_NAME\""); /***** First name *****/ HTM_Txt (UsrDat->FirstName); HTM_BR (); /***** Surname 1 *****/ HTM_Txt (UsrDat->Surname1); HTM_BR (); /***** Surname 2 *****/ HTM_Txt (UsrDat->Surname2); HTM_DIV_End (); HTM_TD_End (); } /*****************************************************************************/ /*************************** Show user's nickname ****************************/ /*****************************************************************************/ static void Rec_ShowNickname (struct UsrData *UsrDat,bool PutFormLinks) { extern const char *Txt_My_public_profile; extern const char *Txt_Another_user_s_profile; bool ItsMe; HTM_TD_Begin ("class=\"REC_C2_MID LB\""); HTM_DIV_Begin ("class=\"REC_NICK\""); if (UsrDat->Nickname[0]) { if (PutFormLinks) { /* Put form to go to public profile */ ItsMe = Usr_ItsMe (UsrDat->UsrCod); Frm_StartForm (ActSeeOthPubPrf); Usr_PutParamUsrCodEncrypted (UsrDat->EncryptedUsrCod); HTM_BUTTON_SUBMIT_Begin (ItsMe ? Txt_My_public_profile : Txt_Another_user_s_profile, "BT_LINK REC_NICK", NULL); } HTM_TxtF ("@%s",UsrDat->Nickname); if (PutFormLinks) { HTM_BUTTON_End (); Frm_EndForm (); } } HTM_DIV_End (); HTM_TD_End (); } /*****************************************************************************/ /**************************** Show user's country ****************************/ /*****************************************************************************/ static void Rec_ShowCountryInHead (struct UsrData *UsrDat,bool ShowData) { HTM_TD_Begin ("class=\"REC_C2_MID DAT_N LT\""); if (ShowData && UsrDat->CtyCod > 0) /* Link to see country information */ Cty_WriteCountryName (UsrDat->CtyCod, "BT_LINK DAT_N"); // Put link to country HTM_TD_End (); } /*****************************************************************************/ /******************* Show user's webs and social networks ********************/ /*****************************************************************************/ static void Rec_ShowWebsAndSocialNets (struct UsrData *UsrDat, Rec_SharedRecordViewType_t TypeOfView) { HTM_TD_Begin ("class=\"REC_C3_MID CT\""); if (TypeOfView != Rec_SHA_RECORD_PRINT) Net_ShowWebsAndSocialNets (UsrDat); HTM_TD_End (); } /*****************************************************************************/ /***************************** Show user's email *****************************/ /*****************************************************************************/ static void Rec_ShowEmail (struct UsrData *UsrDat) { extern const char *Txt_Email; /***** Email *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",NULL,Txt_Email); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (UsrDat->Email[0]) { HTM_DIV_Begin ("class=\"REC_EMAIL\""); // Limited width if (Mai_ICanSeeOtherUsrEmail (UsrDat)) { HTM_A_Begin ("href=\"mailto:%s\" class=\"DAT_N\"",UsrDat->Email); HTM_Txt (UsrDat->Email); HTM_A_End (); } else HTM_Txt ("********"); HTM_DIV_End (); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /******************************* Show user's IDs *****************************/ /*****************************************************************************/ static void Rec_ShowUsrIDs (struct UsrData *UsrDat,const char *Anchor) { extern const char *Txt_ID; /***** User's IDs *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RT",NULL,Txt_ID); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LT\""); ID_WriteUsrIDs (UsrDat,Anchor); HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************** Show user's role / sex ***************************/ /*****************************************************************************/ static void Rec_ShowRole (struct UsrData *UsrDat, Rec_SharedRecordViewType_t TypeOfView) { extern const char *Usr_StringsSexIcons[Usr_NUM_SEXS]; extern const char *Txt_Role; extern const char *Txt_Sex; extern const char *Txt_SEX_SINGULAR_Abc[Usr_NUM_SEXS]; extern const char *Txt_ROLES_SINGUL_Abc[Rol_NUM_ROLES][Usr_NUM_SEXS]; bool RoleForm = (TypeOfView == Rec_SHA_SIGN_UP_IN_CRS_FORM || TypeOfView == Rec_SHA_OTHER_EXISTING_USR_FORM || TypeOfView == Rec_SHA_OTHER_NEW_USR_FORM); bool SexForm = (TypeOfView == Rec_SHA_MY_RECORD_FORM); Rol_Role_t DefaultRoleInForm; Rol_Role_t Role; unsigned RoleUnsigned; Usr_Sex_t Sex; char *Label; HTM_TR_Begin (NULL); if (RoleForm) { /***** Form to select a role *****/ /* Get user's roles if not got */ Rol_GetRolesInAllCrssIfNotYetGot (UsrDat); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM","Role",Txt_Role); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); switch (TypeOfView) { case Rec_SHA_SIGN_UP_IN_CRS_FORM: // I want to apply for enrolment /***** Set default role *****/ if (UsrDat->UsrCod == Gbl.Hierarchy.Crs.RequesterUsrCod || // Creator of the course (UsrDat->Roles.InCrss & (1 << Rol_TCH))) // Teacher in other courses DefaultRoleInForm = Rol_TCH; // Request sign up as a teacher else if ((UsrDat->Roles.InCrss & (1 << Rol_NET))) // Non-editing teacher in other courses DefaultRoleInForm = Rol_NET; // Request sign up as a non-editing teacher else DefaultRoleInForm = Rol_STD; // Request sign up as a student /***** Selector of role *****/ HTM_SELECT_Begin (false, "id=\"Role\" name=\"Role\""); for (Role = Rol_STD; Role <= Rol_TCH; Role++) { RoleUnsigned = (unsigned) Role; HTM_OPTION (HTM_Type_UNSIGNED,&RoleUnsigned, Role == DefaultRoleInForm,false, "%s",Txt_ROLES_SINGUL_Abc[Role][UsrDat->Sex]); } HTM_SELECT_End (); break; case Rec_SHA_OTHER_EXISTING_USR_FORM: // The other user already exists in the platform if (Gbl.Hierarchy.Level == Hie_CRS) // Course selected { /***** Set default role *****/ switch (UsrDat->Roles.InCurrentCrs.Role) { case Rol_STD: // Student in current course case Rol_NET: // Non-editing teacher in current course case Rol_TCH: // Teacher in current course DefaultRoleInForm = UsrDat->Roles.InCurrentCrs.Role; break; default: // User does not belong to current course /* If there is a request of this user, default role is the requested role */ DefaultRoleInForm = Rol_GetRequestedRole (UsrDat->UsrCod); switch (DefaultRoleInForm) { case Rol_STD: // Role requested: student case Rol_NET: // Role requested: non-editing teacher case Rol_TCH: // Role requested: teacher break; default: // No role requested switch (Gbl.Action.Act) { case ActReqMdfStd: DefaultRoleInForm = Rol_STD; break; case ActReqMdfNET: DefaultRoleInForm = Rol_NET; break; case ActReqMdfTch: DefaultRoleInForm = Rol_TCH; break; default: if ((UsrDat->Roles.InCrss & (1 << Rol_TCH))) // Teacher in other courses DefaultRoleInForm = Rol_TCH; else if ((UsrDat->Roles.InCrss & (1 << Rol_NET))) // Non-editing teacher in other courses DefaultRoleInForm = Rol_NET; else DefaultRoleInForm = Rol_STD; break; } break; } break; } /***** Selector of role *****/ HTM_SELECT_Begin (false, "id=\"Role\" name=\"Role\""); switch (Gbl.Usrs.Me.Role.Logged) { case Rol_GST: case Rol_USR: case Rol_STD: case Rol_NET: RoleUnsigned = (unsigned) Gbl.Usrs.Me.Role.Logged; HTM_OPTION (HTM_Type_UNSIGNED,&RoleUnsigned,true,true, "%s",Txt_ROLES_SINGUL_Abc[Gbl.Usrs.Me.Role.Logged][UsrDat->Sex]); break; case Rol_TCH: case Rol_DEG_ADM: case Rol_CTR_ADM: case Rol_INS_ADM: case Rol_SYS_ADM: for (Role = Rol_STD; Role <= Rol_TCH; Role++) { RoleUnsigned = (unsigned) Role; HTM_OPTION (HTM_Type_UNSIGNED,&RoleUnsigned, Role == DefaultRoleInForm,false, "%s",Txt_ROLES_SINGUL_Abc[Role][UsrDat->Sex]); } break; default: // The rest of users can not register other users break; } HTM_SELECT_End (); } else // No course selected { /***** Set default role *****/ DefaultRoleInForm = (UsrDat->Roles.InCrss & ((1 << Rol_STD) | (1 << Rol_NET) | (1 << Rol_TCH))) ? Rol_USR : // If user belongs to any course Rol_GST; // If user don't belong to any course /***** Selector of role *****/ HTM_SELECT_Begin (false, "id=\"Role\" name=\"Role\""); RoleUnsigned = (unsigned) DefaultRoleInForm; HTM_OPTION (HTM_Type_UNSIGNED,&RoleUnsigned,true,true, "%s",Txt_ROLES_SINGUL_Abc[DefaultRoleInForm][UsrDat->Sex]); HTM_SELECT_End (); } break; case Rec_SHA_OTHER_NEW_USR_FORM: // The user does not exist in platform if (Gbl.Hierarchy.Level == Hie_CRS) // Course selected switch (Gbl.Usrs.Me.Role.Logged) { case Rol_TCH: case Rol_DEG_ADM: case Rol_CTR_ADM: case Rol_INS_ADM: case Rol_SYS_ADM: /***** Set default role *****/ switch (Gbl.Action.Act) { case ActReqMdfStd: DefaultRoleInForm = Rol_STD; break; case ActReqMdfNET: DefaultRoleInForm = Rol_NET; break; case ActReqMdfTch: DefaultRoleInForm = Rol_TCH; break; default: DefaultRoleInForm = Rol_STD; break; } /***** Selector of role *****/ HTM_SELECT_Begin (false, "id=\"Role\" name=\"Role\""); for (Role = Rol_STD; Role <= Rol_TCH; Role++) { RoleUnsigned = (unsigned) Role; HTM_OPTION (HTM_Type_UNSIGNED,&RoleUnsigned, Role == DefaultRoleInForm,false, "%s",Txt_ROLES_SINGUL_Abc[Role][Usr_SEX_UNKNOWN]); } HTM_SELECT_End (); break; default: // The rest of users can not register other users break; } else // No course selected switch (Gbl.Usrs.Me.Role.Logged) { case Rol_SYS_ADM: /***** Selector of role *****/ HTM_SELECT_Begin (false, "id=\"Role\" name=\"Role\""); RoleUnsigned = (unsigned) Rol_GST; HTM_OPTION (HTM_Type_UNSIGNED,&RoleUnsigned, true,false, "%s",Txt_ROLES_SINGUL_Abc[Rol_GST][Usr_SEX_UNKNOWN]); HTM_SELECT_End (); break; default: // The rest of users can not register other users break; } break; default: break; } HTM_TD_End (); } else if (SexForm) { /***** Form to select a sex *****/ /* Label */ if (asprintf (&Label,"%s*",Txt_Sex) < 0) Lay_NotEnoughMemoryExit (); Frm_LabelColumn ("REC_C1_BOT RM","",Label); free (Label); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT LM\""); for (Sex = Usr_SEX_FEMALE; Sex <= Usr_SEX_MALE; Sex++) { HTM_LABEL_Begin ("class=\"DAT_N\""); HTM_INPUT_RADIO ("Sex",false, "value=\"%u\"%s required=\"required\"", (unsigned) Sex, Sex == Gbl.Usrs.Me.UsrDat.Sex ? " checked=\"checked\"" : ""); HTM_TxtF ("%s %s",Usr_StringsSexIcons[Sex],Txt_SEX_SINGULAR_Abc[Sex]); HTM_LABEL_End (); } HTM_TD_End (); } else // RoleForm == false, SexForm == false { /***** No form, only text *****/ /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",NULL,Txt_Role); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); HTM_Txt (Txt_ROLES_SINGUL_Abc[UsrDat->Roles.InCurrentCrs.Role][UsrDat->Sex]); HTM_TD_End (); } HTM_TR_End (); } /*****************************************************************************/ /*************************** Show user's surname 1 ***************************/ /*****************************************************************************/ static void Rec_ShowSurname1 (struct UsrData *UsrDat,bool PutForm) { extern const char *Txt_Surname_1; char *Label; HTM_TR_Begin (NULL); /* Label */ if (PutForm) { if (asprintf (&Label,"%s*",Txt_Surname_1) < 0) Lay_NotEnoughMemoryExit (); Frm_LabelColumn ("REC_C1_BOT RM","Surname1",Label); free (Label); } else Frm_LabelColumn ("REC_C1_BOT RM",NULL,Txt_Surname_1); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (PutForm) HTM_INPUT_TEXT ("Surname1",Usr_MAX_CHARS_FIRSTNAME_OR_SURNAME,UsrDat->Surname1,false, "id=\"Surname1\" class=\"REC_C2_BOT_INPUT\"" " required=\"required\""); else if (UsrDat->Surname1[0]) { HTM_STRONG_Begin (); HTM_Txt (UsrDat->Surname1); HTM_STRONG_End (); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /*************************** Show user's surname 2 ***************************/ /*****************************************************************************/ static void Rec_ShowSurname2 (struct UsrData *UsrDat,bool PutForm) { extern const char *Txt_Surname_2; HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",PutForm ? "Surname2" : NULL, Txt_Surname_2); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (PutForm) HTM_INPUT_TEXT ("Surname2",Usr_MAX_CHARS_FIRSTNAME_OR_SURNAME, UsrDat->Surname2,false, "id=\"Surname2\" class=\"REC_C2_BOT_INPUT\""); else if (UsrDat->Surname2[0]) { HTM_STRONG_Begin (); HTM_Txt (UsrDat->Surname2); HTM_STRONG_End (); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************** Show user's first name ***************************/ /*****************************************************************************/ static void Rec_ShowFirstName (struct UsrData *UsrDat,bool PutForm) { extern const char *Txt_First_name; char *Label; HTM_TR_Begin (NULL); /* Label */ if (PutForm) { if (asprintf (&Label,"%s*",Txt_First_name) < 0) Lay_NotEnoughMemoryExit (); Frm_LabelColumn ("REC_C1_BOT RM","FirstName",Label); free (Label); } else Frm_LabelColumn ("REC_C1_BOT RM",NULL,Txt_First_name); /* Data */ HTM_TD_Begin ("colspan=\"2\" class=\"REC_C2_BOT DAT_N LM\""); if (PutForm) HTM_INPUT_TEXT ("FirstName",Usr_MAX_CHARS_FIRSTNAME_OR_SURNAME, UsrDat->FirstName,false, "id=\"FirstName\" class=\"REC_C2_BOT_INPUT\"" " required=\"required\""); else if (UsrDat->FirstName[0]) { HTM_STRONG_Begin (); HTM_Txt (UsrDat->FirstName); HTM_STRONG_End (); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /**************************** Show user's country ****************************/ /*****************************************************************************/ static void Rec_ShowCountry (struct UsrData *UsrDat,bool PutForm) { extern const char *Txt_Country; extern const char *Txt_Another_country; char *Label; unsigned NumCty; /***** If list of countries is empty, try to get it *****/ if (!Gbl.Hierarchy.Sys.Ctys.Num) { Gbl.Hierarchy.Sys.Ctys.SelectedOrder = Cty_ORDER_BY_COUNTRY; Cty_GetListCountries (Cty_GET_BASIC_DATA); } /***** Selector of country *****/ HTM_TR_Begin (NULL); /* Label */ if (PutForm) { if (asprintf (&Label,"%s*",Txt_Country) < 0) Lay_NotEnoughMemoryExit (); Frm_LabelColumn ("REC_C1_BOT RM","OthCtyCod",Label); free (Label); } else Frm_LabelColumn ("REC_C1_BOT RM",NULL,Txt_Country); /* Data */ HTM_TD_Begin ("colspan=\"2\" class=\"REC_C2_BOT LM\""); HTM_SELECT_Begin (false, "id=\"OthCtyCod\" name=\"OthCtyCod\"" " class=\"REC_C2_BOT_INPUT\" required=\"required\""); HTM_OPTION (HTM_Type_STRING,"",false,false, "%s",Txt_Country); HTM_OPTION (HTM_Type_STRING,"0",UsrDat->CtyCod == 0,false, "%s",Txt_Another_country); for (NumCty = 0; NumCty < Gbl.Hierarchy.Sys.Ctys.Num; NumCty++) HTM_OPTION (HTM_Type_LONG,&Gbl.Hierarchy.Sys.Ctys.Lst[NumCty].CtyCod, Gbl.Hierarchy.Sys.Ctys.Lst[NumCty].CtyCod == UsrDat->CtyCod,false, "%s",Gbl.Hierarchy.Sys.Ctys.Lst[NumCty].Name[Gbl.Prefs.Language]); HTM_SELECT_End (); HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************ Show user's place of origin ************************/ /*****************************************************************************/ static void Rec_ShowOriginPlace (struct UsrData *UsrDat,bool ShowData,bool PutForm) { extern const char *Txt_Place_of_origin; /***** Origin place *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",PutForm ? "OriginPlace" : NULL, Txt_Place_of_origin); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (ShowData) { if (PutForm) HTM_INPUT_TEXT ("OriginPlace",Usr_MAX_CHARS_ADDRESS, UsrDat->OriginPlace,false, "id=\"OriginPlace\" class=\"REC_C2_BOT_INPUT\""); else if (UsrDat->OriginPlace[0]) HTM_Txt (UsrDat->OriginPlace); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************ Show user's date of birth **************************/ /*****************************************************************************/ static void Rec_ShowDateOfBirth (struct UsrData *UsrDat,bool ShowData,bool PutForm) { extern const char *Txt_Date_of_birth; /***** Date of birth *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",PutForm ? "" : NULL, Txt_Date_of_birth); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (ShowData) { if (PutForm) Dat_WriteFormDate (Gbl.Now.Date.Year - Rec_USR_MAX_AGE, Gbl.Now.Date.Year - Rec_USR_MIN_AGE, "Birth", &(UsrDat->Birthday), false,false); else if (UsrDat->StrBirthday[0]) HTM_Txt (UsrDat->StrBirthday); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************ Show user's local address **************************/ /*****************************************************************************/ static void Rec_ShowLocalAddress (struct UsrData *UsrDat,bool ShowData,bool PutForm) { extern const char *Txt_Local_address; /***** Local address *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",PutForm ? "LocalAddress" : NULL, Txt_Local_address); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (ShowData) { if (PutForm) HTM_INPUT_TEXT ("LocalAddress",Usr_MAX_CHARS_ADDRESS, UsrDat->LocalAddress,false, "id=\"LocalAddress\" class=\"REC_C2_BOT_INPUT\""); else if (UsrDat->LocalAddress[0]) HTM_Txt (UsrDat->LocalAddress); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************* Show user's local phone ***************************/ /*****************************************************************************/ static void Rec_ShowLocalPhone (struct UsrData *UsrDat,bool ShowData,bool PutForm) { extern const char *Txt_Phone; /***** Local phone *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",PutForm ? "LocalPhone" : NULL, Txt_Phone); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (ShowData) { if (PutForm) HTM_INPUT_TEL ("LocalPhone",UsrDat->LocalPhone,false, "id=\"LocalPhone\" class=\"REC_C2_BOT_INPUT\""); else if (UsrDat->LocalPhone[0]) { HTM_A_Begin ("href=\"tel:%s\" class=\"DAT_N\"",UsrDat->LocalPhone); HTM_Txt (UsrDat->LocalPhone); HTM_A_End (); } } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /*********************** Show user's family address **************************/ /*****************************************************************************/ static void Rec_ShowFamilyAddress (struct UsrData *UsrDat,bool ShowData,bool PutForm) { extern const char *Txt_Family_address; /***** Family address *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",PutForm ? "FamilyAddress" : NULL, Txt_Family_address); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (ShowData) { if (PutForm) HTM_INPUT_TEXT ("FamilyAddress",Usr_MAX_CHARS_ADDRESS, UsrDat->FamilyAddress,false, "id=\"FamilyAddress\" class=\"REC_C2_BOT_INPUT\""); else if (UsrDat->FamilyAddress[0]) HTM_Txt (UsrDat->FamilyAddress); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************ Show user's family phone ***************************/ /*****************************************************************************/ static void Rec_ShowFamilyPhone (struct UsrData *UsrDat,bool ShowData,bool PutForm) { extern const char *Txt_Phone; /***** Family phone *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",PutForm ? "FamilyPhone" : NULL, Txt_Phone); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (ShowData) { if (PutForm) HTM_INPUT_TEL ("FamilyPhone",UsrDat->FamilyPhone,false, "id=\"FamilyPhone\" class=\"REC_C2_BOT_INPUT\""); else if (UsrDat->FamilyPhone[0]) { HTM_A_Begin ("href=\"tel:%s\" class=\"DAT_N\"",UsrDat->FamilyPhone); HTM_Txt (UsrDat->FamilyPhone); HTM_A_End (); } } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************** Show user's comments *****************************/ /*****************************************************************************/ static void Rec_ShowComments (struct UsrData *UsrDat,bool ShowData,bool PutForm) { extern const char *Txt_USER_comments; /***** Comments *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RT",PutForm ? "Comments" : NULL, Txt_USER_comments); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LT\""); if (ShowData) { if (PutForm) { HTM_TEXTAREA_Begin ("id=\"Comments\" name=\"Comments\"" " rows=\"4\" class=\"REC_C2_BOT_INPUT\""); HTM_Txt (UsrDat->Comments); HTM_TEXTAREA_End (); } else if (UsrDat->Comments[0]) { Str_ChangeFormat (Str_FROM_HTML,Str_TO_RIGOROUS_HTML, // Convert from HTML to rigorous HTML UsrDat->Comments,Cns_MAX_BYTES_TEXT,false); HTM_Txt (UsrDat->Comments); } } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************** Show user's institution **************************/ /*****************************************************************************/ static void Rec_ShowTeacherRows (struct UsrData *UsrDat,struct Instit *Ins, bool ShowData) { /***** Institution *****/ Rec_ShowInstitution (Ins,ShowData); /***** Centre *****/ Rec_ShowCentre (UsrDat,ShowData); /***** Department *****/ Rec_ShowDepartment (UsrDat,ShowData); /***** Office *****/ Rec_ShowOffice (UsrDat,ShowData); /***** Office phone *****/ Rec_ShowOfficePhone (UsrDat,ShowData); } /*****************************************************************************/ /************************** Show user's institution **************************/ /*****************************************************************************/ static void Rec_ShowInstitution (struct Instit *Ins,bool ShowData) { extern const char *Txt_Institution; /***** Institution *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RT",NULL,Txt_Institution); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LT\""); if (ShowData) if (Ins->InsCod > 0) { if (Ins->WWW[0]) HTM_A_Begin ("href=\"%s\" target=\"_blank\" class=\"DAT_N\"", Ins->WWW); HTM_Txt (Ins->FullName); if (Ins->WWW[0]) HTM_A_End (); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /*************************** Show user's centre ******************************/ /*****************************************************************************/ static void Rec_ShowCentre (struct UsrData *UsrDat,bool ShowData) { extern const char *Txt_Centre; struct Centre Ctr; /***** Centre *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RT",NULL,Txt_Centre); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LT\""); if (ShowData) { if (UsrDat->Tch.CtrCod > 0) { Ctr.CtrCod = UsrDat->Tch.CtrCod; Ctr_GetDataOfCentreByCod (&Ctr,Ctr_GET_BASIC_DATA); if (Ctr.WWW[0]) HTM_A_Begin ("href=\"%s\" target=\"_blank\" class=\"DAT_N\"", Ctr.WWW); HTM_Txt (Ctr.FullName); if (Ctr.WWW[0]) HTM_A_End (); } } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /************************* Show user's department ****************************/ /*****************************************************************************/ static void Rec_ShowDepartment (struct UsrData *UsrDat,bool ShowData) { extern const char *Txt_Department; struct Department Dpt; /***** Department *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RT",NULL,Txt_Department); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LT\""); if (ShowData) { if (UsrDat->Tch.DptCod > 0) { Dpt.DptCod = UsrDat->Tch.DptCod; Dpt_GetDataOfDepartmentByCod (&Dpt); if (Dpt.WWW[0]) HTM_A_Begin ("href=\"%s\" target=\"_blank\" class=\"DAT_N\"", Dpt.WWW); HTM_Txt (Dpt.FullName); if (Dpt.WWW[0]) HTM_A_End (); } } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /*************************** Show user's office ******************************/ /*****************************************************************************/ static void Rec_ShowOffice (struct UsrData *UsrDat,bool ShowData) { extern const char *Txt_Office; /***** Office *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RT",NULL,Txt_Office); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LT\""); if (ShowData) HTM_Txt (UsrDat->Tch.Office); HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /*************************** Show user's office phone ******************************/ /*****************************************************************************/ static void Rec_ShowOfficePhone (struct UsrData *UsrDat,bool ShowData) { extern const char *Txt_Phone; /***** Office phone *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM",NULL,Txt_Phone); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT DAT_N LM\""); if (ShowData) { HTM_A_Begin ("href=\"tel:%s\" class=\"DAT_N\"", UsrDat->Tch.OfficePhone); HTM_Txt (UsrDat->Tch.OfficePhone); HTM_A_End (); } HTM_TD_End (); HTM_TR_End (); } /*****************************************************************************/ /*********************** Write a link to netiquette rules ********************/ /*****************************************************************************/ static void Rec_WriteLinkToDataProtectionClause (void) { extern const char *Txt_DATA_PROTECTION_CLAUSE; HTM_DIV_Begin ("class=\"CM\""); HTM_A_Begin ("class=\"TIT\" href=\"%s/\" target=\"_blank\"", Cfg_URL_DATA_PROTECTION_PUBLIC); HTM_Txt (Txt_DATA_PROTECTION_CLAUSE); HTM_A_End (); HTM_DIV_End (); } /*****************************************************************************/ /**************** Update and show data from identified user ******************/ /*****************************************************************************/ void Rec_UpdateMyRecord (void) { /***** Get my data from record form *****/ Rec_GetUsrNameFromRecordForm (&Gbl.Usrs.Me.UsrDat); Rec_GetUsrExtraDataFromRecordForm (&Gbl.Usrs.Me.UsrDat); /***** Update my data in database *****/ Enr_UpdateUsrData (&Gbl.Usrs.Me.UsrDat); } /*****************************************************************************/ /**** Get and check future user's role in current course from record form ****/ /*****************************************************************************/ Rol_Role_t Rec_GetRoleFromRecordForm (void) { Rol_Role_t Role; bool RoleOK; /***** Get role as a parameter from form *****/ Role = (Rol_Role_t) Par_GetParToUnsignedLong ("Role", 0, Rol_NUM_ROLES - 1, (unsigned long) Rol_UNK); /***** Check if I can register a user with the received role in current course *****/ /* Check for other possible errors */ RoleOK = false; switch (Gbl.Usrs.Me.Role.Logged) { case Rol_STD: // I am logged as student case Rol_NET: // I am logged as non-editing teacher /* A student or a non-editing teacher can only change his/her data, but not his/her role */ Role = Gbl.Usrs.Me.Role.Logged; RoleOK = true; break; case Rol_TCH: // I am logged as teacher case Rol_DEG_ADM: // I am logged as degree admin case Rol_CTR_ADM: // I am logged as centre admin case Rol_INS_ADM: // I am logged as institution admin if (Role == Rol_STD || Role == Rol_NET || Role == Rol_TCH) RoleOK = true; break; case Rol_SYS_ADM: if ( Role == Rol_STD || Role == Rol_NET || Role == Rol_TCH || (Role == Rol_GST && Gbl.Hierarchy.Crs.CrsCod <= 0)) RoleOK = true; break; default: break; } if (!RoleOK) Rol_WrongRoleExit (); return Role; } /*****************************************************************************/ /*************** Get data fields of shared record from form ******************/ /*****************************************************************************/ void Rec_GetUsrNameFromRecordForm (struct UsrData *UsrDat) { char Surname1 [Usr_MAX_BYTES_FIRSTNAME_OR_SURNAME + 1]; // Temporary surname 1 char FirstName[Usr_MAX_BYTES_FIRSTNAME_OR_SURNAME + 1]; // Temporary first name /***** Get surname 1 *****/ Par_GetParToText ("Surname1",Surname1, Usr_MAX_BYTES_FIRSTNAME_OR_SURNAME); Str_ConvertToTitleType (Surname1); // Surname 1 is mandatory, so avoid overwriting surname 1 with empty string if (Surname1[0]) // New surname 1 not empty Str_Copy (UsrDat->Surname1,Surname1, Usr_MAX_BYTES_FIRSTNAME_OR_SURNAME); /***** Get surname 2 *****/ Par_GetParToText ("Surname2",UsrDat->Surname2, Usr_MAX_BYTES_FIRSTNAME_OR_SURNAME); Str_ConvertToTitleType (UsrDat->Surname2); /***** Get first name *****/ Par_GetParToText ("FirstName",FirstName, Usr_MAX_BYTES_FIRSTNAME_OR_SURNAME); Str_ConvertToTitleType (FirstName); // First name is mandatory, so avoid overwriting first name with empty string if (FirstName[0]) // New first name not empty Str_Copy (UsrDat->FirstName,FirstName, Usr_MAX_BYTES_FIRSTNAME_OR_SURNAME); /***** Build full name *****/ Usr_BuildFullName (UsrDat); } static void Rec_GetUsrExtraDataFromRecordForm (struct UsrData *UsrDat) { /***** Get sex from form *****/ UsrDat->Sex = (Usr_Sex_t) Par_GetParToUnsignedLong ("Sex", (unsigned long) Usr_SEX_FEMALE, (unsigned long) Usr_SEX_MALE, (unsigned long) Usr_SEX_UNKNOWN); /***** Get country code *****/ UsrDat->CtyCod = Par_GetParToLong ("OthCtyCod"); Par_GetParToText ("OriginPlace",UsrDat->OriginPlace,Usr_MAX_BYTES_ADDRESS); Str_ConvertToTitleType (UsrDat->OriginPlace); Dat_GetDateFromForm ("BirthDay","BirthMonth","BirthYear", &(UsrDat->Birthday.Day ), &(UsrDat->Birthday.Month), &(UsrDat->Birthday.Year )); Dat_ConvDateToDateStr (&(UsrDat->Birthday),UsrDat->StrBirthday); Par_GetParToText ("LocalAddress",UsrDat->LocalAddress,Usr_MAX_BYTES_ADDRESS); Par_GetParToText ("LocalPhone",UsrDat->LocalPhone,Usr_MAX_BYTES_PHONE); Par_GetParToText ("FamilyAddress",UsrDat->FamilyAddress,Usr_MAX_BYTES_ADDRESS); Par_GetParToText ("FamilyPhone",UsrDat->FamilyPhone,Usr_MAX_BYTES_PHONE); Rec_GetUsrCommentsFromForm (UsrDat); } /*****************************************************************************/ /********** Get the comments of the record of a user from the form ***********/ /*****************************************************************************/ static void Rec_GetUsrCommentsFromForm (struct UsrData *UsrDat) { /***** Check if memory is allocated for comments *****/ if (!UsrDat->Comments) Lay_ShowErrorAndExit ("Can not read comments of a user."); /***** Get the parameter with the comments *****/ Par_GetParToHTML ("Comments",UsrDat->Comments,Cns_MAX_BYTES_TEXT); } /*****************************************************************************/ /**** Show my shared record and a form to edit my institution, centre... *****/ /*****************************************************************************/ void Rec_ShowMySharedRecordAndMore (void) { extern const char *Txt_Please_fill_in_your_record_card_including_your_name; extern const char *Txt_Please_fill_in_your_record_card_including_your_sex; extern const char *Txt_Please_fill_in_your_record_card_including_your_country_nationality; extern const char *Txt_Please_select_the_country_of_your_institution; extern const char *Txt_Please_select_your_institution; extern const char *Txt_Please_select_your_centre; extern const char *Txt_Please_select_your_department; bool IAmATeacher; /***** Get my roles if not yet got *****/ Rol_GetRolesInAllCrssIfNotYetGot (&Gbl.Usrs.Me.UsrDat); /***** Check if I am a teacher *****/ IAmATeacher = (Gbl.Usrs.Me.UsrDat.Roles.InCrss & ((1 << Rol_NET) | // I am a non-editing teacher... (1 << Rol_TCH))); // ...or a teacher in any course /***** If user has no name and surname, sex... *****/ if (!Gbl.Usrs.Me.UsrDat.FirstName[0] || !Gbl.Usrs.Me.UsrDat.Surname1[0]) // 1. No name Ale_ShowAlert (Ale_WARNING,Txt_Please_fill_in_your_record_card_including_your_name); else if (Gbl.Usrs.Me.UsrDat.Sex == Usr_SEX_UNKNOWN) // 2. No sex Ale_ShowAlert (Ale_WARNING,Txt_Please_fill_in_your_record_card_including_your_sex); else if (Gbl.Usrs.Me.UsrDat.CtyCod < 0) // 3. No country Ale_ShowAlert (Ale_WARNING,Txt_Please_fill_in_your_record_card_including_your_country_nationality); else if (Gbl.Usrs.Me.UsrDat.InsCtyCod < 0) // 4. No institution country Ale_ShowAlert (Ale_WARNING,Txt_Please_select_the_country_of_your_institution); else if (Gbl.Usrs.Me.UsrDat.InsCod < 0) // 5. No institution Ale_ShowAlert (Ale_WARNING,Txt_Please_select_your_institution); else if (IAmATeacher) { if (Gbl.Usrs.Me.UsrDat.Tch.CtrCod < 0) // 6. No centre Ale_ShowAlert (Ale_WARNING,Txt_Please_select_your_centre); else if (Gbl.Usrs.Me.UsrDat.Tch.DptCod < 0) // 7. No deparment Ale_ShowAlert (Ale_WARNING,Txt_Please_select_your_department); } /***** Start container *****/ HTM_DIV_Begin ("class=\"REC_USR\""); /***** Left part *****/ HTM_DIV_Begin ("class=\"REC_LEFT\""); /* My shared record card */ Rec_ShowSharedUsrRecord (Rec_SHA_MY_RECORD_FORM,&Gbl.Usrs.Me.UsrDat,NULL); HTM_DIV_End (); /***** Right part *****/ /* Start container for right part */ HTM_DIV_Begin ("class=\"REC_RIGHT\""); /* My institution, centre and department */ Rec_ShowFormMyInsCtrDpt (IAmATeacher); /* My webs / social networks */ Net_ShowFormMyWebsAndSocialNets (); /* End container for right part */ HTM_DIV_End (); /***** End container *****/ HTM_DIV_End (); /***** Data protection clause *****/ Rec_WriteLinkToDataProtectionClause (); } /*****************************************************************************/ /********* Show form to edit my institution, centre and department ***********/ /*****************************************************************************/ static void Rec_ShowFormMyInsCtrDpt (bool IAmATeacher) { extern const char *Hlp_PROFILE_Institution; extern const char *The_ClassFormInBox[The_NUM_THEMES]; extern const char *Txt_Institution_centre_and_department; extern const char *Txt_Institution; extern const char *Txt_Country; extern const char *Txt_Another_institution; extern const char *Txt_Centre; extern const char *Txt_Another_centre; extern const char *Txt_Department; extern const char *Txt_Office; extern const char *Txt_Phone; char *Label; unsigned NumCty; unsigned NumIns; unsigned NumCtr; char StrRecordWidth[Cns_MAX_DECIMAL_DIGITS_UINT + 1]; /***** Start section *****/ HTM_SECTION_Begin (Rec_MY_INS_CTR_DPT_ID); /***** Begin box and table *****/ sprintf (StrRecordWidth,"%upx",Rec_RECORD_WIDTH); Box_BoxTableBegin (StrRecordWidth, IAmATeacher ? Txt_Institution_centre_and_department : Txt_Institution, NULL, Hlp_PROFILE_Institution,Box_NOT_CLOSABLE,2); /***** Country *****/ HTM_TR_Begin (NULL); /* Label */ if (asprintf (&Label,"%s*",Txt_Country) < 0) Lay_NotEnoughMemoryExit (); Frm_LabelColumn ("REC_C1_BOT RM","InsCtyCod",Label); free (Label); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT LM\""); /* If list of countries is empty, try to get it */ if (!Gbl.Hierarchy.Sys.Ctys.Num) { Gbl.Hierarchy.Sys.Ctys.SelectedOrder = Cty_ORDER_BY_COUNTRY; Cty_GetListCountries (Cty_GET_BASIC_DATA); } /* Begin form to select the country of my institution */ Frm_StartFormAnchor (ActChgCtyMyIns,Rec_MY_INS_CTR_DPT_ID); HTM_SELECT_Begin (true, "id=\"InsCtyCod\" name=\"OthCtyCod\"" " class=\"REC_C2_BOT_INPUT\""); HTM_OPTION (HTM_Type_STRING,"-1", Gbl.Usrs.Me.UsrDat.InsCtyCod <= 0,true, NULL); for (NumCty = 0; NumCty < Gbl.Hierarchy.Sys.Ctys.Num; NumCty++) HTM_OPTION (HTM_Type_LONG,&Gbl.Hierarchy.Sys.Ctys.Lst[NumCty].CtyCod, Gbl.Hierarchy.Sys.Ctys.Lst[NumCty].CtyCod == Gbl.Usrs.Me.UsrDat.InsCtyCod,false, "%s",Gbl.Hierarchy.Sys.Ctys.Lst[NumCty].Name[Gbl.Prefs.Language]); HTM_SELECT_End (); Frm_EndForm (); HTM_TD_End (); HTM_TR_End (); /***** Institution *****/ HTM_TR_Begin (NULL); /* Label */ if (asprintf (&Label,"%s*",Txt_Institution) < 0) Lay_NotEnoughMemoryExit (); Frm_LabelColumn ("REC_C1_BOT RM","OthInsCod",Label); free (Label); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT LM\""); /* Get list of institutions in this country */ Ins_FreeListInstitutions (); if (Gbl.Usrs.Me.UsrDat.InsCtyCod > 0) Ins_GetListInstitutions (Gbl.Usrs.Me.UsrDat.InsCtyCod,Ins_GET_BASIC_DATA); /* Begin form to select institution */ Frm_StartFormAnchor (ActChgMyIns,Rec_MY_INS_CTR_DPT_ID); HTM_SELECT_Begin (true, "id=\"OthInsCod\" name=\"OthInsCod\"" " class=\"REC_C2_BOT_INPUT\""); HTM_OPTION (HTM_Type_STRING,"-1", Gbl.Usrs.Me.UsrDat.InsCod < 0,true, NULL); HTM_OPTION (HTM_Type_STRING,"0", Gbl.Usrs.Me.UsrDat.InsCod == 0,false, "%s",Txt_Another_institution); for (NumIns = 0; NumIns < Gbl.Hierarchy.Cty.Inss.Num; NumIns++) HTM_OPTION (HTM_Type_LONG,&Gbl.Hierarchy.Cty.Inss.Lst[NumIns].InsCod, Gbl.Hierarchy.Cty.Inss.Lst[NumIns].InsCod == Gbl.Usrs.Me.UsrDat.InsCod,false, "%s",Gbl.Hierarchy.Cty.Inss.Lst[NumIns].FullName); HTM_SELECT_End (); Frm_EndForm (); HTM_TD_End (); HTM_TR_End (); if (IAmATeacher) { /***** Centre *****/ HTM_TR_Begin (NULL); /* Label */ if (asprintf (&Label,"%s*",Txt_Centre) < 0) Lay_NotEnoughMemoryExit (); Frm_LabelColumn ("REC_C1_BOT RM","OthCtrCod",Label); free (Label); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT LM\""); /* Get list of centres in this institution */ Ctr_FreeListCentres (); if (Gbl.Usrs.Me.UsrDat.InsCod > 0) Ctr_GetListCentres (Gbl.Usrs.Me.UsrDat.InsCod); /* Begin form to select centre */ Frm_StartFormAnchor (ActChgMyCtr,Rec_MY_INS_CTR_DPT_ID); HTM_SELECT_Begin (true, "id=\"OthCtrCod\" name=\"OthCtrCod\"" " class=\"REC_C2_BOT_INPUT\""); HTM_OPTION (HTM_Type_STRING,"-1", Gbl.Usrs.Me.UsrDat.Tch.CtrCod < 0,true, NULL); HTM_OPTION (HTM_Type_STRING,"0", Gbl.Usrs.Me.UsrDat.Tch.CtrCod == 0,false, Txt_Another_centre); for (NumCtr = 0; NumCtr < Gbl.Hierarchy.Ins.Ctrs.Num; NumCtr++) HTM_OPTION (HTM_Type_LONG,&Gbl.Hierarchy.Ins.Ctrs.Lst[NumCtr].CtrCod, Gbl.Hierarchy.Ins.Ctrs.Lst[NumCtr].CtrCod == Gbl.Usrs.Me.UsrDat.Tch.CtrCod,false, Gbl.Hierarchy.Ins.Ctrs.Lst[NumCtr].FullName); HTM_SELECT_End (); Frm_EndForm (); HTM_TD_End (); HTM_TR_End (); /***** Department *****/ HTM_TR_Begin (NULL); /* Label */ if (asprintf (&Label,"%s*",Txt_Department) < 0) Lay_NotEnoughMemoryExit (); Frm_LabelColumn ("REC_C1_BOT RM",Dpt_PARAM_DPT_COD_NAME,Label); free (Label); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT LM\""); Frm_StartFormAnchor (ActChgMyDpt,Rec_MY_INS_CTR_DPT_ID); Dpt_WriteSelectorDepartment (Gbl.Usrs.Me.UsrDat.InsCod, // Departments in my institution Gbl.Usrs.Me.UsrDat.Tch.DptCod, // Selected department "REC_C2_BOT_INPUT", // Selector class -1L, // First option "", // Text when no department selected true); // Submit on change Frm_EndForm (); HTM_TD_End (); HTM_TR_End (); /***** Office *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM","Office",Txt_Office); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT LM\""); Frm_StartFormAnchor (ActChgMyOff,Rec_MY_INS_CTR_DPT_ID); HTM_INPUT_TEXT ("Office",Usr_MAX_CHARS_ADDRESS,Gbl.Usrs.Me.UsrDat.Tch.Office,true, "id=\"Office\" class=\"REC_C2_BOT_INPUT\""); Frm_EndForm (); HTM_TD_End (); HTM_TR_End (); /***** Office phone *****/ HTM_TR_Begin (NULL); /* Label */ Frm_LabelColumn ("REC_C1_BOT RM","OfficePhone",Txt_Phone); /* Data */ HTM_TD_Begin ("class=\"REC_C2_BOT LM\""); Frm_StartFormAnchor (ActChgMyOffPho,Rec_MY_INS_CTR_DPT_ID); HTM_INPUT_TEL ("OfficePhone",Gbl.Usrs.Me.UsrDat.Tch.OfficePhone,true, "id=\"OfficePhone\" class=\"REC_C2_BOT_INPUT\""); Frm_EndForm (); HTM_TD_End (); HTM_TR_End (); } /***** End table and box *****/ Box_BoxTableEnd (); /***** End section *****/ HTM_SECTION_End (); } /*****************************************************************************/ /******** Receive form data to change the country of my institution **********/ /*****************************************************************************/ void Rec_ChgCountryOfMyInstitution (void) { unsigned NumInss; /***** Get country code of my institution *****/ Gbl.Usrs.Me.UsrDat.InsCtyCod = Cty_GetAndCheckParamOtherCtyCod (0); /***** When country changes, the institution, centre and department must be reset *****/ NumInss = Ins_GetNumInssInCty (Gbl.Usrs.Me.UsrDat.InsCtyCod); if (NumInss) { Gbl.Usrs.Me.UsrDat.InsCod = -1L; Gbl.Usrs.Me.UsrDat.Tch.CtrCod = -1L; Gbl.Usrs.Me.UsrDat.Tch.DptCod = -1L; } else // Country has no institutions { Gbl.Usrs.Me.UsrDat.InsCod = 0; // Another institution Gbl.Usrs.Me.UsrDat.Tch.CtrCod = 0; // Another centre Gbl.Usrs.Me.UsrDat.Tch.DptCod = 0; // Another department } /***** Update institution, centre and department *****/ Enr_UpdateInstitutionCentreDepartment (); /***** Show form again *****/ Rec_ShowMySharedRecordAndMore (); } /*****************************************************************************/ /**************** Receive form data to change my institution *****************/ /*****************************************************************************/ void Rec_UpdateMyInstitution (void) { struct Instit Ins; unsigned NumCtrs; unsigned NumDpts; /***** Get my institution *****/ /* Get institution code */ Ins.InsCod = Ins_GetAndCheckParamOtherInsCod (0); // 0 (another institution) is allowed here /* Get country of institution */ if (Ins.InsCod > 0) { Ins_GetDataOfInstitutionByCod (&Ins,Ins_GET_BASIC_DATA); if (Gbl.Usrs.Me.UsrDat.InsCtyCod != Ins.CtyCod) Gbl.Usrs.Me.UsrDat.InsCtyCod = Ins.CtyCod; } /* Set institution code */ Gbl.Usrs.Me.UsrDat.InsCod = Ins.InsCod; /***** When institution changes, the centre and department must be reset *****/ NumCtrs = Ctr_GetNumCtrsInIns (Gbl.Usrs.Me.UsrDat.InsCod); NumDpts = Dpt_GetNumDptsInIns (Gbl.Usrs.Me.UsrDat.InsCod); Gbl.Usrs.Me.UsrDat.Tch.CtrCod = (NumCtrs ? -1L : 0); Gbl.Usrs.Me.UsrDat.Tch.DptCod = (NumDpts ? -1L : 0); /***** Update institution, centre and department *****/ Enr_UpdateInstitutionCentreDepartment (); /***** Show form again *****/ Rec_ShowMySharedRecordAndMore (); } /*****************************************************************************/ /******************* Receive form data to change my centre *******************/ /*****************************************************************************/ void Rec_UpdateMyCentre (void) { struct Centre Ctr; /***** Get my centre *****/ /* Get centre code */ Ctr.CtrCod = Ctr_GetAndCheckParamOtherCtrCod (0); // 0 (another centre) is allowed here /* Get institution of centre */ if (Ctr.CtrCod > 0) { Ctr_GetDataOfCentreByCod (&Ctr,Ctr_GET_BASIC_DATA); if (Gbl.Usrs.Me.UsrDat.InsCod != Ctr.InsCod) { Gbl.Usrs.Me.UsrDat.InsCod = Ctr.InsCod; Gbl.Usrs.Me.UsrDat.Tch.DptCod = -1L; } } /* Set centre code */ Gbl.Usrs.Me.UsrDat.Tch.CtrCod = Ctr.CtrCod; /***** Update institution, centre and department *****/ Enr_UpdateInstitutionCentreDepartment (); /***** Show form again *****/ Rec_ShowMySharedRecordAndMore (); } /*****************************************************************************/ /***************** Receive form data to change my department *****************/ /*****************************************************************************/ void Rec_UpdateMyDepartment (void) { struct Department Dpt; /***** Get my department *****/ /* Get department code */ Dpt.DptCod = Dpt_GetAndCheckParamDptCod (0); // 0 (another department) is allowed here /* Get institution of department */ if (Dpt.DptCod > 0) { Dpt_GetDataOfDepartmentByCod (&Dpt); if (Gbl.Usrs.Me.UsrDat.InsCod != Dpt.InsCod) { Gbl.Usrs.Me.UsrDat.InsCod = Dpt.InsCod; Gbl.Usrs.Me.UsrDat.Tch.CtrCod = -1L; } } /***** Update institution, centre and department *****/ Gbl.Usrs.Me.UsrDat.Tch.DptCod = Dpt.DptCod; Enr_UpdateInstitutionCentreDepartment (); /***** Show form again *****/ Rec_ShowMySharedRecordAndMore (); } /*****************************************************************************/ /******************* Receive form data to change my office *******************/ /*****************************************************************************/ void Rec_UpdateMyOffice (void) { /***** Get my office *****/ Par_GetParToText ("Office",Gbl.Usrs.Me.UsrDat.Tch.Office,Usr_MAX_BYTES_ADDRESS); /***** Update office *****/ DB_QueryUPDATE ("can not update office", "UPDATE usr_data SET Office='%s' WHERE UsrCod=%ld", Gbl.Usrs.Me.UsrDat.Tch.Office, Gbl.Usrs.Me.UsrDat.UsrCod); /***** Show form again *****/ Rec_ShowMySharedRecordAndMore (); } /*****************************************************************************/ /**************** Receive form data to change my office phone ****************/ /*****************************************************************************/ void Rec_UpdateMyOfficePhone (void) { /***** Get my office *****/ Par_GetParToText ("OfficePhone",Gbl.Usrs.Me.UsrDat.Tch.OfficePhone,Usr_MAX_BYTES_PHONE); /***** Update office phone *****/ DB_QueryUPDATE ("can not update office phone", "UPDATE usr_data SET OfficePhone='%s' WHERE UsrCod=%ld", Gbl.Usrs.Me.UsrDat.Tch.OfficePhone, Gbl.Usrs.Me.UsrDat.UsrCod); /***** Show form again *****/ Rec_ShowMySharedRecordAndMore (); }