Mercurial > ecos

annotate packages/net/ftpclient/current/src/ftpclient.c @ 3292:7f8e529b4d82 default tip

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