mirror of https://github.com/acanas/swad-core.git
917 lines
31 KiB
C
917 lines
31 KiB
C
// swad_link.c: institutional links
|
|
|
|
/*
|
|
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 <http://www.gnu.org/licenses/>.
|
|
*/
|
|
/*****************************************************************************/
|
|
/********************************* Headers ***********************************/
|
|
/*****************************************************************************/
|
|
|
|
#include <linux/stddef.h> // For NULL
|
|
#include <stdlib.h> // For calloc
|
|
#include <string.h> // For string functions
|
|
|
|
#include "swad_box.h"
|
|
#include "swad_constant.h"
|
|
#include "swad_database.h"
|
|
#include "swad_form.h"
|
|
#include "swad_global.h"
|
|
#include "swad_language.h"
|
|
#include "swad_link.h"
|
|
#include "swad_parameter.h"
|
|
#include "swad_table.h"
|
|
|
|
/*****************************************************************************/
|
|
/************** External global variables from others modules ****************/
|
|
/*****************************************************************************/
|
|
|
|
extern struct Globals Gbl;
|
|
|
|
/*****************************************************************************/
|
|
/***************************** Private constants *****************************/
|
|
/*****************************************************************************/
|
|
|
|
/*****************************************************************************/
|
|
/******************************* Private types *******************************/
|
|
/*****************************************************************************/
|
|
|
|
/*****************************************************************************/
|
|
/***************************** Private variables *****************************/
|
|
/*****************************************************************************/
|
|
|
|
static struct Link *Lnk_EditingLnk = NULL; // Static variable to keep the link being edited
|
|
|
|
/*****************************************************************************/
|
|
/***************************** Private prototypes ****************************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_PutIconsEditingLinks (void);
|
|
|
|
static void Lnk_PutIconsListingLinks (void);
|
|
static void Lnk_PutIconToEditLinks (void);
|
|
static void Lnk_WriteListOfLinks (void);
|
|
|
|
static void Lnk_EditLinksInternal (void);
|
|
static void Lnk_PutIconsEditingLinks (void);
|
|
|
|
static void Lnk_ListLinksForEdition (void);
|
|
static void Lnk_PutParamLnkCod (long LnkCod);
|
|
|
|
static void Lnk_RenameLink (Cns_ShrtOrFullName_t ShrtOrFullName);
|
|
static bool Lnk_CheckIfLinkNameExists (const char *FieldName,const char *Name,long LnkCod);
|
|
static void Lnk_UpdateLnkNameDB (long LnkCod,const char *FieldName,const char *NewLnkName);
|
|
|
|
static void Lnk_PutFormToCreateLink (void);
|
|
static void Lnk_PutHeadLinks (void);
|
|
static void Lnk_CreateLink (struct Link *Lnk);
|
|
|
|
static void Lnk_EditingLinkConstructor (void);
|
|
static void Lnk_EditingLinkDestructor (void);
|
|
|
|
/*****************************************************************************/
|
|
/*************************** List all the links ******************************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_SeeLinks (void)
|
|
{
|
|
extern const char *Hlp_SYSTEM_Links;
|
|
extern const char *Txt_Links;
|
|
extern const char *Txt_No_links;
|
|
extern const char *Txt_New_link;
|
|
|
|
/***** Get list of links *****/
|
|
Lnk_GetListLinks ();
|
|
|
|
/***** Start box *****/
|
|
Box_StartBox (NULL,Txt_Links,Lnk_PutIconsListingLinks,
|
|
Hlp_SYSTEM_Links,Box_NOT_CLOSABLE);
|
|
|
|
/***** Write all links *****/
|
|
if (Gbl.Links.Num) // There are links
|
|
Lnk_WriteListOfLinks ();
|
|
else // No links created
|
|
Ale_ShowAlert (Ale_INFO,Txt_No_links);
|
|
|
|
/***** Button to create link *****/
|
|
if (Gbl.Usrs.Me.Role.Logged == Rol_SYS_ADM)
|
|
{
|
|
Frm_StartForm (ActEdiLnk);
|
|
Btn_PutConfirmButton (Txt_New_link);
|
|
Frm_EndForm ();
|
|
}
|
|
|
|
/***** End box *****/
|
|
Box_EndBox ();
|
|
|
|
/***** Free list of links *****/
|
|
Lnk_FreeListLinks ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/***************** Put contextual icons in list of links *********************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_PutIconsListingLinks (void)
|
|
{
|
|
/***** Put icon to edit links *****/
|
|
if (Gbl.Usrs.Me.Role.Logged == Rol_SYS_ADM)
|
|
Lnk_PutIconToEditLinks ();
|
|
|
|
/***** Put icon to view banners *****/
|
|
Ban_PutIconToViewBanners ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************************** Put icon to edit links ***************************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_PutIconToEditLinks (void)
|
|
{
|
|
Ico_PutContextualIconToEdit (ActEdiLnk,NULL);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/***************** Write menu with some institutional links ******************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_WriteMenuWithInstitutionalLinks (void)
|
|
{
|
|
extern const char *Txt_Links;
|
|
|
|
/***** Get list of links *****/
|
|
Lnk_GetListLinks ();
|
|
|
|
/***** Write all the links *****/
|
|
if (Gbl.Links.Num)
|
|
{
|
|
fprintf (Gbl.F.Out,"<div id=\"institutional_links\">");
|
|
|
|
Frm_StartForm (ActSeeLnk);
|
|
Frm_LinkFormSubmit (Txt_Links,NULL,NULL);
|
|
fprintf (Gbl.F.Out," %s"
|
|
"</a>",
|
|
Txt_Links);
|
|
Frm_EndForm ();
|
|
|
|
Lnk_WriteListOfLinks ();
|
|
fprintf (Gbl.F.Out,"</div>");
|
|
}
|
|
|
|
/***** Free list of links *****/
|
|
Lnk_FreeListLinks ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/*************************** Write list of links *****************************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_WriteListOfLinks (void)
|
|
{
|
|
unsigned NumLnk;
|
|
|
|
/***** List start *****/
|
|
fprintf (Gbl.F.Out,"<ul class=\"LIST_LEFT\">");
|
|
|
|
/***** Write all links *****/
|
|
for (NumLnk = 0;
|
|
NumLnk < Gbl.Links.Num;
|
|
NumLnk++)
|
|
/* Write data of this link */
|
|
fprintf (Gbl.F.Out,"<li class=\"INS_LNK\">"
|
|
"<a href=\"%s\" title=\"%s\" class=\"INS_LNK\""
|
|
" target=\"_blank\">"
|
|
"%s"
|
|
"</a>"
|
|
"</li>",
|
|
Gbl.Links.Lst[NumLnk].WWW,
|
|
Gbl.Links.Lst[NumLnk].FullName,
|
|
Gbl.Links.Lst[NumLnk].ShrtName);
|
|
|
|
/***** List end *****/
|
|
fprintf (Gbl.F.Out,"</ul>");
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************************** Put forms to edit links **************************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_EditLinks (void)
|
|
{
|
|
/***** Link constructor *****/
|
|
Lnk_EditingLinkConstructor ();
|
|
|
|
/***** Edit links *****/
|
|
Lnk_EditLinksInternal ();
|
|
|
|
/***** Link destructor *****/
|
|
Lnk_EditingLinkDestructor ();
|
|
}
|
|
|
|
static void Lnk_EditLinksInternal (void)
|
|
{
|
|
extern const char *Hlp_SYSTEM_Links_edit;
|
|
extern const char *Txt_Links;
|
|
|
|
/***** Get list of links *****/
|
|
Lnk_GetListLinks ();
|
|
|
|
/***** Start box *****/
|
|
Box_StartBox (NULL,Txt_Links,Lnk_PutIconsEditingLinks,
|
|
Hlp_SYSTEM_Links_edit,Box_NOT_CLOSABLE);
|
|
|
|
/***** Put a form to create a new link *****/
|
|
Lnk_PutFormToCreateLink ();
|
|
|
|
/***** Forms to edit current links *****/
|
|
if (Gbl.Links.Num)
|
|
Lnk_ListLinksForEdition ();
|
|
|
|
/***** End box *****/
|
|
Box_EndBox ();
|
|
|
|
/***** Free list of links *****/
|
|
Lnk_FreeListLinks ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/******************** Put contextual icons to view links *********************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_PutIconsEditingLinks (void)
|
|
{
|
|
/***** Put icon to view links *****/
|
|
Lnk_PutIconToViewLinks ();
|
|
|
|
/***** Put icon to view banners *****/
|
|
Ban_PutIconToViewBanners ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************************** Put icon to view links ***************************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_PutIconToViewLinks (void)
|
|
{
|
|
extern const char *Txt_Links;
|
|
|
|
Lay_PutContextualLinkOnlyIcon (ActSeeLnk,NULL,NULL,
|
|
"link.svg",
|
|
Txt_Links);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/**************************** List all the links *****************************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_GetListLinks (void)
|
|
{
|
|
MYSQL_RES *mysql_res;
|
|
MYSQL_ROW row;
|
|
unsigned long NumRows;
|
|
unsigned NumLnk;
|
|
struct Link *Lnk;
|
|
|
|
if (Gbl.DB.DatabaseIsOpen)
|
|
{
|
|
/***** Get institutional links from database *****/
|
|
NumRows = DB_QuerySELECT (&mysql_res,"can not get institutional links",
|
|
"SELECT LnkCod,ShortName,FullName,WWW"
|
|
" FROM links ORDER BY ShortName");
|
|
|
|
if (NumRows) // Places found...
|
|
{
|
|
Gbl.Links.Num = (unsigned) NumRows;
|
|
|
|
/***** Create list with places *****/
|
|
if ((Gbl.Links.Lst = (struct Link *) calloc (NumRows,sizeof (struct Link))) == NULL)
|
|
Lay_NotEnoughMemoryExit ();;
|
|
|
|
/***** Get the links *****/
|
|
for (NumLnk = 0;
|
|
NumLnk < Gbl.Links.Num;
|
|
NumLnk++)
|
|
{
|
|
Lnk = &(Gbl.Links.Lst[NumLnk]);
|
|
|
|
/* Get next link */
|
|
row = mysql_fetch_row (mysql_res);
|
|
|
|
/* Get link code (row[0]) */
|
|
if ((Lnk->LnkCod = Str_ConvertStrCodToLongCod (row[0])) < 0)
|
|
Lay_ShowErrorAndExit ("Wrong code of institutional link.");
|
|
|
|
/* Get the short name of the link (row[1]) */
|
|
Str_Copy (Lnk->ShrtName,row[1],
|
|
Lnk_MAX_BYTES_LINK_SHRT_NAME);
|
|
|
|
/* Get the full name of the link (row[2]) */
|
|
Str_Copy (Lnk->FullName,row[2],
|
|
Lnk_MAX_BYTES_LINK_FULL_NAME);
|
|
|
|
/* Get the URL of the link (row[3]) */
|
|
Str_Copy (Lnk->WWW,row[3],
|
|
Cns_MAX_BYTES_WWW);
|
|
}
|
|
}
|
|
else
|
|
Gbl.Links.Num = 0;
|
|
|
|
/***** Free structure that stores the query result *****/
|
|
DB_FreeMySQLResult (&mysql_res);
|
|
}
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/**************************** Get link full name *****************************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_GetDataOfLinkByCod (struct Link *Lnk)
|
|
{
|
|
MYSQL_RES *mysql_res;
|
|
MYSQL_ROW row;
|
|
unsigned long NumRows;
|
|
|
|
/***** Clear data *****/
|
|
Lnk->ShrtName[0] = Lnk->FullName[0] = Lnk->WWW[0] = '\0';
|
|
|
|
/***** Check if link code is correct *****/
|
|
if (Lnk->LnkCod > 0)
|
|
{
|
|
/***** Get data of an institutional link from database *****/
|
|
NumRows = DB_QuerySELECT (&mysql_res,"can not get data"
|
|
" of an institutional link",
|
|
"SELECT ShortName,FullName,WWW FROM links"
|
|
" WHERE LnkCod=%ld",
|
|
Lnk->LnkCod);
|
|
|
|
if (NumRows) // Link found...
|
|
{
|
|
/* Get row */
|
|
row = mysql_fetch_row (mysql_res);
|
|
|
|
/* Get the short name of the link (row[0]) */
|
|
Str_Copy (Lnk->ShrtName,row[0],
|
|
Lnk_MAX_BYTES_LINK_SHRT_NAME);
|
|
|
|
/* Get the full name of the link (row[1]) */
|
|
Str_Copy (Lnk->FullName,row[1],
|
|
Lnk_MAX_BYTES_LINK_FULL_NAME);
|
|
|
|
/* Get the URL of the link (row[2]) */
|
|
Str_Copy (Lnk->WWW,row[2],
|
|
Cns_MAX_BYTES_WWW);
|
|
}
|
|
|
|
/***** Free structure that stores the query result *****/
|
|
DB_FreeMySQLResult (&mysql_res);
|
|
}
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/**************************** Free list of links *****************************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_FreeListLinks (void)
|
|
{
|
|
if (Gbl.Links.Lst)
|
|
{
|
|
/***** Free memory used by the list of links *****/
|
|
free ((void *) Gbl.Links.Lst);
|
|
Gbl.Links.Lst = NULL;
|
|
Gbl.Links.Num = 0;
|
|
}
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/*************************** List all the links ******************************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_ListLinksForEdition (void)
|
|
{
|
|
unsigned NumLnk;
|
|
struct Link *Lnk;
|
|
|
|
/***** Start table *****/
|
|
Tbl_StartTableWide (2);
|
|
|
|
/***** Table head *****/
|
|
Lnk_PutHeadLinks ();
|
|
|
|
/***** Write all the links *****/
|
|
for (NumLnk = 0;
|
|
NumLnk < Gbl.Links.Num;
|
|
NumLnk++)
|
|
{
|
|
Lnk = &Gbl.Links.Lst[NumLnk];
|
|
|
|
/* Put icon to remove link */
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<td class=\"BM\">");
|
|
Frm_StartForm (ActRemLnk);
|
|
Lnk_PutParamLnkCod (Lnk->LnkCod);
|
|
Ico_PutIconRemove ();
|
|
Frm_EndForm ();
|
|
fprintf (Gbl.F.Out,"</td>");
|
|
|
|
/* Link code */
|
|
fprintf (Gbl.F.Out,"<td class=\"DAT RIGHT_MIDDLE\">"
|
|
"%ld"
|
|
"</td>",
|
|
Lnk->LnkCod);
|
|
|
|
/* Link short name */
|
|
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
|
|
Frm_StartForm (ActRenLnkSho);
|
|
Lnk_PutParamLnkCod (Lnk->LnkCod);
|
|
fprintf (Gbl.F.Out,"<input type=\"text\" name=\"ShortName\""
|
|
" maxlength=\"%u\" value=\"%s\""
|
|
" class=\"INPUT_SHORT_NAME\""
|
|
" onchange=\"document.getElementById('%s').submit();\" />",
|
|
Lnk_MAX_CHARS_LINK_SHRT_NAME,Lnk->ShrtName,
|
|
Gbl.Form.Id);
|
|
Frm_EndForm ();
|
|
fprintf (Gbl.F.Out,"</td>");
|
|
|
|
/* Link full name */
|
|
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
|
|
Frm_StartForm (ActRenLnkFul);
|
|
Lnk_PutParamLnkCod (Lnk->LnkCod);
|
|
fprintf (Gbl.F.Out,"<input type=\"text\" name=\"FullName\""
|
|
" maxlength=\"%u\" value=\"%s\""
|
|
" class=\"INPUT_FULL_NAME\""
|
|
" onchange=\"document.getElementById('%s').submit();\" />",
|
|
Lnk_MAX_CHARS_LINK_FULL_NAME,Lnk->FullName,
|
|
Gbl.Form.Id);
|
|
Frm_EndForm ();
|
|
fprintf (Gbl.F.Out,"</td>");
|
|
|
|
/* Link WWW */
|
|
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">");
|
|
Frm_StartForm (ActChgLnkWWW);
|
|
Lnk_PutParamLnkCod (Lnk->LnkCod);
|
|
fprintf (Gbl.F.Out,"<input type=\"url\" name=\"WWW\""
|
|
" maxlength=\"%u\" value=\"%s\""
|
|
" class=\"INPUT_WWW\""
|
|
" onchange=\"document.getElementById('%s').submit();\" />",
|
|
Cns_MAX_CHARS_WWW,Lnk->WWW,
|
|
Gbl.Form.Id);
|
|
Frm_EndForm ();
|
|
fprintf (Gbl.F.Out,"</td>"
|
|
"</tr>");
|
|
}
|
|
|
|
/***** End table *****/
|
|
Tbl_EndTable ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/******************** Write parameter with code of link **********************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_PutParamLnkCod (long LnkCod)
|
|
{
|
|
Par_PutHiddenParamLong ("LnkCod",LnkCod);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/********************* Get parameter with code of link ***********************/
|
|
/*****************************************************************************/
|
|
|
|
long Lnk_GetParamLnkCod (void)
|
|
{
|
|
/***** Get code of link *****/
|
|
return Par_GetParToLong ("LnkCod");
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/******************************* Remove a link *******************************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_RemoveLink (void)
|
|
{
|
|
extern const char *Txt_Link_X_removed;
|
|
|
|
/***** Link constructor *****/
|
|
Lnk_EditingLinkConstructor ();
|
|
|
|
/***** Get link code *****/
|
|
if ((Lnk_EditingLnk->LnkCod = Lnk_GetParamLnkCod ()) == -1L)
|
|
Lay_ShowErrorAndExit ("Code of institutional link is missing.");
|
|
|
|
/***** Get data of the link from database *****/
|
|
Lnk_GetDataOfLinkByCod (Lnk_EditingLnk);
|
|
|
|
/***** Remove link *****/
|
|
DB_QueryDELETE ("can not remove an institutional link",
|
|
"DELETE FROM links WHERE LnkCod=%ld",
|
|
Lnk_EditingLnk->LnkCod);
|
|
|
|
/***** Write message to show the change made *****/
|
|
Ale_CreateAlert (Ale_SUCCESS,NULL,
|
|
Txt_Link_X_removed,
|
|
Lnk_EditingLnk->ShrtName);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/********************* Change the short name of a link ***********************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_RenameLinkShort (void)
|
|
{
|
|
/***** Link constructor *****/
|
|
Lnk_EditingLinkConstructor ();
|
|
|
|
/***** Rename link *****/
|
|
Lnk_RenameLink (Cns_SHRT_NAME);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/********************* Change the full name of a link ************************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_RenameLinkFull (void)
|
|
{
|
|
/***** Link constructor *****/
|
|
Lnk_EditingLinkConstructor ();
|
|
|
|
/***** Rename link *****/
|
|
Lnk_RenameLink (Cns_FULL_NAME);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************************ Change the name of a link **************************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_RenameLink (Cns_ShrtOrFullName_t ShrtOrFullName)
|
|
{
|
|
extern const char *Txt_You_can_not_leave_the_name_of_the_link_X_empty;
|
|
extern const char *Txt_The_link_X_already_exists;
|
|
extern const char *Txt_The_link_X_has_been_renamed_as_Y;
|
|
extern const char *Txt_The_name_of_the_link_X_has_not_changed;
|
|
const char *ParamName = NULL; // Initialized to avoid warning
|
|
const char *FieldName = NULL; // Initialized to avoid warning
|
|
unsigned MaxBytes = 0; // Initialized to avoid warning
|
|
char *CurrentLnkName = NULL; // Initialized to avoid warning
|
|
char NewLnkName[Lnk_MAX_BYTES_LINK_FULL_NAME + 1];
|
|
|
|
switch (ShrtOrFullName)
|
|
{
|
|
case Cns_SHRT_NAME:
|
|
ParamName = "ShortName";
|
|
FieldName = "ShortName";
|
|
MaxBytes = Lnk_MAX_BYTES_LINK_SHRT_NAME;
|
|
CurrentLnkName = Lnk_EditingLnk->ShrtName;
|
|
break;
|
|
case Cns_FULL_NAME:
|
|
ParamName = "FullName";
|
|
FieldName = "FullName";
|
|
MaxBytes = Lnk_MAX_BYTES_LINK_FULL_NAME;
|
|
CurrentLnkName = Lnk_EditingLnk->FullName;
|
|
break;
|
|
}
|
|
|
|
/***** Get parameters from form *****/
|
|
/* Get the code of the link */
|
|
if ((Lnk_EditingLnk->LnkCod = Lnk_GetParamLnkCod ()) == -1L)
|
|
Lay_ShowErrorAndExit ("Code of institutional link is missing.");
|
|
|
|
/* Get the new name for the link */
|
|
Par_GetParToText (ParamName,NewLnkName,MaxBytes);
|
|
|
|
/***** Get link data from the database *****/
|
|
Lnk_GetDataOfLinkByCod (Lnk_EditingLnk);
|
|
|
|
/***** Check if new name is empty *****/
|
|
if (!NewLnkName[0])
|
|
Ale_CreateAlert (Ale_WARNING,NULL,
|
|
Txt_You_can_not_leave_the_name_of_the_link_X_empty,
|
|
CurrentLnkName);
|
|
else
|
|
{
|
|
/***** Check if old and new names are the same
|
|
(this happens when return is pressed without changes) *****/
|
|
if (strcmp (CurrentLnkName,NewLnkName)) // Different names
|
|
{
|
|
/***** If link was in database... *****/
|
|
if (Lnk_CheckIfLinkNameExists (ParamName,NewLnkName,Lnk_EditingLnk->LnkCod))
|
|
Ale_CreateAlert (Ale_WARNING,NULL,
|
|
Txt_The_link_X_already_exists,
|
|
NewLnkName);
|
|
else
|
|
{
|
|
/* Update the table changing old name by new name */
|
|
Lnk_UpdateLnkNameDB (Lnk_EditingLnk->LnkCod,FieldName,NewLnkName);
|
|
|
|
/* Write message to show the change made */
|
|
Ale_CreateAlert (Ale_SUCCESS,NULL,
|
|
Txt_The_link_X_has_been_renamed_as_Y,
|
|
CurrentLnkName,NewLnkName);
|
|
}
|
|
}
|
|
else // The same name
|
|
Ale_CreateAlert (Ale_INFO,NULL,
|
|
Txt_The_name_of_the_link_X_has_not_changed,
|
|
CurrentLnkName);
|
|
}
|
|
|
|
/***** Update name *****/
|
|
Str_Copy (CurrentLnkName,NewLnkName,
|
|
MaxBytes);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/********************** Check if the name of link exists *********************/
|
|
/*****************************************************************************/
|
|
|
|
static bool Lnk_CheckIfLinkNameExists (const char *FieldName,const char *Name,long LnkCod)
|
|
{
|
|
/***** Get number of links with a name from database *****/
|
|
return (DB_QueryCOUNT ("can not check if the name of an institutional link"
|
|
" already existed",
|
|
"SELECT COUNT(*) FROM links"
|
|
" WHERE %s='%s' AND LnkCod<>%ld",
|
|
FieldName,Name,LnkCod) != 0);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************ Update link name in table of institutional links ***************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_UpdateLnkNameDB (long LnkCod,const char *FieldName,const char *NewLnkName)
|
|
{
|
|
/***** Update institutional link changing old name by new name */
|
|
DB_QueryUPDATE ("can not update the name of an institutional link",
|
|
"UPDATE links SET %s='%s' WHERE LnkCod=%ld",
|
|
FieldName,NewLnkName,LnkCod);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/**************** Change the WWW of an institutional link ********************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_ChangeLinkWWW (void)
|
|
{
|
|
extern const char *Txt_The_new_web_address_is_X;
|
|
extern const char *Txt_You_can_not_leave_the_web_address_empty;
|
|
char NewWWW[Cns_MAX_BYTES_WWW + 1];
|
|
|
|
/***** Link constructor *****/
|
|
Lnk_EditingLinkConstructor ();
|
|
|
|
/***** Get parameters from form *****/
|
|
/* Get the code of the link */
|
|
if ((Lnk_EditingLnk->LnkCod = Lnk_GetParamLnkCod ()) == -1L)
|
|
Lay_ShowErrorAndExit ("Code of institutional link is missing.");
|
|
|
|
/* Get the new WWW for the link */
|
|
Par_GetParToText ("WWW",NewWWW,Cns_MAX_BYTES_WWW);
|
|
|
|
/***** Get link data from the database *****/
|
|
Lnk_GetDataOfLinkByCod (Lnk_EditingLnk);
|
|
|
|
/***** Check if new WWW is empty *****/
|
|
if (NewWWW[0])
|
|
{
|
|
/***** Update the table changing old WWW by new WWW *****/
|
|
DB_QueryUPDATE ("can not update the web of an institutional link",
|
|
"UPDATE links SET WWW='%s' WHERE LnkCod=%ld",
|
|
NewWWW,Lnk_EditingLnk->LnkCod);
|
|
|
|
/***** Message to show the change made *****/
|
|
Ale_CreateAlert (Ale_SUCCESS,NULL,
|
|
Txt_The_new_web_address_is_X,
|
|
NewWWW);
|
|
}
|
|
else
|
|
Ale_CreateAlert (Ale_WARNING,NULL,
|
|
Txt_You_can_not_leave_the_web_address_empty);
|
|
|
|
/***** Update web *****/
|
|
Str_Copy (Lnk_EditingLnk->WWW,NewWWW,
|
|
Cns_MAX_BYTES_WWW);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/********** Show alerts after changing a link and continue editing ***********/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_ContEditAfterChgLnk (void)
|
|
{
|
|
/***** Write message to show the change made *****/
|
|
Ale_ShowAlerts (NULL);
|
|
|
|
/***** Show the form again *****/
|
|
Lnk_EditLinksInternal ();
|
|
|
|
/***** Link destructor *****/
|
|
Lnk_EditingLinkDestructor ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/********************* Put a form to create a new link ***********************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_PutFormToCreateLink (void)
|
|
{
|
|
extern const char *Hlp_SYSTEM_Links_edit;
|
|
extern const char *Txt_New_link;
|
|
extern const char *Txt_Create_link;
|
|
|
|
/***** Start form *****/
|
|
Frm_StartForm (ActNewLnk);
|
|
|
|
/***** Start box and table *****/
|
|
Box_StartBoxTable (NULL,Txt_New_link,NULL,
|
|
Hlp_SYSTEM_Links_edit,Box_NOT_CLOSABLE,2);
|
|
|
|
/***** Write heading *****/
|
|
Lnk_PutHeadLinks ();
|
|
|
|
/***** Link code *****/
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<td class=\"BM\"></td>"
|
|
"<td></td>");
|
|
|
|
/***** Link short name *****/
|
|
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">"
|
|
"<input type=\"text\" name=\"ShortName\""
|
|
" maxlength=\"%u\" value=\"%s\""
|
|
" class=\"INPUT_SHORT_NAME\""
|
|
" required=\"required\" />"
|
|
"</td>",
|
|
Lnk_MAX_CHARS_LINK_SHRT_NAME,Lnk_EditingLnk->ShrtName);
|
|
|
|
/***** Link full name *****/
|
|
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">"
|
|
"<input type=\"text\" name=\"FullName\""
|
|
" maxlength=\"%u\" value=\"%s\""
|
|
" class=\"INPUT_FULL_NAME\""
|
|
" required=\"required\" />"
|
|
"</td>",
|
|
Lnk_MAX_CHARS_LINK_FULL_NAME,Lnk_EditingLnk->FullName);
|
|
|
|
/***** Link WWW *****/
|
|
fprintf (Gbl.F.Out,"<td class=\"CENTER_MIDDLE\">"
|
|
"<input type=\"url\" name=\"WWW\""
|
|
" maxlength=\"%u\" value=\"%s\""
|
|
" class=\"INPUT_WWW\""
|
|
" required=\"required\" />"
|
|
"</td>"
|
|
"</tr>",
|
|
Cns_MAX_CHARS_WWW,Lnk_EditingLnk->WWW);
|
|
|
|
/***** End table, send button and end box *****/
|
|
Box_EndBoxTableWithButton (Btn_CREATE_BUTTON,Txt_Create_link);
|
|
|
|
/***** End form *****/
|
|
Frm_EndForm ();
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/******************** Write header with fields of a link *********************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_PutHeadLinks (void)
|
|
{
|
|
extern const char *Txt_Code;
|
|
extern const char *Txt_Short_name;
|
|
extern const char *Txt_Full_name;
|
|
extern const char *Txt_WWW;
|
|
|
|
fprintf (Gbl.F.Out,"<tr>"
|
|
"<th class=\"BM\"></th>"
|
|
"<th class=\"RIGHT_MIDDLE\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"LEFT_MIDDLE\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"LEFT_MIDDLE\">"
|
|
"%s"
|
|
"</th>"
|
|
"<th class=\"LEFT_MIDDLE\">"
|
|
"%s"
|
|
"</th>"
|
|
"</tr>",
|
|
Txt_Code,
|
|
Txt_Short_name,
|
|
Txt_Full_name,
|
|
Txt_WWW);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/******************* Receive form to create a new link ***********************/
|
|
/*****************************************************************************/
|
|
|
|
void Lnk_RecFormNewLink (void)
|
|
{
|
|
extern const char *Txt_The_link_X_already_exists;
|
|
extern const char *Txt_You_must_specify_the_URL_of_the_new_link;
|
|
extern const char *Txt_Created_new_link_X;
|
|
extern const char *Txt_You_must_specify_the_short_name_and_the_full_name_of_the_new_link;
|
|
|
|
/***** Link constructor *****/
|
|
Lnk_EditingLinkConstructor ();
|
|
|
|
/***** Get parameters from form *****/
|
|
/* Get link short name */
|
|
Par_GetParToText ("ShortName",Lnk_EditingLnk->ShrtName,Lnk_MAX_BYTES_LINK_SHRT_NAME);
|
|
|
|
/* Get link full name */
|
|
Par_GetParToText ("FullName",Lnk_EditingLnk->FullName,Lnk_MAX_BYTES_LINK_FULL_NAME);
|
|
|
|
/* Get link URL */
|
|
Par_GetParToText ("WWW",Lnk_EditingLnk->WWW,Cns_MAX_BYTES_WWW);
|
|
|
|
if (Lnk_EditingLnk->ShrtName[0] &&
|
|
Lnk_EditingLnk->FullName[0]) // If there's a link name
|
|
{
|
|
/***** If name of link was in database... *****/
|
|
if (Lnk_CheckIfLinkNameExists ("ShortName",Lnk_EditingLnk->ShrtName,-1L))
|
|
Ale_CreateAlert (Ale_WARNING,NULL,
|
|
Txt_The_link_X_already_exists,
|
|
Lnk_EditingLnk->ShrtName);
|
|
else if (Lnk_CheckIfLinkNameExists ("FullName",Lnk_EditingLnk->FullName,-1L))
|
|
Ale_CreateAlert (Ale_WARNING,NULL,
|
|
Txt_The_link_X_already_exists,
|
|
Lnk_EditingLnk->FullName);
|
|
else if (!Lnk_EditingLnk->WWW[0])
|
|
Ale_CreateAlert (Ale_WARNING,NULL,
|
|
Txt_You_must_specify_the_URL_of_the_new_link);
|
|
else // Add new link to database
|
|
{
|
|
Lnk_CreateLink (Lnk_EditingLnk);
|
|
Ale_CreateAlert (Ale_SUCCESS,NULL,
|
|
Txt_Created_new_link_X,
|
|
Lnk_EditingLnk->ShrtName);
|
|
}
|
|
}
|
|
else // If there is not a link name
|
|
Ale_CreateAlert (Ale_WARNING,NULL,
|
|
Txt_You_must_specify_the_short_name_and_the_full_name_of_the_new_link);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/**************************** Create a new link ******************************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_CreateLink (struct Link *Lnk)
|
|
{
|
|
/***** Create a new link *****/
|
|
DB_QueryINSERT ("can not create institutional link",
|
|
"INSERT INTO links"
|
|
" (ShortName,FullName,WWW)"
|
|
" VALUES"
|
|
" ('%s','%s','%s')",
|
|
Lnk->ShrtName,Lnk->FullName,Lnk->WWW);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/************************* Place constructor/destructor **********************/
|
|
/*****************************************************************************/
|
|
|
|
static void Lnk_EditingLinkConstructor (void)
|
|
{
|
|
/***** Pointer must be NULL *****/
|
|
if (Lnk_EditingLnk != NULL)
|
|
Lay_ShowErrorAndExit ("Error initializing link.");
|
|
|
|
/***** Allocate memory for link *****/
|
|
if ((Lnk_EditingLnk = (struct Link *) malloc (sizeof (struct Link))) == NULL)
|
|
Lay_ShowErrorAndExit ("Error allocating memory for link.");
|
|
|
|
/***** Reset link *****/
|
|
Lnk_EditingLnk->LnkCod = -1L;
|
|
Lnk_EditingLnk->ShrtName[0] = '\0';
|
|
Lnk_EditingLnk->FullName[0] = '\0';
|
|
Lnk_EditingLnk->WWW[0] = '\0';
|
|
}
|
|
|
|
static void Lnk_EditingLinkDestructor (void)
|
|
{
|
|
/***** Free memory used for link *****/
|
|
if (Lnk_EditingLnk != NULL)
|
|
{
|
|
free ((void *) Lnk_EditingLnk);
|
|
Lnk_EditingLnk = NULL;
|
|
}
|
|
}
|