Лингрин :: Резиденция Линды Кайе — @дневники: асоциальная сеть

среда, 02 сентября 2009

14:17

Тотальная неудачница и убийца жёстких дисков.

#post-id: 3325-23-45
#original-date: 2.09.2009 Wed
#original-time: 11:45 PM
#original-day: 3325
#original-host: WinXP Prof SP2 (Build 2600)

Если больше я ни чего не напутала, теперь все картинки дня будут нормальными и ни каких проблем не возникнет...

#music: I, My, Me, Strawberry Eggs OST\Dearest

URL

14:17

Тотальная неудачница и убийца жёстких дисков.

#post-id: 3325-23-34
#original-date: 2.09.2009 Wed
#original-time: 11:34 PM
#original-day: 3325
#original-host: WinXP Prof SP2 (Build 2600)

Зато освоила SafeArrayGetUBound() и SafeArrayRedim() ^^

#music: Dj Jinnai / Emily Bindiger / See-Saw\N/A\Stray Child/Obsession Remix [djjinnai.com]

URL

14:17

Тотальная неудачница и убийца жёстких дисков.

#post-id: 3325-23-22
#original-date: 2.09.2009 Wed
#original-time: 11:22 PM
#original-day: 3325
#original-host: WinXP Prof SP2 (Build 2600)

Вот фрагмент кода, который преобразует строку в Base64 строку.

  int RC = b64encode((char*)Buff->pvData, (char*)ResBuff->pvData, Buff->rgsabound->cElements, LineLen);
  if (RC == -1) {
    MAKE_EMPTY_STRING(RetVal);
  } else {
    // А теперь попробуем срезать нули... Дело в том, что 
    // оригинальный алгоритм где-то выдаёт в конце строки ноль, хотя 
    // размер буфера верен. Тоесть фактически алгоритм говорит, что 
    // нужен такой-то буфер, а сам возвращает на символ меньше. А мы 
    // учтём и другие слчуйности, срежем все нули...
    LONG nToCut = 0;
    LONG Index = 0;
    BYTE Char = 0;
    
    // Пробегаемся с верхнего индекса и считаем все нули...
    SafeArrayGetUBound(ResBuff, 1, &Index);
    do {
      HRESULT HR = SafeArrayGetElement(ResBuff, &Index, &Char);
      if (HR != 0) goto hConvertArray;
      
      if (Char == 0) nToCut++;
      Index--;
    } while (Char == 0 && Index >= 0);
    
    // Теперь ресайзим массив. Это эквивалентно ReDim Preserve...
    // Только перед этим не забываем разблокировать массив...
    if (nToCut > 0) {
      SAFEARRAYBOUND NewBound;
      
      NewBound.cElements = ResBuff->rgsabound->cElements - nToCut;
      NewBound.lLbound = ResBuff->rgsabound->lLbound;
      
      SafeArrayUnlock(ResBuff);
      HRESULT HR = SafeArrayRedim(ResBuff, &NewBound);
      if (HR != 0) DebugPrint("asBase64Encode() ==> SafeArrayRedim() returns error!");
      SafeArrayLock(ResBuff);
    }
    
hConvertArray:
    if (asStrConvW(&ResBuff, RetVal) != S_OK) MAKE_EMPTY_STRING(RetVal);
  }

Дело в том, что выделенный буфер при некоторых условиях может быть великоват, и функция в конце возвращает нуль. Велосипед выше должен был найти все нули в конце и отресайзить массив перед конвертацией в BSTR. Грубо, но мощно ^^

А вот код обратной функции. Я туда решила тоже добавить этот велосипед:

  SafeArrayLock(ResBuff);
  
  int RC = b64decode((char*)Buff->pvData, (char*)ResBuff->pvData, Buff->rgsabound->cElements);
  if (RC == -1) {
    MAKE_EMPTY_STRING(RetVal);
  } else {
    SafeArrayUnlock(ResBuff);
    
    SAB.cElements = RC;
    SAB.lLbound = 0;
    
    if (SafeArrayRedim(ResBuff, &SAB) != S_OK) {
      MAKE_EMPTY_STRING(RetVal);
    } else {
      SafeArrayLock(ResBuff);
      if (asStrConvW(&ResBuff, RetVal) != S_OK) MAKE_EMPTY_STRING(RetVal);
    }
  }

Меня сразу же смутило SafeArrayLock() прямо перед конвертацией (функцией asStrConvW()). Что за лок? Ведь прямо перед передачей в функцию кодирования строки массив уже блокируется! Я присмотрелась... Какой-то редим... Что за фигня? И тут...

Конечно же я идиотка ^^ Размер буфера вычисляется приблизительно, а уточняется он уже при преобразовании строки! Просто приблизительный всегда больше реального, чтобы не было переполнений. Проверила что возвращает b64encode() - так и есть... Мда...

Вот так пишешь две примерно одинаковые функции, одну дорабатываешь, и доработки забываешь перенести в первую функцию...

Сейчас поправим. Собственно, вот:

  SafeArrayLock(ResBuff);
  
  int RC = b64encode((char*)Buff->pvData, (char*)ResBuff->pvData, Buff->rgsabound->cElements, LineLen);
  if (RC == -1) {
    MAKE_EMPTY_STRING(RetVal);
  } else {
    SafeArrayUnlock(ResBuff);
    
    SAB.cElements = RC;
    SAB.lLbound = 0;
    
    if (SafeArrayRedim(ResBuff, &SAB) != S_OK) {
      MAKE_EMPTY_STRING(RetVal);
    } else {
      SafeArrayLock(ResBuff);
      if (asStrConvW(&ResBuff, RetVal) != S_OK) MAKE_EMPTY_STRING(RetVal);
    }    
  }

#music: Dj Jinnai / Megumi Hayashibara\N/A\Love Hina Remix [djjinnai.com]

URL

14:16

Тотальная неудачница и убийца жёстких дисков.

#post-id: 3325-21-04
#original-date: 2.09.2009 Wed
#original-time: 9:04 PM
#original-day: 3325
#original-host: WinXP Prof SP2 (Build 2600)

02.09.2009 в 21:01

Пишет Линда Кайе:

АНАЛИТИЧЕСКАЯ ПРОГРАММА "ОДНАКО" С МИХАИЛОМ ЛЕОНТЬЕВЫМ

Ведущий: Михаил Леонтьев
Эфир: Понедельник, Вторник, Среда, Четверг, Пятница после программы "Время"
Производство: ДИП Первый канал
Координаты: Москва, Королева 19, ДИП Первый канал, программа "Однако", [email protected]

Однако, здравствуйте!

Ровно семьдесят лет назад нападением нацистской Германии на Польшу началась Вторая мировая война, унесшая более 55 миллионов жизней, из которых половина - наши. Это наш неотменяемый вклад в общую победу. И вклад решающий, что признавали тогда наши западные союзники.

Сегодня нас пытаются поставить на одну доску с Гитлером, ссылаясь на пресловутый пакт Риббентропа-Молотова. Сегодня, в день памяти, эту подлость публично повторил президент Польши Качинский.

"Расчленение России стоит в основе польской политики на Востоке... Поэтому наша возможная позиция будет сводиться к следующей формуле: кто будет принимать участие в разделе? Польша не должна остаться пассивной в этот замечательный исторический момент". Из доклада Главного штаба Войска Польского. Декабрь 1938 года.

Иначе должна была начаться Вторая мировая. И предвоенная Польша сделала все, чтобы остаться союзником Гитлера, а не его противником. И не ее вина, что Гитлер этого не захотел. Польша имела практически аналогичный пакту "Риббентроп-Молотов" договор с Гитлером, благодаря чему приняла живейшее участие в расчленении Чехословакии и даже готовилась к аншлюсу Литвы и расчленению Украины.

Польшу подвели англичане, предоставившие ей гарантии в случае войны с Германией. Гарантии, которые они ни секунды не собирались выполнять. Англичане, знавшие содержание секретных протоколов советско-германского пакта, скрыли его от поляков, чтобы не дать им шанса уклониться от войны.

Западные союзники сдали Польшу Гитлеру, потому что, только сдав Польшу, можно было стравить Гитлера с Советским Союзом.

"Поляки — жалкая, ни к чему не способная хвастливая банда. Это также хорошо известно англичанам, как и нам". Адольф Гитлер. 3 сентября 1939 года.

"Чехи — свиноголовая раса. Великобритания не собирается рисковать ни одним своим матросом или летчиком ради Чехословакии". Невилл Гендерсон, британский посол в Берлине, 1938 год.

Чехословакию западные союзники сдали Гитлеру, как и Польшу. "Мюнхенский сговор" называется. Теоретически война могла бы начаться раньше ровно на год. Или не начаться вообще. Потому что Советский Союз до последней минуты подтверждал свои гарантии Чехословакии.

Именно поэтому Чехословакию надо было заставить сдаться без боя. Чехословацкая армия, сопоставимая по численности и вооружению с тогдашней германской, сдалась без единого выстрела.

Чемберлен: "Германия и Англия являются двумя столпами европейского мира и главными опорами против коммунизма. Наверное, можно будет найти решение, приемлемое для всех, кроме России". Британский премьер Чемберлен, 2 сентября 1938 года, накануне встречи с Гитлером и сдачи Чехословакии.

Единственной последовательно осуществляемой целью наших западных союзников накануне войны было натравить на нас Гитлера. Пакт Риббентропа-Молотова, как бы к нему ни относились, эту игру сбил. Это факт.

А то, что Польша не сдалась без боя, как не сдавалась никогда, что польских дивизий СС не было никогда, как никогда не было и не будет польских национальных героев, спасавших Польшу сотрудничеством с нацистами — это тоже факт. Какие бы там исторические претензии мы друг другу не предъявляли.

И именно поэтому наш премьер сегодня в Польше. И мы чтим память наших общих жертв с нашим общим врагом.

Однако, до свидания!

URL записи

#music: Serial Experiments Lain\Serial Experiments Lain : Bootleg\MJ-XX

URL