Re: DESTRUCTURING-WRONG-NUM-ARGS when server was writing binary files

"John C. Mallery" <[email protected]> Thu, 17 Mar 2011 18:39:26 -0400
Newsgroups gmane.lisp.cl-http
Message-ID <[email protected]>
--===============4214640714754879279==
Content-Type: multipart/signed; boundary=Apple-Mail-9--28180660; protocol="application/pkcs7-signature"; micalg=sha1


--Apple-Mail-9--28180660
Content-Transfer-Encoding: quoted-printable
Content-Type: text/plain;
	charset=us-ascii

Fixed in the source. thanks.
On Mar 17, 2011, at 1:18 PM, Chun Tian (binghe) wrote:

> Hi, CL-HTTP
>=20
> Today I use CL-HTTP to serve a PDF file, something like this:
>=20
> (export-url #u"/wireless/wireless-guide.pdf"
>            :pdf-file
>            :pathname #p"SYS:WWW;WIRELESS-GUIDE.PDF"
>            :public t
>            :max-age #.(* 60 60 24))
>=20
> After several hours, I found many HTTP 500 error as below:
>=20
> Log: "192.168.150.247 - - [2011-03-17 08:13:20] \"GET =
/wireless/wireless-guide.pdf HTTP/1.1\" 500 1001 \"Mozilla/5.0 (Windows; =
U; Windows NT 5.1; en-US) AppleWebKit/533.4 (KHTML, like Gecko) =
Chrome/5.0.375.99 Safari/533.4\" -"
> Error: DSPEC::DESTRUCTURING-WRONG-NUM-ARGS
> Error Report: (24250 627165 602915) does not match ((HTTP::START =
HTTP::END HTTP::CONTENT-LENGTH)).
>=20
> I believe this is caused by a wrongly used DESTRUCTURING-BIND macro =
%writing-binary-file (in HTTP:SERVER;SERVER.LISP), a form:
>=20
>  (destructuring-bind ((start end content-length)) (car =
byte-range-spec) ...)
>=20
> should be
>=20
>  (destructuring-bind (start end content-length) (car byte-range-spec) =
...)
>=20
> It seems that the author was thinking the following alternative when =
writing above form:
>=20
>  (destructuring-bind ((start end content-length)) byte-range-spec ...)
>=20
> Attach is my patch for this, please review it.
>=20
> Regards,
>=20
> Chun Tian (binghe)
>=20
> =
<server-writing-binary-files.diff>________________________________________=
_______
> WWW-CL mailing list
> [email protected]
> https://lists.csail.mit.edu/mailman/listinfo/www-cl


--Apple-Mail-9--28180660
Content-Disposition: attachment;
	filename=smime.p7s
Content-Type: application/pkcs7-signature;
	name=smime.p7s
Content-Transfer-Encoding: base64

MIAGCSqGSIb3DQEHAqCAMIACAQExCzAJBgUrDgMCGgUAMIAGCSqGSIb3DQEHAQAAoIILGzCCBTgw
ggQgoAMCAQICARQwDQYJKoZIhvcNAQEFBQAwgawxCzAJBgNVBAYTAlVTMRYwFAYDVQQIEw1NYXNz
YWNodXNldHRzMRIwEAYDVQQHEwlDYW1icmlkZ2UxLDAqBgNVBAoTI01JVCBMYWJvcmF0b3J5IGZv
ciBDb21wdXRlciBTY2llbmNlMRIwEAYDVQQDEwlNYXN0ZXIgQ0ExLzAtBgkqhkiG9w0BCQEWIGJ1
Zy1sY3MtY2VydGlmaWNhdGVzQGxjcy5taXQuZWR1MB4XDTA4MDUwMTA0MDAwMFoXDTExMDcxNTA0
MDAwMFowgYoxCzAJBgNVBAYTAlVTMRYwFAYDVQQIEw1NYXNzYWNodXNldHRzMRIwEAYDVQQHEwlD
YW1icmlkZ2UxOzA5BgNVBAoUMk1JVCBDb21wdXRlciBTY2llbmNlICYgQXJ0aWZpY2lhbCBJbnRl
bGxpZ2VuY2UgTGFiMRIwEAYDVQQDEwlDbGllbnQgQ0EwggEiMA0GCSqGSIb3DQEBAQUAA4IBDwAw
ggEKAoIBAQDGdNLcm9ROpO0R+DD85MZyETWdKK/Gf32C3CLh6jy+34LMNGRluglAPasIh8g3zQsW
AlBnPaUoNI6QdbxZEh5VzijIpsmuMw2dI5UZeZwcPmEcRzWnEtlcw9amMN8hEboKUXRPNtxTJzb9
7eNKdMlW6HOJE+hkYJryh/0smOvVU4BnAHK9otL/3awDmsCfMK/RuFq3N78t8p38445zuA0yH65s
XoLq97JwEFOb/NuCRy+tQpZ9L5n9ofS2pRzGavzkYC6Z6kKr5OmlrOABdEogLB17ieI3anFnH/tD
cNHbUONTxPTjCzFrM8wgUor8zHb+Kfuu1dyKzkSqaxkkPZ0TAgMBAAGjggGDMIIBfzAOBgNVHQ8B
Af8EBAMCAQYwEgYDVR0TAQH/BAgwBgEB/wIBADARBglghkgBhvhCAQEEBAMCAQYwTAYDVR0gBEUw
QzBBBgoqhkiG9xIDAQICMDMwMQYIKwYBBQUHAgEWJWh0dHA6Ly9jYS5jc2FpbC5taXQuZWR1L0NT
QUlMLWNwcy50eHQwNwYDVR0fBDAwLjAsoCqgKIYmaHR0cDovL2NhLmNzYWlsLm1pdC5lZHUvY3Js
L21hc3Rlci5jcmwwNAYIKwYBBQUHAQEEKDAmMCQGCCsGAQUFBzAChhhodHRwOi8vY2EuY3NhaWwu
bWl0LmVkdS8wHQYDVR0OBBYEFMIkTgA89PxRhoE7abAVXKxgVoTFMB8GA1UdIwQYMBaAFI+80vw4
o6ce3tWLGTKiLH2hi6IcMBcGCiqGSIb3EgMBAQIECRYHd29sbG1hbjAwBgoqhkiG9xIDAQEBBCIw
IBYeYnVnLWNlcnRpZmljYXRlc0Bjc2FpbC5taXQuZWR1MA0GCSqGSIb3DQEBBQUAA4IBAQBrCPy4
72x64xod/2XQhQbtG1jn0zUBq4BUWf3oIGdvPi08IhSOsZwL79NRW+hVatJ0Ka1tBMjhv4WC688j
m5xXFE3IqYKYnq6j1N8q5GD8qHXO1NTodUmmXvbiznB9dWgEHDZNY19Y9rZWIdhM8aulfO59VGdr
nLbz7ky85XLU1XoAcmw/K2XYWQIT+qKC45Csa7Y5q/pSVSlG/qgb6DJvfd7Rmc4gc5+I9+sTXjna
Ry3ykZiL0paIv7JTQcTE0lR3AkgMl/5bOkCGa9NukD9DUy0b+ZR0IsCEKVEygZHtANwUGEXpkVqn
/m639xD114RqITU6C37GfMqHXNWQ+U3qMIIF2zCCBMOgAwIBAgICS8cwDQYJKoZIhvcNAQEFBQAw
gYoxCzAJBgNVBAYTAlVTMRYwFAYDVQQIEw1NYXNzYWNodXNldHRzMRIwEAYDVQQHEwlDYW1icmlk
Z2UxOzA5BgNVBAoUMk1JVCBDb21wdXRlciBTY2llbmNlICYgQXJ0aWZpY2lhbCBJbnRlbGxpZ2Vu
Y2UgTGFiMRIwEAYDVQQDEwlDbGllbnQgQ0EwHhcNMTAwODEwMTkzNTE0WhcNMTEwODEwMTkzNTE0
WjCByTELMAkGA1UEBhMCVVMxFjAUBgNVBAgMDU1hc3NhY2h1c2V0dHMxEjAQBgNVBAcMCUNhbWJy
aWRnZTFCMEAGA1UECgw5TUlUIENvbXB1dGVyIFNjaWVuY2UgJiBBcnRpZmljaWFsIEludGVsbGln
ZW5jZSBMYWJvcmF0b3J5MQ4wDAYDVQQLDAVVc2VyczEXMBUGA1UEAwwOSm9obiBDLk1hbGxlcnkx
ITAfBgkqhkiG9w0BCQEWEmpjbWFAQ1NBSUwuTUlULkVEVTCCASIwDQYJKoZIhvcNAQEBBQADggEP
ADCCAQoCggEBALE8KJkelwD1xMsnTpVGSS+t7SEL5sWfizOp9IRKre6otU0XXaC7Pv4AOEIrNj86
707TQ3Wavir/NSL/lSj7DY25hThw/231NPtYlaYghiILwXtEYEZl7tS0p1jpTuMho0xj7MqXkrCP
DD3r7394IuyftJTKWyo9SabRFwbQAULRgZgru2OJLECtVkFnbaX/OwAOvFEr8H/VRTd/0yFbSe8h
0F4d7y1SBTv/9wSEgyMfoAMEIHY7obA/6+5LjuWTvSlLg2jqnODA+MjDXVxtkmQgMCnz1QQVR+mG
qEuIUsoi1jYsuEuJjSBxuyKrgSNjz4Yoh7Z5uJp1vgtkSuxLOFECAwEAAaOCAggwggIEMA4GA1Ud
DwEB/wQEAwIF4DAnBgNVHSUEIDAeBggrBgEFBQcDAgYIKwYBBQUHAwQGCCsGAQUFBwMIMBEGCWCG
SAGG+EIBAQQEAwIFoDAJBgNVHRMEAjAAMEwGA1UdIARFMEMwQQYKKoZIhvcSAwECAjAzMDEGCCsG
AQUFBwIBFiVodHRwOi8vY2EuY3NhaWwubWl0LmVkdS9DU0FJTC1jcHMudHh0MDcGA1UdHwQwMC4w
LKAqoCiGJmh0dHA6Ly9jYS5jc2FpbC5taXQuZWR1L2NybC9jbGllbnQuY3JsMDQGCCsGAQUFBwEB
BCgwJjAkBggrBgEFBQcwAoYYaHR0cDovL2NhLmNzYWlsLm1pdC5lZHUvMB0GA1UdDgQWBBQ3YfKX
Sx6//yMukUD5MoXF0E0sOzAfBgNVHSMEGDAWgBTCJE4APPT8UYaBO2mwFVysYFaExTCBiQYDVR0R
BIGBMH+kaTBnMRMwEQYKCZImiZPyLGQBGRYDZWR1MRMwEQYKCZImiZPyLGQBGRYDbWl0MRUwEwYK
CZImiZPyLGQBGRYFY3NhaWwxDjAMBgNVBAsMBVVzZXJzMRQwEgYKCZImiZPyLGQBAQwEamNtYYES
amNtYUBDU0FJTC5NSVQuRURVMCIGCiqGSIb3EgMBAQIEFBYSamNtYUBDU0FJTC5NSVQuRURVMA0G
CSqGSIb3DQEBBQUAA4IBAQBMf11pLtwbMTBtg1uBc0e02kHCAzfswPB2awPn4uVwUyvYAzppAxBJ
xXOL8nOXc1U31dCJL/C6P6YS57RRmprm8ojJM+gJc6PRAjk0WxvZRH9Pjh1XIHML8XnTu/hf/lVa
x4mtYUIhb1csE8HQEgIuBIwUsf7WrhQnBaKiv2wUKUHTuaAlclou841DtE/Fle3dqpMmDPKoDOZX
faQl/50WHYAG/diaMyE8SlrQyIytFtgioprLT9hW0TziBkk87+4wbAfStueUsGPMpsZGM/pasFtg
dFaYP10ydMI4TftPgvPLxocfNn1xWUOj/fYP3dK1hrr6QA4g5xJUsvpsGo7KMYIDZjCCA2ICAQEw
gZEwgYoxCzAJBgNVBAYTAlVTMRYwFAYDVQQIEw1NYXNzYWNodXNldHRzMRIwEAYDVQQHEwlDYW1i
cmlkZ2UxOzA5BgNVBAoUMk1JVCBDb21wdXRlciBTY2llbmNlICYgQXJ0aWZpY2lhbCBJbnRlbGxp
Z2VuY2UgTGFiMRIwEAYDVQQDEwlDbGllbnQgQ0ECAkvHMAkGBSsOAwIaBQCgggGpMBgGCSqGSIb3
DQEJAzELBgkqhkiG9w0BBwEwHAYJKoZIhvcNAQkFMQ8XDTExMDMxNzIyMzkyNlowIwYJKoZIhvcN
AQkEMRYEFPKg4IhnoMAZfd5nMy+XzkPoXlFMMIGiBgkrBgEEAYI3EAQxgZQwgZEwgYoxCzAJBgNV
BAYTAlVTMRYwFAYDVQQIEw1NYXNzYWNodXNldHRzMRIwEAYDVQQHEwlDYW1icmlkZ2UxOzA5BgNV
BAoUMk1JVCBDb21wdXRlciBTY2llbmNlICYgQXJ0aWZpY2lhbCBJbnRlbGxpZ2VuY2UgTGFiMRIw
EAYDVQQDEwlDbGllbnQgQ0ECAkvHMIGkBgsqhkiG9w0BCRACCzGBlKCBkTCBijELMAkGA1UEBhMC
VVMxFjAUBgNVBAgTDU1hc3NhY2h1c2V0dHMxEjAQBgNVBAcTCUNhbWJyaWRnZTE7MDkGA1UEChQy
TUlUIENvbXB1dGVyIFNjaWVuY2UgJiBBcnRpZmljaWFsIEludGVsbGlnZW5jZSBMYWIxEjAQBgNV
BAMTCUNsaWVudCBDQQICS8cwDQYJKoZIhvcNAQEBBQAEggEAaJoAj2xkvhtMFDONAkUSN35sZ8hd
PvJwD9h3xv8/+qrGLMyHhIvylIMV++52/mxHP5i4InyGy0pukxyswP3TIflyGoyzTrqFqklQ+UWa
cSlh7svuC6bdKlNsQWGcJkLjgaJtNmcU43dTrZvz19xLdaxx4lCGaFiCXWnwlap+YEuX1OWh8Uzc
G7hxnF3DOcXKYYkZ+gvWCkPI93J6Pj41IkCrsHdaVnzesIBZLe5/TwiEEqdmOT/rBSN2hX3qwvcO
3KGz+2JmHliWBn1ZTsbxBC2MEEdjoOrQUHB04pwJaZi/9wZbecLpmIMsLkalo3LEmE41GiZszxru
/sBcrRAUiAAAAAAAAA==

--Apple-Mail-9--28180660--


--===============4214640714754879279==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

_______________________________________________
WWW-CL mailing list
[email protected]
https://lists.csail.mit.edu/mailman/listinfo/www-cl

--===============4214640714754879279==--