cd65ac15a8
Submitted by: Philipp Mergenthaler <un1i@rz.uni-karlsruhe.de> PR: 11316
184 lines
5.1 KiB
C
184 lines
5.1 KiB
C
#include "sysinstall.h"
|
|
#include <sys/socket.h>
|
|
#include <netinet/in.h>
|
|
#include <arpa/inet.h>
|
|
#include <sys/param.h>
|
|
#include <netdb.h>
|
|
|
|
int HttpPort;
|
|
|
|
Boolean
|
|
mediaInitHTTP(Device *dev)
|
|
{
|
|
/*
|
|
* Some proxies think that files with the extension ".ai" are postscript
|
|
* files and use "ascii mode" instead of "binary mode" for ftp.
|
|
* The FTP server then translates all LF to CRLF.
|
|
* I don't know how to handle this elegantly...
|
|
* Squid uses ascii mode, ftpget uses binary mode and both tell us:
|
|
* "Content-Type: application/postscript"
|
|
*
|
|
* Probably the safest way would be to get the file, look at its checksum
|
|
* and, if it doesn't match, replace all CRLF by LF and check again.
|
|
*
|
|
* You can force Squid to use binary mode by appending ";type=i" to the URL,
|
|
* which is what I do here.
|
|
*
|
|
*/
|
|
|
|
extern int h_errno;
|
|
int rv,s;
|
|
bool el; /* end of header line */
|
|
char *cp, buf[PATH_MAX], req[1000];
|
|
struct sockaddr_in peer;
|
|
struct hostent *peer_in;
|
|
|
|
s=socket(PF_INET, SOCK_STREAM, 6); /* tcp */
|
|
if (s == -1) {
|
|
msgConfirm("Network error");
|
|
return FALSE;
|
|
}
|
|
|
|
peer_in=gethostbyname(variable_get(VAR_HTTP_HOST));
|
|
if (peer_in == NULL) {
|
|
msgConfirm("%s",hstrerror(h_errno));
|
|
return FALSE;
|
|
}
|
|
|
|
peer.sin_len=peer_in->h_length;
|
|
peer.sin_family=peer_in->h_addrtype;
|
|
peer.sin_port=htons((u_short) HttpPort);
|
|
bcopy(peer_in->h_addr_list[0], &peer.sin_addr, peer_in->h_length);
|
|
|
|
rv=connect(s,(struct sockaddr *)&peer,sizeof(peer));
|
|
if (rv == -1) {
|
|
msgConfirm("Couldn't connect to proxy %s:%s",
|
|
variable_get(VAR_HTTP_HOST),variable_get(VAR_FTP_PORT));
|
|
return FALSE;
|
|
}
|
|
|
|
sprintf(req,"GET / HTTP/1.0\r\n\r\n");
|
|
write(s,req,strlen(req));
|
|
/*
|
|
* scan the headers of the response
|
|
* this is extremely quick'n dirty
|
|
*
|
|
*/
|
|
cp=buf;
|
|
el=FALSE;
|
|
rv=read(s,cp,1);
|
|
variable_set2(VAR_HTTP_FTP_MODE,"",0);
|
|
while (rv>0) {
|
|
if ((*cp == '\012') && el) {
|
|
/* reached end of a header line */
|
|
if (!strncmp(buf,"Server: ",8)) {
|
|
if (!strncmp(buf,"Server: Squid",13)) {
|
|
variable_set2(VAR_HTTP_FTP_MODE,";type=i",1);
|
|
} else {
|
|
variable_set2(VAR_HTTP_FTP_MODE,"",1);
|
|
}
|
|
}
|
|
/* ignore other headers */
|
|
/* check for "\015\012" at beginning of line, i.e. end of headers */
|
|
if ((cp-buf) == 1)
|
|
break;
|
|
cp=buf;
|
|
rv=read(s,cp,1);
|
|
} else {
|
|
el=FALSE;
|
|
if (*cp == '\015')
|
|
el=TRUE;
|
|
cp++;
|
|
rv=read(s,cp,1);
|
|
}
|
|
}
|
|
close(s);
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
FILE *
|
|
mediaGetHTTP(Device *dev, char *file, Boolean probe)
|
|
{
|
|
FILE *fp;
|
|
int rv,s;
|
|
bool el; /* end of header line */
|
|
char *cp, buf[PATH_MAX], req[1000];
|
|
struct sockaddr_in peer;
|
|
struct hostent *peer_in;
|
|
|
|
s=socket(PF_INET, SOCK_STREAM, 6); /* tcp */
|
|
if (s == -1) {
|
|
msgConfirm("Network error");
|
|
return NULL;
|
|
}
|
|
|
|
peer_in=gethostbyname(variable_get(VAR_HTTP_HOST));
|
|
peer.sin_len=peer_in->h_length;
|
|
peer.sin_family=peer_in->h_addrtype;
|
|
peer.sin_port=htons((u_short) HttpPort);
|
|
bcopy(peer_in->h_addr_list[0], &peer.sin_addr, peer_in->h_length);
|
|
|
|
rv=connect(s,(struct sockaddr *)&peer,sizeof(peer));
|
|
if (rv == -1) {
|
|
msgConfirm("Couldn't connect to proxy %s:%s",
|
|
variable_get(VAR_HTTP_HOST),variable_get(VAR_FTP_PORT));
|
|
return NULL;
|
|
}
|
|
|
|
sprintf(req,"GET ftp://%s:%s%s%s/%s%s HTTP/1.0\r\n\r\n",
|
|
variable_get(VAR_FTP_HOST), variable_get(VAR_FTP_PORT),
|
|
"/pub/FreeBSD/", variable_get(VAR_RELNAME),
|
|
file,variable_get(VAR_HTTP_FTP_MODE));
|
|
msgDebug("sending http request: %s",req);
|
|
write(s,req,strlen(req));
|
|
|
|
/*
|
|
* scan the headers of the response
|
|
* this is extremely quick'n dirty
|
|
*
|
|
*/
|
|
cp=buf;
|
|
el=FALSE;
|
|
rv=read(s,cp,1);
|
|
while (rv>0) {
|
|
if ((*cp == '\012') && el) {
|
|
/* reached end of a header line */
|
|
if (!strncmp(buf,"HTTP",4)) {
|
|
rv=strtol((char *)(buf+9),0,0);
|
|
*(cp-1)='\0'; /* chop the CRLF off */
|
|
if (rv >= 500) {
|
|
msgConfirm("Server error %s, you could try an other server",buf);
|
|
return NULL;
|
|
} else if (rv == 404) {
|
|
msgConfirm("%s was not found, maybe directory or release-version are wrong?",req);
|
|
return NULL;
|
|
} else if (rv >= 400) {
|
|
msgConfirm("Client error %s, you could try an other server",buf);
|
|
return NULL;
|
|
} else if (rv >= 300) {
|
|
msgConfirm("Error %s,",buf);
|
|
return NULL;
|
|
} else if (rv != 200) {
|
|
msgConfirm("Error %s when trying to fetch %s",buf,req);
|
|
return NULL;
|
|
}
|
|
}
|
|
/* ignore other headers */
|
|
/* check for "\015\012" at beginning of line, i.e. end of headers */
|
|
if ((cp-buf) == 1)
|
|
break;
|
|
cp=buf;
|
|
rv=read(s,cp,1);
|
|
} else {
|
|
el=FALSE;
|
|
if (*cp == '\015')
|
|
el=TRUE;
|
|
cp++;
|
|
rv=read(s,cp,1);
|
|
}
|
|
}
|
|
fp=fdopen(s,"r");
|
|
return fp;
|
|
}
|