citadel/modules/bio/serv_bio.c

   1 /*
   2  * $Id$
   3  *
   4  * This module implementsserver commands related to the display and
   5  * manipulation of user "bio" files.
   6  *
   7  *
   8  * Copyright (c) 1987-2009 by the citadel.org team
   9  *
  10  *  This program is free software; you can redistribute it and/or modify
  11  *  it under the terms of the GNU General Public License as published by
  12  *  the Free Software Foundation; either version 3 of the License, or
  13  *  (at your option) any later version.
  14  *
  15  *  This program is distributed in the hope that it will be useful,
  16  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  *  GNU General Public License for more details.
  19  *
  20  *  You should have received a copy of the GNU General Public License
  21  *  along with this program; if not, write to the Free Software
  22  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  23  */
  24
  25 #include "sysdep.h"
  26 #include <stdlib.h>
  27 #include <unistd.h>
  28 #include <stdio.h>
  29 #include <fcntl.h>
  30 #include <signal.h>
  31 #include <pwd.h>
  32 #include <errno.h>
  33 #include <sys/types.h>
  34
  35 #if TIME_WITH_SYS_TIME
  36 # include <sys/time.h>
  37 # include <time.h>
  38 #else
  39 # if HAVE_SYS_TIME_H
  40 #  include <sys/time.h>
  41 # else
  42 #  include <time.h>
  43 # endif
  44 #endif
  45
  46 #include <sys/wait.h>
  47 #include <string.h>
  48 #include <limits.h>
  49 #include <libcitadel.h>
  50 #include "citadel.h"
  51 #include "server.h"
  52 #include "citserver.h"
  53 #include "support.h"
  54 #include "config.h"
  55 #include "control.h"
  56 #include "room_ops.h"
  57 #include "user_ops.h"
  58 #include "policy.h"
  59 #include "database.h"
  60 #include "msgbase.h"
  61 #include "citadel_dirs.h"
  62
  63 #include "ctdl_module.h"
  64
  65 /*
  66  * enter user bio
  67  */
  68 void cmd_ebio(char *cmdbuf) {
  69         char buf[SIZ];
  70         FILE *fp;
  71
  72         unbuffer_output();
  73
  74         if (!(CC->logged_in)) {
  75                 cprintf("%d Not logged in.\n",ERROR + NOT_LOGGED_IN);
  76                 return;
  77         }
  78
  79         snprintf(buf, sizeof buf, "%s%ld",ctdl_bio_dir,CC->user.usernum);
  80         fp = fopen(buf,"w");
  81         if (fp == NULL) {
  82                 cprintf("%d Cannot create file: %s\n", ERROR + INTERNAL_ERROR,
  83                                 strerror(errno));
  84                 return;
  85         }
  86         cprintf("%d  \n",SEND_LISTING);
  87         while(client_getln(buf, sizeof buf) >= 0 && strcmp(buf,"000")) {
  88                 if (ftell(fp) < config.c_maxmsglen) {
  89                         fprintf(fp,"%s\n",buf);
  90                 }
  91         }
  92         fclose(fp);
  93 }
  94
  95 /*
  96  * read user bio
  97  */
  98 void cmd_rbio(char *cmdbuf)
  99 {
 100         struct ctdluser ruser;
 101         char buf[256];
 102         FILE *fp;
 103
 104         extract_token(buf, cmdbuf, 0, '|', sizeof buf);
 105         if (getuser(&ruser, buf) != 0) {
 106                 cprintf("%d No such user.\n",ERROR + NO_SUCH_USER);
 107                 return;
 108         }
 109         snprintf(buf, sizeof buf, "%s%ld",ctdl_bio_dir,ruser.usernum);
 110
 111         cprintf("%d OK|%s|%ld|%d|%ld|%ld|%ld\n", LISTING_FOLLOWS,
 112                 ruser.fullname, ruser.usernum, ruser.axlevel,
 113                 (long)ruser.lastcall, ruser.timescalled, ruser.posted);
 114         fp = fopen(buf,"r");
 115         if (fp == NULL)
 116                 cprintf("%s has no bio on file.\n", ruser.fullname);
 117         else {
 118                 while (fgets(buf, sizeof buf, fp) != NULL) cprintf("%s",buf);
 119                 fclose(fp);
 120         }
 121         cprintf("000\n");
 122 }
 123
 124 /*
 125  * list of users who have entered bios
 126  */
 127 void cmd_lbio(char *cmdbuf) {
 128         char buf[256];
 129         FILE *ls;
 130         struct ctdluser usbuf;
 131         char listbios[256];
 132
 133         snprintf(listbios, sizeof(listbios),"cd %s; ls",ctdl_bio_dir);
 134         ls = popen(listbios, "r");
 135         if (ls == NULL) {
 136                 cprintf("%d Cannot open listing.\n", ERROR + FILE_NOT_FOUND);
 137                 return;
 138         }
 139
 140         cprintf("%d\n", LISTING_FOLLOWS);
 141         while (fgets(buf, sizeof buf, ls)!=NULL)
 142                 if (getuserbynumber(&usbuf,atol(buf))==0)
 143                         cprintf("%s\n", usbuf.fullname);
 144         pclose(ls);
 145         cprintf("000\n");
 146 }
 147
 148
 149
 150
 151 CTDL_MODULE_INIT(bio)
 152 {
 153         if (!threading)
 154         {
 155                 CtdlRegisterProtoHook(cmd_ebio, "EBIO", "Enter your bio");
 156                 CtdlRegisterProtoHook(cmd_rbio, "RBIO", "Read a user's bio");
 157                 CtdlRegisterProtoHook(cmd_lbio, "LBIO", "List users with bios");
 158         }
 159         /* return our Subversion id for the Log */
 160         return "$Id$";
 161 }
 162
 163