Merge of Andrew's changes in 2.2.
[nivanova/samba-autobuild/.git] / source3 / smbd / message.c
1 /* 
2    Unix SMB/Netbios implementation.
3    Version 1.9.
4    SMB messaging
5    Copyright (C) Andrew Tridgell 1992-1998
6    
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11    
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16    
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21 /*
22    This file handles the messaging system calls for winpopup style
23    messages
24 */
25
26
27 #include "includes.h"
28
29 /* look in server.c for some explanation of these variables */
30 extern int DEBUGLEVEL;
31
32
33 static char msgbuf[1600];
34 static int msgpos;
35 static fstring msgfrom;
36 static fstring msgto;
37
38 /****************************************************************************
39 deliver the message
40 ****************************************************************************/
41 static void msg_deliver(void)
42 {
43   pstring name;
44   int i;
45   int fd;
46
47   if (! (*lp_msg_command()))
48     {
49       DEBUG(1,("no messaging command specified\n"));
50       msgpos = 0;
51       return;
52     }
53
54   /* put it in a temporary file */
55   slprintf(name,sizeof(name)-1, "%s/msg.XXXXXX",tmpdir());
56   fd = smb_mkstemp(name);
57
58   if (fd == -1) {
59     DEBUG(1,("can't open message file %s\n",name));
60     return;
61   }
62
63   /*
64    * Incoming message is in DOS codepage format. Convert to UNIX in
65    * place.
66    */
67
68   if(msgpos > 0) {
69     msgbuf[msgpos] = '\0'; /* Ensure null terminated. */
70     dos_to_unix(msgbuf,True);
71   }
72
73   for (i=0;i<msgpos;) {
74     if (msgbuf[i]=='\r' && i<(msgpos-1) && msgbuf[i+1]=='\n') {
75       i++; continue;      
76     }
77     write(fd,&msgbuf[i++],1);
78   }
79   close(fd);
80
81
82   /* run the command */
83   if (*lp_msg_command())
84     {
85       fstring alpha_msgfrom;
86       fstring alpha_msgto;
87       pstring s;
88
89       pstrcpy(s,lp_msg_command());
90       pstring_sub(s,"%f",alpha_strcpy(alpha_msgfrom,msgfrom,sizeof(alpha_msgfrom)));
91       pstring_sub(s,"%t",alpha_strcpy(alpha_msgto,msgto,sizeof(alpha_msgto)));
92       standard_sub_basic(s);
93       pstring_sub(s,"%s",name);
94       smbrun(s,NULL);
95     }
96
97   msgpos = 0;
98 }
99
100
101
102 /****************************************************************************
103   reply to a sends
104 ****************************************************************************/
105 int reply_sends(connection_struct *conn,
106                 char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
107 {
108   int len;
109   char *msg;
110   int outsize = 0;
111   char *p;
112
113   START_PROFILE(SMBsends);
114
115   msgpos = 0;
116
117   if (! (*lp_msg_command())) {
118     END_PROFILE(SMBsends);
119     return(ERROR(ERRSRV,ERRmsgoff));
120   }
121
122   outsize = set_message(outbuf,0,0,True);
123
124   p = smb_buf(inbuf)+1;
125   p += srvstr_pull(inbuf, msgfrom, p, sizeof(msgfrom), -1, STR_TERMINATE|STR_CONVERT) + 1;
126   p += srvstr_pull(inbuf, msgto, p, sizeof(msgto), -1, STR_TERMINATE|STR_CONVERT) + 1;
127
128   msg = p;
129
130   len = SVAL(msg,0);
131   len = MIN(len,sizeof(msgbuf)-msgpos);
132
133   memset(msgbuf,'\0',sizeof(msgbuf));
134
135   memcpy(&msgbuf[msgpos],msg+2,len);
136   msgpos += len;
137
138   msg_deliver();
139
140   END_PROFILE(SMBsends);
141   return(outsize);
142 }
143
144
145 /****************************************************************************
146   reply to a sendstrt
147 ****************************************************************************/
148 int reply_sendstrt(connection_struct *conn,
149                    char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
150 {
151   int outsize = 0;
152   char *p;
153
154   START_PROFILE(SMBsendstrt);
155
156   if (! (*lp_msg_command())) {
157     END_PROFILE(SMBsendstrt);
158     return(ERROR(ERRSRV,ERRmsgoff));
159   }
160
161   outsize = set_message(outbuf,1,0,True);
162
163   memset(msgbuf,'\0',sizeof(msgbuf));
164   msgpos = 0;
165
166   p = smb_buf(inbuf)+1;
167   p += srvstr_pull(inbuf, msgfrom, p, sizeof(msgfrom), -1, STR_TERMINATE|STR_CONVERT) + 1;
168   p += srvstr_pull(inbuf, msgto, p, sizeof(msgto), -1, STR_TERMINATE|STR_CONVERT) + 1;
169
170   DEBUG( 3, ( "SMBsendstrt (from %s to %s)\n", msgfrom, msgto ) );
171
172   END_PROFILE(SMBsendstrt);
173   return(outsize);
174 }
175
176
177 /****************************************************************************
178   reply to a sendtxt
179 ****************************************************************************/
180 int reply_sendtxt(connection_struct *conn,
181                   char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
182 {
183   int len;
184   int outsize = 0;
185   char *msg;
186   START_PROFILE(SMBsendtxt);
187
188   if (! (*lp_msg_command())) {
189     END_PROFILE(SMBsendtxt);
190     return(ERROR(ERRSRV,ERRmsgoff));
191   }
192
193   outsize = set_message(outbuf,0,0,True);
194
195   msg = smb_buf(inbuf) + 1;
196
197   len = SVAL(msg,0);
198   len = MIN(len,sizeof(msgbuf)-msgpos);
199
200   memcpy(&msgbuf[msgpos],msg+2,len);
201   msgpos += len;
202
203   DEBUG( 3, ( "SMBsendtxt\n" ) );
204
205   END_PROFILE(SMBsendtxt);
206   return(outsize);
207 }
208
209
210 /****************************************************************************
211   reply to a sendend
212 ****************************************************************************/
213 int reply_sendend(connection_struct *conn,
214                   char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
215 {
216   int outsize = 0;
217   START_PROFILE(SMBsendend);
218
219   if (! (*lp_msg_command())) {
220     END_PROFILE(SMBsendend);
221     return(ERROR(ERRSRV,ERRmsgoff));
222   }
223
224   outsize = set_message(outbuf,0,0,True);
225
226   DEBUG(3,("SMBsendend\n"));
227
228   msg_deliver();
229
230   END_PROFILE(SMBsendend);
231   return(outsize);
232 }