From 4ff17e6f58279d526bd1b5cd6ac51b1cf330e5cd Mon Sep 17 00:00:00 2001
From: leslie <unknown>
Date: Sun, 24 May 2009 21:26:50 +0800
Subject: [PATCH] nagra-0101: (temp) fix map 3b/4f (sasc r75)

---
 systems/nagra/nagra2-0101.c | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/systems/nagra/nagra2-0101.c b/systems/nagra/nagra2-0101.c
index 788e28b..11ccec7 100644
--- a/systems/nagra/nagra2-0101.c
+++ b/systems/nagra/nagra2-0101.c
@@ -306,8 +306,8 @@ bool cMap0101::Map(int f, unsigned char *data, int l)
       AddMapCycles(327);
       BN_zero(B);
       BN_set_bit(B,104);
+      AddMapCycles(46-373);
 // END FIX
-      AddMapCycles(46);
       IMonInit0(wordsize*60+4*l);
       I.GetLE(data,l<<3);
       MonMul(B,I,B,l);
@@ -381,7 +381,9 @@ bool cMap0101::Map(int f, unsigned char *data, int l)
       break;
     case 0x4f:
 // START INCOMPLETE FIX
-      BN_copy(D,B);
+      BN_zero(A);
+      BN_set_bit(A,40); //cycles=808
+      BN_add(A,A,A);
 // END INCOMPLETE FIX
       break;
     case 0x57:
-- 
2.39.5