summaryrefslogtreecommitdiff
path: root/imap4d/unsubscribe.c
blob: 12fcffb5e2b5786ce27163cf4b7e118f4d185707 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
/* GNU mailutils - a suite of utilities for electronic mail
   Copyright (C) 1999, 2001 Free Software Foundation, Inc.

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2, or (at your option)
   any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */

#include "imap4d.h"

/*
 *
 */

int
imap4d_unsubscribe (struct imap4d_command *command, char *arg)
{
  char *sp = NULL;
  char *name;
  char *file;
  FILE *fp;

  name = util_getword (arg, &sp);
  util_unquote (&name);
  if (!name || *name == '\0')
    return util_finish (command, RESP_BAD, "Too few arguments");

  asprintf (&file, "%s/.mailboxlist", homedir);
  fp = fopen (file, "r");
  free (file);
  if (fp)
    {
      char buffer[124];
      int found = 0;
      while (fgets (buffer, sizeof (buffer), fp))
	{
	  size_t n = strlen (buffer);
	  if (n && buffer[n - 1] == '\n')
	    buffer[n - 1] = '\0';
	  if (strcmp (buffer, name) == 0)
	    {
	      found = 1;
	      break;
	    }
	}
      if (found)
	{
	  FILE *fp2;
	  asprintf (&file, "%s/.mailboxlist.%d", homedir, getpid ());
	  fp2 = fopen (file, "a");
	  if (fp2)
	    {
	      rewind (fp);
	      while (fgets (buffer, sizeof (buffer), fp))
		{
		  size_t n = strlen (buffer);
		  if (n && buffer[n - 1] == '\n')
		    buffer[n - 1] = '\0';
		  if (strcmp (buffer, name) == 0)
		    continue;
		  fputs (buffer, fp2);
		  fputs ("\n", fp2);
		}
	      fclose (fp2);
	      remove (file);
	    }
	  free (file);
	}
      else
	{
	  fclose (fp);
	  return util_finish (command, RESP_NO, "Can not unsubscribe");
	}
      fclose (fp);
    }
  else
    return util_finish (command, RESP_NO, "Can not unsubscribe");
  return util_finish (command, RESP_OK, "Completed");
}

Return to:

Send suggestions and report system problems to the System administrator.