Mercurial > ecos

annotate packages/net/ftpclient/current/src/ftpclient.c @ 2295:2d458d1401c4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix error check - from Daniel Neri
author gthomas
date Mon, 11 Sep 2006 15:12:37 +0000
parents 1f65cc07a3e5
children 74dbf4c3f2e1
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
1 //==========================================================================
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
2 //
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
3 // ftpclient.c
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
4 //
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
5 // A simple FTP client
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
6 //
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
7 //==========================================================================
208
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
8 //####ECOSGPLCOPYRIGHTBEGIN####
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
9 // -------------------------------------------
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
10 // This file is part of eCos, the Embedded Configurable Operating System.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
269
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
12 // Copyright (C) 2002 Andrew Lunn.
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
13 // Copyright (C) 2004 Gary Thomas
208
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
14 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
15 // eCos is free software; you can redistribute it and/or modify it under
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
16 // the terms of the GNU General Public License as published by the Free
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
17 // Software Foundation; either version 2 or (at your option) any later version.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
18 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
19 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
20 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
21 // FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
22 // for more details.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
23 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
24 // You should have received a copy of the GNU General Public License along
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
25 // with eCos; if not, write to the Free Software Foundation, Inc.,
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
26 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
27 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
28 // As a special exception, if other files instantiate templates or use macros
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
29 // or inline functions from this file, or you compile this file and link it
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
30 // with other works to produce a work based on this file, this file does not
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
31 // by itself cause the resulting work to be covered by the GNU General Public
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
32 // License. However the source code for this file must still be made available
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
33 // in accordance with section (3) of the GNU General Public License.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
34 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
35 // This exception does not invalidate any other reasons why a work based on
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
36 // this file might be covered by the GNU General Public License.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
37 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
38 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
210
d2c90368aeef Merge from eCos master repository on 2002-05-23-21:39:14-BST
jlarmour
parents: 208
diff changeset
39 // at http://sources.redhat.com/ecos/ecos-license/
208
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
40 // -------------------------------------------
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 198
diff changeset
41 //####ECOSGPLCOPYRIGHTEND####
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
42 //==========================================================================
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
43 //#####DESCRIPTIONBEGIN####
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
44 //
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
45 // Author(s): andrew.lunn@ascom.ch
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
46 // Contributors: andrew.lunn@ascom.ch
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
47 // Date: 2001-11-4
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
48 // Purpose:
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
49 // Description:
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
50 //
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
51 //####DESCRIPTIONEND####
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
52 //
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
53 //==========================================================================
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
54
198
ea3f0bd33a73 Merge from eCos master repository on 2001-12-07-11:40:47-GMT
jlarmour
parents: 196
diff changeset
55 #include <pkgconf/system.h>
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
56 #include <pkgconf/net_ftpclient.h>
198
ea3f0bd33a73 Merge from eCos master repository on 2001-12-07-11:40:47-GMT
jlarmour
parents: 196
diff changeset
57
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
58 #include <network.h>
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
59 #include <stdio.h>
269
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
60 #include <stdlib.h>
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
61 #include <sys/socket.h>
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
62 #include <netinet/in.h>
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
63 #include <arpa/inet.h>
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
64 #include <ctype.h>
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
65 #include "ftpclient.h"
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
66
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
67 /* Build one command to send to the FTP server */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
68 static int
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
69 build_cmd(char *buf,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
70 unsigned bufsize,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
71 char *cmd,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
72 char *arg1)
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
73 {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
74 int cnt;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
75
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
76 if (arg1) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
77 cnt = snprintf(buf,bufsize,"%s %s\r\n",cmd,arg1);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
78 } else {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
79 cnt = snprintf(buf,bufsize,"%s\r\n",cmd);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
80 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
81
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
82 if (cnt < bufsize)
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
83 return 1;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
84
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
85 return 0;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
86 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
87
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
88
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
89 /* Read one line from the server, being careful not to overrun the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
90 buffer. If we do reach the end of the buffer, discard the rest of
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
91 the line. */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
92 static int
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
93 get_line(int s, char *buf, unsigned buf_size, ftp_printf_t ftp_printf)
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
94 {
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
95 int eol = 0;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
96 int cnt = 0;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
97 int ret;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
98 char c;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
99
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
100 while(!eol) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
101 ret = read(s,&c,1);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
102
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
103 if (ret != 1) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
104 ftp_printf(1,"read %s\n",strerror(errno));
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
105 return FTP_BAD;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
106 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
107
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
108 if (c == '\n') {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
109 eol = 1;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
110 continue;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
111 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
112
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
113 if (cnt < buf_size) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
114 buf[cnt++] = c;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
115 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
116 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
117 if (cnt < buf_size) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
118 buf[cnt++] = '\0';
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
119 } else {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
120 buf[buf_size -1] = '\0';
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
121 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
122 return 0;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
123 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
124
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
125 /* Read the reply from the server and return the MSB from the return
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
126 code. This gives us a basic idea if the command failed/worked. The
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
127 reply can be spread over multiple lines. When this happens the line
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
128 will start with a - to indicate there is more*/
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
129 static int
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
130 get_reply(int s, ftp_printf_t ftp_printf)
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
131 {
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
132 char buf[BUFSIZ];
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
133 int more = 0;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
134 int ret;
269
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
135 int first_line=1;
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
136 int code=0;
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
137
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
138 do {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
139
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
140 if ((ret=get_line(s,buf,sizeof(buf),ftp_printf)) < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
141 return(ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
142 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
143
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
144 ftp_printf(0,"FTP: %s\n",buf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
145
269
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
146 if (first_line) {
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
147 code = strtoul(buf,NULL,0);
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
148 first_line=0;
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
149 more = (buf[3] == '-');
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
150 } else {
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
151 if (isdigit(buf[0]) && isdigit(buf[1]) && isdigit(buf[2]) &&
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
152 (code == strtoul(buf,NULL,0)) &&
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
153 buf[3]==' ') {
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
154 more=0;
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
155 } else {
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
156 more =1;
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
157 }
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
158 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
159 } while (more);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
160
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
161 return (buf[0] - '0');
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
162 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
163
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
164 /* Send a command to the server */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
165 static int
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
166 send_cmd(int s, char * msgbuf, ftp_printf_t ftp_printf)
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
167 {
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
168 int len;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
169 int slen = strlen(msgbuf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
170
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
171 if ((len = write(s,msgbuf,slen)) != slen) {
2295
2d458d1401c4 Fix error check - from Daniel Neri
gthomas
parents: 2038
diff changeset
172 if (len < 0) {
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
173 ftp_printf(1,"write %s\n",strerror(errno));
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
174 return FTP_BAD;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
175 } else {
1100
353800bc5758 * src/ftpclient.c (send_cmd): Fix typo in error message.
asl
parents: 1004
diff changeset
176 ftp_printf(1,"write truncated!\n");
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
177 return FTP_BAD;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
178 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
179 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
180 return 1;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
181 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
182
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
183 /* Send a complete command to the server and receive the reply. Return the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
184 MSB of the reply code. */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
185 static int
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
186 command(char * cmd,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
187 char * arg,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
188 int s,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
189 char *msgbuf,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
190 int msgbuflen,
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
191 ftp_printf_t ftp_printf)
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
192 {
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
193 int err;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
194
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
195 if (!build_cmd(msgbuf,msgbuflen,cmd,arg)) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
196 ftp_printf(1,"FTP: %s command to long\n",cmd);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
197 return FTP_BAD;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
198 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
199
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
200 ftp_printf(0,"FTP: Sending %s command\n",cmd);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
201
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
202 if ((err=send_cmd(s,msgbuf,ftp_printf)) < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
203 return(err);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
204 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
205
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
206 return (get_reply(s,ftp_printf));
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
207 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
208
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
209 /* Open a socket and connect it to the server. Also print out the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
210 address of the server for debug purposes.*/
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
211
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
212 static int
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
213 connect_to_server(char *hostname,
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
214 struct sockaddr * local,
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
215 ftp_printf_t ftp_printf)
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
216 {
2038
1f65cc07a3e5 * src/ftpclient.c (connect_to_server): Use socklen_t to avoid
asl
parents: 1792
diff changeset
217 int s;
1f65cc07a3e5 * src/ftpclient.c (connect_to_server): Use socklen_t to avoid
asl
parents: 1792
diff changeset
218 socklen_t len;
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
219 int error;
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
220 struct addrinfo *res, *nai;
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
221 char name[80];
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
222 char port[8];
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
223
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
224 error = getaddrinfo(hostname, "ftp", NULL, &res);
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
225 if (error != EAI_NONE) {
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
226 return FTP_NOSUCHHOST;
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
227 }
198
ea3f0bd33a73 Merge from eCos master repository on 2001-12-07-11:40:47-GMT
jlarmour
parents: 196
diff changeset
228
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
229 nai=res;
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
230 while (nai) {
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
231 s = socket(nai->ai_family, nai->ai_socktype,nai->ai_protocol);
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
232 if (s < 0) {
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
233 nai = nai->ai_next;
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
234 continue;
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
235 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
236
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
237 if (connect(s, nai->ai_addr, nai->ai_addrlen) < 0) {
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
238 getnameinfo(nai->ai_addr, nai->ai_addrlen,
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
239 name, sizeof(name), NULL,0, NI_NUMERICHOST);
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
240 ftp_printf(1,"FTP Connect to %s failed: %s\n",name, strerror(errno));
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
241 close (s);
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
242 nai = nai->ai_next;
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
243 continue;
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
244 }
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
245
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
246 len = sizeof(struct sockaddr);
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
247 if (getsockname(s, (struct sockaddr *)local, &len) < 0) {
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
248 ftp_printf(1,"getsockname failed %s\n",strerror(errno));
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
249 close(s);
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
250 nai = nai->ai_next;
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
251 continue;
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
252 }
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
253 getnameinfo(nai->ai_addr, nai->ai_addrlen,
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
254 name, sizeof(name), port, sizeof(port),
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
255 NI_NUMERICHOST|NI_NUMERICSERV);
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
256
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
257 ftp_printf(0,"FTP: Connected to %s:%s\n", name, port);
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
258 freeaddrinfo(res);
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
259 return (s);
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
260 }
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
261 freeaddrinfo(res);
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
262 return FTP_NOSUCHHOST;
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
263 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
264
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
265 /* Perform a login to the server. Pass the username and password and
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
266 put the connection into binary mode. This assumes a passwd is
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
267 always needed. Is this true? */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
268
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
269 static int
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
270 login(char * username,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
271 char *passwd,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
272 int s,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
273 char *msgbuf,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
274 unsigned msgbuflen,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
275 ftp_printf_t ftp_printf) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
276
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
277 int ret;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
278
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
279 ret = command("USER",username,s,msgbuf,msgbuflen,ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
280 if (ret != 3) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
281 ftp_printf(1,"FTP: User %s not accepted\n",username);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
282 return (FTP_BADUSER);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
283 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
284
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
285 ret = command("PASS",passwd,s,msgbuf,msgbuflen,ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
286 if (ret < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
287 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
288 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
289 if (ret != 2) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
290 ftp_printf(1,"FTP: Login failed for User %s\n",username);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
291 return (FTP_BADUSER);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
292 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
293
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
294 ftp_printf(0,"FTP: Login sucessfull\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
295
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
296 ret = command("TYPE","I",s,msgbuf,msgbuflen,ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
297 if (ret < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
298 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
299 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
300 if (ret != 2) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
301 ftp_printf(1,"FTP: TYPE failed!\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
302 return (FTP_BAD);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
303 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
304 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
305 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
306
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
307
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
308 /* Open a data socket. This is a client socket, i.e. its listening
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
309 waiting for the FTP server to connect to it. Once the socket has been
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
310 opened send the port command to the server so the server knows which
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
311 port we are listening on.*/
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
312 static int
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
313 opendatasock(int ctrl_s,
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
314 struct sockaddr *ctrl,
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
315 char *msgbuf,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
316 unsigned msgbuflen,
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
317 ftp_printf_t ftp_printf)
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
318 {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
319 struct sockaddr local;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
320 char name[64];
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
321 char port[10];
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
322 socklen_t len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
323 int on = 1;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
324 char buf[80];
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
325 int ret;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
326 int s;
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
327
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
328 s = socket(ctrl->sa_family, SOCK_STREAM, 0);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
329 if (s < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
330 ftp_printf(1,"socket: %s\n",strerror(errno));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
331 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
332 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
333
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
334 if (setsockopt(s, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof (on)) < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
335 ftp_printf(1,"setsockopt: %s\n",strerror(errno));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
336 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
337 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
338 }
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
339
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
340 memcpy(&local,ctrl,sizeof(struct sockaddr));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
341 switch (ctrl->sa_family) {
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
342 case AF_INET: {
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
343 struct sockaddr_in * sa4 = (struct sockaddr_in *) &local;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
344 sa4->sin_port = 0;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
345 break;
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
346 }
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
347 #ifdef CYGPKG_NET_INET6
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
348 case AF_INET6: {
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
349 struct sockaddr_in6 * sa6 = (struct sockaddr_in6 *) &local;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
350 sa6->sin6_port = 0;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
351 break;
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
352 }
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
353 #endif
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
354 default:
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
355 close (s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
356 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
357 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
358
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
359 if (bind(s,&local,local.sa_len) < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
360 ftp_printf(1,"bind: %s\n",strerror(errno));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
361 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
362 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
363 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
364
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
365 len = sizeof(local);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
366 if (getsockname(s,&local,&len) < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
367 ftp_printf(1,"getsockname: %s\n",strerror(errno));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
368 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
369 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
370 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
371
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
372 if (listen(s, 1) < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
373 ftp_printf(1,"listen: %s\n",strerror(errno));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
374 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
375 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
376 }
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
377
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
378 getnameinfo(&local, sizeof(local), name, sizeof(name), port, sizeof(port),
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
379 NI_NUMERICHOST|NI_NUMERICSERV);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
380 switch (local.sa_family) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
381 case AF_INET: {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
382 snprintf(buf, sizeof(buf), "|1|%s|%s|", name, port);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
383 break;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
384 }
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
385 #ifdef CYGPKG_NET_INET6
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
386 case AF_INET6: {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
387 snprintf(buf, sizeof(buf), "|2|%s|%s|", name, port);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
388 break;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
389 }
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
390 #endif
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
391 default:
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
392 close (s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
393 return (FTP_BAD);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
394 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
395
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
396 ret = command("EPRT",buf,ctrl_s,msgbuf,msgbuflen,ftp_printf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
397 if (ret < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
398 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
399 return (ret);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
400 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
401
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
402 if (ret != 2) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
403 int _port = atoi(port);
1792
435babd3f38e * src/ftpclient.c (opendatasock): Don't clobber the socket
asl
parents: 1650
diff changeset
404 char *str = name;
435babd3f38e * src/ftpclient.c (opendatasock): Don't clobber the socket
asl
parents: 1650
diff changeset
405 while (*str) {
435babd3f38e * src/ftpclient.c (opendatasock): Don't clobber the socket
asl
parents: 1650
diff changeset
406 if (*str == '.') *str = ',';
435babd3f38e * src/ftpclient.c (opendatasock): Don't clobber the socket
asl
parents: 1650
diff changeset
407 str++;
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
408 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
409 snprintf(buf, sizeof(buf), "%s,%d,%d", name, _port/256, _port%256);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
410 ret = command("PORT",buf,ctrl_s,msgbuf,msgbuflen,ftp_printf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
411 if (ret < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
412 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
413 return (ret);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
414 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
415 if (ret != 2) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
416 ftp_printf(1,"FTP: PORT failed!\n");
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
417 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
418 return (FTP_BAD);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
419 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
420 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
421 return (s);
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
422 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
423
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
424 /* Receive the file into the buffer and close the data socket
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
425 afterwards */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
426 static int
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
427 receive_file(int data_s, ftp_write_t ftp_write, void *ftp_write_priv, ftp_printf_t ftp_printf)
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
428 {
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
429 char *buf;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
430 int finished = 0;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
431 int total_size=0;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
432 int len, wlen;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
433 int s;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
434
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
435 if ((buf = (char *)malloc(CYGNUM_NET_FTPCLIENT_BUFSIZE)) == (char *)0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
436 return FTP_NOMEMORY;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
437 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
438 s = accept(data_s, NULL, 0);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
439 if (s < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
440 ftp_printf(1, "listen: %s\n",strerror(errno));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
441 free(buf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
442 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
443 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
444
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
445 do {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
446 len = read(s, buf, CYGNUM_NET_FTPCLIENT_BUFSIZE);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
447 if (len < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
448 ftp_printf(1, "read: %s\n",strerror(errno));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
449 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
450 free(buf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
451 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
452 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
453
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
454 if (len == 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
455 finished = 1;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
456 } else {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
457 wlen = (*ftp_write)(buf, len, ftp_write_priv);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
458 if (wlen != len) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
459 ftp_printf(1, "FTP: File too big!\n");
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
460 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
461 free(buf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
462 return FTP_TOOBIG;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
463 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
464 total_size += len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
465 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
466 } while (!finished);
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
467
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
468 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
469 free(buf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
470 return total_size;
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
471 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
472
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
473 /* Receive the file into the buffer and close the socket afterwards*/
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
474 static int
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
475 send_file(int data_s, ftp_read_t ftp_read, void *ftp_read_priv, ftp_printf_t ftp_printf)
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
476 {
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
477 char *buf;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
478 int len, rlen;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
479 int s;
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
480
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
481 if ((buf = (char *)malloc(CYGNUM_NET_FTPCLIENT_BUFSIZE)) == (char *)0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
482 return FTP_NOMEMORY;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
483 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
484 s = accept(data_s,NULL,0);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
485 if (s<0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
486 ftp_printf(1,"listen: %s\n",strerror(errno));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
487 free(buf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
488 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
489 }
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
490
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
491 do {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
492 rlen = (*ftp_read)(buf, CYGNUM_NET_FTPCLIENT_BUFSIZE, ftp_read_priv);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
493 if (rlen > 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
494 len = write(s, buf, rlen);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
495 if (len < 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
496 ftp_printf(1,"write: %s\n",strerror(errno));
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
497 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
498 free(buf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
499 return FTP_BAD;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
500 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
501 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
502 } while (rlen > 0);
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
503
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
504 close(s);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
505 free(buf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
506 return 0;
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
507 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
508
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
509 /* All done, say bye, bye */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
510 static int quit(int s,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
511 char *msgbuf,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
512 unsigned msgbuflen,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
513 ftp_printf_t ftp_printf) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
514
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
515 int ret;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
516
269
7fffb214536c * src/ftpclient.c: Send "quit" not "quit " to keep some servers
asl
parents: 210
diff changeset
517 ret = command("QUIT",NULL,s,msgbuf,msgbuflen,ftp_printf);
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
518 if (ret < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
519 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
520 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
521 if (ret != 2) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
522 ftp_printf(1,"FTP: Quit failed!\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
523 return (FTP_BAD);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
524 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
525
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
526 ftp_printf(0,"FTP: Connection closed\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
527 return (0);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
528 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
529
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
530 /* Get a file from an FTP server. Hostname is the name/IP address of
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
531 the server. username is the username used to connect to the server
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
532 with. Passwd is the password used to authentificate the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
533 username. filename is the name of the file to receive. It should be
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
534 the full pathname of the file. buf is a pointer to a buffer the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
535 contents of the file should be placed in and buf_size is the size
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
536 of the buffer. If the file is bigger than the buffer, buf_size
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
537 bytes will be retrieved and an error code returned. ftp_printf is a
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
538 function to be called to perform printing. On success the number of
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
539 bytes received is returned. On error a negative value is returned
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
540 indicating the type of error. */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
541
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
542 struct _ftp_data{
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
543 char *buf;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
544 int len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
545 int max_len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
546 };
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
547
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
548 static int _ftp_read(char *buf, int len, void *priv)
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
549 {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
550 struct _ftp_data *dp = (struct _ftp_data *)priv;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
551 int res = 0;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
552
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
553 // FTP data channel desires to write 'len' bytes. Fetch up
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
554 // to that amount into 'buf'
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
555 if (dp->len > 0) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
556 res = dp->len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
557 if (res > len) res = len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
558 memcpy(buf, dp->buf, res);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
559 dp->buf += len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
560 dp->len -= res;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
561 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
562 return res;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
563 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
564
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
565 static int _ftp_write(char *buf, int len, void *priv)
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
566 {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
567 struct _ftp_data *dp = (struct _ftp_data *)priv;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
568 int res = 0;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
569
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
570 // FTP data channel has 'len' bytes that have been read.
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
571 // Move into 'buf', respecting the max size of 'buf'
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
572 if (dp->len < dp->max_len) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
573 res = dp->max_len - dp->len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
574 if (res > len) {
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
575 res = len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
576 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
577 memcpy(dp->buf, buf, res);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
578 dp->buf += len;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
579 dp->len += res;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
580 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
581 return res;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
582 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
583
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
584 int ftp_get(char * hostname,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
585 char * username,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
586 char * passwd,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
587 char * filename,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
588 char * buf,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
589 unsigned buf_size,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
590 ftp_printf_t ftp_printf)
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
591 {
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
592 struct _ftp_data ftp_data;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
593
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
594 ftp_data.buf = buf;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
595 ftp_data.len = 0;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
596 ftp_data.max_len = buf_size;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
597 return ftp_get_var(hostname, username, passwd, filename, _ftp_write, &ftp_data, ftp_printf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
598 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
599
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
600 int ftp_get_var(char *hostname,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
601 char *username,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
602 char *passwd,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
603 char *filename,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
604 ftp_write_t ftp_write,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
605 void *ftp_write_priv,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
606 ftp_printf_t ftp_printf)
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
607 {
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
608
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
609 struct sockaddr local;
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
610 char msgbuf[256];
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
611 int s,data_s;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
612 int bytes;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
613 int ret;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
614
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
615 s = connect_to_server(hostname,&local,ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
616 if (s < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
617 return (s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
618 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
619
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
620 /* Read the welcome message from the server */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
621 if (get_reply(s,ftp_printf) != 2) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
622 ftp_printf(0,"FTP: Server refused connection\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
623 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
624 return FTP_BAD;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
625 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
626
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
627 ret = login(username,passwd,s,msgbuf,sizeof(msgbuf),ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
628 if (ret < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
629 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
630 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
631 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
632
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
633 /* We are now logged in and ready to transfer the file. Open the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
634 data socket ready to receive the file. It also build the PORT
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
635 command ready to send */
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
636 data_s = opendatasock(s,&local,msgbuf,sizeof(msgbuf),ftp_printf);
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
637 if (data_s < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
638 close (s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
639 return (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
640 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
641
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
642 /* Ask for the file */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
643 ret = command("RETR",filename,s,msgbuf,sizeof(msgbuf),ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
644 if (ret < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
645 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
646 close(data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
647 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
648 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
649
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
650 if (ret != 1) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
651 ftp_printf(0,"FTP: RETR failed!\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
652 close (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
653 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
654 return (FTP_BADFILENAME);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
655 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
656
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
657 if ((bytes=receive_file(data_s,ftp_write,ftp_write_priv,ftp_printf)) < 0) {
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
658 ftp_printf(0,"FTP: Receiving file failed\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
659 close (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
660 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
661 return (bytes);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
662 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
663
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
664 if (get_reply(s,ftp_printf) != 2) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
665 ftp_printf(0,"FTP: Transfer failed!\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
666 close (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
667 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
668 return (FTP_BAD);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
669 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
670
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
671 ret = quit(s,msgbuf,sizeof(msgbuf),ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
672 if (ret < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
673 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
674 close(data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
675 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
676 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
677
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
678 close (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
679 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
680 return bytes;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
681 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
682
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
683 /* Put a file on an FTP server. Hostname is the name/IP address of the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
684 server. username is the username used to connect to the server
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
685 with. Passwd is the password used to authentificate the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
686 username. filename is the name of the file to receive. It should be
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
687 the full pathname of the file. buf is a pointer to a buffer the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
688 contents of the file should be placed in and buf_size is the size
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
689 of the buffer. ftp_printf is a function to be called to perform
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
690 printing. On success 0 is returned. On error a negative value is
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
691 returned indicating the type of error. */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
692
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
693 int ftp_put(char * hostname,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
694 char * username,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
695 char * passwd,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
696 char * filename,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
697 char * buf,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
698 unsigned buf_size,
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
699 ftp_printf_t ftp_printf)
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
700 {
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
701 struct _ftp_data ftp_data;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
702
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
703 ftp_data.buf = buf;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
704 ftp_data.len = buf_size;
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
705 return ftp_put_var(hostname, username, passwd, filename, _ftp_read, &ftp_data, ftp_printf);
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
706 }
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
707
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
708 int ftp_put_var(char *hostname,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
709 char *username,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
710 char *passwd,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
711 char *filename,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
712 ftp_read_t ftp_read,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
713 void *ftp_read_priv,
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
714 ftp_printf_t ftp_printf)
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
715 {
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
716
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
717 struct sockaddr local;
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
718 char msgbuf[256];
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
719 int s,data_s;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
720 int ret;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
721
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
722 s = connect_to_server(hostname,&local,ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
723 if (s < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
724 return (s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
725 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
726
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
727 /* Read the welcome message from the server */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
728 if (get_reply(s,ftp_printf) != 2) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
729 ftp_printf(1,"FTP: Server refused connection\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
730 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
731 return FTP_BAD;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
732 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
733
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
734 ret = login(username,passwd,s,msgbuf,sizeof(msgbuf),ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
735 if (ret < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
736 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
737 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
738 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
739
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
740 /* We are now logged in and ready to transfer the file. Open the
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
741 data socket ready to receive the file. It also build the PORT
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
742 command ready to send */
1004
c1abcb7d0cf8 * src/ftpclient.c (connect_to_server): Added support for
asl
parents: 269
diff changeset
743 data_s = opendatasock(s,&local,msgbuf,sizeof(msgbuf),ftp_printf);
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
744 if (data_s < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
745 close (s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
746 return (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
747 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
748
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
749 /* Ask for the file */
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
750 ret = command("STOR",filename,s,msgbuf,sizeof(msgbuf),ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
751 if (ret < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
752 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
753 close(data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
754 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
755 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
756
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
757 if (ret != 1) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
758 ftp_printf(1,"FTP: STOR failed!\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
759 close (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
760 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
761 return (FTP_BADFILENAME);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
762 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
763
1650
0e6a7d89dd0e New stream oriented functions - ftp_get_var()/ftp_put_var()
gthomas
parents: 1100
diff changeset
764 if ((ret = send_file(data_s,ftp_read,ftp_read_priv,ftp_printf)) < 0) {
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
765 ftp_printf(1,"FTP: Sending file failed\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
766 close (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
767 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
768 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
769 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
770
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
771 if (get_reply(s,ftp_printf) != 2) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
772 ftp_printf(1,"FTP: Transfer failed!\n");
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
773 close (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
774 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
775 return (FTP_BAD);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
776 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
777
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
778 ret = quit(s,msgbuf,sizeof(msgbuf),ftp_printf);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
779 if (ret < 0) {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
780 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
781 close(data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
782 return (ret);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
783 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
784
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
785 close (data_s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
786 close(s);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
787 return 0;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
788 }
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
789
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
790 /* An example ftp_printf function. This uses the standard eCos diag
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
791 output device for outputting error and diagnostic messages. The
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
792 function take one addition parameter to the normal printf function. The
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
793 first parameter indicates when the message is an error message when
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
794 true. This can be used to filter errors from diagnostic output. In
198
ea3f0bd33a73 Merge from eCos master repository on 2001-12-07-11:40:47-GMT
jlarmour
parents: 196
diff changeset
795 this example the error parameter is ignored and everything printed. */
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
796
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
797 void ftpclient_printf(unsigned error, const char *fmt, ...)
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
798 {
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
799 va_list ap;
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
800
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
801 va_start(ap, fmt);
198
ea3f0bd33a73 Merge from eCos master repository on 2001-12-07-11:40:47-GMT
jlarmour
parents: 196
diff changeset
802 diag_vprintf( fmt, ap);
196
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
803 va_end(ap);
9b55e9c69693 Merge from eCos master repository on 2001-11-23-15:32:03-GMT
jlarmour
parents:
diff changeset
804 }