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 *message, const char *preselect)
16 output_headers(1, 0, 0, 0, 1, 0);
17 do_template("edituser_select", NULL);
22 typedef struct _UserListEntry {
31 /* Just available for Single users to view: */
37 UserListEntry* NewUserListOneEntry(StrBuf *SerializedUser)
41 if (StrLength(SerializedUser) < 8)
44 ul = (UserListEntry*) malloc(sizeof(UserListEntry));
45 ul->UserName = NewStrBuf();
46 ul->Passvoid = NewStrBuf();
48 StrBufExtract_token(ul->UserName, SerializedUser, 0, '|');
49 StrBufExtract_token(ul->Passvoid, SerializedUser, 1, '|');
50 ul->Flags = (unsigned int)StrBufExtract_long(SerializedUser, 2, '|');
51 ul->nLogons = StrBufExtract_int(SerializedUser, 3, '|');
52 ul->nPosts = StrBufExtract_int(SerializedUser, 4, '|');
53 ul->AccessLevel = StrBufExtract_int(SerializedUser, 5, '|');
54 ul->UID = StrBufExtract_int(SerializedUser, 6, '|');
55 ul->LastLogonT = StrBufExtract_long(SerializedUser, 7, '|');
56 ul->DaysTillPurge = StrBufExtract_int(SerializedUser, 8, '|');
60 void DeleteUserListEntry(void *vUserList)
62 UserListEntry *ul = (UserListEntry*) vUserList;
64 FreeStrBuf(&ul->UserName);
65 FreeStrBuf(&ul->Passvoid);
69 UserListEntry* NewUserListEntry(StrBuf *SerializedUserList)
73 if (StrLength(SerializedUserList) < 8)
76 ul = (UserListEntry*) malloc(sizeof(UserListEntry));
77 ul->UserName = NewStrBuf();
78 ul->Passvoid = NewStrBuf();
80 StrBufExtract_token(ul->UserName, SerializedUserList, 0, '|');
81 ul->AccessLevel = StrBufExtract_int(SerializedUserList, 1, '|');
82 ul->UID = StrBufExtract_int(SerializedUserList, 2, '|');
83 ul->LastLogonT = StrBufExtract_long(SerializedUserList, 3, '|');
84 ul->nLogons = StrBufExtract_int(SerializedUserList, 4, '|');
85 ul->nPosts = StrBufExtract_int(SerializedUserList, 5, '|');
86 StrBufExtract_token(ul->Passvoid, SerializedUserList, 6, '|');
88 ul->DaysTillPurge = -1;
95 int CompareUserListName(const void *vUser1, const void *vUser2)
97 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
98 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
100 return strcmp(ChrPtr(u1->UserName), ChrPtr(u2->UserName));
102 int CompareUserListNameRev(const void *vUser1, const void *vUser2)
104 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
105 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
106 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 AccessLevel
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);
125 int CompareAccessLevelRev(const void *vUser1, const void *vUser2)
127 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
128 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
130 return (u2->AccessLevel > u1->AccessLevel);
132 int GroupchangeAccessLevel(const void *vUser1, const void *vUser2)
134 UserListEntry *u1 = (UserListEntry*) vUser1;
135 UserListEntry *u2 = (UserListEntry*) vUser2;
137 return u2->AccessLevel != u1->AccessLevel;
144 int CompareUID(const void *vUser1, const void *vUser2)
146 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
147 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
149 return (u1->UID > u2->UID);
151 int CompareUIDRev(const void *vUser1, const void *vUser2)
153 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
154 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
156 return (u2->UID > u1->UID);
158 int GroupchangeUID(const void *vUser1, const void *vUser2)
160 UserListEntry *u1 = (UserListEntry*) vUser1;
161 UserListEntry *u2 = (UserListEntry*) vUser2;
163 return (u2->UID / 10) != (u1->UID / 10);
167 * Sort By Date /// TODO!
169 int CompareLastLogon(const void *vUser1, const void *vUser2)
171 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
172 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
174 return (u1->LastLogonT > u2->LastLogonT);
176 int CompareLastLogonRev(const void *vUser1, const void *vUser2)
178 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
179 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
181 return (u2->LastLogonT > u1->LastLogonT);
183 int GroupchangeLastLogon(const void *vUser1, const void *vUser2)
185 UserListEntry *u1 = (UserListEntry*) vUser1;
186 UserListEntry *u2 = (UserListEntry*) vUser2;
188 return (u2->LastLogonT != u1->LastLogonT);
192 * Sort By Number of Logons
194 int ComparenLogons(const void *vUser1, const void *vUser2)
196 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
197 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
199 return (u1->nLogons > u2->nLogons);
201 int ComparenLogonsRev(const void *vUser1, const void *vUser2)
203 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
204 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
206 return (u2->nLogons > u1->nLogons);
208 int GroupchangenLogons(const void *vUser1, const void *vUser2)
210 UserListEntry *u1 = (UserListEntry*) vUser1;
211 UserListEntry *u2 = (UserListEntry*) vUser2;
213 return (u2->nLogons / 100) != (u1->nLogons / 100);
217 * Sort By Number of Posts
219 int ComparenPosts(const void *vUser1, const void *vUser2)
221 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
222 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
224 return (u1->nPosts > u2->nPosts);
226 int ComparenPostsRev(const void *vUser1, const void *vUser2)
228 UserListEntry *u1 = (UserListEntry*) GetSearchPayload(vUser1);
229 UserListEntry *u2 = (UserListEntry*) GetSearchPayload(vUser2);
231 return (u2->nPosts > u1->nPosts);
233 int GroupchangenPosts(const void *vUser1, const void *vUser2)
235 UserListEntry *u1 = (UserListEntry*) vUser1;
236 UserListEntry *u2 = (UserListEntry*) vUser2;
238 return (u2->nPosts / 100) != (u1->nPosts / 100);
242 HashList *iterate_load_userlist(StrBuf *Target, WCTemplputParams *TP)
252 WCTemplputParams SubTP;
254 memset(&SubTP, 0, sizeof(WCTemplputParams));
257 StrBuf_ServGetlnBuffered(Buf);
258 if (GetServerStatus(Buf, NULL) == 1) {
259 Hash = NewHash(1, NULL);
262 len = StrBuf_ServGetlnBuffered(Buf);
264 (strcmp(ChrPtr(Buf), "000")==0)) {
268 ul = NewUserListEntry(Buf);
271 nUsed = GetCount(Hash);
272 nUsed = snprintf(nnn, sizeof(nnn), "%d", nUsed+1);
273 Put(Hash, nnn, nUsed, ul, DeleteUserListEntry);
275 SubTP.Filter.ContextType = CTX_USERLIST;
276 SortIt = RetrieveSort(&SubTP, HKEY("USER"), HKEY("user:uid"), 0);
278 SortByPayload(Hash, SortIt);
280 SortByPayload(Hash, CompareUID);
288 void tmplput_USERLIST_UserName(StrBuf *Target, WCTemplputParams *TP)
290 UserListEntry *ul = (UserListEntry*) CTX;
291 StrBufAppendTemplate(Target, TP, ul->UserName, 0);
294 void tmplput_USERLIST_Password(StrBuf *Target, WCTemplputParams *TP)
296 UserListEntry *ul = (UserListEntry*) CTX;
297 StrBufAppendTemplate(Target, TP, ul->Passvoid, 0);
300 void tmplput_USERLIST_AccessLevelNo(StrBuf *Target, WCTemplputParams *TP)
302 UserListEntry *ul = (UserListEntry*) CTX;
304 StrBufAppendPrintf(Target, "%d", ul->AccessLevel, 0);
307 void tmplput_USERLIST_AccessLevelStr(StrBuf *Target, WCTemplputParams *TP)
309 UserListEntry *ul = (UserListEntry*) CTX;
311 StrBufAppendBufPlain(Target, _(axdefs[ul->AccessLevel]), -1, 0);
314 void tmplput_USERLIST_UID(StrBuf *Target, WCTemplputParams *TP)
316 UserListEntry *ul = (UserListEntry*) CTX;
318 StrBufAppendPrintf(Target, "%d", ul->UID, 0);
321 void tmplput_USERLIST_LastLogonNo(StrBuf *Target, WCTemplputParams *TP)
323 UserListEntry *ul = (UserListEntry*) CTX;
325 StrBufAppendPrintf(Target,"%ld", ul->LastLogonT, 0);
327 void tmplput_USERLIST_LastLogonStr(StrBuf *Target, WCTemplputParams *TP)
329 UserListEntry *ul = (UserListEntry*) CTX;
330 StrEscAppend(Target, NULL, asctime(localtime(&ul->LastLogonT)), 0, 0);
333 void tmplput_USERLIST_nLogons(StrBuf *Target, WCTemplputParams *TP)
335 UserListEntry *ul = (UserListEntry*) CTX;
337 StrBufAppendPrintf(Target, "%d", ul->nLogons, 0);
340 void tmplput_USERLIST_nPosts(StrBuf *Target, WCTemplputParams *TP)
342 UserListEntry *ul = (UserListEntry*) CTX;
344 StrBufAppendPrintf(Target, "%d", ul->nPosts, 0);
347 void tmplput_USERLIST_Flags(StrBuf *Target, WCTemplputParams *TP)
349 UserListEntry *ul = (UserListEntry*) CTX;
351 StrBufAppendPrintf(Target, "%d", ul->Flags, 0);
354 void tmplput_USERLIST_DaysTillPurge(StrBuf *Target, WCTemplputParams *TP)
356 UserListEntry *ul = (UserListEntry*) CTX;
358 StrBufAppendPrintf(Target, "%d", ul->DaysTillPurge, 0);
361 int ConditionalUser(StrBuf *Target, WCTemplputParams *TP)
363 UserListEntry *ul = (UserListEntry*) CTX;
364 if (havebstr("usernum")) {
365 return ibstr("usernum") == ul->UID;
367 else if (havebstr("username")) {
368 return strcmp(bstr("username"), ChrPtr(ul->UserName)) == 0;
374 int ConditionalFlagINetEmail(StrBuf *Target, WCTemplputParams *TP)
376 UserListEntry *ul = (UserListEntry*) CTX;
377 return (ul->Flags & US_INTERNET) != 0;
380 int ConditionalUserAccess(StrBuf *Target, WCTemplputParams *TP)
382 UserListEntry *ul = (UserListEntry*) CTX;
384 if (TP->Tokens->Params[3]->Type == TYPE_LONG)
385 return (TP->Tokens->Params[3]->lvalue == ul->AccessLevel);
391 * Locate the message number of a user's vCard in the current room
392 * Returns the message id of his vcard
394 long locate_user_vcard_in_this_room(message_summary **VCMsg,
395 wc_mime_attachment **VCAtt)
403 message_summary *Msg;
404 wc_mime_attachment *Att;
409 long vcard_msgnum = (-1L);
410 int already_tried_creating_one = 0;
411 StrBuf *FoundCharset = NewStrBuf();
412 StrBuf *Error = NULL;
418 /** Search for the user's vCard */
419 if (load_msg_ptrs("MSGS ALL||||1", 1) > 0) {
420 at = GetNewHashPos(WCC->summ, 0);
421 while (GetNextHashPos(WCC->summ, at, &HKLen, &HashKey, &vMsg)) {
422 Msg = (message_summary*) vMsg;
423 Msg->MsgBody = (wc_mime_attachment*) malloc(sizeof(wc_mime_attachment));
424 memset(Msg->MsgBody, 0, sizeof(wc_mime_attachment));
425 Msg->MsgBody->msgnum = Msg->msgnum;
431 if (Msg->AllAttach != NULL) {
432 att = GetNewHashPos(Msg->AllAttach, 0);
433 while (GetNextHashPos(Msg->AllAttach, att, &HKLen, &HashKey, &vMsg)) {
434 Att = (wc_mime_attachment*) vMsg;
435 if ( (strcasecmp(ChrPtr(Att->ContentType), "text/x-vcard") == 0) ||
436 (strcasecmp(ChrPtr(Att->ContentType), "text/vcard") == 0) ) {
439 if (Att->Data == NULL)
444 FreeStrBuf(&Error); /*< don't care... */
449 /** If there's no vcard, create one */
450 if ((*VCMsg == NULL) && (already_tried_creating_one == 0)) {
451 already_tried_creating_one = 1;
452 serv_puts("ENT0 1|||4");
453 StrBuf_ServGetlnBuffered(Buf);
454 if (GetServerStatus(Buf, NULL) != 4) {
455 serv_puts("Content-type: text/x-vcard");
457 serv_puts("begin:vcard");
458 serv_puts("end:vcard");
464 return(vcard_msgnum);
469 * Display the form for editing a user's address book entry
470 * username the name of the user
471 * usernum the citadel-uid of the user
473 void display_edit_address_book_entry(const char *username, long usernum) {
474 message_summary *VCMsg = NULL;
475 wc_mime_attachment *VCAtt = NULL;
478 char error_message[SIZ];
479 long vcard_msgnum = (-1L);
481 /** Locate the user's config room, creating it if necessary */
483 roomname = NewStrBuf();
484 StrBufPrintf(roomname, "%010ld.%s", usernum, USERCONFIGROOM);
485 serv_printf("GOTO %s||1", ChrPtr(roomname));
486 StrBuf_ServGetlnBuffered(Buf);
487 if (GetServerStatus(Buf, NULL) != 2) {
488 serv_printf("CRE8 1|%s|5|||1|", ChrPtr(roomname));
489 StrBuf_ServGetlnBuffered(Buf);
490 GetServerStatus(Buf, NULL);
491 serv_printf("GOTO %s||1", ChrPtr(roomname));
492 StrBuf_ServGetlnBuffered(Buf);
493 if (GetServerStatus(Buf, NULL) != 2) {
494 StrBufCutLeft(Buf, 4);
495 sprintf(error_message,
496 "<img src=\"static/error.gif\" align=center>"
497 "%s<br /><br />\n", ChrPtr(Buf));
498 select_user_to_edit(error_message, username);
500 FreeStrBuf(&roomname);
506 locate_user_vcard_in_this_room(&VCMsg, &VCAtt);
509 sprintf(error_message,
510 "<img src=\"static/error.gif\" align=center>%s<br /><br />\n",
511 _("An error occurred while trying to create or edit this address book entry.")
513 select_user_to_edit(error_message, username);
514 FreeStrBuf(&roomname);
518 do_edit_vcard(vcard_msgnum, "1",
521 "select_user_to_edit",
523 FreeStrBuf(&roomname);
527 void display_edituser(const char *supplied_username, int is_new) {
530 char error_message[1024];
533 if (supplied_username != NULL) {
534 safestrncpy(username, supplied_username, sizeof username);
537 safestrncpy(username, bstr("username"), sizeof username);
541 serv_printf("AGUP %s", username);
542 StrBuf_ServGetlnBuffered(Buf);
543 if (GetServerStatus(Buf, NULL) != 2) {
544 StrBufCutLeft(Buf, 4);
545 /*TODO ImportantMessage */
546 sprintf(error_message,
547 "<img src=\"static/error.gif\" align=center>"
548 "%s<br /><br />\n", ChrPtr(Buf));
549 select_user_to_edit(error_message, username);
554 StrBufCutLeft(Buf, 4);
555 UL = NewUserListOneEntry(Buf);
556 if ((UL != NULL) && havebstr("edit_abe_button")) {
557 display_edit_address_book_entry(username, UL->UID);
559 else if ((UL != NULL) && havebstr("delete_button")) {
560 delete_user(username);
562 else if (UL != NULL) {
563 WCTemplputParams SubTP;
564 memset(&SubTP, 0, sizeof(WCTemplputParams));
565 SubTP.Filter.ContextType = CTX_USERLIST;
567 output_headers(1, 0, 0, 0, 1, 0);
568 DoTemplate(HKEY("userlist_detailview"), NULL, &SubTP);
571 DeleteUserListEntry(UL);
578 * do the backend operation of the user edit on the server
580 void edituser(void) {
583 unsigned int flags = 0;
584 const char *username;
586 is_new = ibstr("is_new");
587 safestrncpy(message, "", sizeof message);
588 username = bstr("username");
590 if (!havebstr("ok_button")) {
591 safestrncpy(message, _("Changes were not saved."), sizeof message);
594 StrBuf *Buf = NewStrBuf();
596 flags = ibstr("flags");
597 if (yesbstr("inetmail")) {
598 flags |= US_INTERNET;
601 flags &= ~US_INTERNET ;
604 if ((havebstr("newname")) && (strcasecmp(bstr("username"), bstr("newname")))) {
605 serv_printf("RENU %s|%s", bstr("username"), bstr("newname"));
606 StrBuf_ServGetlnBuffered(Buf);
607 if (GetServerStatus(Buf, NULL) == 2) {
608 StrBufCutLeft(Buf, 4);
609 sprintf(&message[strlen(message)],
610 "<img src=\"static/error.gif\" align=center>"
611 "%s<br /><br />\n", ChrPtr(Buf));
614 username = bstr("newname");
618 serv_printf("ASUP %s|%s|%d|%s|%s|%s|%s|%s|%s|",
629 StrBuf_ServGetlnBuffered(Buf);
630 if (GetServerStatus(Buf, NULL) == 2) {
631 StrBufCutLeft(Buf, 4);
632 sprintf(&message[strlen(message)],
633 "<img src=\"static/error.gif\" align=center>"
634 "%s<br /><br />\n", ChrPtr(Buf));
640 * If we are in the middle of creating a new user, move on to
641 * the vCard edit screen.
644 display_edit_address_book_entry(username, lbstr("usernum") );
647 select_user_to_edit(message, username);
653 * username the name of the user to remove
655 void delete_user(char *username) {
660 serv_printf("ASUP %s|0|0|0|0|0|", username);
661 StrBuf_ServGetlnBuffered(Buf);
662 if (GetServerStatus(Buf, NULL) == 2) {
663 StrBufCutLeft(Buf, 4);
665 "<img src=\"static/error.gif\" align=center>"
666 "%s<br /><br />\n", ChrPtr(Buf));
669 safestrncpy(message, "", sizeof message);
671 select_user_to_edit(message, bstr("username"));
679 * take the web environment username and create it on the citadel server
681 void create_user(void) {
684 char error_message[SIZ];
685 const char *username;
688 username = bstr("username");
689 serv_printf("CREU %s", username);
690 StrBuf_ServGetlnBuffered(Buf);
691 if (GetServerStatus(Buf, &FullState) == 2) {
692 sprintf(WC->ImportantMessage, _("A new user has been created."));
693 display_edituser(username, 1);
695 else if (FullState == 570) {
696 sprintf(error_message,
697 "<img src=\"static/error.gif\" align=center>"
699 _("You are attempting to create a new user from within Citadel "
700 "while running in host based authentication mode. In this mode, "
701 "you must create new users on the host system, not within Citadel.")
703 select_user_to_edit(error_message, NULL);
706 StrBufCutLeft(Buf, 4);
707 sprintf(error_message,
708 "<img src=\"static/error.gif\" align=center>"
709 "%s<br /><br />\n", ChrPtr(Buf));
710 select_user_to_edit(error_message, NULL);
716 void _select_user_to_edit(void){select_user_to_edit(NULL, NULL);}
717 void _display_edituser(void) {display_edituser(NULL, 0);}
723 WebcitAddUrlHandler(HKEY("select_user_to_edit"), _select_user_to_edit, 0);
724 WebcitAddUrlHandler(HKEY("display_edituser"), _display_edituser, 0);
725 WebcitAddUrlHandler(HKEY("edituser"), edituser, 0);
726 WebcitAddUrlHandler(HKEY("create_user"), create_user, 0);
728 RegisterNamespace("USERLIST:USERNAME", 0, 1, tmplput_USERLIST_UserName, CTX_USERLIST);
729 RegisterNamespace("USERLIST:PASSWD", 0, 1, tmplput_USERLIST_Password, CTX_USERLIST);
730 RegisterNamespace("USERLIST:ACCLVLNO", 0, 0, tmplput_USERLIST_AccessLevelNo, CTX_USERLIST);
731 RegisterNamespace("USERLIST:ACCLVLSTR", 0, 0, tmplput_USERLIST_AccessLevelStr, CTX_USERLIST);
732 RegisterNamespace("USERLIST:UID", 0, 0, tmplput_USERLIST_UID, CTX_USERLIST);
733 RegisterNamespace("USERLIST:LASTLOGON:STR", 0, 0, tmplput_USERLIST_LastLogonStr, CTX_USERLIST);
734 RegisterNamespace("USERLIST:LASTLOGON:NO", 0, 0, tmplput_USERLIST_LastLogonNo, CTX_USERLIST);
735 RegisterNamespace("USERLIST:NLOGONS", 0, 0, tmplput_USERLIST_nLogons, CTX_USERLIST);
736 RegisterNamespace("USERLIST:NPOSTS", 0, 0, tmplput_USERLIST_nPosts, CTX_USERLIST);
738 RegisterNamespace("USERLIST:FLAGS", 0, 0, tmplput_USERLIST_Flags, CTX_USERLIST);
739 RegisterNamespace("USERLIST:DAYSTILLPURGE", 0, 0, tmplput_USERLIST_DaysTillPurge, CTX_USERLIST);
741 RegisterConditional(HKEY("COND:USERNAME"), 0, ConditionalUser, CTX_USERLIST);
742 RegisterConditional(HKEY("COND:USERACCESS"), 0, ConditionalUserAccess, CTX_USERLIST);
743 RegisterConditional(HKEY("COND:USERLIST:FLAG:USE_INTERNET"), 0, ConditionalFlagINetEmail, CTX_USERLIST);
745 RegisterIterator("USERLIST", 0, NULL, iterate_load_userlist, NULL, DeleteHash, CTX_USERLIST, CTX_NONE, IT_FLAG_DETECT_GROUPCHANGE);
749 RegisterSortFunc(HKEY("user:name"),
752 CompareUserListNameRev,
753 GroupchangeUserListName,
755 RegisterSortFunc(HKEY("user:accslvl"),
758 CompareAccessLevelRev,
759 GroupchangeAccessLevel,
762 RegisterSortFunc(HKEY("user:nlogons"),
769 RegisterSortFunc(HKEY("user:uid"),
776 RegisterSortFunc(HKEY("user:lastlogon"),
780 GroupchangeLastLogon,
783 RegisterSortFunc(HKEY("user:nmsgposts"),