Seva Alekseyev (he/him) sevaa

sevaa / RequestTLSCert.ps1

Last active January 4, 2024 00:42

RequestTLSCert.ps1

	# 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 / MurMur.sql

Last active July 7, 2020 17:28

MurMurHash64B in MySQL dialect of SQL

	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 / MurMur.pas

Last active February 14, 2020 22:45

MurMurHash64B in Pascal

	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 / Delta.cs

Created October 18, 2019 14:48

C# wrapper around MSDelta's ApplyDeltaB API

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

sevaa / FromUTF8.sql

Last active November 7, 2021 21:28

Converting a VARBINARY data block in UTF-8 to a NVARCHAR string in pure Transact-SQL

	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))

sevaa / ImportTFSTable.sql

Last active July 31, 2020 16:14

Creates a federating view of all instances of a TFS table in a separate database, for cross-collection queries

	CREATE PROC dbo.ImportTFSTable(@Owner varchar(100), @Table as varchar(100), @WithConfig as int = 0)
	AS
	declare @SQL varchar(max), @FieldSet varchar(max)
	set @FieldSet = (select '[' + name + ']' as a from Tfs_DefaultCollection.sys.columns
	where [object_id]=object_id('Tfs_Contracts.'+@Owner+'.'+@Table)
	order by column_id
	for xml path(''))
	set @FieldSet = replace(substring(@FieldSet, 4, len(@FieldSet) - 7), '</a><a>', ',')

	set @SQL = (select 'select {guid'''+cast(HostId as varchar(36))+'''} as CollID, ' + @FieldSet + ' from [' + replace(substring(DatabaseName, charindex(';', DatabaseName) + 1, 200), '"', '') + '].' + @Owner+ '.' + @Table as a

sevaa / tfsmyscopes.aspx

Created April 27, 2018 15:51

This page retrieves the scopes for a TFS issued OAuth token

	<%@ Page Language="C#"%>
	<%@ Import namespace="System.IdentityModel.Tokens" %>
	<%
	Response.ContentType = "text/plain";
	string Token;
	if((Token = Request.QueryString.Get("Token")) != null)
	{
	Response.Write(new JwtSecurityToken(Token).Payload["scp"]);
	}
	%>

sevaa / TFS_UploadExt.ps1

Last active March 27, 2019 17:58

A Powershell script to upload a TFS extension to an on-prem TFS instance with NTLM auth

	param
	(
	[string]$Server,
	[string]$File
	)

	try
	{
	Add-Type -Assembly "System.IO.Compression.FileSystem"
	Add-Type -Assembly "System.Xml"

sevaa / tfsscopes.aspx

Last active April 26, 2019 17:51

See the OAuth scopes of TFS

	<%@ Page Language="C#"%>
	<%@ Import namespace="Microsoft.VisualStudio.Services.DelegatedAuthorization" %>
	<%@ Import namespace="System.Collections.Generic" %>
	<%@ Import namespace="System.Linq" %>
	<html><body>
	<%
	AuthorizationScopeDefinitions Defs = AuthorizationScopeDefinitions.Default;
	foreach(AuthorizationScopeDefinition Sc in Defs.scopes)
	Response.Write("<b>"+Sc.scope +"</b><br/>\n<ul>\n<li>" + string.Join("</li>\n<li>", Sc.patterns) + "</li>\n</ul>\n");
	%>

sevaa / Dispatcher.cpp

Created November 2, 2017 14:50

Native process isolation using COM and ROT

	#include <windows.h>
	#include <process.h>
	#include <comdef.h>
	#include "..\\Worker\\Protocol.h"
	#include <string>

	using namespace std;

	volatile static unsigned int s_CookieGen = 0;