sevaa

from sys import argv
from elftools.common.exceptions import ELFParseError
from elftools.dwarf.locationlists import LocationLists, LocationListsPair, LocationParser
from elftools.elf.elffile import ELFFile
from inspect import getframeinfo
from elftools.dwarf.dwarfinfo import DWARFInfo

def location_lists(self):
    """ Get a LocationLists object representing the .debug_loc/debug_loclists section of
        the DWARF data, or None if this section doesn't exist.

sevaa

#include <windows.h>

static const GUID CLSID_B =
{ 0x51addb47, 0xd26a, 0x4f69, { 0xb9, 0x7b, 0x7e, 0x30, 0x62, 0x8d, 0xcf, 0x5b } };


int APIENTRY wWinMain(_In_ HINSTANCE hInstance,
                     _In_opt_ HINSTANCE hPrevInstance,
                     _In_ LPWSTR    lpCmdLine,
                     _In_ int       nCmdShow)

sevaa

param($Path, $Property, $Value)

$i = New-Object -COM "WindowsInstaller.Installer"
$db = $i.OpenDatabase($Path, 2)
$r = $i.CreateRecord(2)
$r.StringData(1) = $Value
$r.StringData(2) = $Property
$vw = $db.OpenView("update Property set Value=? where Property=?")
$vw.Execute($r)
$r = $null

sevaa

#define INITGUID
#include <SDKDDKVer.h>
#define WIN32_LEAN_AND_MEAN
#include <windows.h>
#include <mfidl.h>
#include <mfapi.h>
#include <evr.h>
#include <cguid.h>
#include <propvarutil.h>
#include <comdef.h>

sevaa

using Microsoft.Win32.SafeHandles;
using System.Diagnostics;
using System.Text;
using System;
using System.Threading;

namespace COMNET
{
    public class Program
    {

sevaa

# Requires .NET 4.7.2+ or Core 2.0+
# Basic parameters. For TLS certs for IIS, this is sufficient
$Hostname = "foo.example.com" # Goes into Subject as the CN
$AltHostnames = @("foo.example.com", "bar.example.com", "baz.example.com") # These go into Subject Alternative Name
$DNPostfix = "OU=IT;O=Acme;L=Chicago;S=Illinois;C=US" # What follows the CN in the Subject field. Optional!
$FriendlyName = "foo" # Optional but highly recommended
$TermDays = 3650 # Expiration date for the temporary self-signed cert. The CA will probably override the exp date anyway.
$CSRPath = "c:\\MyCert.csr" # Your path WILL vary.
$SaveUnderLocalMachine = $false # False for current user, true for local machine.

sevaa

drop function if exists MurmurHash64B;
delimiter $$
create function MurmurHash64B(s longblob, seed int unsigned)
returns bigint unsigned
deterministic no sql
begin
    declare m int unsigned default 0x5bd1e995;
    declare r int default 24;
    
    declare len int default length(s);

sevaa

unit MurMur;
interface

function MurmurHash64B(s: PAnsiChar; Len: Integer; Seed: UInt32) : UInt64;

implementation

function MurmurHash64B(s: PAnsiChar; Len: Integer; Seed: UInt32) : UInt64;
const
    m = $5bd1e995;

sevaa

class Delta
{
    [StructLayout(LayoutKind.Sequential)]
    private struct DELTA_INPUT
    {
        public IntPtr lpcStart;
        public UIntPtr uSize;
        [MarshalAs(UnmanagedType.Bool)]
        public bool Editable;
    }

sevaa

create function dbo.FromUTF8(@s varbinary(max))
returns nvarchar(max)
as
begin
    declare @i int = 1, @n int = datalength(@s), @r nvarchar(max) = N''
    declare @c int, @c2 int, @c3 int, @c4 int, @u int

    while @i <= @n
    begin
        set @c = ascii(substring(@s, @i, 1))