7 * show a list of available users to edit them
8 * message the header message???
9 * preselect = which user should be selected in the browser
11 void select_user_to_edit(const char *preselect)
13 output_headers(1, 0, 0, 0, 1, 0);
14 do_template("aide_edituser_select", NULL);
19 typedef struct _UserListEntry {
28 /* Just available for Single users to view: */
34 UserListEntry* NewUserListOneEntry(StrBuf *SerializedUser, const char *Pos)
38 if (StrLength(SerializedUser) < 8)
41 ul = (UserListEntry*) malloc(sizeof(UserListEntry));
42 ul->UserName = NewStrBuf();
43 ul->Passvoid = NewStrBuf();
45 StrBufExtract_NextToken(ul->UserName, SerializedUser, &Pos, '|');
46 StrBufExtract_NextToken(ul->Passvoid, SerializedUser, &Pos, '|');
47 ul->Flags = StrBufExtractNext_unsigned_long(SerializedUser, &Pos, '|');
48 ul->nLogons = StrBufExtractNext_int( SerializedUser, &Pos, '|');
49 ul->nPosts = StrBufExtractNext_int( SerializedUser, &Pos, '|');
50 ul->AccessLevel = StrBufExtractNext_int( SerializedUser, &Pos, '|');
51 ul->UID = StrBufExtractNext_int( SerializedUser, &Pos, '|');
52 ul->LastLogonT = StrBufExtractNext_long( SerializedUser, &Pos, '|');
53 ul->DaysTillPurge = StrBufExtractNext_int( SerializedUser, &Pos, '|');
57 void DeleteUserListEntry(void *vUserList)
59 UserListEntry *ul = (UserListEntry*) vUserList;
61 FreeStrBuf(&ul->UserName);
62 FreeStrBuf(&ul->Passvoid);
66 UserListEntry* NewUserListEntry(StrBuf *SerializedUserList)
68 const char *Pos = NULL;
71 if (StrLength(SerializedUserList) < 8)
74 ul = (UserListEntry*) malloc(sizeof(UserListEntry));
75 ul->UserName = NewStrBuf();
76 ul->Passvoid = NewStrBuf();
78 StrBufExtract_NextToken(ul->UserName, SerializedUserList, &Pos, '|');
79 ul->AccessLevel = StrBufExtractNext_int( SerializedUserList, &Pos, '|');
80 ul->UID = StrBufExtractNext_int( SerializedUserList, &Pos, '|');
81 ul->LastLogonT = StrBufExtractNext_long(SerializedUserList, &Pos, '|');
82 ul->nLogons = StrBufExtractNext_int( SerializedUserList, &Pos, '|');
83 ul->nPosts = StrBufExtractNext_int( SerializedUserList, &Pos, '|');
84 StrBufExtract_NextToken(ul->Passvoid, SerializedUserList, &Pos, '|');
86 ul->DaysTillPurge = -1;
93 int CompareUserListName(const void *vUser1, const void *vUser2)
95 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
96 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
98 return strcmp(ChrPtr(u1->UserName), ChrPtr(u2->UserName));
101 int CompareUserListNameRev(const void *vUser1, const void *vUser2)
103 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
104 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
105 return strcmp(ChrPtr(u2->UserName), ChrPtr(u1->UserName));
108 int GroupchangeUserListName(const void *vUser1, const void *vUser2)
110 UserListEntry *u1 = (UserListEntry*) vUser1;
111 UserListEntry *u2 = (UserListEntry*) vUser2;
112 return ChrPtr(u2->UserName)[0] != ChrPtr(u1->UserName)[0];
116 * Sort by access level
118 int CompareAccessLevel(const void *vUser1, const void *vUser2)
120 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
121 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
123 return (u1->AccessLevel > u2->AccessLevel);
126 int CompareAccessLevelRev(const void *vUser1, const void *vUser2)
128 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
129 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
131 return (u2->AccessLevel > u1->AccessLevel);
134 int GroupchangeAccessLevel(const void *vUser1, const void *vUser2)
136 UserListEntry *u1 = (UserListEntry*) vUser1;
137 UserListEntry *u2 = (UserListEntry*) vUser2;
139 return u2->AccessLevel != u1->AccessLevel;
145 int CompareUID(const void *vUser1, const void *vUser2)
147 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
148 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
150 return (u1->UID > u2->UID);
153 int CompareUIDRev(const void *vUser1, const void *vUser2)
155 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
156 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
158 return (u2->UID > u1->UID);
161 int GroupchangeUID(const void *vUser1, const void *vUser2)
163 UserListEntry *u1 = (UserListEntry*) vUser1;
164 UserListEntry *u2 = (UserListEntry*) vUser2;
166 return (u2->UID / 10) != (u1->UID / 10);
170 * Sort By Date /// TODO!
172 int CompareLastLogon(const void *vUser1, const void *vUser2)
174 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
175 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
177 return (u1->LastLogonT > u2->LastLogonT);
180 int CompareLastLogonRev(const void *vUser1, const void *vUser2)
182 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
183 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
185 return (u2->LastLogonT > u1->LastLogonT);
188 int GroupchangeLastLogon(const void *vUser1, const void *vUser2)
190 UserListEntry *u1 = (UserListEntry*) vUser1;
191 UserListEntry *u2 = (UserListEntry*) vUser2;
193 return (u2->LastLogonT != u1->LastLogonT);
197 * Sort By Number of Logons
199 int ComparenLogons(const void *vUser1, const void *vUser2)
201 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
202 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
204 return (u1->nLogons > u2->nLogons);
207 int ComparenLogonsRev(const void *vUser1, const void *vUser2)
209 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
210 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
212 return (u2->nLogons > u1->nLogons);
215 int GroupchangenLogons(const void *vUser1, const void *vUser2)
217 UserListEntry *u1 = (UserListEntry*) vUser1;
218 UserListEntry *u2 = (UserListEntry*) vUser2;
220 return (u2->nLogons / 100) != (u1->nLogons / 100);
224 * Sort By Number of Posts
226 int ComparenPosts(const void *vUser1, const void *vUser2)
228 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
229 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
231 return (u1->nPosts > u2->nPosts);
234 int ComparenPostsRev(const void *vUser1, const void *vUser2)
236 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
237 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
239 return (u2->nPosts > u1->nPosts);
242 int GroupchangenPosts(const void *vUser1, const void *vUser2)
244 UserListEntry *u1 = (UserListEntry*) vUser1;
245 UserListEntry *u2 = (UserListEntry*) vUser2;
247 return (u2->nPosts / 100) != (u1->nPosts / 100);
251 HashList *iterate_load_userlist(StrBuf *Target, WCTemplputParams *TP)
255 HashList *Hash = NULL;
261 WCTemplputParams SubTP;
263 memset(&SubTP, 0, sizeof(WCTemplputParams));
266 StrBuf_ServGetln(Buf);
267 if (GetServerStatus(Buf, NULL) == 1) {
268 Hash = NewHash(1, NULL);
271 len = StrBuf_ServGetln(Buf);
273 (strcmp(ChrPtr(Buf), "000")==0)) {
277 ul = NewUserListEntry(Buf);
280 nUsed = GetCount(Hash);
281 nUsed = snprintf(nnn, sizeof(nnn), "%d", nUsed+1);
282 Put(Hash, nnn, nUsed, ul, DeleteUserListEntry);
284 SubTP.Filter.ContextType = CTX_USERLIST;
285 SortIt = RetrieveSort(&SubTP, HKEY("USER"), HKEY("user:uid"), 0);
287 SortByPayload(Hash, SortIt);
289 SortByPayload(Hash, CompareUID);
296 void tmplput_USERLIST_UserName(StrBuf *Target, WCTemplputParams *TP)
298 UserListEntry *ul = (UserListEntry*) CTX;
299 StrBufAppendTemplate(Target, TP, ul->UserName, 0);
302 void tmplput_USERLIST_Password(StrBuf *Target, WCTemplputParams *TP)
304 UserListEntry *ul = (UserListEntry*) CTX;
305 StrBufAppendTemplate(Target, TP, ul->Passvoid, 0);
308 void tmplput_USERLIST_AccessLevelNo(StrBuf *Target, WCTemplputParams *TP)
310 UserListEntry *ul = (UserListEntry*) CTX;
312 StrBufAppendPrintf(Target, "%d", ul->AccessLevel, 0);
315 void tmplput_USERLIST_AccessLevelStr(StrBuf *Target, WCTemplputParams *TP)
317 UserListEntry *ul = (UserListEntry*) CTX;
319 StrBufAppendBufPlain(Target, _(axdefs[ul->AccessLevel]), -1, 0);
322 void tmplput_USERLIST_UID(StrBuf *Target, WCTemplputParams *TP)
324 UserListEntry *ul = (UserListEntry*) CTX;
326 StrBufAppendPrintf(Target, "%d", ul->UID, 0);
329 void tmplput_USERLIST_LastLogonNo(StrBuf *Target, WCTemplputParams *TP)
331 UserListEntry *ul = (UserListEntry*) CTX;
333 StrBufAppendPrintf(Target,"%ld", ul->LastLogonT, 0);
335 void tmplput_USERLIST_LastLogonStr(StrBuf *Target, WCTemplputParams *TP)
337 UserListEntry *ul = (UserListEntry*) CTX;
338 StrEscAppend(Target, NULL, asctime(localtime(&ul->LastLogonT)), 0, 0);
341 void tmplput_USERLIST_nLogons(StrBuf *Target, WCTemplputParams *TP)
343 UserListEntry *ul = (UserListEntry*) CTX;
345 StrBufAppendPrintf(Target, "%d", ul->nLogons, 0);
348 void tmplput_USERLIST_nPosts(StrBuf *Target, WCTemplputParams *TP)
350 UserListEntry *ul = (UserListEntry*) CTX;
352 StrBufAppendPrintf(Target, "%d", ul->nPosts, 0);
355 void tmplput_USERLIST_Flags(StrBuf *Target, WCTemplputParams *TP)
357 UserListEntry *ul = (UserListEntry*) CTX;
359 StrBufAppendPrintf(Target, "%d", ul->Flags, 0);
362 void tmplput_USERLIST_DaysTillPurge(StrBuf *Target, WCTemplputParams *TP)
364 UserListEntry *ul = (UserListEntry*) CTX;
366 StrBufAppendPrintf(Target, "%d", ul->DaysTillPurge, 0);
369 int ConditionalUser(StrBuf *Target, WCTemplputParams *TP)
371 UserListEntry *ul = (UserListEntry*) CTX;
372 if (havebstr("usernum")) {
373 return ibstr("usernum") == ul->UID;
375 else if (havebstr("username")) {
376 return strcmp(bstr("username"), ChrPtr(ul->UserName)) == 0;
382 int ConditionalFlagINetEmail(StrBuf *Target, WCTemplputParams *TP)
384 UserListEntry *ul = (UserListEntry*) CTX;
385 return (ul->Flags & US_INTERNET) != 0;
388 int ConditionalUserAccess(StrBuf *Target, WCTemplputParams *TP)
390 UserListEntry *ul = (UserListEntry*) CTX;
395 return GetTemplateTokenNumber(Target,
404 * Locate the message number of a user's vCard in the current room
405 * Returns the message id of his vcard
407 long locate_user_vcard_in_this_room(message_summary **VCMsg, wc_mime_attachment **VCAtt)
415 message_summary *Msg;
416 wc_mime_attachment *Att;
419 long vcard_msgnum = (-1L);
420 int already_tried_creating_one = 0;
421 StrBuf *FoundCharset = NewStrBuf();
422 StrBuf *Error = NULL;
423 SharedMessageStatus Stat;
428 memset(&Stat, 0, sizeof(SharedMessageStatus));
429 Stat.maxload = 10000;
430 Stat.lowest_found = (-1);
431 Stat.highest_found = (-1);
433 /* Search for the user's vCard */
434 if (load_msg_ptrs("MSGS ALL||||1", &Stat, NULL) > 0) {
435 at = GetNewHashPos(WCC->summ, 0);
436 while (GetNextHashPos(WCC->summ, at, &HKLen, &HashKey, &vMsg)) {
437 Msg = (message_summary*) vMsg;
438 Msg->MsgBody = (wc_mime_attachment*) malloc(sizeof(wc_mime_attachment));
439 memset(Msg->MsgBody, 0, sizeof(wc_mime_attachment));
440 Msg->MsgBody->msgnum = Msg->msgnum;
442 load_message(Msg, FoundCharset, &Error);
444 if (Msg->AllAttach != NULL) {
445 att = GetNewHashPos(Msg->AllAttach, 0);
446 while (GetNextHashPos(Msg->AllAttach, att, &HKLen, &HashKey, &vMsg) &&
447 (vcard_msgnum == -1)) {
448 Att = (wc_mime_attachment*) vMsg;
450 (strcasecmp(ChrPtr(Att->ContentType), "text/x-vcard") == 0)
451 || (strcasecmp(ChrPtr(Att->ContentType), "text/vcard") == 0)
455 vcard_msgnum = Msg->msgnum;
456 if (Att->Data == NULL) {
463 FreeStrBuf(&Error); /* don't care... */
469 /* If there's no vcard, create one */
470 if ((*VCMsg == NULL) && (already_tried_creating_one == 0)) {
472 already_tried_creating_one = 1;
473 serv_puts("ENT0 1|||4");
474 StrBuf_ServGetln(Buf);
475 if (GetServerStatus(Buf, NULL) == 4) {
476 serv_puts("Content-type: text/x-vcard");
478 serv_puts("begin:vcard");
479 serv_puts("end:vcard");
483 syslog(1, "Error while creating user vcard: %s\n", ChrPtr(Buf));
487 FreeStrBuf(&FoundCharset);
489 return(vcard_msgnum);
494 * Display the form for editing a user's address book entry
495 * username the name of the user
496 * usernum the citadel-uid of the user
498 void display_edit_address_book_entry(const char *username, long usernum) {
500 message_summary *VCMsg = NULL;
501 wc_mime_attachment *VCAtt = NULL;
504 long vcard_msgnum = (-1L);
506 /* Locate the user's config room, creating it if necessary */
508 roomname = NewStrBuf();
509 StrBufPrintf(roomname, "%010ld.%s", usernum, USERCONFIGROOM);
510 serv_printf("GOTO %s||1", ChrPtr(roomname));
511 StrBuf_ServGetln(Buf);
512 if (GetServerStatus(Buf, NULL) != 2) {
513 serv_printf("CRE8 1|%s|5|||1|", ChrPtr(roomname));
514 StrBuf_ServGetln(Buf);
515 GetServerStatus(Buf, NULL);
516 serv_printf("GOTO %s||1", ChrPtr(roomname));
517 StrBuf_ServGetln(Buf);
518 if (GetServerStatus(Buf, NULL) != 2) {
519 FlushStrBuf(WCC->ImportantMsg);
520 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
521 select_user_to_edit(username);
523 FreeStrBuf(&roomname);
529 locate_user_vcard_in_this_room(&VCMsg, &VCAtt);
532 StrBufPlain(WCC->ImportantMsg,
533 _("An error occurred while trying to create or edit this address book entry."),
535 select_user_to_edit(username);
536 FreeStrBuf(&roomname);
540 do_edit_vcard(vcard_msgnum, "1",
543 "select_user_to_edit",
545 FreeStrBuf(&roomname);
549 void display_edituser(const char *supplied_username, int is_new) {
556 if (supplied_username != NULL) {
557 safestrncpy(username, supplied_username, sizeof username);
560 safestrncpy(username, bstr("username"), sizeof username);
564 serv_printf("AGUP %s", username);
565 StrBuf_ServGetln(Buf);
566 if (GetServerStatus(Buf, NULL) != 2) {
567 FlushStrBuf(WCC->ImportantMsg);
568 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
569 select_user_to_edit(username);
574 Pos = ChrPtr(Buf) + 4;
575 UL = NewUserListOneEntry(Buf, Pos);
576 if ((UL != NULL) && havebstr("edit_abe_button")) {
577 display_edit_address_book_entry(username, UL->UID);
579 else if ((UL != NULL) && havebstr("delete_button")) {
580 delete_user(username);
582 else if (UL != NULL) {
583 WCTemplputParams SubTP;
584 memset(&SubTP, 0, sizeof(WCTemplputParams));
585 SubTP.Filter.ContextType = CTX_USERLIST;
587 output_headers(1, 0, 0, 0, 1, 0);
588 DoTemplate(HKEY("aide_edituser_detailview"), NULL, &SubTP);
591 DeleteUserListEntry(UL);
598 * do the backend operation of the user edit on the server
600 void edituser(void) {
603 unsigned int flags = 0;
604 const char *username;
606 is_new = ibstr("is_new");
607 username = bstr("username");
609 if (!havebstr("ok_button")) {
610 StrBufPlain(WCC->ImportantMsg, _("Changes were not saved."), -1);
613 StrBuf *Buf = NewStrBuf();
615 flags = ibstr("flags");
616 if (yesbstr("inetmail")) {
617 flags |= US_INTERNET;
620 flags &= ~US_INTERNET ;
623 if ((havebstr("newname")) && (strcasecmp(bstr("username"), bstr("newname")))) {
624 serv_printf("RENU %s|%s", bstr("username"), bstr("newname"));
625 StrBuf_ServGetln(Buf);
626 if (GetServerStatus(Buf, NULL) == 2) {
627 FlushStrBuf(WCC->ImportantMsg);
628 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
631 username = bstr("newname");
635 serv_printf("ASUP %s|%s|%d|%s|%s|%s|%s|%s|%s|",
646 StrBuf_ServGetln(Buf);
647 if (GetServerStatus(Buf, NULL) == 2) {
648 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
654 * If we are in the middle of creating a new user, move on to
655 * the vCard edit screen.
658 display_edit_address_book_entry(username, lbstr("usernum") );
661 select_user_to_edit(username);
667 * username the name of the user to remove
669 void delete_user(char *username) {
674 serv_printf("ASUP %s|0|0|0|0|0|", username);
675 StrBuf_ServGetln(Buf);
676 if (GetServerStatus(Buf, NULL) != 2)
677 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
679 select_user_to_edit( bstr("username"));
687 * take the web environment username and create it on the citadel server
689 void create_user(void) {
693 const char *username;
696 username = bstr("username");
697 serv_printf("CREU %s", username);
698 StrBuf_ServGetln(Buf);
699 if (GetServerStatus(Buf, &FullState) == 2) {
700 sprintf(WC->ImportantMessage, _("A new user has been created."));
701 display_edituser(username, 1);
703 else if (FullState == 570) {
704 StrBufPlain(WCC->ImportantMsg,
705 _("You are attempting to create a new user from within Citadel "
706 "while running in host based authentication mode. In this mode, "
707 "you must create new users on the host system, not within Citadel."),
709 select_user_to_edit(NULL);
712 StrBufAppendBuf(WCC->ImportantMsg, Buf, 4);
713 select_user_to_edit(NULL);
719 void _select_user_to_edit(void) {
720 select_user_to_edit(NULL);
724 void _display_edituser(void) {
725 display_edituser(NULL, 0);
733 WebcitAddUrlHandler(HKEY("select_user_to_edit"), "", 0, _select_user_to_edit, 0);
734 WebcitAddUrlHandler(HKEY("display_edituser"), "", 0, _display_edituser, 0);
735 WebcitAddUrlHandler(HKEY("edituser"), "", 0, edituser, 0);
736 WebcitAddUrlHandler(HKEY("create_user"), "", 0, create_user, 0);
738 RegisterNamespace("USERLIST:USERNAME", 0, 1, tmplput_USERLIST_UserName, NULL, CTX_USERLIST);
739 RegisterNamespace("USERLIST:PASSWD", 0, 1, tmplput_USERLIST_Password, NULL, CTX_USERLIST);
740 RegisterNamespace("USERLIST:ACCLVLNO", 0, 0, tmplput_USERLIST_AccessLevelNo, NULL, CTX_USERLIST);
741 RegisterNamespace("USERLIST:ACCLVLSTR", 0, 0, tmplput_USERLIST_AccessLevelStr, NULL, CTX_USERLIST);
742 RegisterNamespace("USERLIST:UID", 0, 0, tmplput_USERLIST_UID, NULL, CTX_USERLIST);
743 RegisterNamespace("USERLIST:LASTLOGON:STR", 0, 0, tmplput_USERLIST_LastLogonStr, NULL, CTX_USERLIST);
744 RegisterNamespace("USERLIST:LASTLOGON:NO", 0, 0, tmplput_USERLIST_LastLogonNo, NULL, CTX_USERLIST);
745 RegisterNamespace("USERLIST:NLOGONS", 0, 0, tmplput_USERLIST_nLogons, NULL, CTX_USERLIST);
746 RegisterNamespace("USERLIST:NPOSTS", 0, 0, tmplput_USERLIST_nPosts, NULL, CTX_USERLIST);
748 RegisterNamespace("USERLIST:FLAGS", 0, 0, tmplput_USERLIST_Flags, NULL, CTX_USERLIST);
749 RegisterNamespace("USERLIST:DAYSTILLPURGE", 0, 0, tmplput_USERLIST_DaysTillPurge, NULL, CTX_USERLIST);
751 RegisterConditional(HKEY("COND:USERNAME"), 0, ConditionalUser, CTX_USERLIST);
752 RegisterConditional(HKEY("COND:USERACCESS"), 0, ConditionalUserAccess, CTX_USERLIST);
753 RegisterConditional(HKEY("COND:USERLIST:FLAG:USE_INTERNET"), 0, ConditionalFlagINetEmail, CTX_USERLIST);
755 RegisterIterator("USERLIST", 0, NULL, iterate_load_userlist, NULL, DeleteHash, CTX_USERLIST, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
759 RegisterSortFunc(HKEY("user:name"),
762 CompareUserListNameRev,
763 GroupchangeUserListName,
765 RegisterSortFunc(HKEY("user:accslvl"),
768 CompareAccessLevelRev,
769 GroupchangeAccessLevel,
772 RegisterSortFunc(HKEY("user:nlogons"),
779 RegisterSortFunc(HKEY("user:uid"),
786 RegisterSortFunc(HKEY("user:lastlogon"),
790 GroupchangeLastLogon,
793 RegisterSortFunc(HKEY("user:nmsgposts"),
800 REGISTERTokenParamDefine(AxDeleted);
801 REGISTERTokenParamDefine(AxNewU);
802 REGISTERTokenParamDefine(AxProbU);
803 REGISTERTokenParamDefine(AxLocU);
804 REGISTERTokenParamDefine(AxNetU);
805 REGISTERTokenParamDefine(AxPrefU);
806 REGISTERTokenParamDefine(AxAideU);