/**
 *    @param    string    $did    Default ID
 *    @param    string    $aid    Alternate ID
 *    @param    integer    $weight    Weight
 *
 *    @return    string    AdSense Publisher ID
 */
function _adsense_get_publisher_id( $did, $aid, $weight )
{
    $random = mt_rand( 1, 100 );
    if( $random <= $weight )
        $did = $aid;
    return( $did );
} 

// default_pub will always be at the '0' index
// this example uses 10% for default and 8 additional pubID's
// that will be evenly weighted.

unsigned ASpubID[9] = { 111, 222, 333, 444, 555, 666, 777, 888, 999 };

// when the random lookup array is built, it's info will refer to this array.
// EX. rnd_array = { 0, 2, 8, 8, 5, 2, 0, 3, 4, 4, ... }

// copyright (C) 2005 Mark Roth Nescopeck PA
// No warrenty, no nothing.  If you don't like it don't run it.

#include <iostream>
#include <string>
#include <cstdlib>
#include <ctime>
using std::cin;
using std::cout;
using std::endl;
using std::string;
using std::getline;
using std::atoi;

static bool seeded = false;

const unsigned GetPer100(const unsigned DefPercent, const unsigned OtherIDs){
  // gets a count less than or equal to 100.  It is the per/100 number
  const unsigned per100units = DefPercent + (((100-DefPercent)/OtherIDs)*OtherIDs);
  return per100units;
}


const unsigned GetMagic100(const unsigned Per100units, const unsigned OtherID){
  // gets the number that will set the size of the random index array
  unsigned magic100;
  const unsigned per100remain = 100 - Per100units;

  for(magic100 = 1; ((per100remain * magic100) % OtherID) != 0; magic100++);
  return magic100;
}


void RNDseed(){
  // a one shot random seed
  srand(time(NULL));
  seeded = true;
}


const unsigned RNDgen(const int MAX) {
  // a simple random number generator
  // returns a number from 0 to MAX-1
  return (rand() % MAX);
}


void BuildRndList( unsigned array[], const unsigned size,
                   const unsigned OtherIDs, const unsigned OtherIDamt ){
  // does the work of building the weighted list
  if (seeded == false) RNDseed();
  // set array to all '0'
  for ( unsigned i = 0; i < size; i++ ) array[i] = 0;
  for ( unsigned i = 1; i <= OtherIDs; i++) {
    for (unsigned j = 0; j < OtherIDamt; j++) {
      bool loop = true;
      do{
        const unsigned RNDnum = RNDgen(size);
        if ( array[RNDnum] == 0 ) {
          array[RNDnum] = i;
          loop = false;
        }
      }while ( loop );
    }
  }
}

const unsigned GetUnsigned(const string text, unsigned hi, unsigned low){
  // returns an number within a given range
  string buf;
  unsigned atoi_buf;

  do{

    cout << "Enter " << text << " : ";
    getline(cin, buf);
    atoi_buf = atoi(buf.c_str());

  }while ( (atoi_buf > hi) || (atoi_buf < low) );

  return atoi_buf;
}


int main(){

  string buffer;
  
  do{
    unsigned magic_number;

    const unsigned defID = GetUnsigned("DefID percentage ", 100, 0);
    const unsigned otherIDs = GetUnsigned("OtherID number   ", 50, 1);
    const unsigned per100units = GetPer100( defID, otherIDs);
    unsigned ASpubID[1 + otherIDs];

    for ( unsigned i = 0; i < (otherIDs + 1); i++ ) ASpubID[i] = 100 + i;

    magic_number = GetMagic100(per100units, otherIDs);
    const unsigned array_size = magic_number * 100;
    cout << "units per 100 unused = " << 100 - per100units << endl;
    cout << "array_size = " << array_size << endl << endl;
    unsigned rndASpubID[array_size];
    const unsigned otherIDamt = (array_size - (defID * magic_number)) / otherIDs;
    
    BuildRndList( rndASpubID, array_size, otherIDs, otherIDamt );
    
    // at this point the array rndASpubID has a list of publisher indexes
    // that can be used by a stack system to actually access the proper
    // ID.  Everything below is just for testing and display.

    unsigned counter[51];
    for ( unsigned i = 0; i <= 51; i++ ) counter[i] = 0;
    for ( unsigned i = 0; i < array_size; i++) {
      cout << ASpubID[rndASpubID[i]] << "  ";
      counter[rndASpubID[i]]++;
    }
    cout << endl;
    for ( unsigned i = 0; i < (otherIDs + 1); i++ ) {
      cout << endl << "number of " << ASpubID[i] << "'s = " << counter[i] << endl;
    }
    cout << endl;

    cout << "try another combo (y/n) : ";
    getline(cin, buffer);
  }while (buffer == "y");

  return 0;
}