src/socket.cc

   1 ///
   2 /// \file       socket.cc
   3 ///             Class wrapper to encapsulate the Blackberry USB logical socket
   4 ///
   5
   6 /*
   7     Copyright (C) 2005-2010, Net Direct Inc. (http://www.netdirect.ca/)
   8
   9     This program is free software; you can redistribute it and/or modify
  10     it under the terms of the GNU General Public License as published by
  11     the Free Software Foundation; either version 2 of the License, or
  12     (at your option) any later version.
  13
  14     This program is distributed in the hope that it will be useful,
  15     but WITHOUT ANY WARRANTY; without even the implied warranty of
  16     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  17
  18     See the GNU General Public License in the COPYING file at the
  19     root directory of this project for more details.
  20 */
  21
  22 #include "socket.h"
  23 #include "usbwrap.h"
  24 #include "data.h"
  25 #include "protocol.h"
  26 #include "protostructs.h"
  27 #include "endian.h"
  28 #include "debug.h"
  29 #include "packet.h"
  30 #include "sha1.h"
  31 #include <sstream>
  32 #include <string.h>
  33
  34 using namespace Usb;
  35
  36
  37 namespace Barry {
  38
  39
  40 //////////////////////////////////////////////////////////////////////////////
  41 // SocketZero class
  42
  43 SocketZero::SocketZero( SocketRoutingQueue &queue,
  44                         int writeEndpoint,
  45                         uint8_t zeroSocketSequenceStart)
  46         : m_dev(0),
  47         m_queue(&queue),
  48         m_writeEp(writeEndpoint),
  49         m_readEp(0),
  50         m_zeroSocketSequence(zeroSocketSequenceStart),
  51         m_sequenceId(0),
  52         m_halfOpen(false),
  53         m_challengeSeed(0),
  54         m_remainingTries(0),
  55         m_hideSequencePacket(true),
  56         m_resetOnClose(false)
  57 {
  58 }
  59
  60 SocketZero::SocketZero( Device &dev,
  61                         int writeEndpoint, int readEndpoint,
  62                         uint8_t zeroSocketSequenceStart)
  63         : m_dev(&dev),
  64         m_queue(0),
  65         m_writeEp(writeEndpoint),
  66         m_readEp(readEndpoint),
  67         m_zeroSocketSequence(zeroSocketSequenceStart),
  68         m_sequenceId(0),
  69         m_halfOpen(false),
  70         m_challengeSeed(0),
  71         m_remainingTries(0),
  72         m_hideSequencePacket(true),
  73         m_resetOnClose(false)
  74 {
  75 }
  76
  77 SocketZero::~SocketZero()
  78 {
  79         // nothing to close for socket zero
  80 }
  81
  82
  83 ///////////////////////////////////////
  84 // Socket Zero static calls
  85
  86 // appends fragment to whole... if whole is empty, simply copies, and
  87 // sets command to DATA instead of FRAGMENTED.  Always updates the
  88 // packet size of whole, to reflect the total size
  89 void SocketZero::AppendFragment(Data &whole, const Data &fragment)
  90 {
  91         if( whole.GetSize() == 0 ) {
  92                 // empty, so just copy
  93                 whole = fragment;
  94         }
  95         else {
  96                 // has some data already, so just append
  97                 int size = whole.GetSize();
  98                 unsigned char *buf = whole.GetBuffer(size + fragment.GetSize());
  99                 MAKE_PACKET(fpack, fragment);
 100                 int fragsize = fragment.GetSize() - SB_FRAG_HEADER_SIZE;
 101
 102                 memcpy(buf+size, &fpack->u.db.u.fragment, fragsize);
 103                 whole.ReleaseBuffer(size + fragsize);
 104         }
 105
 106         // update whole's size and command type for future sanity
 107         Barry::Protocol::Packet *wpack = (Barry::Protocol::Packet *) whole.GetBuffer();
 108         wpack->size = htobs((uint16_t) whole.GetSize());
 109         wpack->command = SB_COMMAND_DB_DATA;
 110         // don't need to call ReleaseBuffer here, since we're not changing
 111         // the real data size, and ReleaseBuffer was called above during copy
 112 }
 113
 114 // If offset is 0, starts fresh, taking the first fragment packet size chunk
 115 // out of whole and creating a sendable packet in fragment.  Returns the
 116 // next offset if there is still more data, or 0 if finished.
 117 unsigned int SocketZero::MakeNextFragment(const Data &whole, Data &fragment, unsigned int offset)
 118 {
 119         // sanity check
 120         if( whole.GetSize() < SB_FRAG_HEADER_SIZE ) {
 121                 eout("Whole packet too short to fragment: " << whole.GetSize());
 122                 throw Error("Socket: Whole packet too short to fragment");
 123         }
 124
 125         // calculate size
 126         unsigned int todo = whole.GetSize() - SB_FRAG_HEADER_SIZE - offset;
 127         unsigned int nextOffset = 0;
 128         if( todo > (MAX_PACKET_SIZE - SB_FRAG_HEADER_SIZE) ) {
 129                 todo = MAX_PACKET_SIZE - SB_FRAG_HEADER_SIZE;
 130                 nextOffset = offset + todo;
 131         }
 132
 133         // create fragment header
 134         unsigned char *buf = fragment.GetBuffer(SB_FRAG_HEADER_SIZE + todo);
 135         memcpy(buf, whole.GetData(), SB_FRAG_HEADER_SIZE);
 136
 137         // copy over a fragment size of data
 138         memcpy(buf + SB_FRAG_HEADER_SIZE, whole.GetData() + SB_FRAG_HEADER_SIZE + offset, todo);
 139
 140         // update fragment's size and command type
 141         Barry::Protocol::Packet *wpack = (Barry::Protocol::Packet *) buf;
 142         wpack->size = htobs((uint16_t) (todo + SB_FRAG_HEADER_SIZE));
 143         if( nextOffset )
 144                 wpack->command = SB_COMMAND_DB_FRAGMENTED;
 145         else
 146                 wpack->command = SB_COMMAND_DB_DATA;
 147
 148         // adjust the new fragment size
 149         fragment.ReleaseBuffer(SB_FRAG_HEADER_SIZE + todo);
 150
 151         // return next round
 152         return nextOffset;
 153 }
 154
 155
 156 ///////////////////////////////////////
 157 // SocketZero private API
 158
 159 //
 160 // FIXME - not sure yet whether sequence ID's are per socket or not... if
 161 // they are per socket, then this global sequence behaviour will not work,
 162 // and we need to track m_sequenceId on a Socket level.
 163 //
 164 void SocketZero::CheckSequence(uint16_t socket, const Data &seq)
 165 {
 166         MAKE_PACKET(spack, seq);
 167         if( (unsigned int) seq.GetSize() < SB_SEQUENCE_PACKET_SIZE ) {
 168                 eout("Short sequence packet:\n" << seq);
 169                 throw Error("Socket: invalid sequence packet");
 170         }
 171
 172         // we'll cheat here... if the packet's sequence is 0, we'll
 173         // silently restart, otherwise, fail
 174         uint32_t sequenceId = btohl(spack->u.sequence.sequenceId);
 175         if( sequenceId == 0 ) {
 176                 // silently restart (will advance below)
 177                 m_sequenceId = 0;
 178         }
 179         else {
 180                 if( sequenceId != m_sequenceId ) {
 181                         if( socket != 0 ) {
 182                                 std::ostringstream oss;
 183                                 oss << "Socket 0x" << std::hex << (unsigned int)socket
 184                                         << ": out of sequence. "
 185                                         << "(Global sequence: " << m_sequenceId
 186                                         << ". Packet sequence: " << sequenceId
 187                                         << ")";
 188                                 eout(oss.str());
 189                                 throw Error(oss.str());
 190                         }
 191                         else {
 192                                 dout("Bad sequence on socket 0: expected: "
 193                                         << m_sequenceId
 194                                         << ". Packet sequence: " << sequenceId);
 195                         }
 196                 }
 197         }
 198
 199         // advance!
 200         m_sequenceId++;
 201 }
 202
 203 void SocketZero::SendOpen(uint16_t socket, Data &receive)
 204 {
 205         // build open command
 206         Barry::Protocol::Packet packet;
 207         packet.socket = 0;
 208         packet.size = htobs(SB_SOCKET_PACKET_HEADER_SIZE);
 209         packet.command = SB_COMMAND_OPEN_SOCKET;
 210         packet.u.socket.socket = htobs(socket);
 211         packet.u.socket.sequence = m_zeroSocketSequence;// overwritten by Send()
 212
 213         Data send(&packet, SB_SOCKET_PACKET_HEADER_SIZE);
 214         try {
 215                 RawSend(send);
 216                 RawReceive(receive);
 217         } catch( Usb::Error & ) {
 218                 eeout(send, receive);
 219                 throw;
 220         }
 221
 222         // check sequence ID
 223         Protocol::CheckSize(receive, SB_PACKET_HEADER_SIZE);
 224         if( IS_COMMAND(receive, SB_COMMAND_SEQUENCE_HANDSHAKE) ) {
 225                 CheckSequence(0, receive);
 226
 227                 // still need our ACK
 228                 RawReceive(receive);
 229         }
 230
 231         // receive now holds the Open response
 232 }
 233
 234 // SHA1 hashing logic based on Rick Scott's XmBlackBerry's send_password()
 235 void SocketZero::SendPasswordHash(uint16_t socket, const char *password, Data &receive)
 236 {
 237         unsigned char pwdigest[SHA_DIGEST_LENGTH];
 238         unsigned char prefixedhash[SHA_DIGEST_LENGTH + 4];
 239
 240         // first, hash the password by itself
 241         SHA1((unsigned char *) password, strlen(password), pwdigest);
 242
 243         // prefix the resulting hash with the provided seed
 244         uint32_t seed = htobl(m_challengeSeed);
 245         memcpy(&prefixedhash[0], &seed, sizeof(uint32_t));
 246         memcpy(&prefixedhash[4], pwdigest, SHA_DIGEST_LENGTH);
 247
 248         // hash again
 249         SHA1((unsigned char *) prefixedhash, SHA_DIGEST_LENGTH + 4, pwdigest);
 250
 251
 252         size_t size = SB_SOCKET_PACKET_HEADER_SIZE + PASSWORD_CHALLENGE_SIZE;
 253
 254         // build open command
 255         Barry::Protocol::Packet packet;
 256         packet.socket = 0;
 257         packet.size = htobs(size);
 258         packet.command = SB_COMMAND_PASSWORD;
 259         packet.u.socket.socket = htobs(socket);
 260         packet.u.socket.sequence = m_zeroSocketSequence;// overwritten by Send()
 261         packet.u.socket.u.password.remaining_tries = 0;
 262         packet.u.socket.u.password.unknown = 0;
 263         packet.u.socket.u.password.param = htobs(0x14); // FIXME - what does this mean?
 264         memcpy(packet.u.socket.u.password.u.hash, pwdigest,
 265                 sizeof(packet.u.socket.u.password.u.hash));
 266
 267         // blank password hashes as we don't need these anymore
 268         memset(pwdigest, 0, sizeof(pwdigest));
 269         memset(prefixedhash, 0, sizeof(prefixedhash));
 270
 271         Data send(&packet, size);
 272         RawSend(send);
 273         RawReceive(receive);
 274
 275         // blank password hash as we don't need this anymore either
 276         memset(packet.u.socket.u.password.u.hash, 0,
 277                 sizeof(packet.u.socket.u.password.u.hash));
 278         send.Zap();
 279
 280         // check sequence ID
 281         Protocol::CheckSize(receive, SB_PACKET_HEADER_SIZE);
 282         if( IS_COMMAND(receive, SB_COMMAND_SEQUENCE_HANDSHAKE) ) {
 283                 CheckSequence(0, receive);
 284
 285                 // still need our ACK
 286                 RawReceive(receive);
 287         }
 288
 289         // receive now holds the Password response
 290 }
 291
 292 void SocketZero::RawSend(Data &send, int timeout)
 293 {
 294         Usb::Device *dev = m_queue ? m_queue->GetUsbDevice() : m_dev;
 295
 296         // Special case: it seems that sending packets with a size that's an
 297         // exact multiple of 0x40 causes the device to get confused.
 298         //
 299         // To get around that, it is observed in the captures that the size
 300         // is sent in a special 3 byte packet before the real packet.
 301         // Check for this case here.
 302         //
 303         if( (send.GetSize() % 0x40) == 0 ) {
 304                 Protocol::SizePacket packet;
 305                 packet.size = htobs(send.GetSize());
 306                 packet.buffer[2] = 0;           // zero the top byte
 307                 Data sizeCommand(&packet, 3);
 308
 309                 dev->BulkWrite(m_writeEp, sizeCommand);
 310         }
 311
 312         dev->BulkWrite(m_writeEp, send);
 313 }
 314
 315 void SocketZero::RawReceive(Data &receive, int timeout)
 316 {
 317         do {
 318                 if( m_queue ) {
 319                         if( !m_queue->DefaultRead(receive, timeout) )
 320                                 throw Timeout("SocketZero::RawReceive: queue DefaultRead returned false (likely a timeout)");
 321                 }
 322                 else {
 323                         m_dev->BulkRead(m_readEp, receive, timeout);
 324                 }
 325                 ddout("SocketZero::RawReceive: Endpoint "
 326                         << (m_queue ? m_queue->GetReadEp() : m_readEp)
 327                         << "\nReceived:\n" << receive);
 328         } while( SequencePacket(receive) );
 329 }
 330
 331 //
 332 // SequencePacket
 333 //
 334 /// Returns true if this is a sequence packet that should be ignored.
 335 /// This function is used in SocketZero::RawReceive() in order
 336 /// to determine whether to keep reading or not.  By default,
 337 /// this function checks whether the packet is a sequence packet
 338 /// or not, and returns true if so.  Also, if it is a sequence
 339 /// packet, it checks the validity of the sequence number.
 340 ///
 341 /// If sequence packets become important in the future, this
 342 /// function could be changed to call a user-defined callback,
 343 /// in order to handle these things out of band.
 344 ///
 345 bool SocketZero::SequencePacket(const Data &data)
 346 {
 347         // Begin -- Test quiet durty :(
 348         if (m_hideSequencePacket == false) {
 349                 return false;
 350         }
 351         // End -- Test quiet durty :(
 352
 353         if( data.GetSize() >= MIN_PACKET_SIZE ) {
 354                 MAKE_PACKET(rpack, data);
 355                 if( rpack->socket == 0 &&
 356                     rpack->command == SB_COMMAND_SEQUENCE_HANDSHAKE )
 357                 {
 358                         CheckSequence(0, data);
 359                         return true;
 360                 }
 361         }
 362         return false;   // not a sequence packet
 363 }
 364
 365
 366 ///////////////////////////////////////
 367 // SocketZero public API
 368
 369 void SocketZero::SetRoutingQueue(SocketRoutingQueue &queue)
 370 {
 371         // replace the current queue pointer
 372         m_queue = &queue;
 373 }
 374
 375 void SocketZero::UnlinkRoutingQueue()
 376 {
 377         m_queue = 0;
 378 }
 379
 380 void SocketZero::Send(Data &send, int timeout)
 381 {
 382         // force the socket number to 0
 383         if( send.GetSize() >= SB_SOCKET_PACKET_HEADER_SIZE ) {
 384                 MAKE_PACKETPTR_BUF(spack, send.GetBuffer());
 385                 spack->socket = 0;
 386         }
 387
 388         // This is a socket 0 packet, so force the send packet data's
 389         // socket 0 sequence number to something correct.
 390         if( send.GetSize() >= SB_SOCKET_PACKET_HEADER_SIZE ) {
 391                 MAKE_PACKETPTR_BUF(spack, send.GetBuffer());
 392                 spack->u.socket.sequence = m_zeroSocketSequence;
 393                 m_zeroSocketSequence++;
 394         }
 395
 396         RawSend(send, timeout);
 397 }
 398
 399 void SocketZero::Send(Data &send, Data &receive, int timeout)
 400 {
 401         Send(send, timeout);
 402         RawReceive(receive, timeout);
 403 }
 404
 405 void SocketZero::Send(Barry::Packet &packet, int timeout)
 406 {
 407         Send(packet.m_send, packet.m_receive, timeout);
 408 }
 409
 410 void SocketZero::Receive(Data &receive, int timeout)
 411 {
 412         RawReceive(receive, timeout);
 413 }
 414
 415
 416 //
 417 // Open
 418 //
 419 /// Open a logical socket on the device.
 420 ///
 421 /// Both the socket number and the flag are based on the response to the
 422 /// SELECT_MODE command.  See Controller::SelectMode() for more info
 423 /// on this.
 424 ///
 425 /// The packet sequence is normal for most socket operations.
 426 ///
 427 ///     - Down: command packet with OPEN_SOCKET
 428 ///     - Up: optional sequence handshake packet
 429 ///     - Up: command response, which repeats the socket and flag data
 430 ///             as confirmation
 431 ///
 432 /// \exception  Barry::Error
 433 ///             Thrown on protocol error.
 434 ///
 435 /// \exception  Barry::BadPassword
 436 ///             Thrown on invalid password, or not enough retries left
 437 ///             on device.
 438 ///
 439 SocketHandle SocketZero::Open(uint16_t socket, const char *password)
 440 {
 441         // Things get a little funky here, as we may be left in an
 442         // intermediate state in the case of a failed password.
 443         // This function should support being called as many times
 444         // as needed to handle the password
 445
 446         Data send, receive;
 447         ZeroPacket packet(send, receive);
 448
 449         // save sequence for later close
 450         uint8_t closeFlag = GetZeroSocketSequence();
 451
 452         if( !m_halfOpen ) {
 453                 // starting fresh
 454                 m_remainingTries = 0;
 455
 456                 SendOpen(socket, receive);
 457
 458                 // check for password challenge, or success
 459                 if( packet.Command() == SB_COMMAND_PASSWORD_CHALLENGE ) {
 460                         m_halfOpen = true;
 461                         m_challengeSeed = packet.ChallengeSeed();
 462                         m_remainingTries = packet.RemainingTries();
 463                 }
 464
 465                 // fall through to challenge code...
 466         }
 467
 468         if( m_halfOpen ) {
 469                 // half open, device is expecting a password hash... do we
 470                 // have a password?
 471                 if( !password ) {
 472                         throw BadPassword("No password specified.", m_remainingTries, false);
 473                 }
 474
 475                 // only allow password attempts if there are
 476                 // BARRY_MIN_PASSWORD_TRIES or more tries remaining...
 477                 // we want to give the user at least some chance on a
 478                 // Windows machine before the device commits suicide.
 479                 if( m_remainingTries < BARRY_MIN_PASSWORD_TRIES ) {
 480                         throw BadPassword("Fewer than " BARRY_MIN_PASSWORD_TRIES_ASC " password tries remaining in device. Refusing to proceed, to avoid device zapping itself.  Use a Windows client, or re-cradle the device.",
 481                                 m_remainingTries,
 482                                 true);
 483                 }
 484
 485                 // save sequence for later close (again after SendOpen())
 486                 closeFlag = GetZeroSocketSequence();
 487
 488                 SendPasswordHash(socket, password, receive);
 489
 490                 if( packet.Command() == SB_COMMAND_PASSWORD_FAILED ) {
 491                         m_halfOpen = true;
 492                         m_challengeSeed = packet.ChallengeSeed();
 493                         m_remainingTries = packet.RemainingTries();
 494                         throw BadPassword("Password rejected by device.", m_remainingTries, false);
 495                 }
 496
 497                 // if we get this far, we are no longer in half-open password
 498                 // mode, so we can reset our flags
 499                 m_halfOpen = false;
 500
 501                 // fall through to success check...
 502         }
 503
 504         if( packet.Command() != SB_COMMAND_OPENED_SOCKET ||
 505             packet.SocketResponse() != socket ||
 506             packet.SocketSequence() != closeFlag )
 507         {
 508                 eout("Packet:\n" << receive);
 509                 throw Error("Socket: Bad OPENED packet in Open");
 510         }
 511
 512         // success!  save the socket
 513         return SocketHandle(new Socket(*this, socket, closeFlag));
 514 }
 515
 516 //
 517 // Close
 518 //
 519 /// Closes a non-default socket (i.e. non-zero socket number)
 520 ///
 521 /// The packet sequence is just like Open(), except the command is
 522 /// CLOSE_SOCKET.
 523 ///
 524 /// \exception  Barry::Error
 525 ///
 526 void SocketZero::Close(Socket &socket)
 527 {
 528         if( socket.GetSocket() == 0 )
 529                 return;         // nothing to do
 530
 531         // build close command
 532         Barry::Protocol::Packet packet;
 533         packet.socket = 0;
 534         packet.size = htobs(SB_SOCKET_PACKET_HEADER_SIZE);
 535         packet.command = SB_COMMAND_CLOSE_SOCKET;
 536         packet.u.socket.socket = htobs(socket.GetSocket());
 537         packet.u.socket.sequence = socket.GetCloseFlag();
 538
 539         Data command(&packet, SB_SOCKET_PACKET_HEADER_SIZE);
 540         Data response;
 541         try {
 542                 Send(command, response);
 543         }
 544         catch( Usb::Error & ) {
 545                 // reset so this won't be called again
 546                 socket.ForceClosed();
 547
 548                 eeout(command, response);
 549                 throw;
 550         }
 551
 552         // starting fresh, reset sequence ID
 553         Protocol::CheckSize(response, SB_PACKET_HEADER_SIZE);
 554         if( IS_COMMAND(response, SB_COMMAND_SEQUENCE_HANDSHAKE) ) {
 555                 CheckSequence(0, response);
 556
 557                 // still need our ACK
 558                 RawReceive(response);
 559         }
 560
 561         Protocol::CheckSize(response, SB_SOCKET_PACKET_HEADER_SIZE);
 562         MAKE_PACKET(rpack, response);
 563         if( rpack->command != SB_COMMAND_CLOSED_SOCKET ||
 564             btohs(rpack->u.socket.socket) != socket.GetSocket() ||
 565             rpack->u.socket.sequence != socket.GetCloseFlag() )
 566         {
 567                 // reset so this won't be called again
 568                 socket.ForceClosed();
 569
 570                 eout("Packet:\n" << response);
 571                 throw BadPacket(rpack->command, "Socket: Bad CLOSED packet in Close");
 572         }
 573
 574         if( m_resetOnClose ) {
 575                 Data send, receive;
 576                 ZeroPacket reset_packet(send, receive);
 577                 reset_packet.Reset();
 578
 579                 Send(reset_packet);
 580                 if( reset_packet.CommandResponse() != SB_COMMAND_RESET_REPLY ) {
 581                         throw BadPacket(reset_packet.CommandResponse(),
 582                                 "Socket: Missing RESET_REPLY in Close");
 583                 }
 584         }
 585
 586 //      // and finally, there always seems to be an extra read of
 587 //      // an empty packet at the end... just throw it away
 588 //      try {
 589 //              RawReceive(response, 1);
 590 //      }
 591 //      catch( Usb::Timeout & ) {
 592 //      }
 593
 594         // reset socket and flag
 595         socket.ForceClosed();
 596 }
 597
 598
 599
 600
 601
 602
 603 //////////////////////////////////////////////////////////////////////////////
 604 // Socket class
 605
 606 Socket::Socket( SocketZero &zero,
 607                 uint16_t socket,
 608                 uint8_t closeFlag)
 609         : m_zero(&zero)
 610         , m_socket(socket)
 611         , m_closeFlag(closeFlag)
 612         , m_registered(false)
 613 {
 614 }
 615
 616 Socket::~Socket()
 617 {
 618         // trap exceptions in the destructor
 619         try {
 620                 // a non-default socket has been opened, close it
 621                 Close();
 622         }
 623         catch( std::runtime_error &re ) {
 624                 // do nothing... log it?
 625                 dout("Exception caught in ~Socket: " << re.what());
 626         }
 627 }
 628
 629
 630 ////////////////////////////////////
 631 // Socket protected API
 632
 633 void Socket::CheckSequence(const Data &seq)
 634 {
 635         m_zero->CheckSequence(m_socket, seq);
 636 }
 637
 638 void Socket::ForceClosed()
 639 {
 640         m_socket = 0;
 641         m_closeFlag = 0;
 642 }
 643
 644
 645 ////////////////////////////////////
 646 // Socket public API
 647
 648 void Socket::Close()
 649 {
 650         UnregisterInterest();
 651         m_zero->Close(*this);
 652 }
 653
 654
 655 //
 656 // Send
 657 //
 658 /// Sends 'send' data to device, no receive.
 659 ///
 660 /// \returns    void
 661 ///
 662 /// \exception  Usb::Error on underlying bus errors.
 663 ///
 664 void Socket::Send(Data &send, int timeout)
 665 {
 666         // force the socket number to this socket
 667         if( send.GetSize() >= SB_PACKET_HEADER_SIZE ) {
 668                 MAKE_PACKETPTR_BUF(spack, send.GetBuffer());
 669                 spack->socket = htobs(m_socket);
 670         }
 671         m_zero->RawSend(send, timeout);
 672 }
 673
 674 //
 675 // Send
 676 //
 677 /// Sends 'send' data to device, and waits for response.
 678 ///
 679 /// \returns    void
 680 ///
 681 /// \exception  Usb::Error on underlying bus errors.
 682 ///
 683 void Socket::Send(Data &send, Data &receive, int timeout)
 684 {
 685         Send(send, timeout);
 686         Receive(receive, timeout);
 687 }
 688
 689 void Socket::Send(Barry::Packet &packet, int timeout)
 690 {
 691         Send(packet.m_send, packet.m_receive, timeout);
 692 }
 693
 694 void Socket::Receive(Data &receive, int timeout)
 695 {
 696         if( m_registered ) {
 697                 if( m_zero->m_queue ) {
 698                         if( !m_zero->m_queue->SocketRead(m_socket, receive, timeout) )
 699                                 throw Timeout("Socket::Receive: queue SocketRead returned false (likely a timeout)");
 700                 }
 701                 else {
 702                         throw std::logic_error("NULL queue pointer in a registered socket read.");
 703                 }
 704         }
 705         else {
 706                 m_zero->RawReceive(receive, timeout);
 707         }
 708 }
 709
 710
 711 // FIXME - find a better way to do this?
 712 void Socket::ReceiveData(Data &receive, int timeout)
 713 {
 714         HideSequencePacket(false);
 715         Receive(receive);
 716         HideSequencePacket(true);
 717 }
 718
 719
 720 // FIXME - find a better way to do this?
 721 void Socket::InitSequence(int timeout)
 722 {
 723         Data receive;
 724         receive.Zap();
 725
 726         HideSequencePacket(false);
 727         Receive(receive);
 728         HideSequencePacket(true);
 729
 730         Protocol::CheckSize(receive, SB_PACKET_HEADER_SIZE);
 731         CheckSequence(receive);
 732 }
 733
 734
 735 // sends the send packet down to the device
 736 // Blocks until response received or timed out in Usb::Device
 737 //
 738 // This function is used to send packet to JVM
 739 void Socket::PacketJVM(Data &send, Data &receive, int timeout)
 740 {
 741         if( ( send.GetSize() < MIN_PACKET_DATA_SIZE ) ||
 742                 ( send.GetSize() > MAX_PACKET_DATA_SIZE ) ) {
 743                 // we don't do that around here
 744                 throw std::logic_error("Socket: unknown send data in PacketJVM()");
 745         }
 746
 747         Data &inFrag = receive;
 748         receive.Zap();
 749
 750         // send non-fragmented
 751         Send(send, inFrag, timeout);
 752
 753         bool done = false;
 754         int blankCount = 0;
 755
 756         while( !done ) {
 757                 // check the packet's validity
 758                 if( inFrag.GetSize() > 6 ) {
 759                         MAKE_PACKET(rpack, inFrag);
 760
 761                         blankCount = 0;
 762
 763                         Protocol::CheckSize(inFrag, SB_PACKET_HEADER_SIZE);
 764
 765                         switch( rpack->command )
 766                         {
 767                         case SB_COMMAND_SEQUENCE_HANDSHAKE:
 768                                 CheckSequence(inFrag);
 769                                 break;
 770
 771                         default: {
 772                                 std::ostringstream oss;
 773                                 oss << "Socket: (read) unhandled packet in Packet(): 0x" << std::hex << (unsigned int)rpack->command;
 774                                 eout(oss.str());
 775                                 throw Error(oss.str());
 776                                 }
 777                                 break;
 778                         }
 779                 }
 780                 else if( inFrag.GetSize() == 6 ) {
 781                         done = true;
 782                 }
 783                 else {
 784                         blankCount++;
 785
 786                         //std::cerr << "Blank! " << blankCount << std::endl;
 787                         if( blankCount == 10 ) {
 788                                 // only ask for more data on stalled sockets
 789                                 // for so long
 790                                 throw Error("Socket: 10 blank packets received");
 791                         }
 792                 }
 793
 794                 if( !done ) {
 795                         // not done yet, ask for another read
 796                         Receive(inFrag);
 797                 }
 798         }
 799 }
 800
 801 // sends the send packet down to the device
 802 // Blocks until response received or timed out in Usb::Device
 803 void Socket::PacketData(Data &send, Data &receive, int timeout)
 804 {
 805         if( ( send.GetSize() < MIN_PACKET_DATA_SIZE ) ||
 806                 ( send.GetSize() > MAX_PACKET_DATA_SIZE ) ) {
 807                 // we don't do that around here
 808                 throw std::logic_error("Socket: unknown send data in PacketData()");
 809         }
 810
 811         Data &inFrag = receive;
 812         receive.Zap();
 813
 814         // send non-fragmented
 815         Send(send, inFrag, timeout);
 816
 817         bool done = false;
 818         int blankCount = 0;
 819
 820         while( !done ) {
 821                 // check the packet's validity
 822                 if( inFrag.GetSize() > 0 ) {
 823                         MAKE_PACKET(rpack, inFrag);
 824
 825                         blankCount = 0;
 826
 827                         Protocol::CheckSize(inFrag, SB_PACKET_HEADER_SIZE);
 828
 829                         switch( rpack->command )
 830                         {
 831                         case SB_COMMAND_SEQUENCE_HANDSHAKE:
 832                                 CheckSequence(inFrag);
 833                                 if (!m_zero->IsSequencePacketHidden())
 834                                         done = true;
 835                                 break;
 836
 837                         case SB_COMMAND_JL_READY:
 838                         case SB_COMMAND_JL_ACK:
 839                         case SB_COMMAND_JL_HELLO_ACK:
 840                         case SB_COMMAND_JL_RESET_REQUIRED:
 841                                 done = true;
 842                                 break;
 843
 844                         case SB_COMMAND_JL_GET_DATA_ENTRY:      // This response means that the next packet is the stream
 845                                 done = true;
 846                                 break;
 847
 848                         case SB_DATA_JL_INVALID:
 849                                 throw BadPacket(rpack->command, "file is not a valid Java code file");
 850                                 break;
 851
 852                         case SB_COMMAND_JL_NOT_SUPPORTED:
 853                                 throw BadPacket(rpack->command, "device does not support requested command");
 854                                 break;
 855
 856                         default:
 857                                 // unknown packet, pass it up to the
 858                                 // next higher code layer
 859                                 done = true;
 860                                 break;
 861                         }
 862                 }
 863                 else {
 864                         blankCount++;
 865                         //std::cerr << "Blank! " << blankCount << std::endl;
 866                         if( blankCount == 10 ) {
 867                                 // only ask for more data on stalled sockets
 868                                 // for so long
 869                                 throw Error("Socket: 10 blank packets received");
 870                         }
 871                 }
 872
 873                 if( !done ) {
 874                         // not done yet, ask for another read
 875                         Receive(inFrag);
 876                 }
 877         }
 878 }
 879
 880 // sends the send packet down to the device, fragmenting if
 881 // necessary, and returns the response in receive, defragmenting
 882 // if needed
 883 // Blocks until response received or timed out in Usb::Device
 884 //
 885 // This is primarily for Desktop Database packets... Javaloader
 886 // packets use PacketData().
 887 //
 888 void Socket::Packet(Data &send, Data &receive, int timeout)
 889 {
 890         MAKE_PACKET(spack, send);
 891         if( send.GetSize() < MIN_PACKET_SIZE ||
 892             (spack->command != SB_COMMAND_DB_DATA &&
 893              spack->command != SB_COMMAND_DB_DONE) )
 894         {
 895                 // we don't do that around here
 896                 eout("unknown send data in Packet(): " << send);
 897                 throw std::logic_error("Socket: unknown send data in Packet()");
 898         }
 899
 900         Data inFrag;
 901         receive.Zap();
 902
 903         if( send.GetSize() <= MAX_PACKET_SIZE ) {
 904                 // send non-fragmented
 905                 Send(send, inFrag, timeout);
 906         }
 907         else {
 908                 // send fragmented
 909                 unsigned int offset = 0;
 910                 Data outFrag;
 911
 912                 // You haven't to sequence packet while the whole packet isn't sent
 913                 //  a) No sequence received packet
 914                 //  b) 1°) Sent framgment 1/N
 915                 //     2°) Sent framgment 2/N
 916                 //         ...
 917                 //     N°) Before sent fragment N/N, I enable the sequence packet process.
 918                 //         Sent framgment N/N
 919                 HideSequencePacket(false);
 920
 921                 do {
 922                         offset = SocketZero::MakeNextFragment(send, outFrag, offset);
 923
 924                         // Is last packet ?
 925                         MAKE_PACKET(spack, outFrag);
 926
 927                         if (spack->command != SB_COMMAND_DB_FRAGMENTED)
 928                                 HideSequencePacket(true);
 929
 930                         Send(outFrag, inFrag, timeout);
 931
 932                         // only process sequence handshakes... once we
 933                         // get to the last fragment, we fall through to normal
 934                         // processing below
 935                         if (spack->command != SB_COMMAND_DB_FRAGMENTED) {
 936                                 MAKE_PACKET(rpack, inFrag);
 937
 938                                 if( offset && inFrag.GetSize() > 0 ) {
 939                                         Protocol::CheckSize(inFrag, SB_PACKET_HEADER_SIZE);
 940
 941                                         switch( rpack->command )
 942                                         {
 943                                         case SB_COMMAND_SEQUENCE_HANDSHAKE:
 944                                                 CheckSequence(inFrag);
 945                                                 break;
 946
 947                                         default: {
 948                                                 std::ostringstream oss;
 949                                                 oss << "Socket: (send) unhandled packet in Packet(): 0x" << std::hex << (unsigned int)rpack->command;
 950                                                 eout(oss.str());
 951                                                 throw Error(oss.str());
 952                                                 }
 953                                                 break;
 954                                         }
 955                                 }
 956                         }
 957
 958                 } while( offset > 0 );
 959
 960                 // To be sure that it's clean...
 961                 HideSequencePacket(true);
 962         }
 963
 964         bool done = false, frag = false;
 965         int blankCount = 0;
 966         while( !done ) {
 967                 MAKE_PACKET(rpack, inFrag);
 968
 969                 // check the packet's validity
 970                 if( inFrag.GetSize() > 0 ) {
 971                         blankCount = 0;
 972
 973                         Protocol::CheckSize(inFrag, SB_PACKET_HEADER_SIZE);
 974
 975                         switch( rpack->command )
 976                         {
 977                         case SB_COMMAND_SEQUENCE_HANDSHAKE:
 978                                 CheckSequence(inFrag);
 979                                 break;
 980
 981                         case SB_COMMAND_DB_DATA:
 982                                 if( frag ) {
 983                                         SocketZero::AppendFragment(receive, inFrag);
 984                                 }
 985                                 else {
 986                                         receive = inFrag;
 987                                 }
 988                                 done = true;
 989                                 break;
 990
 991                         case SB_COMMAND_DB_FRAGMENTED:
 992                                 SocketZero::AppendFragment(receive, inFrag);
 993                                 frag = true;
 994                                 break;
 995
 996                         case SB_COMMAND_DB_DONE:
 997                                 receive = inFrag;
 998                                 done = true;
 999                                 break;
1000
1001                         default: {
1002                                 std::ostringstream oss;
1003                                 oss << "Socket: (read) unhandled packet in Packet(): 0x" << std::hex << (unsigned int)rpack->command;
1004                                 eout(oss.str());
1005                                 throw Error(oss.str());
1006                                 }
1007                                 break;
1008                         }
1009                 }
1010                 else {
1011                         blankCount++;
1012                         //std::cerr << "Blank! " << blankCount << std::endl;
1013                         if( blankCount == 10 ) {
1014                                 // only ask for more data on stalled sockets
1015                                 // for so long
1016                                 throw Error("Socket: 10 blank packets received");
1017                         }
1018                 }
1019
1020                 if( !done ) {
1021                         // not done yet, ask for another read
1022                         Receive(inFrag);
1023                 }
1024         }
1025 }
1026
1027 void Socket::Packet(Barry::Packet &packet, int timeout)
1028 {
1029         Packet(packet.m_send, packet.m_receive, timeout);
1030 }
1031
1032 void Socket::Packet(Barry::JLPacket &packet, int timeout)
1033 {
1034         if( packet.HasData() ) {
1035                 HideSequencePacket(false);
1036                 PacketData(packet.m_cmd, packet.m_receive, timeout);
1037                 HideSequencePacket(true);
1038                 PacketData(packet.m_data, packet.m_receive, timeout);
1039         }
1040         else {
1041                 PacketData(packet.m_cmd, packet.m_receive, timeout);
1042         }
1043 }
1044
1045 void Socket::Packet(Barry::JVMPacket &packet, int timeout)
1046 {
1047         HideSequencePacket(false);
1048         PacketJVM(packet.m_cmd, packet.m_receive, timeout);
1049         HideSequencePacket(true);
1050 }
1051
1052 void Socket::NextRecord(Data &receive)
1053 {
1054         Barry::Protocol::Packet packet;
1055         packet.socket = htobs(GetSocket());
1056         packet.size = htobs(7);
1057         packet.command = SB_COMMAND_DB_DONE;
1058         packet.u.db.tableCmd = 0;
1059         packet.u.db.u.command.operation = 0;
1060
1061         Data command(&packet, 7);
1062         Packet(command, receive);
1063 }
1064
1065 void Socket::RegisterInterest(SocketRoutingQueue::SocketDataHandler handler,
1066                                 void *context)
1067 {
1068         if( !m_zero->m_queue )
1069                 throw std::logic_error("SocketRoutingQueue required in SocketZero in order to call Socket::RegisterInterest()");
1070
1071         if( m_registered )
1072                 throw std::logic_error("Socket already registered in Socket::RegisterInterest()!");
1073
1074         m_zero->m_queue->RegisterInterest(m_socket, handler, context);
1075         m_registered = true;
1076 }
1077
1078 void Socket::UnregisterInterest()
1079 {
1080         if( m_registered ) {
1081                 if( m_zero->m_queue )
1082                         m_zero->m_queue->UnregisterInterest(m_socket);
1083                 m_registered = false;
1084         }
1085 }
1086
1087
1088 } // namespace Barry
1089