10 * show a list of available users to edit them
11 * message the header message???
12 * preselect = which user should be selected in the browser
14 void select_user_to_edit(const char *preselect)
16 output_headers(1, 0, 0, 0, 1, 0);
17 do_template("aide_edituser_select", NULL);
22 typedef struct _UserListEntry {
31 /* Just available for Single users to view: */
37 UserListEntry* NewUserListOneEntry(StrBuf *SerializedUser, const char *Pos)
41 if (StrLength(SerializedUser) < 8)
44 ul = (UserListEntry*) malloc(sizeof(UserListEntry));
45 ul->UserName = NewStrBuf();
46 ul->Passvoid = NewStrBuf();
48 StrBufExtract_NextToken(ul->UserName, SerializedUser, &Pos, '|');
49 StrBufExtract_NextToken(ul->Passvoid, SerializedUser, &Pos, '|');
50 ul->Flags = StrBufExtractNext_unsigned_long(SerializedUser, &Pos, '|');
51 ul->nLogons = StrBufExtractNext_int( SerializedUser, &Pos, '|');
52 ul->nPosts = StrBufExtractNext_int( SerializedUser, &Pos, '|');
53 ul->AccessLevel = StrBufExtractNext_int( SerializedUser, &Pos, '|');
54 ul->UID = StrBufExtractNext_int( SerializedUser, &Pos, '|');
55 ul->LastLogonT = StrBufExtractNext_long( SerializedUser, &Pos, '|');
56 ul->DaysTillPurge = StrBufExtractNext_int( SerializedUser, &Pos, '|');
60 void DeleteUserListEntry(void *vUserList)
62 UserListEntry *ul = (UserListEntry*) vUserList;
64 FreeStrBuf(&ul->UserName);
65 FreeStrBuf(&ul->Passvoid);
69 UserListEntry* NewUserListEntry(StrBuf *SerializedUserList)
71 const char *Pos = NULL;
74 if (StrLength(SerializedUserList) < 8)
77 ul = (UserListEntry*) malloc(sizeof(UserListEntry));
78 ul->UserName = NewStrBuf();
79 ul->Passvoid = NewStrBuf();
81 StrBufExtract_NextToken(ul->UserName, SerializedUserList, &Pos, '|');
82 ul->AccessLevel = StrBufExtractNext_int( SerializedUserList, &Pos, '|');
83 ul->UID = StrBufExtractNext_int( SerializedUserList, &Pos, '|');
84 ul->LastLogonT = StrBufExtractNext_long(SerializedUserList, &Pos, '|');
85 ul->nLogons = StrBufExtractNext_int( SerializedUserList, &Pos, '|');
86 ul->nPosts = StrBufExtractNext_int( SerializedUserList, &Pos, '|');
87 StrBufExtract_NextToken(ul->Passvoid, SerializedUserList, &Pos, '|');
89 ul->DaysTillPurge = -1;
96 int CompareUserListName(const void *vUser1, const void *vUser2)
98 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
99 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
101 return strcmp(ChrPtr(u1->UserName), ChrPtr(u2->UserName));
104 int CompareUserListNameRev(const void *vUser1, const void *vUser2)
106 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
107 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
108 return strcmp(ChrPtr(u2->UserName), ChrPtr(u1->UserName));
111 int GroupchangeUserListName(const void *vUser1, const void *vUser2)
113 UserListEntry *u1 = (UserListEntry*) vUser1;
114 UserListEntry *u2 = (UserListEntry*) vUser2;
115 return ChrPtr(u2->UserName)[0] != ChrPtr(u1->UserName)[0];
119 * Sort by access level
121 int CompareAccessLevel(const void *vUser1, const void *vUser2)
123 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
124 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
126 return (u1->AccessLevel > u2->AccessLevel);
129 int CompareAccessLevelRev(const void *vUser1, const void *vUser2)
131 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
132 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
134 return (u2->AccessLevel > u1->AccessLevel);
137 int GroupchangeAccessLevel(const void *vUser1, const void *vUser2)
139 UserListEntry *u1 = (UserListEntry*) vUser1;
140 UserListEntry *u2 = (UserListEntry*) vUser2;
142 return u2->AccessLevel != u1->AccessLevel;
148 int CompareUID(const void *vUser1, const void *vUser2)
150 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
151 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
153 return (u1->UID > u2->UID);
156 int CompareUIDRev(const void *vUser1, const void *vUser2)
158 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
159 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
161 return (u2->UID > u1->UID);
164 int GroupchangeUID(const void *vUser1, const void *vUser2)
166 UserListEntry *u1 = (UserListEntry*) vUser1;
167 UserListEntry *u2 = (UserListEntry*) vUser2;
169 return (u2->UID / 10) != (u1->UID / 10);
173 * Sort By Date /// TODO!
175 int CompareLastLogon(const void *vUser1, const void *vUser2)
177 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
178 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
180 return (u1->LastLogonT > u2->LastLogonT);
183 int CompareLastLogonRev(const void *vUser1, const void *vUser2)
185 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
186 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
188 return (u2->LastLogonT > u1->LastLogonT);
191 int GroupchangeLastLogon(const void *vUser1, const void *vUser2)
193 UserListEntry *u1 = (UserListEntry*) vUser1;
194 UserListEntry *u2 = (UserListEntry*) vUser2;
196 return (u2->LastLogonT != u1->LastLogonT);
200 * Sort By Number of Logons
202 int ComparenLogons(const void *vUser1, const void *vUser2)
204 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
205 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
207 return (u1->nLogons > u2->nLogons);
210 int ComparenLogonsRev(const void *vUser1, const void *vUser2)
212 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
213 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
215 return (u2->nLogons > u1->nLogons);
218 int GroupchangenLogons(const void *vUser1, const void *vUser2)
220 UserListEntry *u1 = (UserListEntry*) vUser1;
221 UserListEntry *u2 = (UserListEntry*) vUser2;
223 return (u2->nLogons / 100) != (u1->nLogons / 100);
227 * Sort By Number of Posts
229 int ComparenPosts(const void *vUser1, const void *vUser2)
231 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
232 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
234 return (u1->nPosts > u2->nPosts);
237 int ComparenPostsRev(const void *vUser1, const void *vUser2)
239 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
240 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
242 return (u2->nPosts > u1->nPosts);
245 int GroupchangenPosts(const void *vUser1, const void *vUser2)
247 UserListEntry *u1 = (UserListEntry*) vUser1;
248 UserListEntry *u2 = (UserListEntry*) vUser2;
250 return (u2->nPosts / 100) != (u1->nPosts / 100);
254 HashList *iterate_load_userlist(StrBuf *Target, WCTemplputParams *TP)
258 HashList *Hash = NULL;
264 WCTemplputParams SubTP;
266 memset(&SubTP, 0, sizeof(WCTemplputParams));
269 StrBuf_ServGetln(Buf);
270 if (GetServerStatus(Buf, NULL) == 1) {
271 Hash = NewHash(1, NULL);
274 len = StrBuf_ServGetln(Buf);
276 (strcmp(ChrPtr(Buf), "000")==0)) {
280 ul = NewUserListEntry(Buf);
283 nUsed = GetCount(Hash);
284 nUsed = snprintf(nnn, sizeof(nnn), "%d", nUsed+1);
285 Put(Hash, nnn, nUsed, ul, DeleteUserListEntry);
287 SubTP.Filter.ContextType = CTX_USERLIST;
288 SortIt = RetrieveSort(&SubTP, HKEY("USER"), HKEY("user:uid"), 0);
290 SortByPayload(Hash, SortIt);
292 SortByPayload(Hash, CompareUID);
299 void tmplput_USERLIST_UserName(StrBuf *Target, WCTemplputParams *TP)
301 UserListEntry *ul = (UserListEntry*) CTX;
302 StrBufAppendTemplate(Target, TP, ul->UserName, 0);
305 void tmplput_USERLIST_Password(StrBuf *Target, WCTemplputParams *TP)
307 UserListEntry *ul = (UserListEntry*) CTX;
308 StrBufAppendTemplate(Target, TP, ul->Passvoid, 0);
311 void tmplput_USERLIST_AccessLevelNo(StrBuf *Target, WCTemplputParams *TP)
313 UserListEntry *ul = (UserListEntry*) CTX;
315 StrBufAppendPrintf(Target, "%d", ul->AccessLevel, 0);
318 void tmplput_USERLIST_AccessLevelStr(StrBuf *Target, WCTemplputParams *TP)
320 UserListEntry *ul = (UserListEntry*) CTX;
322 StrBufAppendBufPlain(Target, _(axdefs[ul->AccessLevel]), -1, 0);
325 void tmplput_USERLIST_UID(StrBuf *Target, WCTemplputParams *TP)
327 UserListEntry *ul = (UserListEntry*) CTX;
329 StrBufAppendPrintf(Target, "%d", ul->UID, 0);
332 void tmplput_USERLIST_LastLogonNo(StrBuf *Target, WCTemplputParams *TP)
334 UserListEntry *ul = (UserListEntry*) CTX;
336 StrBufAppendPrintf(Target,"%ld", ul->LastLogonT, 0);
338 void tmplput_USERLIST_LastLogonStr(StrBuf *Target, WCTemplputParams *TP)
340 UserListEntry *ul = (UserListEntry*) CTX;
341 StrEscAppend(Target, NULL, asctime(localtime(&ul->LastLogonT)), 0, 0);
344 void tmplput_USERLIST_nLogons(StrBuf *Target, WCTemplputParams *TP)
346 UserListEntry *ul = (UserListEntry*) CTX;
348 StrBufAppendPrintf(Target, "%d", ul->nLogons, 0);
351 void tmplput_USERLIST_nPosts(StrBuf *Target, WCTemplputParams *TP)
353 UserListEntry *ul = (UserListEntry*) CTX;
355 StrBufAppendPrintf(Target, "%d", ul->nPosts, 0);
358 void tmplput_USERLIST_Flags(StrBuf *Target, WCTemplputParams *TP)
360 UserListEntry *ul = (UserListEntry*) CTX;
362 StrBufAppendPrintf(Target, "%d", ul->Flags, 0);
365 void tmplput_USERLIST_DaysTillPurge(StrBuf *Target, WCTemplputParams *TP)
367 UserListEntry *ul = (UserListEntry*) CTX;
369 StrBufAppendPrintf(Target, "%d", ul->DaysTillPurge, 0);
372 int ConditionalUser(StrBuf *Target, WCTemplputParams *TP)
374 UserListEntry *ul = (UserListEntry*) CTX;
375 if (havebstr("usernum")) {
376 return ibstr("usernum") == ul->UID;
378 else if (havebstr("username")) {
379 return strcmp(bstr("username"), ChrPtr(ul->UserName)) == 0;
385 int ConditionalFlagINetEmail(StrBuf *Target, WCTemplputParams *TP)
387 UserListEntry *ul = (UserListEntry*) CTX;
388 return (ul->Flags & US_INTERNET) != 0;
391 int ConditionalUserAccess(StrBuf *Target, WCTemplputParams *TP)
393 UserListEntry *ul = (UserListEntry*) CTX;
398 return GetTemplateTokenNumber(Target,
407 * Locate the message number of a user's vCard in the current room
408 * Returns the message id of his vcard
410 long locate_user_vcard_in_this_room(message_summary **VCMsg, wc_mime_attachment **VCAtt)
418 message_summary *Msg;
419 wc_mime_attachment *Att;
422 long vcard_msgnum = (-1L);
423 int already_tried_creating_one = 0;
424 StrBuf *FoundCharset = NewStrBuf();
425 StrBuf *Error = NULL;
426 SharedMessageStatus Stat;
431 memset(&Stat, 0, sizeof(SharedMessageStatus));
432 Stat.maxload = 10000;
433 Stat.lowest_found = (-1);
434 Stat.highest_found = (-1);
436 /* Search for the user's vCard */
437 if (load_msg_ptrs("MSGS ALL||||1", &Stat, NULL) > 0) {
438 at = GetNewHashPos(WCC->summ, 0);
439 while (GetNextHashPos(WCC->summ, at, &HKLen, &HashKey, &vMsg)) {
440 Msg = (message_summary*) vMsg;
441 Msg->MsgBody = (wc_mime_attachment*) malloc(sizeof(wc_mime_attachment));
442 memset(Msg->MsgBody, 0, sizeof(wc_mime_attachment));
443 Msg->MsgBody->msgnum = Msg->msgnum;
445 load_message(Msg, FoundCharset, &Error);
447 if (Msg->AllAttach != NULL) {
448 att = GetNewHashPos(Msg->AllAttach, 0);
449 while (GetNextHashPos(Msg->AllAttach, att, &HKLen, &HashKey, &vMsg) &&
450 (vcard_msgnum == -1)) {
451 Att = (wc_mime_attachment*) vMsg;
453 (strcasecmp(ChrPtr(Att->ContentType), "text/x-vcard") == 0)
454 || (strcasecmp(ChrPtr(Att->ContentType), "text/vcard") == 0)
458 vcard_msgnum = Msg->msgnum;
459 if (Att->Data == NULL) {
466 FreeStrBuf(&Error); /* don't care... */
472 /* If there's no vcard, create one */
473 if ((*VCMsg == NULL) && (already_tried_creating_one == 0)) {
475 already_tried_creating_one = 1;
476 serv_puts("ENT0 1|||4");
477 StrBuf_ServGetln(Buf);
478 if (GetServerStatus(Buf, NULL) == 4) {
479 serv_puts("Content-type: text/x-vcard");
481 serv_puts("begin:vcard");
482 serv_puts("end:vcard");
486 lprintf(1, "Error while creating user vcard: %s\n", ChrPtr(Buf));
490 FreeStrBuf(&FoundCharset);
492 return(vcard_msgnum);
497 * Display the form for editing a user's address book entry
498 * username the name of the user
499 * usernum the citadel-uid of the user
501 void display_edit_address_book_entry(const char *username, long usernum) {
503 message_summary *VCMsg = NULL;
504 wc_mime_attachment *VCAtt = NULL;
507 long vcard_msgnum = (-1L);
509 /* Locate the user's config room, creating it if necessary */
511 roomname = NewStrBuf();
512 StrBufPrintf(roomname, "%010ld.%s", usernum, USERCONFIGROOM);
513 serv_printf("GOTO %s||1", ChrPtr(roomname));
514 StrBuf_ServGetln(Buf);
515 if (GetServerStatus(Buf, NULL) != 2) {
516 serv_printf("CRE8 1|%s|5|||1|", ChrPtr(roomname));
517 StrBuf_ServGetln(Buf);
518 GetServerStatus(Buf, NULL);
519 serv_printf("GOTO %s||1", ChrPtr(roomname));
520 StrBuf_ServGetln(Buf);
521 if (GetServerStatus(Buf, NULL) != 2) {
522 FlushStrBuf(WCC->ImportantMsg);
523 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
524 select_user_to_edit(username);
526 FreeStrBuf(&roomname);
532 locate_user_vcard_in_this_room(&VCMsg, &VCAtt);
535 StrBufPlain(WCC->ImportantMsg,
536 _("An error occurred while trying to create or edit this address book entry."),
538 select_user_to_edit(username);
539 FreeStrBuf(&roomname);
543 do_edit_vcard(vcard_msgnum, "1",
546 "select_user_to_edit",
548 FreeStrBuf(&roomname);
552 void display_edituser(const char *supplied_username, int is_new) {
559 if (supplied_username != NULL) {
560 safestrncpy(username, supplied_username, sizeof username);
563 safestrncpy(username, bstr("username"), sizeof username);
567 serv_printf("AGUP %s", username);
568 StrBuf_ServGetln(Buf);
569 if (GetServerStatus(Buf, NULL) != 2) {
570 FlushStrBuf(WCC->ImportantMsg);
571 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
572 select_user_to_edit(username);
577 Pos = ChrPtr(Buf) + 4;
578 UL = NewUserListOneEntry(Buf, Pos);
579 if ((UL != NULL) && havebstr("edit_abe_button")) {
580 display_edit_address_book_entry(username, UL->UID);
582 else if ((UL != NULL) && havebstr("delete_button")) {
583 delete_user(username);
585 else if (UL != NULL) {
586 WCTemplputParams SubTP;
587 memset(&SubTP, 0, sizeof(WCTemplputParams));
588 SubTP.Filter.ContextType = CTX_USERLIST;
590 output_headers(1, 0, 0, 0, 1, 0);
591 DoTemplate(HKEY("aide_edituser_detailview"), NULL, &SubTP);
594 DeleteUserListEntry(UL);
601 * do the backend operation of the user edit on the server
603 void edituser(void) {
606 unsigned int flags = 0;
607 const char *username;
609 is_new = ibstr("is_new");
610 username = bstr("username");
612 if (!havebstr("ok_button")) {
613 StrBufPlain(WCC->ImportantMsg, _("Changes were not saved."), -1);
616 StrBuf *Buf = NewStrBuf();
618 flags = ibstr("flags");
619 if (yesbstr("inetmail")) {
620 flags |= US_INTERNET;
623 flags &= ~US_INTERNET ;
626 if ((havebstr("newname")) && (strcasecmp(bstr("username"), bstr("newname")))) {
627 serv_printf("RENU %s|%s", bstr("username"), bstr("newname"));
628 StrBuf_ServGetln(Buf);
629 if (GetServerStatus(Buf, NULL) == 2) {
630 FlushStrBuf(WCC->ImportantMsg);
631 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
634 username = bstr("newname");
638 serv_printf("ASUP %s|%s|%d|%s|%s|%s|%s|%s|%s|",
649 StrBuf_ServGetln(Buf);
650 if (GetServerStatus(Buf, NULL) == 2) {
651 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
657 * If we are in the middle of creating a new user, move on to
658 * the vCard edit screen.
661 display_edit_address_book_entry(username, lbstr("usernum") );
664 select_user_to_edit(username);
670 * username the name of the user to remove
672 void delete_user(char *username) {
677 serv_printf("ASUP %s|0|0|0|0|0|", username);
678 StrBuf_ServGetln(Buf);
679 if (GetServerStatus(Buf, NULL) != 2)
680 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
682 select_user_to_edit( bstr("username"));
690 * take the web environment username and create it on the citadel server
692 void create_user(void) {
696 const char *username;
699 username = bstr("username");
700 serv_printf("CREU %s", username);
701 StrBuf_ServGetln(Buf);
702 if (GetServerStatus(Buf, &FullState) == 2) {
703 sprintf(WC->ImportantMessage, _("A new user has been created."));
704 display_edituser(username, 1);
706 else if (FullState == 570) {
707 StrBufPlain(WCC->ImportantMsg,
708 _("You are attempting to create a new user from within Citadel "
709 "while running in host based authentication mode. In this mode, "
710 "you must create new users on the host system, not within Citadel."),
712 select_user_to_edit(NULL);
715 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
716 select_user_to_edit(NULL);
722 void _select_user_to_edit(void) {
723 select_user_to_edit(NULL);
727 void _display_edituser(void) {
728 display_edituser(NULL, 0);
736 WebcitAddUrlHandler(HKEY("select_user_to_edit"), "", 0, _select_user_to_edit, 0);
737 WebcitAddUrlHandler(HKEY("display_edituser"), "", 0, _display_edituser, 0);
738 WebcitAddUrlHandler(HKEY("edituser"), "", 0, edituser, 0);
739 WebcitAddUrlHandler(HKEY("create_user"), "", 0, create_user, 0);
741 RegisterNamespace("USERLIST:USERNAME", 0, 1, tmplput_USERLIST_UserName, NULL, CTX_USERLIST);
742 RegisterNamespace("USERLIST:PASSWD", 0, 1, tmplput_USERLIST_Password, NULL, CTX_USERLIST);
743 RegisterNamespace("USERLIST:ACCLVLNO", 0, 0, tmplput_USERLIST_AccessLevelNo, NULL, CTX_USERLIST);
744 RegisterNamespace("USERLIST:ACCLVLSTR", 0, 0, tmplput_USERLIST_AccessLevelStr, NULL, CTX_USERLIST);
745 RegisterNamespace("USERLIST:UID", 0, 0, tmplput_USERLIST_UID, NULL, CTX_USERLIST);
746 RegisterNamespace("USERLIST:LASTLOGON:STR", 0, 0, tmplput_USERLIST_LastLogonStr, NULL, CTX_USERLIST);
747 RegisterNamespace("USERLIST:LASTLOGON:NO", 0, 0, tmplput_USERLIST_LastLogonNo, NULL, CTX_USERLIST);
748 RegisterNamespace("USERLIST:NLOGONS", 0, 0, tmplput_USERLIST_nLogons, NULL, CTX_USERLIST);
749 RegisterNamespace("USERLIST:NPOSTS", 0, 0, tmplput_USERLIST_nPosts, NULL, CTX_USERLIST);
751 RegisterNamespace("USERLIST:FLAGS", 0, 0, tmplput_USERLIST_Flags, NULL, CTX_USERLIST);
752 RegisterNamespace("USERLIST:DAYSTILLPURGE", 0, 0, tmplput_USERLIST_DaysTillPurge, NULL, CTX_USERLIST);
754 RegisterConditional(HKEY("COND:USERNAME"), 0, ConditionalUser, CTX_USERLIST);
755 RegisterConditional(HKEY("COND:USERACCESS"), 0, ConditionalUserAccess, CTX_USERLIST);
756 RegisterConditional(HKEY("COND:USERLIST:FLAG:USE_INTERNET"), 0, ConditionalFlagINetEmail, CTX_USERLIST);
758 RegisterIterator("USERLIST", 0, NULL, iterate_load_userlist, NULL, DeleteHash, CTX_USERLIST, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
762 RegisterSortFunc(HKEY("user:name"),
765 CompareUserListNameRev,
766 GroupchangeUserListName,
768 RegisterSortFunc(HKEY("user:accslvl"),
771 CompareAccessLevelRev,
772 GroupchangeAccessLevel,
775 RegisterSortFunc(HKEY("user:nlogons"),
782 RegisterSortFunc(HKEY("user:uid"),
789 RegisterSortFunc(HKEY("user:lastlogon"),
793 GroupchangeLastLogon,
796 RegisterSortFunc(HKEY("user:nmsgposts"),
803 REGISTERTokenParamDefine(AxDeleted);
804 REGISTERTokenParamDefine(AxNewU);
805 REGISTERTokenParamDefine(AxProbU);
806 REGISTERTokenParamDefine(AxLocU);
807 REGISTERTokenParamDefine(AxNetU);
808 REGISTERTokenParamDefine(AxPrefU);
809 REGISTERTokenParamDefine(AxAideU);