#!/usr/bin/env python
'''
Copyright (c) 2010 Doug McCall [dhm116@dougmccall.com]
 
Permission is hereby granted, free of charge, to any person obtaining a copy of
this software and associated documentation files (the "Software"), to deal in
the Software without restriction, including without limitation the rights to
use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
of the Software, and to permit persons to whom the Software is furnished to do
so, subject to the following conditions:
 
The above copyright notice and this permission notice shall be included in all
copies or substantial portions of the Software.
 
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
SOFTWARE.
'''
 
from Tkinter import *
 
import csv, tkFileDialog
 
master = Tk()
master.withdraw()
 
# Get the CSV file
filename = tkFileDialog.askopenfilename(filetypes=[('CSV Files', '.csv')])
 
people = open(filename, "rb")
 
rows = people.readlines()
 
# We've got the rows, so close the actual file
people.close()
 
# Remove the header row so it's not processed
header = rows.pop(0);
 
# Start a list of corrected addresses
fixed = []
 
# Iterate through the rows of data
for row in rows:
    # Store this row in something else in case we can't directly manipulate the row data
    data = row
 
    # This should probably be corrected, but for now just arbitrarily pick some length
    # for the contact line to be longer than
    if len(row) > 50:
        #print "Adding new address line"
 
        # If we already have some corrected addresses, append a new line
        # * This probably isn't necessary any more now that I'm feeding the
        #   fixed data as a list to the CSV reader
        if len(fixed) > 0:
            index = len(fixed) - 1
            fixed[index] = ''.join((fixed[index], '\r\n'))
 
        # Add the data to the list of corrected data with any carriage returns removed
        fixed.append(data.rstrip())
 
        #print "\t" + fixed[len(fixed) - 1]
 
    else:
        # We've found a fragmented address line
 
        #print "\tAdding split address line"
 
        # Strip off the carriage return at the end
        data = data.rstrip()
 
        #print "\t\t" + data
 
        # Join this fragmented address line to the previous line of data
        index = len(fixed) - 1
        fixed[index] = ', '.join((fixed[index], data))
 
        #print "\tFixed version"
        #print "\t\t" + fixed[index]
 
        #if data.count(',,,,,,,,,,,,,,,,,,,,,,,') == 0:
        #    print 'Looking for the next full address'
        #    row_start = True
 
# Put the header row back in the corrected data
fixed.insert(0,header)
 
# Load the corrected data in to the CSV reader to more easily manipulate the columns
spamReader = csv.reader(fixed, delimiter=',')
 
# Ask the user where to save the resulting data    
filename = tkFileDialog.asksaveasfilename(filetypes=[('CSV Files', '.csv')])
 
f2 = open(filename, 'w')
 
writer = csv.writer(f2, delimiter=',')
 
rownum = 0
for row in spamReader:
    if rownum > 0:
        # Print out the fully corrected address for debugging
        print str(rownum) + ": " + row[36]
 
        # Isolate the address parts
        addr = row[36].split(',')
 
        # Obtain the State and Zip code from the last part of the address
        state_zip = addr.pop().split()
 
        # If we're not using state abbreviations and there is a space in the state
        # name, we need to merge those back together
        if len(state_zip) > 2:
            state_zip[0] = state_zip[0] + " " + state_zip[1]
 
            # Get rid of the unneeded parts from the merge
            state_zip.pop(1)
 
        # Combine the state and zip back in with the address
        addr.extend(state_zip)
        #print addr
 
        # Set the address column data
        row[37] = addr[0]
 
        # Set the city
        row[38] = addr[-3].lstrip()
 
        # If there is a secondary address (apt. num, etc.)
        if len(addr) > 4:
            row[39] = addr[1]
 
        # Set the state
        row[40] = addr[-2]
 
        # Set the zip code
        row[41] = addr[-1]
 
        #print row
 
    writer.writerow(row)
    rownum += 1
 
f2.close()

function generateCombinations(array, r, callback) {
  var length = array.length;
  var results = [];
 
  for(var x = 0; x < length; x++)
  {
    var rows = recurse(array, x, 1, r);
 
    //mergeResults(results, rows);
    var rowslength = rows.length;
    for(var y = 0; y < rowslength; y++)
    {
      results.push(rows[y]);
    }
  }
 
  callback(results);
}
 
function recurse(array, index, level, r)
{
  var num = array.splice(index, 1);
  var row = [];
 
  for(var x = 0; x < array.length; x++)
  {
    if(level < r - 1)
    {
      var combo = mergeResults(num,recurse(array, x, level + 1, r));
      var combolength = combo.length;
      for(var y = 0; y < combolength; y++)
        row.push(combo[y]);
    }
    else
      row.push(num.concat(array[x]));
  }
 
  array.splice(index, 0, num);
 
  return row;
}
 
function mergeResults(target, source)
{
  var length = source.length;
  var results = [];
 
  for(var x = 0; x < length; x++)
  {
    results.push(target.concat(source[x]));
  }
 
  return results;
}
 
function generateButtonClick() {
    var n = ["one", "two", "three", "four", "five"];
    var r = parseInt(document.getElementById("howmany").value);
    var startswith = $('startswith').value;
    var contains = $('contains').value;
    var result = document.getElementById("namelist");
    result.innerHTML = "";
    generateCombinations(n, r, function(combo) {
      for(var x = 0; x < combo.length; x++)
      {
        var name = combo[x].join(" ");
 
        var li = new Element('ul').update(name);
 
        if(startswith != "")
        {
          if(combo[x][0] != startswith)
            li = null;
        }
 
        if(contains != "" && name.indexOf(contains) == -1)
        {
          li = null;
        }
 
        if(li != null)
          result.appendChild(li);
      }
    });
}

<?php
 
$realm = 'Restricted area';
$logged_in = false;
 
$users = loadUsers("/home/dhm116/Secured");
//var_dump($users);
 
if (empty($_SERVER['PHP_AUTH_DIGEST'])) {
    header('HTTP/1.1 401 Unauthorized');
    header('WWW-Authenticate: Digest realm="'.$realm.
           '",qop="auth",nonce="'.uniqid().'",opaque="'.md5($realm).'"');
 
    die('You may not access this area without properly authenticating');
}
 
 
// analyze the PHP_AUTH_DIGEST variable
if (!($data = http_digest_parse($_SERVER['PHP_AUTH_DIGEST'])) ||
    !isset($users[$data['username']]))
	{
		header('HTTP/1.1 401 Unauthorized');
		header('WWW-Authenticate: Digest realm="'.$realm.
			   '",qop="auth",nonce="'.uniqid().'",opaque="'.md5($realm).'"');
		die('Wrong Credentials!');
	}
 
// generate the valid response
$A1 = md5($data['username'] . ':' . $realm . ':' . $users[$data['username']]["pwd"]);
$A2 = md5($_SERVER['REQUEST_METHOD'].':'.$data['uri']);
$valid_response = md5($A1.':'.$data['nonce'].':'.$data['nc'].':'.$data['cnonce'].':'.$data['qop'].':'.$A2);
 
if ($data['response'] != $valid_response)
{
	header('HTTP/1.1 401 Unauthorized');
	header('WWW-Authenticate: Digest realm="'.$realm.
		   '",qop="auth",nonce="'.uniqid().'",opaque="'.md5($realm).'"');
	die('Wrong Credentials!');
}
 
// ok, valid username & password
//echo 'Your are logged in as: ' . $data['username'];
$logged_in = true;
 
// function to parse the http auth header
function http_digest_parse($txt)
{
    // protect against missing data
    $needed_parts = array('nonce'=>1, 'nc'=>1, 'cnonce'=>1, 'qop'=>1, 'username'=>1, 'uri'=>1, 'response'=>1);
    $data = array();
    $keys = implode('|', array_keys($needed_parts));
 
    preg_match_all('@(' . $keys . ')=(?:([\'"])([^\2]+?)\2|([^\s,]+))@', $txt, $matches, PREG_SET_ORDER);
 
    foreach ($matches as $m) {
        $data[$m[1]] = $m[3] ? $m[3] : $m[4];
        unset($needed_parts[$m[1]]);
    }
 
    return $needed_parts ? false : $data;
}
 
if(isset($_GET["file"]) && $logged_in)
{
	send_download($_GET["file"]);
}
 
function send_download($filename)
{
	$file_path = '/home/dhm116/Secured/'.$_GET["user"].'/'. $filename;
 
	if(file_exists($file_path))
	{
		$file_size=@filesize($file_path);
		header("Content-Type: application/x-zip-compressed");
		header("Content-disposition: attachment; filename=\"$filename\"");
		header("Content-Length: $file_size");
		readfile($file_path);
		exit;
	}
} 
 
function loadUsers ($directory) 
{
    // create a handler for the directory
    $handler = opendir($directory);
 
    // keep going until all files in directory have been read
    while (false !== ($file = readdir($handler))) {
        // if $file isn't this directory or its parent, 
        // add it to the results array
        if ($file != '.' && $file != '..' && is_dir($directory."/".$file))
		{
			$myFile = $directory."/".$file."/.auth.txt";
 
			if(file_exists($myFile))
			{
				$fh = fopen($myFile, 'r');
 
				// Load and set the user password
				$users[$file]["pwd"] = fread($fh, filesize($myFile)-1);
 
				fclose($fh);	
 
				// Set the files within that user directory
				$users[$file]["files"] = dirList($directory."/".$file);
			}
		}
    }
 
    // tidy up: close the handler
    closedir($handler);
 
    // done!
    return $users;
}
 
function dirList ($directory) 
{
    // create an array to hold directory list
    $results = array();
 
    // create a handler for the directory
    $handler = opendir($directory);
 
    // keep going until all files in directory have been read
    while (false !== ($file = readdir($handler))) {
 
        // if $file isn't this directory or its parent, 
        // add it to the results array
        if ($file != '.' && $file != '..' && $file != '.auth.txt')
            $results[] = $file;
    }
 
    // tidy up: close the handler
    closedir($handler);
 
    // done!
    return $results;
 
}
?>
<html>
	<head><h1>Secure Download Area</h1></head>
	<body>
		<p>Files available for <?php echo $data['username']; ?></p>
		<ul>
		<?php
			$filelist = $users[$data["username"]]["files"];
 
			foreach($filelist as $i => $value)
			{
		?>
			<li><a href="securedownload.php?user=<?php echo $data['username'] ?>&file=<?php echo $value; ?>">Download <?php echo $value; ?></a></li>
		<?php
			}
		?>
		</ul>
	</body>
</html>