nio-ie5.cc

   1 /*
   2  * Copyright (c) 2000, Red Hat, Inc.
   3  *
   4  *     This program is free software; you can redistribute it and/or modify
   5  *     it under the terms of the GNU General Public License as published by
   6  *     the Free Software Foundation; either version 2 of the License, or
   7  *     (at your option) any later version.
   8  *
   9  *     A copy of the GNU General Public License can be found at
  10  *     http://www.gnu.org/
  11  *
  12  * Written by DJ Delorie <dj@cygnus.com>
  13  *
  14  */
  15
  16 /* The purpose of this file is to manage internet downloads using the
  17    Internet Explorer version 5 DLLs.  To use this method, the user
  18    must already have installed and configured IE5.  This module is
  19    called from netio.cc, which is called from geturl.cc */
  20
  21 #if 0
  22 static const char *cvsid =
  23   "\n%%% $Id$\n";
  24 #endif
  25
  26 #include "win32.h"
  27
  28 #include "resource.h"
  29 #include "state.h"
  30 #include "dialog.h"
  31 #include "msg.h"
  32 #include "netio.h"
  33 #include "nio-ie5.h"
  34
  35 static HINTERNET internet = 0;
  36
  37 NetIO_IE5::NetIO_IE5 (char const *_url):
  38 NetIO (_url)
  39 {
  40   int resend = 0;
  41
  42   if (internet == 0)
  43     {
  44       HINSTANCE h = LoadLibrary ("wininet.dll");
  45       if (!h)
  46         {
  47           note (NULL, IDS_WININET);
  48           connection = 0;
  49           return;
  50         }
  51       InternetAttemptConnect (0);
  52       internet = InternetOpen ("Cygwin Setup", INTERNET_OPEN_TYPE_PRECONFIG,
  53                                NULL, NULL, 0);
  54     }
  55
  56   DWORD flags =
  57  //    INTERNET_FLAG_DONT_CACHE |
  58     INTERNET_FLAG_KEEP_CONNECTION |
  59  //   INTERNET_FLAG_PRAGMA_NOCACHE |
  60  //   INTERNET_FLAG_RELOAD |
  61     INTERNET_FLAG_EXISTING_CONNECT | INTERNET_FLAG_PASSIVE;
  62
  63   connection = InternetOpenUrl (internet, url, NULL, 0, flags, 0);
  64
  65 try_again:
  66
  67   if (net_user && net_passwd)
  68     {
  69       InternetSetOption (connection, INTERNET_OPTION_USERNAME,
  70                          net_user, strlen (net_user));
  71       InternetSetOption (connection, INTERNET_OPTION_PASSWORD,
  72                          net_passwd, strlen (net_passwd));
  73     }
  74
  75   if (net_proxy_user && net_proxy_passwd)
  76     {
  77       InternetSetOption (connection, INTERNET_OPTION_PROXY_USERNAME,
  78                          net_proxy_user, strlen (net_proxy_user));
  79       InternetSetOption (connection, INTERNET_OPTION_PROXY_PASSWORD,
  80                          net_proxy_passwd, strlen (net_proxy_passwd));
  81     }
  82
  83   if (resend)
  84     if (!HttpSendRequest (connection, 0, 0, 0, 0))
  85       connection = 0;
  86
  87   if (!connection)
  88     {
  89       if (GetLastError () == ERROR_INTERNET_EXTENDED_ERROR)
  90         {
  91           char buf[2000];
  92           DWORD e, l = sizeof (buf);
  93           InternetGetLastResponseInfo (&e, buf, &l);
  94           MessageBox (0, buf, "Internet Error", 0);
  95         }
  96     }
  97
  98   DWORD type, type_s;
  99   type_s = sizeof (type);
 100   InternetQueryOption (connection, INTERNET_OPTION_HANDLE_TYPE,
 101                        &type, &type_s);
 102
 103   switch (type)
 104     {
 105     case INTERNET_HANDLE_TYPE_HTTP_REQUEST:
 106     case INTERNET_HANDLE_TYPE_CONNECT_HTTP:
 107       type_s = sizeof (DWORD);
 108       if (HttpQueryInfo (connection,
 109                          HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER,
 110                          &type, &type_s, NULL))
 111         {
 112           if (type == 401)      /* authorization required */
 113             {
 114               flush_io ();
 115               get_auth (NULL);
 116               resend = 1;
 117               goto try_again;
 118             }
 119           else if (type == 407) /* proxy authorization required */
 120             {
 121               flush_io ();
 122               get_proxy_auth (NULL);
 123               resend = 1;
 124               goto try_again;
 125             }
 126           else if (type >= 300)
 127             {
 128               connection = 0;
 129               return;
 130             }
 131         }
 132     }
 133 }
 134
 135 void
 136 NetIO_IE5::flush_io ()
 137 {
 138   DWORD actual = 0;
 139   char buf[1024];
 140   do
 141     {
 142       InternetReadFile (connection, buf, 1024, &actual);
 143     }
 144   while (actual > 0);
 145 }
 146
 147 NetIO_IE5::~NetIO_IE5 ()
 148 {
 149   if (connection)
 150     InternetCloseHandle (connection);
 151 }
 152
 153 int
 154 NetIO_IE5::ok ()
 155 {
 156   return (connection == NULL) ? 0 : 1;
 157 }
 158
 159 int
 160 NetIO_IE5::read (char *buf, int nbytes)
 161 {
 162   DWORD actual;
 163   if (InternetReadFile (connection, buf, nbytes, &actual))
 164     return actual;
 165   return -1;
 166 }