/*
- * Copyright (c) 1996-2012 by the citadel.org team
+ * Copyright (c) 1996-2020 by the citadel.org team
*
* This program is open source software. You can redistribute it and/or
* modify it under the terms of the GNU General Public License, version 3.
unsigned int Flags;
int DaysTillPurge;
int HasBio;
+
+ StrBuf *PrimaryEmail;
+ StrBuf *OtherEmails;
+
} UserListEntry;
ul = (UserListEntry*) malloc(sizeof(UserListEntry));
ul->UserName = NewStrBuf();
ul->Passvoid = NewStrBuf();
+ ul->PrimaryEmail = NewStrBuf();
+ ul->OtherEmails = NewStrBuf();
StrBufExtract_NextToken(ul->UserName, SerializedUser, &Pos, '|');
StrBufExtract_NextToken(ul->Passvoid, SerializedUser, &Pos, '|');
if (!ul) return;
FreeStrBuf(&ul->UserName);
FreeStrBuf(&ul->Passvoid);
+ FreeStrBuf(&ul->PrimaryEmail);
+ FreeStrBuf(&ul->OtherEmails);
free(ul);
}
ul = (UserListEntry*) malloc(sizeof(UserListEntry));
ul->UserName = NewStrBuf();
ul->Passvoid = NewStrBuf();
+ ul->PrimaryEmail = NewStrBuf();
+ ul->OtherEmails = NewStrBuf();
StrBufExtract_NextToken(ul->UserName, SerializedUserList, &Pos, '|');
ul->AccessLevel = StrBufExtractNext_int( SerializedUserList, &Pos, '|');
StrBuf_ServGetln(Buf);
if (GetServerStatus(Buf, NULL) == 1) {
Hash = NewHash(1, Flathash);
-
+ Done = 0;
while (!Done) {
len = StrBuf_ServGetln(Buf);
if ((len <0) ||
serv_puts("LBIO 1");
StrBuf_ServGetln(Buf);
- if (GetServerStatus(Buf, NULL) == 1)
+ if (GetServerStatus(Buf, NULL) == 1) {
Done = 0;
while (!Done) {
- len = StrBuf_ServGetln(Buf);
- if ((len <0) ||
- ((len == 3) &&
- !strcmp(ChrPtr(Buf), "000")))
- {
- Done = 1;
- break;
+ len = StrBuf_ServGetln(Buf);
+ if ((len <0) || ((len == 3) && !strcmp(ChrPtr(Buf), "000")))
+ {
+ Done = 1;
+ break;
+ }
}
UID = atoi(ChrPtr(Buf));
if (GetHash(Hash, IKEY(UID), &vData) && vData != 0)
StrBufAppendTemplate(Target, TP, ul->Passvoid, 0);
}
+void tmplput_USERLIST_PrimaryEmail(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
+ StrBufAppendTemplate(Target, TP, ul->PrimaryEmail, 0);
+}
+
+void tmplput_USERLIST_OtherEmails(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
+ StrBufAppendTemplate(Target, TP, ul->OtherEmails, 0);
+}
+
void tmplput_USERLIST_AccessLevelNo(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
StrBufAppendPrintf(Target, "%d", ul->UID, 0);
}
+
void tmplput_USERLIST_LastLogonNo(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
StrBufAppendPrintf(Target,"%ld", ul->LastLogonT, 0);
}
+
+
void tmplput_USERLIST_LastLogonStr(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
StrEscAppend(Target, NULL, asctime(localtime(&ul->LastLogonT)), 0, 0);
}
+
void tmplput_USERLIST_nLogons(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
StrBufAppendPrintf(Target, "%d", ul->nLogons, 0);
}
+
void tmplput_USERLIST_nPosts(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
StrBufAppendPrintf(Target, "%d", ul->nPosts, 0);
}
+
void tmplput_USERLIST_Flags(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
StrBufAppendPrintf(Target, "%d", ul->Flags, 0);
}
+
void tmplput_USERLIST_DaysTillPurge(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
StrBufAppendPrintf(Target, "%d", ul->DaysTillPurge, 0);
}
+
int ConditionalUser(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
return 0;
}
+
int ConditionalFlagINetEmail(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
return (ul->Flags & US_INTERNET) != 0;
}
+
int ConditionalUserAccess(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
==
ul->AccessLevel;
}
+
+
int ConditionalHaveBIO(StrBuf *Target, WCTemplputParams *TP)
{
UserListEntry *ul = (UserListEntry*) CTX(CTX_USERLIST);
return ul->HasBio;
}
+
+int ConditionalSuppressEmailFields(StrBuf *Target, WCTemplputParams *TP)
+{
+ return 0; // FIXME this makes all email fields display
+}
+
+
void tmplput_USER_BIO(StrBuf *Target, WCTemplputParams *TP)
{
int Done = 0;
}
/*
- * burge a user
+ * purge a user
* username the name of the user to remove
*/
void delete_user(char *username) {
UserListEntry* UL;
StrBuf *Buf;
char username[256];
+ int i = 0;
if (supplied_username != NULL) {
safestrncpy(username, supplied_username, sizeof username);
delete_user(username);
}
else if (UL != NULL) {
+
+ serv_printf("AGEA %s", username);
+ StrBuf_ServGetln(Buf);
+ if (GetServerStatusMsg(Buf, NULL, 1, 2) == 1) {
+ while(StrBuf_ServGetln(Buf) , strcmp(ChrPtr(Buf), "000")) {
+ if (i == 0) {
+ StrBufAppendPrintf(UL->PrimaryEmail, "%s", ChrPtr(Buf));
+ }
+ if (i > 1) {
+ StrBufAppendPrintf(UL->OtherEmails, ",");
+ }
+ if (i > 0) {
+ StrBufAppendPrintf(UL->OtherEmails, "%s", ChrPtr(Buf));
+ }
+ ++i;
+ }
+ }
+
WCTemplputParams SubTP;
memset(&SubTP, 0, sizeof(WCTemplputParams));
SubTP.Filter.ContextType = CTX_USERLIST;
}
}
+ /* Send the new account parameters */
serv_printf("ASUP %s|%s|%d|%s|%s|%s|%s|%s|%s|",
username,
bstr("password"),
);
StrBuf_ServGetln(Buf);
GetServerStatusMsg(Buf, NULL, 1, 2);
+
+ /* Send the new email addresses. First make up a delimited list... */
+ char all_the_emails[512];
+ snprintf(all_the_emails, sizeof all_the_emails, "%s,%s", bstr("primaryemail"), bstr("otheremails"));
+
+ /* Replace any commas, semicolons, or spaces with newlines */
+ char *pos;
+ for (pos=all_the_emails; *pos!=0; ++pos) {
+ if ((*pos == ',') || (*pos == ';') || (*pos == ' ')) *pos = '\n' ;
+ }
+
+ /* Remove any naughty inappropriate whitespace */
+ striplt(all_the_emails);
+ while (pos = strstr(all_the_emails, "\n,"), (pos != NULL)) {
+ strcpy(pos, pos+1);
+ }
+ while (pos = strstr(all_the_emails, ",\n"), (pos != NULL)) {
+ strcpy(pos+1, pos+2);
+ }
+ while (pos = strstr(all_the_emails, "\n\n"), (pos != NULL)) {
+ strcpy(pos+1, pos+2);
+ }
+
+ /* Now send it to the server. */
+ serv_printf("ASEA %s", username);
+ StrBuf_ServGetln(Buf);
+ if (GetServerStatusMsg(Buf, NULL, 1, 2) == 4) {
+ serv_printf("%s\n000", all_the_emails);
+ }
+
FreeStrBuf(&Buf);
}
}
-
/*
- * create a new user
- * take the web environment username and create it on the citadel server
+ * create a new user
+ * (take the web environment username and create it on the citadel server)
*/
void create_user(void) {
long FullState;
}
-
void _select_user_to_edit(void) {
select_user_to_edit(NULL);
}
display_edituser(NULL, 0);
}
+
void
InitModule_USEREDIT
(void)
RegisterNamespace("USERLIST:LASTLOGON:NO", 0, 0, tmplput_USERLIST_LastLogonNo, NULL, CTX_USERLIST);
RegisterNamespace("USERLIST:NLOGONS", 0, 0, tmplput_USERLIST_nLogons, NULL, CTX_USERLIST);
RegisterNamespace("USERLIST:NPOSTS", 0, 0, tmplput_USERLIST_nPosts, NULL, CTX_USERLIST);
-
+ RegisterNamespace("USERLIST:PRIMARYEMAIL", 0, 1, tmplput_USERLIST_PrimaryEmail, NULL, CTX_USERLIST);
+ RegisterNamespace("USERLIST:OTHEREMAILS", 0, 1, tmplput_USERLIST_OtherEmails, NULL, CTX_USERLIST);
RegisterNamespace("USERLIST:FLAGS", 0, 0, tmplput_USERLIST_Flags, NULL, CTX_USERLIST);
RegisterNamespace("USERLIST:DAYSTILLPURGE", 0, 0, tmplput_USERLIST_DaysTillPurge, NULL, CTX_USERLIST);
RegisterNamespace("USER:BIO", 1, 2, tmplput_USER_BIO, NULL, CTX_NONE);
- RegisterConditional("COND:USERNAME", 0, ConditionalUser, CTX_USERLIST);
- RegisterConditional("COND:USERACCESS", 0, ConditionalUserAccess, CTX_USERLIST);
- RegisterConditional("COND:USERLIST:FLAG:USE_INTERNET", 0, ConditionalFlagINetEmail, CTX_USERLIST);
- RegisterConditional("COND:USERLIST:HAVEBIO", 0, ConditionalHaveBIO, CTX_USERLIST);
-
- RegisterConditional("COND:USER:PIC", 1, Conditional_USER_HAS_PIC, CTX_NONE);
+ RegisterConditional("COND:USERNAME", 0, ConditionalUser, CTX_USERLIST);
+ RegisterConditional("COND:USERACCESS", 0, ConditionalUserAccess, CTX_USERLIST);
+ RegisterConditional("COND:USERLIST:FLAG:USE_INTERNET", 0, ConditionalFlagINetEmail, CTX_USERLIST);
+ RegisterConditional("COND:USERLIST:HAVEBIO", 0, ConditionalHaveBIO, CTX_USERLIST);
+ RegisterConditional("COND:USER:PIC", 1, Conditional_USER_HAS_PIC, CTX_NONE);
RegisterIterator("USERLIST", 0, NULL, iterate_load_userlist, NULL, DeleteHash, CTX_USERLIST, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
-
-
RegisterSortFunc(HKEY("user:name"),
HKEY("userlist"),