Злополучная функция what_day(), Вычисление дня недели Опции

[alux]

Для инициализации Real Time Clock возникла необходимость вычисления дня недели по дате. Функция достаточно простая:

Код

//----------------------------------------------------------------------------
// Вычисления дня недели по дате
// Все деления целочисленные (остаток отбрасывается).
// Результат: 0 — воскресенье, 1 — понедельник и т. д.
//----------------------------------------------------------------------------
unsigned char what_day(unsigned int year, unsigned char month, unsigned char date)  
{
  unsigned char a = (14 - month) / 12;
  unsigned int y = year - a;        
  unsigned char m = month + 12*a - 2;
  
  return (7000 + (date + y + y/4 - y/100 + y/400 + (31*m)/12 ))% 7;  
}

Но по какой-то непонятной причине вызов ее приводит к глюкам программы. В частности, при входе в пункт меню невозможно из него выйти, при этом программа реагирует не так как задумано. Должен сказать, что проект использует ОС (scmRTOS) и ОЗУ использовано на 90%. Контроллер Mega324P (2кБ ОЗУ). Отладочными средствами (JTAG) пользоваться не представляется возможным. Это похоже на переполнение стека. Но. Почему это происходит, если вызов достаточно простой функции вставить в начале функции main (до запуска ОС):

Код

int main()
{
  what_day(2008, 6, 6);
.....................

Больше нигде в процессах она не используется. Пробовал менять размеры CSTACK (100...200) и RSTACK (32...64). Не помогло. Думаю менять контроллер на AT90USB1287. Но сделаю это в последнюю очередь. Может быть есть другой способ вычисления дня недели? Какие будут предложения?

[GetSmart]

Тогда выкладывайте HEX-файл. Функция деления - она общая для деления и остатка, кстати.

В MAP-файле с глюком указано, что последний адрес в раме = 087B, что вроде бы выходит за пределы чипа. Под рукой есть только описание mega323, у которого тоже 2 КБ и адреса в раме заканчиваются на 085F. Может файл линковки неправильный. Тоже выложите посмотреть.

Сообщение отредактировал GetSmart - Jun 7 2008, 22:06

[alux]

Тогда выкладывайте HEX-файл...Может файл линковки неправильный. Тоже выложите посмотреть.

Выкладываю файлы линковки, list, map и hex варианта с глюком. В настройках проекта Configure system using dialogы (not in XCL) стоит галка.
В функции what_day() , которую выкладывал ранее, закралась маленькая ошибка, не имеющая никакого отношения к глюку - после else нужно убрать пару фигурных скобок.

Прикрепленные файлы

 gluk.rar ( 76.3 килобайт ) Кол-во скачиваний: 40

 

[sKWO]

Выкладываю файлы линковки, list, map и hex варианта с глюком. В настройках проекта Configure system using dialogы (not in XCL) стоит галка.
В функции what_day() , которую выкладывал ранее, закралась маленькая ошибка, не имеющая никакого отношения к глюку - после else нужно убрать пару фигурных скобок.

Если я ещё не надоел, то в общем есть предложение переменную day сделать беззнаковой итежер
ну и тоже самое возвращаемое значение беззнаковый итежер функции what_day() .
при вычислении остатка от деления исспользуется макро US_DIVMOD_L02 - файл стандартный библиотеки ИАР I02.s90. Там происходит вот такое
'short' (i.e. 16 bit) unsigned division and modulo
Может поэтому результат возвращается не совсем корректно через беззнаковый чар хотя его размера и достаточно?

[alux]

Если я ещё не надоел, то в общем есть предложение переменную day сделать беззнаковой итежер
ну и тоже самое возвращаемое значение беззнаковый итежер функции what_day() .

Там же вычисления проводятся с int. К unsigned char day приводится лишь результат. Ну проверил на всякий случай... Не в этом дело.

Ещё как вариант, нужно сравнить два листинга с процедурой в которой наблюдаются глюки при вызове what_day(), припоминаю что это было в меню. Первый листинг скомпилированный с вызовом процедуры what_day(), в котором наблюдаются глюки. Второй листинг без этой процедуры и без глюков.

Листинги чего? Меню? Дело в том, что программа состоит из десятков файлов. Тем более это все работает под управлением ОС... Вкратце это выглядит так: обработка клавиатуры и получение скан-кода вынесено в высокоприоритетный процесс. Действие, необходимое при нажатии кнопки, зависит от текущего режима: если MainMenu- то навигация по пунктам меню, если EditValue - то редактирование параметров, и т.д....

Код

OS_PROCESS void TKeyScan::Exec()    //TProc1
{
  for(;;)
  {
      PCInt3.Wait();
    
    Sleep(20);        // Задержка 10*2=20мсек для устранения дребезга контактов
    
    scan_key();
  
    if(key_code.scan & KEY_PRESSED)
    {
      key_code.scan &= ~KEY_PRESSED;   // Clear MSB of scan_code (key_pressed)
    
      switch(key_code.scan)      
      {
         case UP:     //k_right
              CurrentMode->Up();  
              break;
              
         case DOWN:   //k_left
              CurrentMode->Down();
              break;
              
         case LEFT:   //k_esc
              CurrentMode->Left();
              break;
              
         case RIGHT:  //k_enter
              CurrentMode->Right();
              break;
              
         default:     // 0...9
              CurrentMode->Numeric();
              break;
      }
    }
  }
}

PS. Функцию вычисления дня недели заменил на предыдущую (Сергея Фролова). Она вычисляет правильно. По крайней мере мне не удалось найти "неправилные" дни. Причем вызов ее не приводит к глюку. Но стоит добавить что-нибудь, например, проверку валидности данных:

Код

if((date>=1)&&(date<=31)&&(month>=1)&&(month<=12)&&(year>=1996)&&(year<=2100))

или хотя бы просто :

Код

i2c_write(year-2000);

... сразу вылазит глюк...