apps/im/src/user.c

   1 /*
   2  *  ZeX/OS
   3  *  Copyright (C) 2008  Tomas 'ZeXx86' Jedrzejek (zexx86@zexos.org)
   4  *
   5  *  This program is free software: you can redistribute it and/or modify
   6  *  it under the terms of the GNU General Public License as published by
   7  *  the Free Software Foundation, either version 3 of the License, or
   8  *  (at your option) any later version.
   9  *
  10  *  This program is distributed in the hope that it will be useful,
  11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  *  GNU General Public License for more details.
  14  *
  15  *  You should have received a copy of the GNU General Public License
  16  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17  */
  18
  19
  20 #include "config.h"
  21 #include "proto.h"
  22 #include "user.h"
  23
  24 #include <stdio.h>
  25 #include <string.h>
  26 #include <stdlib.h>
  27
  28 static user_t user_list;
  29 static user_t *talkto;
  30
  31
  32 int user_list_add (char *id)
  33 {
  34         /* alloc and init context */
  35         user_t *user = (user_t *) malloc (sizeof (user_t));
  36
  37         if (!user)
  38                 return 0;
  39
  40         user->id = strdup (id);
  41
  42         /* add into list */
  43         user->next = &user_list;
  44         user->prev = user_list.prev;
  45         user->prev->next = user;
  46         user->next->prev = user;
  47
  48         return 1;
  49 }
  50
  51 static int strnchrn (char *str, unsigned len)
  52 {
  53         unsigned l = 0;
  54
  55         while (l < len) {
  56                 if (str[l] == '\n') {
  57                         str[l] = '\0';
  58
  59                         return l;
  60                 }
  61
  62                 l ++;
  63         }
  64
  65         return 0;
  66 }
  67
  68 int user_list_get (char *data, unsigned len)
  69 {
  70         unsigned l = 0;
  71
  72         while (l < len) {
  73                 unsigned i = strnchrn (data+l, len-l);
  74
  75                 if (!i)
  76                         break;
  77
  78                 if (!strcmp (data+l, "THEY:"))
  79                         break;
  80
  81                 printf ("user_list_add: %s\n", data+l);
  82                 if (!user_list_add (data+l))
  83                         return 0;
  84
  85                 l += (i + 1);
  86         }
  87
  88         return 1;
  89 }
  90
  91 user_t *user_list_find (char *target, unsigned len)
  92 {
  93         user_t *c;
  94
  95         for (c = user_list.next; c != &user_list; c = c->next) {
  96                 if (!strncmp (c->id, target, len))
  97                         return c;
  98         }
  99
 100         return 0;
 101 }
 102
 103 int user_list_del (char *id)
 104 {
 105         user_t *user = user_list_find (id, strlen (id));
 106
 107         if (!user)
 108                 return 0;
 109
 110         user->next->prev = user->prev;
 111         user->prev->next = user->next;
 112
 113         free (user->id);
 114         user->len = 0;
 115
 116         free (user);
 117
 118         return 1;
 119 }
 120
 121 int user_list_show ()
 122 {
 123         printf ("Contact list:\n");
 124
 125         user_t *c;
 126
 127         for (c = user_list.next; c != &user_list; c = c->next) {
 128                 if (c == user_list.next)
 129                         printf ("%s", c->id);
 130                 else
 131                         printf (", %s", c->id);
 132         }
 133
 134         printf ("\n");
 135
 136         return 1;
 137 }
 138
 139 int user_cmd_talkto (char *target, unsigned len)
 140 {
 141         user_t *c = user_list_find (target, len);
 142
 143         if (!c)
 144                 return 0;
 145
 146         talkto = c;
 147
 148         return 1;
 149 }
 150
 151 static int strnchrr (char *str, unsigned len)
 152 {
 153         unsigned l = 0;
 154
 155         while (l < len) {
 156                 if (str[l] == ' ') {
 157                         str[l] = '\0';
 158
 159                         return l;
 160                 }
 161
 162                 l ++;
 163         }
 164
 165         return 0;
 166 }
 167
 168 /* Some user announce us about new status */
 169 int user_statusincoming (char *str, unsigned len)
 170 {
 171         printf ("status: %s\n", str);
 172         int l = strnchrr (str, len);
 173
 174         if (!l)
 175                 return 0;
 176
 177         int nick_len = strlen (str);
 178
 179         if (!nick_len)
 180                 return 0;
 181
 182         user_t *user = user_list_find (str, nick_len);
 183
 184         if (!user) {
 185                 printf ("WARNING -> Incoming status (%s) ID (%s) not agree with contact list items\n", str+nick_len+1, str);
 186
 187                 return 0;
 188         }
 189
 190         if (!strncmp (user->id, cfg->nick, strlen (cfg->nick)))
 191                 printf ("* Your status is changed to: %s\n", str+nick_len+1);
 192         else
 193                 printf ("* User %s change status to: %s\n", user->id, str+nick_len+1);
 194
 195         return 1;
 196 }
 197
 198 /* Some user send to us new message, let's print it to screen */
 199 int user_msgincoming (char *str, unsigned len)
 200 {
 201         int l = strnchrr (str, len);
 202
 203         if (!l)
 204                 return 0;
 205
 206         int nick_len = strlen (str);
 207
 208         if (!nick_len)
 209                 return 0;
 210         else {
 211               nick_len --;
 212               str[nick_len] = '\0';
 213         }
 214
 215         user_t *user = user_list_find (str, nick_len);
 216
 217         if (!user) {
 218                 printf ("WARNING -> Unauthorized message from ID (%s): %s\n", str, str+nick_len+2);
 219
 220                 return 0;
 221         }
 222
 223         if (!talkto) {
 224                 talkto = user;
 225
 226                 printf ("Autoswitched to user %s\n> %s: %s\n", user->id, user->id, str+nick_len+2);
 227         } else {
 228                 if (talkto == user)
 229                         printf ("> %s\n", str+nick_len+2);
 230                 else
 231                         printf ("> %s: %s\n", user->id, str+nick_len+2);
 232         }
 233
 234         return 1;
 235 }
 236
 237 int user_islogged ()
 238 {
 239         if (!cfg->autolog) {
 240                 printf ("ERROR -> Please login first, use /h for help\n");
 241
 242                 return 0;
 243         }
 244
 245         return 1;
 246 }
 247
 248 int user_msgparse (char *str, unsigned len)
 249 {
 250         /* direct message */
 251         if (str[0] != '/') {
 252                 if (talkto)
 253                         return proto_msg (talkto->id, str, len);
 254                 else {
 255                         printf ("WARNING -> No user is selected for conversation\nPlease type: /t <user@server>\n");
 256
 257                         return 0;
 258                 }
 259
 260                 return 1;
 261         }
 262
 263         /* user commands */
 264
 265
 266         if (str[1] == 'm') {    /* message */
 267                 if (!user_islogged ())
 268                         return 0;
 269
 270                 int l = strnchrr (str+3, len-3);
 271
 272                 if (!l) {
 273                         printf ("WARNING -> wrong message syntax\nSYNTAX: /m <nick@server> <message>\n");
 274
 275                         return 0;
 276                 }
 277
 278                 int nick_len = strlen (str+3);
 279
 280                 if (!nick_len)
 281                         return 0;
 282
 283                 user_t *user = user_list_find (str+3, nick_len);
 284
 285                 if (!user) {
 286                         printf ("WARNING -> this ID not agree with contact list items\n");
 287
 288                         return 0;
 289                 }
 290
 291                 return proto_msg (user->id, str+4+nick_len, len-4-nick_len);
 292         } else if (str[1] == 'c') {     /* contact list */
 293                 if (!user_islogged ())
 294                         return 0;
 295
 296                 return user_list_show ();
 297         } else if (str[1] == 't') {     /* select user to talk */
 298                 if (!user_islogged ())
 299                         return 0;
 300
 301                 if (user_cmd_talkto (str+3, len-3))
 302                         printf ("Selected user: %s\n", str+3);
 303                 else
 304                         printf ("WARNING -> this ID (%s) not agree with contact list items\n", str+3);
 305
 306                 return 1;
 307         } else if (str[1] == 's') {     /* change your status */
 308                 if (!user_islogged ())
 309                         return 0;
 310
 311                 if (proto_status (str+3, len-3))
 312                         printf ("* Status is: %s\n", str+3);
 313
 314                 return 1;
 315         } else if (str[1] == 'a') {     /* add new user to contact list */
 316                 if (!user_islogged ())
 317                         return 0;
 318
 319                 if (!proto_add (str+3))
 320                         return 0;
 321
 322                 if (!user_list_add (str+3))
 323                         return 0;
 324
 325                 printf ("+ ID %s added to contact list\n", str+3);
 326
 327                 return 1;
 328         } else if (str[1] == 'd') {     /* delete user from contact list */
 329                 if (!user_islogged ())
 330                         return 0;
 331
 332                 if (!user_list_del (str+3))
 333                         return 0;
 334
 335                 if (!proto_del (str+3))
 336                         return 0;
 337
 338                 printf ("- ID %s deleted from contact list\n", str+3);
 339
 340                 return 1;
 341         } else if (str[1] == 'r') {     /* register new account on server */
 342                 int l = strnchrr (str+3, len-3);
 343
 344                 if (!l) {
 345                         printf ("WARNING -> wrong register syntax\nSYNTAX: /r <nick> <password>\n");
 346
 347                         return 0;
 348                 }
 349
 350                 int nick_len = strlen (str+3);
 351
 352                 if (!nick_len)
 353                         return 0;
 354
 355                 if (!proto_register (str+3, str+4+nick_len))
 356                         return 0;
 357
 358                 printf ("! Registration request for ID (%s) was send\n", str+3);
 359
 360                 return 1;
 361         } else if (str[1] == 'l') {     /* login to your account */
 362                 /*if (cfg->autolog) {
 363                         printf ("ERROR -> You are already logged in\n");
 364
 365                         return 0;
 366                 }*/
 367
 368                 int l = strnchrr (str+3, len-3);
 369
 370                 if (!l) {
 371                         printf ("WARNING -> wrong register syntax\nSYNTAX: /l <nick> <password>\n");
 372
 373                         return 0;
 374                 }
 375
 376                 int nick_len = strlen (str+3);
 377
 378                 if (!nick_len)
 379                         return 0;
 380
 381                 if (!proto_login (str+3, str+4+nick_len))
 382                         return 0;
 383
 384                 cfg->autolog = 1;
 385
 386                 return proto_list ();;
 387         } else if (str[1] == 'h') {     /* show help */
 388                 printf ("Command list:\n/m <nick@server> <message>\twrite message to your buddy\n"
 389                         "/c\t\t\t\tdisplay contact list\n"
 390                         "/t <nick@server>\t\tselect user for conversation window\n"
 391                         "/s <status>\t\t\tchange your status\n"
 392                         "/a <nick@server>\t\tadd new user to contact list\n"
 393                         "/d <nick@server>\t\tdelete user from contact list\n"
 394                         "/r <nick> <password>\t\tregister new account on server\n"
 395                         "/l <nick> <password>\t\tlogin to your account\n"
 396                         "/h\t\t\t\tshow this help\n");
 397
 398                 return 1;
 399         }
 400
 401         printf ("WARNING -> command '%s' is invalid, try /h for help\n", str);
 402
 403         return 1;
 404 }
 405
 406 int user_error (char *str, unsigned len)
 407 {
 408         printf ("ERROR -> %s\n", str);
 409
 410         return 1;
 411 }
 412
 413 int user_info (char *str, unsigned len)
 414 {
 415         if (!strncmp (str, "msg send", len))
 416                 return 0;
 417
 418         printf ("INFO -> %s\n", str);
 419
 420         return 1;
 421 }
 422
 423 int init_user ()
 424 {
 425         user_list.next = &user_list;
 426         user_list.prev = &user_list;
 427
 428         talkto = 0;
 429
 430         return 1;
 431 }